]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/inverse/inverse.factor
core, basis, extra: Remove DOS line endings from files.
[factor.git] / basis / inverse / inverse.factor
index 3a2465df219cd295d618aa7f89e3459a5f54973d..15b2b33218faaa941632832b8aa89b3fc9d65768 100644 (file)
@@ -79,7 +79,7 @@ UNION: explicit-inverse normal-inverse math-inverse pop-inverse ;
     if ;
 
 : fold ( quot -- folded-quot )
-    [ { } [ fold-word ] reduce % ] [ ] make ; 
+    [ { } [ fold-word ] reduce % ] [ ] make ;
 
 ERROR: no-recursive-inverse ;
 
@@ -89,7 +89,7 @@ SYMBOL: visited
     { [ word? ] [ primitive? not ] [
         { "inverse" "math-inverse" "pop-inverse" }
         [ word-prop ] with any? not
-    ] } 1&& ; 
+    ] } 1&& ;
 
 : flatten ( quot -- expanded )
     [