Argh. I didn't think of this. It's currently not really possible
to create a TinyCLOS instance from a C++ pointer. Thanks for pointing
this out! I have now implemented the following (slightly crude) method: the
initargs for the invocation of `make' can alternatively be the symbol 'this
followed by a pointer, so you would have something like this:
(define-entry-point 1 ((ptr c-pointer)) (int)
(let ([a (make <ClientApp> 'this a)])
(print (ChickenCallin a "bing"))
1) )
Normally the initargs are passed to the C++ constructor. If 'this
is given, the C++ constructor will not be invoked.
I'll check this in the CVS in a few moments.
cheers,
felix