diff options
| -rw-r--r-- | sly/render/texture.scm | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/sly/render/texture.scm b/sly/render/texture.scm index e1a8ac5..a462ae4 100644 --- a/sly/render/texture.scm +++ b/sly/render/texture.scm @@ -105,10 +105,7 @@ that will be rendered, in pixels." (lambda (texture) ;; Do not reap texture regions (unless (texture-region? texture) - ;; When attempting to reap structures upon guile exit, the - ;; dynamic pointer to gl-delete-textures becomes invalid. So, we - ;; ignore the error and move on. - (false-if-exception (gl-delete-texture (texture-id texture)))))) + (gl-delete-texture (texture-id texture))))) (define (bitmap->texture bitmap min-filter mag-filter) "Translates a freeimage bitmap into an OpenGL texture." |