X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=blobdiff_plain;f=extra%2Fmath%2Fprimes%2Flists%2Flists.factor;h=c2733058b3c4ed6cbcf1aa8368fdbafb0aca5a65;hp=13f314f6bae8778bff5a470cbea7a099b5f3f7c7;hb=3f3d57032bf29190e9bee12d168a4bce6d74653c;hpb=cd1bb8f4c8afba318249c7b756a45aa1c46ea51e

diff --git a/extra/math/primes/lists/lists.factor b/extra/math/primes/lists/lists.factor
index 13f314f6ba..c2733058b3 100644
--- 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 ;