r3wp [groups: 83 posts: 189283]
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search
 

World: r3wp

[Red] Red language group

Dockimbel
17-Sep-2011
[3373]
Just thinking about a drawback for your proposition: Windows API 
expects callbacks using stdcall convention...
Kaj
17-Sep-2011
[3374]
I'm falling apart here. I'm going to sleep
Dockimbel
17-Sep-2011
[3375]
Same here.
Kaj
17-Sep-2011
[3376x2]
:-)
In C system programs it's common to specify the calling convention. 
It's probably reasonable to require an attribute, but I would say 
callbacks for Windows are the exception that would require one
Dockimbel
18-Sep-2011
[3378]
Red/System uses stdcall too internally, so forcing user to use a 
cdecl attribute for Red level callbacks is not natural. Need to think 
more about it to find a better option.
Kaj
18-Sep-2011
[3379]
No, I mean to default to cdecl - which I thought was already implied 
by CALLBACK - and require to add stdcall only for Windows system 
callbacks
Dockimbel
18-Sep-2011
[3380]
I don't think it is a good solution to put the burden on Windows 
users only.
Kaj
18-Sep-2011
[3381x2]
It's only for Windows system callbacks. Most all other libraries 
on Windows use cdecl, and it is only for callbacks, not for general 
Windows system functions
If stdcall would be the default, even Windows users would have to 
write it many more times than the other way around
Kaj
19-Sep-2011
[3383]
I've started on an SQLite binding
Dockimbel
19-Sep-2011
[3384x3]
Ah, nice :-)
I have documented the calling convention issue here: https://github.com/dockimbel/Red/issues/176
I think it should be reasonable enough to choose cdecl when a function 
pointer is passed to a variadic function.
Pekr
19-Sep-2011
[3387]
Doc - I noticed (in your presentation), that port! dtype will be 
supported. I wondered how IO is going to be done,e.g. networking,or 
files. Will it be wrappers written in RED upon read-io, write-io 
Red/System functions?
Dockimbel
19-Sep-2011
[3388]
I haven't decided yet on the implementation detail, but my current 
plan is to use a R3-like approach, passing messages to a lower-level 
layer wrote in Red/System.
Kaj
19-Sep-2011
[3389]
Note that I'm only using variadic functions in the GTK binding so 
far. The issues in the other bindings are with regular functions
Dockimbel
19-Sep-2011
[3390x2]
Are you using also function pointers only in GTK binding?
Are you using function pointers only in GTK binding?
Kaj
19-Sep-2011
[3392x2]
No, there are callbacks in most bindings
The crash on the older GTK on Syllable Server is gone
Dockimbel
19-Sep-2011
[3394]
Will it be wrappers written in RED upon read-io, write-io Red/System 
functions?
 


Just to be sure there is no confusion: the read-io and write-io function 
mentioned in the slides have nothing to do with the REBOL homonyms. 
The Red/System ones are wrapper on CPU's IN and OUT instructions.
Pekr
19-Sep-2011
[3395]
OK, thanks for the clarification ...
Kaj
19-Sep-2011
[3396]
SDL audio still crashes
Dockimbel
19-Sep-2011
[3397x2]
You should compile it in verbose mode (-v 6) and check the callbacks 
calling convention in the symbols block at the end of the compilation 
logs.
It should be stdcall or cdecl. If you see ??, it means the compiler 
hasn't been able to solve it.
Kaj
19-Sep-2011
[3399]
Bingo, it says ?? for the audio callback
Dockimbel
19-Sep-2011
[3400x3]
Ah!
The ?? is the default value for cconv. When the compiler encounters 
a get-word!, it propagates the cconv from the function using it as 
argument.
How are you passing callbacks? Same way as with GTK binding through 
a variadic function?
Kaj
19-Sep-2011
[3403]
As I noted above, no variadic functions in the other bindings yet
Dockimbel
19-Sep-2011
[3404]
Can you show me the code pattern you're using for the callbacks in 
SDL audio binding?
Kaj
19-Sep-2011
[3405]
stream!: alias struct! [
;	data				[binary!]
	index				[binary!]
	rest				[integer!]
]
fetch-audio: function [  ; Read sound buffer to be played.
	[callback]
	source				[stream!]
	sink				[binary!]
	size				[integer!]
	/local slice
][
	slice: source/rest
	if slice > size [slice: size]

;	copy-part source/index sink slice
	sdl-mix-audio sink source/index slice sdl-mix-max-volume

	source/index: source/index + slice
	source/rest: source/rest - slice
]
Dockimbel
19-Sep-2011
[3406]
Ok, so how are you installing the fetch-audio callback?
Kaj
19-Sep-2011
[3407x2]
desired/callback: as-integer :fetch-audio
desired:	declare sdl-audio-spec!
Dockimbel
19-Sep-2011
[3409x2]
Ok, so the cause is obvious, no way for the compiler to figure out 
the cconv in such case.
I think that I will just accept both 'stdcall and 'cdecl attribute 
in cases like this where the compiler can't determine the right calling 
convention. I will also add a check at the end of the compilation 
to raise errors for unresolved calling conventions.
Kaj
19-Sep-2011
[3411]
That's nice, but why not default to cdecl?
Dockimbel
19-Sep-2011
[3412]
The default needs to be a non-usable value for the compiler to be 
able to catch unresolved calling convention. If it's cdecl or stdcall, 
the compiler won't report the error which can lead to stack corruption 
at runtime.
Kaj
19-Sep-2011
[3413]
Are you sure the current resolver is watertight, then?
Dockimbel
19-Sep-2011
[3414x3]
The current resolver only works for simple cases, basically, only 
when you're directly passing a function pointer as argument to a 
function.
I need to add the unresolved calling convention error routine.
When such error will be reported, users would need to provide manually 
this information, by adding 'cdecl or 'stdcall as attribute.
Kaj
19-Sep-2011
[3417]
I don't really see a connection between the function a pointer is 
passed to and the function that will eventually call it
Dockimbel
19-Sep-2011
[3418]
Well, it depends if the function taking a function pointer is invoking 
it directly or if it's passing it to another function (local or imported). 
In the former case, the compiler can set the right cconv itself, 
in the latter case, it can't and need some help from the user.
Kaj
19-Sep-2011
[3419]
Yes, so is the current inferer always guessing right?
Dockimbel
19-Sep-2011
[3420x3]
Let me have a look at the specs, I remember there was an edge case 
documented there...
No trace of any special cases in the specs anymore. So, the compiler 
is always guessing right, when it can guess. When it can't, it leaves 
the cconv in undetermined state (??).
The inferer is very simple, it just looks at the cconv of the calling 
function and propagates it to the callback. If the callback has already 
a cconv defined, it checks if both cconv matches, and raise an error 
if it's not the case.