On Wed, Jan 04, 2017 at 09:30:38PM +0100, Alexander Burger wrote:
> >     : (native "libglut.so" "glutInit" NIL '(X (0 . 'I)) "")
> >     Segmentation fault (core dumped)
> 
> The quote before the 'I' is wrong. This is not evaluated because the whole
> pattern is already quoted.
> 
> There is
> 
>    (de glutInit ()
>       (native `*GlutLib "glutInit" NIL '(NIL (8) . 0)) )
> 
> in "@lib/openGl.l". Doesn't that suffice?

Looking again, I think the real cause is the 0 in '(X (0 . 'I)), because that
allocates a buffer of zero size.

If you need an integer return value in 'X', yoc could try '(X (4 . I))

♪♫ Alex
-- 
UNSUBSCRIBE: mailto:picolisp@software-lab.de?subject=Unsubscribe

Reply via email to