Delete empty unit tests files, remove 1- and 1+, reorder IN: lines in a lot of places...

[factor.git] / basis / regexp / ast / ast.factor

diff --git a/basis/regexp/ast/ast.factor b/basis/regexp/ast/ast.factor
index 2916ef7c32be08352ba6ed3836443e663e37b8a3..90ab3342f2ea0eda65f26eae9184f126ebefb4d8 100644 (file)
--- a/basis/regexp/ast/ast.factor
+++ b/basis/regexp/ast/ast.factor
@@ -56,7 +56,7 @@ M: at-least <times>
 : to-times ( term n -- ast )
     dup zero?
     [ 2drop epsilon ]
-    [ dupd 1- to-times 2array <concatenation> <maybe> ]
+    [ dupd 1 - to-times 2array <concatenation> <maybe> ]
     if ;
 
 M: from-to <times>