hold onto all frames weakly

2012-12-21 15:34:29 -06:00 · 2012-12-21 15:34:29 -06:00 · 8d4dac318c
commit 8d4dac318c
parent d645200f93
1 changed files with 1 additions and 1 deletions
--- a/collects/mred/private/wx/gtk/frame.rkt
+++ b/collects/mred/private/wx/gtk/frame.rkt
@ -142,7 +142,7 @@
 	 (g_list_insert l i -1))))))

 ;; used for location->window
-(define all-frames (make-hasheq))
+(define all-frames (make-weak-hasheq))

 (define frame%
  (class (client-size-mixin window%)