2009-06-15 08:39:40 -04:00
|
|
|
USING: central destructors help.markup help.syntax ;
|
2009-06-15 04:09:20 -04:00
|
|
|
|
|
|
|
HELP: CENTRAL:
|
|
|
|
{ $description
|
|
|
|
"This parsing word defines a pair of words useful for "
|
|
|
|
"implementing the \"central\" pattern: " { $snippet "symbol" } " and "
|
|
|
|
{ $snippet "with-symbol" } ". This is a middle ground between excessive "
|
|
|
|
"stack manipulation and full-out locals, meant to solve the case where "
|
|
|
|
"one object is operated on by several related words."
|
2009-06-15 08:39:40 -04:00
|
|
|
} ;
|
|
|
|
|
|
|
|
HELP: DISPOSABLE-CENTRAL:
|
|
|
|
{ $description
|
|
|
|
"Like " { $link POSTPONE: CENTRAL: } ", but generates " { $snippet "with-" }
|
|
|
|
" words that are wrapped in a " { $link with-disposal } "."
|
2009-06-15 04:09:20 -04:00
|
|
|
} ;
|