basis/literals/literals.factor

   1 ! (c) Joe Groff, see license for details
   2 USING: accessors continuations kernel parser words quotations
   3 combinators.smart vectors sequences ;
   4 IN: literals
   5
   6 SYNTAX: $ scan-word [ def>> call ] curry with-datastack >vector ;
   7 SYNTAX: $[ parse-quotation with-datastack >vector ;
   8 SYNTAX: ${ \ } [ [ ?execute ] { } map-as ] parse-literal ;