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))