Hello, I am playing with tagging pointers, I get a pointer somehow [1] and then try to tag it:
#;4> (tag-pointer dpy 'x-display)
Error: unprintable non-immediate object encountered
As Riastradh suggested, it seems the printer can't deal with tagged pointers.
So I thought about working with it without printing (although printing tagged
pointers would be nice and useful):
#;5> (define t (tag-pointer dpy 'x-display))
#;6> t
Segmentation fault
I'd say there's something wrong there, maybe at my code [2].
In a different case:
#;4> (define t (tag-pointer dpy 'x-display))
#;5> (pointer-tag t)
Error: unprintable non-immediate object encountered
#;6> (tagged-pointer? t 'x-display)
Segmentation fault
Am I doing something wrong or did I hit a bug ?
Just in case, I installed 2.207, and there I got:
#;2> (define dpy (x-open-display))
#;3> (tag-pointer dpy 'x-display)
Error: unprintable non-immediate object encountered
Call history:
<eval> (tag-pointer dpy (quote x-display)) <--
#;4> (define t (tag-pointer dpy 'x-display))
#;5> t
Error: unprintable non-immediate object encountered
#;6> (tagged-pointer? t 'x-display)
Segmentation fault
Thank you.
--
Pupeno <[EMAIL PROTECTED]> (http://pupeno.com)
[1] #;1> (use xlib posix syntax-case)
; loading /usr/local//lib/chicken/syntax-case.so ...
; loading /usr/local//lib/chicken/syntax-case-chicken-macros.scm ...
; loading /usr/local//lib/chicken/xlib.so ...
; loading library posix ...
#;2> (define dpy (x-open-display))
#;3> dpy
#<pointer 80bf740>
#;4>
[2] http://pupeno.com/software/chicken-xlib/
pgpvuIw2uFen9.pgp
Description: PGP signature
_______________________________________________ Chicken-users mailing list [email protected] http://lists.nongnu.org/mailman/listinfo/chicken-users
