Re: [Chicken-users] s11n and tinyclos

[felix winkelmann]

On Fri, Oct 24, 2008 at 7:43 AM, Shawn Rutledge
<address@hidden> wrote:
>>
>> Or anything that has a global identity, beyond built-in. Need some kind of
>> '(remain <object>)' to designate existing "root" objects, i.e. objects that
>> will exist when the de-serialization occurs. How to handle the "root"
>> dependency is unspecified.
>
> That was a long time ago... now I just found myself wanting to try
> this too.  The behavior is different:
>
> #;1> (use s11n)
> ; loading /usr/lib64/chicken/3/s11n.so ...
> #;2> (use tinyclos)
> ; loading /usr/lib64/chicken/3/tinyclos.scm ...
> ; loading /usr/lib64/chicken/3/tinyclos-base.so ...
> #;3> (define-class <thing> () (element))
> #;4> (define-method (initialize (thing <thing>) (element <top>))
>  (slot-set! thing 'element element))
> #;5> (let ((port (open-output-file "~/thing.txt"))
>      (thing (make <thing> "allo")))
>  (serialize thing port)
>  (close-output-port port))
> Error: (serialize) unable to serialize object - unable to serialize
> procedure (no table entry found): #<procedure (f_5740)>

This means that no entry is stored in the local "procedure table".
What's the output of "chicken -version"? Does it show "ptables"?


cheers,
felix