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

2013-03-26 19:06:05 -07:00 · 2013-03-26 19:06:05 -07:00 · 77a3641bb6
parent c4d832ce4d
commit 77a3641bb6
1 changed files with 1 additions and 1 deletions
--- a/basis/compiler/tree/propagation/transforms/transforms.factor
+++ b/basis/compiler/tree/propagation/transforms/transforms.factor
@ -302,7 +302,7 @@ CONSTANT: lookup-table-at-max 256
 \ at* [ at-quot ] 1 define-partial-eval

 : 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