Skip to content
Browse files

Clear vertex data length of tessellator object.

  • Loading branch information...
1 parent 972de43 commit 23236261ea6d9e0864f081de1ab3a73d8d3931f1 @dardoria committed May 3, 2011
Showing with 3 additions and 1 deletion.
  1. +3 −1 glu/interface.lisp
View
4 glu/interface.lisp
@@ -179,7 +179,9 @@
when (and (pointerp pointer)
(not (null-pointer-p pointer)))
do (foreign-free pointer))
- (setf (data tess) nil))
+ (setf (data tess) nil)
+ (setf (vertex-data-length tess) 0)
+ (setf (polygon-data-length tess) 0))
(defun ->vertex-data-array (vertex-data tessellator)
(when (and (pointerp vertex-data)

0 comments on commit 2323626

Please sign in to comment.
Something went wrong with that request. Please try again.