steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

literals: remove $$ and combinators.smart dependency

db4
Slava Pestov 2009-09-11 21:03:24 -05:00
parent dd661edf46
commit f1ae72413b
1 changed files with 1 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
basis/literals/literals.factor
View File

@ -1,6 +1,6 @@
! (c) Joe Groff, see license for details ! (c) Joe Groff, see license for details
USING: accessors continuations kernel parser words quotations USING: accessors continuations kernel parser words quotations
combinators.smart vectors sequences fry ; vectors sequences fry ;
IN: literals IN: literals
<PRIVATE <PRIVATE
@ -19,7 +19,3 @@ PRIVATE>
SYNTAX: $ scan-word expand-literal >vector ; SYNTAX: $ scan-word expand-literal >vector ;
SYNTAX: $[ parse-quotation with-datastack >vector ; SYNTAX: $[ parse-quotation with-datastack >vector ;
SYNTAX: ${ \ } [ expand-literals ] parse-literal ; SYNTAX: ${ \ } [ expand-literals ] parse-literal ;
SYNTAX: $$
scan-word execute( accum -- accum ) dup pop [ >quotation ] keep
[ output>sequence ] 2curry call( -- object ) parsed ;