Fix help-lint

db4
Slava Pestov 2008-11-16 10:31:04 -06:00
parent b981b8cad8
commit e9a42b9bde
1 changed files with 3 additions and 3 deletions

View File

@ -249,12 +249,12 @@ M: string ($instance)
M: f ($instance)
drop { f } $link ;
: $instance ( children -- ) first ($instance) ;
: $instance ( element -- ) first ($instance) ;
: $maybe ( children -- )
: $maybe ( element -- )
$instance " or " print-element { f } $instance ;
: $quotation ( children -- )
: $quotation ( element -- )
{ "a " { $link quotation } " with stack effect " } print-element
$snippet ;