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

diff --git a/basis/lists/lists.factor b/basis/lists/lists.factor
index 0eedb80889..ddf1ab9109 100644
--- a/basis/lists/lists.factor
+++ b/basis/lists/lists.factor
@@ -71,7 +71,7 @@ PRIVATE>
     ] if ; inline recursive
 
 : llength ( list -- n )
-    0 [ drop 1+ ] foldl ;
+    0 [ drop 1 + ] foldl ;
 
 : lreverse ( list -- newlist )    
     nil [ swap cons ] foldl ;