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

diff --git a/basis/fry/fry.factor b/basis/fry/fry.factor
index ecb5cbf856..fd029cc329 100644
--- a/basis/fry/fry.factor
+++ b/basis/fry/fry.factor
@@ -42,7 +42,7 @@ GENERIC: deep-fry ( obj -- )
     check-fry
     [ [ deep-fry ] each ] [ ] make
     [ dup \ @ = [ drop [ _ call ] ] [ 1array ] if ] map concat
-    { _ } split [ spread>quot ] [ length 1- ] bi ;
+    { _ } split [ spread>quot ] [ length 1 - ] bi ;
 
 PRIVATE>