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

new accessors

db4
Doug Coleman 2008-08-29 16:16:12 -05:00
parent fb27f066b1
commit 6f20caab5a
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
extra/combinators/lib/lib.factor
View File

@ -4,7 +4,7 @@
! See http://factorcode.org/license.txt for BSD license. ! See http://factorcode.org/license.txt for BSD license.
USING: kernel combinators fry namespaces quotations hashtables USING: kernel combinators fry namespaces quotations hashtables
sequences assocs arrays stack-checker effects math math.ranges sequences assocs arrays stack-checker effects math math.ranges
generalizations macros continuations random locals ; generalizations macros continuations random locals accessors ;
IN: combinators.lib IN: combinators.lib
@ -63,7 +63,7 @@ IN: combinators.lib
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
MACRO: preserving ( predicate -- quot ) MACRO: preserving ( predicate -- quot )
dup infer effect-in dup infer in>>
dup 1+ dup 1+
'[ , , nkeep , nrot ] ; '[ , , nkeep , nrot ] ;