Resolved merge.

[factor.git] / extra / 24-game / 24-game.factor

diff --git a/extra/24-game/24-game.factor b/extra/24-game/24-game.factor
index 19928b2e0bf22d568d83eb951aa7b4f28d8d34d1..15c610ce7a6a5e5086ab23848730666e99097d3e 100644 (file)
--- a/extra/24-game/24-game.factor
+++ b/extra/24-game/24-game.factor
@@ -40,7 +40,7 @@ SYMBOL: commands
     if ;
 DEFER: check-status
 : quit-game ( vector -- ) drop "you're a quitter" print ;
-: quit? ( vector -- t/f ) peek "quit" = ;
+: quit? ( vector -- t/f ) last "quit" = ;
 : end-game ( vector -- )
     dup victory? 
         [ drop "You WON!" ]