steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Minor cosmetic fixes

db4
Slava Pestov 2009-11-10 21:48:00 -06:00
parent f121961fa4
commit b551721dd9
4 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/debugger/debugger.factor
View File

@ -333,6 +333,8 @@ M: not-found-in-roots summary drop "Cannot resolve vocab: path" ;
M: wrong-values summary drop "Quotation called with wrong stack effect" ; M: wrong-values summary drop "Quotation called with wrong stack effect" ;
M: stack-effect-omits-dashes summary drop "Stack effect must contain “--”" ;
{ {
{ [ os windows? ] [ "debugger.windows" require ] } { [ os windows? ] [ "debugger.windows" require ] }
{ [ os unix? ] [ "debugger.unix" require ] } { [ os unix? ] [ "debugger.unix" require ] }

2
basis/help/apropos/apropos.factor
View File

@ -73,4 +73,4 @@ M: apropos >link ;
INSTANCE: apropos topic INSTANCE: apropos topic
: apropos ( str -- ) : apropos ( str -- )
<apropos> print-topic ; <apropos> print-topic nl ;

2
basis/help/help.factor
View File

@ -129,7 +129,7 @@ M: word set-article-parent swap "help-parent" set-word-prop ;
SYMBOL: help-hook SYMBOL: help-hook
help-hook [ [ print-topic ] ] initialize help-hook [ [ print-topic nl ] ] initialize
: help ( topic -- ) : help ( topic -- )
help-hook get call( topic -- ) ; help-hook get call( topic -- ) ;

2
core/effects/parser/parser.factor
View File

@ -25,7 +25,7 @@ ERROR: bad-effect ;
: parse-effect-tokens ( end -- tokens ) : parse-effect-tokens ( end -- tokens )
[ parse-effect-token dup ] curry [ ] produce nip ; [ parse-effect-token dup ] curry [ ] produce nip ;
ERROR: stack-effect-omits-dashes effect ; ERROR: stack-effect-omits-dashes tokens ;
: parse-effect ( end -- effect ) : parse-effect ( end -- effect )
parse-effect-tokens { "--" } split1 dup parse-effect-tokens { "--" } split1 dup