X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=blobdiff_plain;f=basis%2Flists%2Flazy%2Flazy.factor;h=7b386e9c819ea1acfc93988b97227fcfb8666355;hp=bde26e2fb9cff2fa06cf4b09f5a371bdb2b0d46d;hb=3f3d57032bf29190e9bee12d168a4bce6d74653c;hpb=cd1bb8f4c8afba318249c7b756a45aa1c46ea51e

diff --git a/basis/lists/lazy/lazy.factor b/basis/lists/lazy/lazy.factor
index bde26e2fb9..7b386e9c81 100644
--- a/basis/lists/lazy/lazy.factor
+++ b/basis/lists/lazy/lazy.factor
@@ -97,7 +97,7 @@ M: lazy-take car ( lazy-take -- car )
     cons>> car ;
 
 M: lazy-take cdr ( lazy-take -- cdr )
-    [ n>> 1- ] keep
+    [ n>> 1 - ] keep
     cons>> cdr ltake ;
 
 M: lazy-take nil? ( lazy-take -- ? )
@@ -191,7 +191,7 @@ TUPLE: lazy-from-by n quot ;
 C: lfrom-by lazy-from-by
 
 : lfrom ( n -- list )
-    [ 1+ ] lfrom-by ;
+    [ 1 + ] lfrom-by ;
 
 M: lazy-from-by car ( lazy-from-by -- car )
     n>> ;
@@ -235,7 +235,7 @@ M: sequence-cons car ( sequence-cons -- car )
     [ index>> ] [ seq>> nth ] bi ;
 
 M: sequence-cons cdr ( sequence-cons -- cdr )
-    [ index>> 1+ ] [ seq>> sequence-tail>list ] bi ;
+    [ index>> 1 + ] [ seq>> sequence-tail>list ] bi ;
 
 M: sequence-cons nil? ( sequence-cons -- ? )
     drop f ;