projects
/
uxul-world.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
dropped the explicit dependency of trivial-garbage
[uxul-world.git]
/
game.lisp
diff --git
a/game.lisp
b/game.lisp
index
49e4e96
..
711dc78
100755
(executable)
--- 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))
;: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))
(if 15-fps
(setf (sdl:frame-rate) 15)
(setf (sdl:frame-rate) 30))