From 77a3641bb6cbea414d6390e7660b0948a3b53307 Mon Sep 17 00:00:00 2001 From: John Benediktsson Date: Tue, 26 Mar 2013 19:06:05 -0700 Subject: [PATCH] compiler.tree.propagation.transforms: also fix diff. --- basis/compiler/tree/propagation/transforms/transforms.factor | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/basis/compiler/tree/propagation/transforms/transforms.factor b/basis/compiler/tree/propagation/transforms/transforms.factor index f1cf936840..92b7276c51 100644 --- 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