summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDavid Thompson <dthompson2@worcester.edu>2021-01-26 18:21:50 -0500
committerDavid Thompson <dthompson2@worcester.edu>2021-01-26 18:21:50 -0500
commit5d5d447356d7ec06e3d40ae690cb32c935704e58 (patch)
tree4fa4502a68f5e8c9250dfb87646dd63a56fe33bd
parent357f864e7be790b775a1bd2a5a503af696fe707c (diff)
graphics: engine: Fix yet another finalizer issue.
-rw-r--r--chickadee/graphics/engine.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/chickadee/graphics/engine.scm b/chickadee/graphics/engine.scm
index eda1547..4f1250f 100644
--- a/chickadee/graphics/engine.scm
+++ b/chickadee/graphics/engine.scm
@@ -264,7 +264,7 @@
(unless (find (match-lambda
((name . f)
(and ((graphics-finalizer-predicate f) obj)
- ((graphics-finalizer-free finalizer) obj)
+ ((graphics-finalizer-free f) obj)
#t)))
(atomic-box-ref *graphics-finalizers*))
(error "no finalizer for graphics engine object" obj))