aboutsummaryrefslogtreecommitdiffhomepage
path: root/src/interactive/bitmap.lisp
diff options
context:
space:
mode:
authorColin Okay <colin@cicadas.surf>2022-07-15 16:35:06 -0500
committerColin Okay <colin@cicadas.surf>2022-07-15 16:35:06 -0500
commitb70a404c640785010ecad52af29b4a96184b2c7e (patch)
tree939b271a963786e649eb0fc1c8aa7e640eb4c89f /src/interactive/bitmap.lisp
parentf2f49f3beae4fb62292e9a80e7ddda64de098771 (diff)
[add] working canvas demo!
Diffstat (limited to 'src/interactive/bitmap.lisp')
-rw-r--r--src/interactive/bitmap.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interactive/bitmap.lisp b/src/interactive/bitmap.lisp
index 06f081e..96d8e07 100644
--- a/src/interactive/bitmap.lisp
+++ b/src/interactive/bitmap.lisp
@@ -13,7 +13,7 @@
"executed after a bitmap has been reclaimed by gc. decrements bitmap
count and destroys shader-program if necessary."
(decf *bitmap-count*)
- (when (zerop *bitmap-count*)
+ (unless (plusp *bitmap-count*)
(when *bitmap-vao*
(gl:delete-vertex-arrays (list *bitmap-vao*))
(setf *bitmap-vao* nil))