summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--chickadee.scm5
1 files changed, 4 insertions, 1 deletions
diff --git a/chickadee.scm b/chickadee.scm
index e3d128a..b9996e1 100644
--- a/chickadee.scm
+++ b/chickadee.scm
@@ -22,6 +22,7 @@
#:use-module (sdl2 input text)
#:use-module (chickadee window)
#:use-module (chickadee render gl)
+ #:use-module (chickadee render gpu)
#:export (load-hook
update-hook
before-draw-hook
@@ -163,7 +164,9 @@
(loop (poll-event))))
;; Advance the simulation.
(run-hook update-hook update-interval)
- (update-loop (- lag update-interval)))
+ (update-loop (- lag update-interval))
+ ;; Free any GPU resources that have been GC'd.
+ (gpu-reap!))
(begin
;; Render a frame.
(run-hook before-draw-hook)