gpu.buffers: fix stack effect of with-mapped-buffer

2009-10-26 13:53:33 -05:00 · 2009-10-26 13:53:33 -05:00 · eb5a4383e1
parent 8826401ea8
commit eb5a4383e1
1 changed files with 1 additions and 1 deletions
--- a/extra/gpu/buffers/buffers.factor
+++ b/extra/gpu/buffers/buffers.factor
@ -124,7 +124,7 @@ UNION: gpu-data-ptr buffer-ptr c-ptr ;

    quot call

-    target glUnmapBuffer ; inline
+    target glUnmapBuffer drop ; inline

 :: with-bound-buffer ( buffer target quot: ( -- ) -- )
    target gl-target buffer glBindBuffer