USING: accessors debugger game.loop io ;
IN: game.loop.prettyprint
-M: game-loop-error error.
+M: game-loop-error-state error.
"An error occurred inside a game loop." print
"The game loop has been stopped to prevent runaway errors." print
"The error was:" print nl
#! input then parser2 is applied to the rest of
#! the input strings from the first parser.
parsers>> unclip swapd parse
- [ [ and-parser-parse ] reduce ] 2curry promise ;
+ [ [ and-parser-parse ] reduce ] 2curry <promise> ;
TUPLE: or-parser parsers ;