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

[factor.git] / extra / math / primes / lists / lists.factor

diff --git a/extra/math/primes/lists/lists.factor b/extra/math/primes/lists/lists.factor
index 13f314f6bae8778bff5a470cbea7a099b5f3f7c7..c2733058b3c4ed6cbcf1aa8368fdbafb0aca5a65 100644 (file)
--- a/extra/math/primes/lists/lists.factor
+++ b/extra/math/primes/lists/lists.factor
@@ -6,4 +6,4 @@ IN: math.primes.lists
 : lprimes ( -- list ) 2 [ next-prime ] lfrom-by ;
 
 : lprimes-from ( n -- list )
-    dup 3 < [ drop lprimes ] [ 1- next-prime [ next-prime ] lfrom-by ] if ;
+    dup 3 < [ drop lprimes ] [ 1 - next-prime [ next-prime ] lfrom-by ] if ;