From 543a1753ca242466fef4b8f668c96b42b9b6a2eb Mon Sep 17 00:00:00 2001 From: Tony Garnock-Jones Date: Tue, 27 Oct 2015 12:22:51 -0400 Subject: [PATCH] Fix texture leak in scene updates --- prospect-gl/2d.rkt | 2 ++ 1 file changed, 2 insertions(+) diff --git a/prospect-gl/2d.rkt b/prospect-gl/2d.rkt index f7c5da8..8efdae0 100644 --- a/prospect-gl/2d.rkt +++ b/prospect-gl/2d.rkt @@ -285,6 +285,8 @@ (define (process-scene-updates! p) (define-values (added removed) (patch-project/set/single p scene-projection)) (when (not (set-empty? removed)) + (compiled-instructions-dispose! prelude) + (compiled-instructions-dispose! postlude) (set! prelude empty-instructions) (set! postlude empty-instructions)) (for [(s added)]