[Chicken-users] Xlib text question

[William Ramsay]

Happy New Year,

Can anyone tell me what's going on when I use the following code:

(define xtextproperty-make
 (lambda (textp)
   (let
     ((tp (make-xtextproperty)))
    
     (set-xtextproperty-value! tp (location textp))
     (set-xtextproperty-encoding! tp XA_STRING)
     (set-xtextproperty-format! tp 32)
     (set-xtextproperty-nitems! tp 1)
    
     tp)))


Then in my window creation code:

  (let
     ((textprop  (xtextproperty-make   "hello world")))

   .....

     (xsetwmname vs-display vs-window textprop)

   .......


All this compiles and works with on small flaw - all I get for the title 
is "hell" in my window.

Could the fact that I'm doing this on a 64 bit system have anything to 
do with it?    Or am I doing something wrong?

Also the doc for the xlib egg has an error.     Freeing a structure is 
given as:     (free-<NAME>) -> C-POINTER

I think it should be:    (free-<NAME>   C-POINTER)

Bill