factor: trim using lists

[factor.git] / basis / inverse / inverse.factor

diff --git a/basis/inverse/inverse.factor b/basis/inverse/inverse.factor
index 2407a78dfaf611034af5b5de1702d90146714e0a..13537e2c920850449375e80fb9423dbdba3f390c 100644 (file)
--- a/basis/inverse/inverse.factor
+++ b/basis/inverse/inverse.factor
@@ -2,8 +2,8 @@
 ! See http://factorcode.org/license.txt for BSD license.
 USING: accessors arrays assocs bit-arrays byte-arrays classes
 classes.tuple combinators combinators.short-circuit
-combinators.smart continuations effects fry generalizations
-kernel locals macros make math math.functions namespaces
+combinators.smart continuations effects generalizations
+kernel make math math.functions namespaces parser
 quotations sbufs sequences sequences.generalizations slots
 splitting stack-checker strings summary vectors words
 words.symbol ;
@@ -287,3 +287,7 @@ M: no-match summary drop "Fall through in switch" ;
     recover-chain ;
 
 MACRO: switch ( quot-alist -- quot ) [switch] ;
+
+SYNTAX: INVERSE: scan-word parse-definition define-inverse ;
+
+SYNTAX: DUAL: scan-word scan-word define-dual ;