game.worlds: Fixing the GAME: syntax word that broke due to renames

locals-and-roots
Björn Lindqvist 2016-04-22 15:21:56 +02:00
parent 720edcbd3b
commit 19899f3a0f
1 changed files with 3 additions and 3 deletions

View File

@ -1,7 +1,7 @@
! (c)2009 Joe Groff bsd license
USING: accessors audio.engine combinators concurrency.promises
destructors game.input game.loop kernel math parser sequences
threads ui ui.gadgets ui.gadgets.worlds words.constant ;
threads ui ui.gadgets ui.gadgets.worlds vocabs.parser words.constant ;
IN: game.worlds
TUPLE: game-world < world
@ -81,7 +81,7 @@ M: game-world apply-world-attributes
SYNTAX: GAME:
scan-new-word
game-attributes parse-main-window-attributes
game-attributes parse-window-attributes
2dup define-attributes-word
parse-definition
define-main-window ;
[ define-window ] [ 2drop current-vocab main<< ] 3bi ;