X-Git-Url: http://uxul.de/gitweb/?a=blobdiff_plain;f=game.lisp;h=711dc787088f8cb4dc3182a6f65a490dfc51bae5;hb=5fe87b1417431d3c5496ff881dc5936a748a13d1;hp=49e4e968321325f1aea332b6c58a62b8490cf86e;hpb=6b3b7a66e366f903ef45f48413e072572dbf8ba6;p=uxul-world.git

diff --git a/game.lisp b/game.lisp
index 49e4e96..711dc78 100755
--- a/game.lisp
+++ b/game.lisp
@@ -16,12 +16,7 @@ drawn (for very slow computers)"
 		   ;:flags (logior sdl:sdl-hw-surface) #| sdl:sdl-fullscreen )|# 
 )
        ;;(if music (sdl-mixer:OPEN-AUDIO :frequency 44100))
-       (let ((*graphics-table*
-	      #-ecl (trivial-garbage:make-weak-hash-table
-		     :weakness :value
-		     :test #'equal)
-	      #+ecl (make-hash-table :test #'equal)
-	      ))	 
+       (let ((*graphics-table* (make-hash-table :test #'equal)))
 	 (if 15-fps
 	     (setf (sdl:frame-rate) 15)
 	     (setf (sdl:frame-rate) 30))