[Ecls-list] Callback in ECL

[Goffioul Michael]

To illustrate what I had in mind in my previous mail concerning
callbacks, here's dirty code (not working).

It contains some compiler hacking to handle c-callback forms, and
a user-level macro def-callback. The compiler hack produces the LISP
function and put a foreign-data as property of the callback symbol
(currently, it uses the 'catch property, this is to be changed, I
just used an existing symbol). This is not the correct goal, because
what should be put as a property is a pointer to the (missing) C
wrapper instead of the plain LISP function.

At this point, I still didn't figure out how to produce the C wrapper
code and push it into the function list, my knowledge of the ECL
compiler is *quite* limited (although this little exercise tought
me already a lot...)

Comments and flame wars are welcome.

Bye.
Michael.
-------------- next part --------------
A non-text attachment was scrubbed...
Name: cmpcb.lsp
Type: application/octet-stream
Size: 917 bytes
Desc: cmpcb.lsp
URL: <https://mailman.common-lisp.net/pipermail/ecl-devel/attachments/20050824/2b82d053/attachment.obj>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: cb-test.lsp
Type: application/octet-stream
Size: 666 bytes
Desc: cb-test.lsp
URL: <https://mailman.common-lisp.net/pipermail/ecl-devel/attachments/20050824/2b82d053/attachment-0001.obj>