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

compiler.tree.propagation.transforms: also fix diff.

John Benediktsson 2013-03-26 19:06:05 -07:00
parent a83ade538a
commit 4b25ef9d18
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/compiler/tree/propagation/transforms/transforms.factor
View File

@ -302,7 +302,7 @@ CONSTANT: lookup-table-at-max 256
\ at* [ at-quot ] 1 define-partial-eval \ at* [ at-quot ] 1 define-partial-eval
: diff-quot ( seq -- quot: ( seq' -- seq'' ) ) : diff-quot ( seq -- quot: ( seq' -- seq'' ) )
tester '[ [ [ @ not ] filter ] keep set-like ] ; tester '[ [ members [ @ not ] filter ] keep set-like ] ;
M\ set diff [ diff-quot ] 1 define-partial-eval M\ set diff [ diff-quot ] 1 define-partial-eval