X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=blobdiff_plain;f=extra%2Fbenchmark%2Fknucleotide%2Fknucleotide.factor;h=fb4f17cca5c768615975aa03451108ebf4bea86a;hp=99b0ee15f4ea60ecc616e8f55210903469748ccb;hb=3f3d57032bf29190e9bee12d168a4bce6d74653c;hpb=cd1bb8f4c8afba318249c7b756a45aa1c46ea51e

diff --git a/extra/benchmark/knucleotide/knucleotide.factor b/extra/benchmark/knucleotide/knucleotide.factor
index 99b0ee15f4..fb4f17cca5 100644
--- a/extra/benchmark/knucleotide/knucleotide.factor
+++ b/extra/benchmark/knucleotide/knucleotide.factor
@@ -23,12 +23,12 @@ IN: benchmark.knucleotide
 : tally ( x exemplar -- b )
     clone tuck
     [
-      [ [ 1+ ] [ 1 ] if* ] change-at
+      [ [ 1 + ] [ 1 ] if* ] change-at
     ] curry each ;
 
 : small-groups ( x n -- b )
     swap
-    [ length swap - 1+ ] 2keep
+    [ length swap - 1 + ] 2keep
     [ [ over + ] dip subseq ] 2curry map ;
 
 : handle-table ( inputs n -- )