2008-12-12 02:00:23 -05:00
|
|
|
! (c) Joe Groff, see license for details
|
2009-05-03 18:23:14 -04:00
|
|
|
USING: accessors continuations kernel parser words quotations
|
|
|
|
|
combinators.smart vectors sequences ;
|
2008-12-09 02:13:26 -05:00
|
|
|
IN: literals
|
|
|
|
|
|
2009-03-21 02:27:50 -04:00
|
|
|
SYNTAX: $ scan-word [ def>> call ] curry with-datastack >vector ;
|
|
|
|
|
SYNTAX: $[ parse-quotation with-datastack >vector ;
|
2009-05-03 18:23:14 -04:00
|
|
|
SYNTAX: ${ \ } [ [ ?execute ] { } map-as ] parse-literal ;
|
