headers
Mason Smith | 16 Feb 2011 09:39
Picon

Bug in MAKE-NULL-GL-ARRAY

The current make-null-gl-array fails to run as currently defined. When called with (gl:make-null-gl-array :unsigned-short), SBCL gives the following error:


0 fell through CTYPECASE expression.
Wanted one of (SYMBOL FUNCTION).
   [Condition of type SB-KERNEL:CASE-FAILURE]

The problem seems simply to be that the arguments when calling MAKE-GL-ARRAY-FROM-POINTER are reversed.

Specifically, instead of 

(make-gl-array-from-pointer (null-pointer) 0 type)

the body of MAKE-NULL-GL-ARRAY should be

(make-gl-array-from-pointer (null-pointer) type 0)


Mason

_______________________________________________
cl-opengl-devel mailing list
cl-opengl-devel <at> common-lisp.net
http://common-lisp.net/cgi-bin/mailman/listinfo/cl-opengl-devel
Permalink | Reply |

Gmane