]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/project-euler/049/049.factor
Delete empty unit tests files, remove 1- and 1+, reorder IN: lines in a lot of places...
[factor.git] / extra / project-euler / 049 / 049.factor
index 9ecf942ef669a88ee1a0b073cbf0f24e121edd85..8b6f635ee4bb5c932c65ae2a4fde0b7a70b47390 100644 (file)
@@ -27,7 +27,7 @@ IN: project-euler.049
 
 : count-digits ( n -- byte-array )
     10 <byte-array> [
-        '[ 10 /mod _ [ 1+ ] change-nth dup 0 > ] loop drop
+        '[ 10 /mod _ [ 1 + ] change-nth dup 0 > ] loop drop
     ] keep ;
 
 HINTS: count-digits fixnum ;