7 lines
280 B
Factor
7 lines
280 B
Factor
|
USING: compiler.tree effects help.markup help.syntax kernel math quotations ;
|
||
|
IN: stack-checker.recursive-state
|
||
|
|
|
||
|
|
HELP: recursive-quotation?
|
||
|
|
{ $values { "quot" quotation } { "?" boolean } }
|
||
|
|
{ $description "Checks if the quotation is among the registered recursive quotations." } ;
|