@@ -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: stack-effect-omits-dashes summary drop "Stack effect must contain “--”" ; + { { [ os windows? ] [ "debugger.windows" require ] } { [ os unix? ] [ "debugger.unix" require ] } basis/debugger/debugger.factor @@ -73,4 +73,4 @@ M: apropos >link ; INSTANCE: apropos topic : apropos ( str -- ) - <apropos> print-topic ; + <apropos> print-topic nl ; basis/help/apropos/apropos.factor @@ -129,7 +129,7 @@ M: word set-article-parent swap "help-parent" set-word-prop ; SYMBOL: help-hook -help-hook [ [ print-topic ] ] initialize +help-hook [ [ print-topic nl ] ] initialize : help ( topic -- ) help-hook get call( topic -- ) ; basis/help/help.factor @@ -25,7 +25,7 @@ ERROR: bad-effect ; : parse-effect-tokens ( end -- tokens ) [ 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-tokens { "--" } split1 dup core/effects/parser/parser.factor a6fdce75e3c5766b532f9695eb621e2f0487a24c Slava Pestov slava@slava-pestovs-macbook-pro.local http://github.com/slavapestov/factor/commit/4fe132df8d4d82c1c5b7fc8f01d47fed4ce9bdb3 4fe132df8d4d82c1c5b7fc8f01d47fed4ce9bdb3 2009-11-10T19:48:00-08:00 2009-11-10T19:48:00-08:00 Minor cosmetic fixes f211b3241d0dd31aec1a98b27158d3a28ce1fd4a Slava Pestov slava@slava-pestovs-macbook-pro.local