picolisp

commit 18d4684f39865011849985d5cb4a8ceb16b8f02f
parent 4d0b2231e308a97769c691eee036c99f2fe39f64
Author: Alexander Burger <abu@software-lab.de>
Date:   Fri, 10 Jun 2011 09:43:12 +0200

Same glitch also in 'glLightiv'
Diffstat:
M
lib/openGl.l
 | 
2
+-

1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/lib/openGl.l b/lib/openGl.l
@@ -249,7 +249,7 @@
    (native `*GlutLib "glShadeModel" NIL Num) )
 
 (de glLightiv (Light Pname Params)
-   (native `*GlutLib "glLightiv" NIL Light Pname (list NIL (16) Params)) )
+   (native `*GlutLib "glLightiv" NIL Light Pname (cons NIL (16) Params)) )
 
 (de glMaterialf (Face Pname Param)
    (set "Flt1" Param)