basis/extra: Fix load errors

db4
Doug Coleman 2013-03-24 22:19:28 -07:00
parent 542e7cd95e
commit 4ffbfc2602
3 changed files with 3 additions and 3 deletions

View File

@ -4,7 +4,7 @@ USING: alien.c-types help.markup help.syntax kernel quotations
sequences strings ;
IN: tools.coverage
HELP: <coverage>
HELP: <coverage-state>
{ $values
{ "executed?" boolean }
{ "coverage" coverage }

View File

@ -2,7 +2,7 @@
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

View File

@ -160,7 +160,7 @@ M: and-parser parse ( input parser -- list )
#! 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 ;