]> gitweb.factorcode.org Git - factor.git/commitdiff
Merge branch 'master' of git://factorcode.org/git/factor
authorAaron Schaefer <aaron@elasticdog.com>
Fri, 1 May 2009 23:48:25 +0000 (19:48 -0400)
committerAaron Schaefer <aaron@elasticdog.com>
Fri, 1 May 2009 23:48:25 +0000 (19:48 -0400)
extra/benchmark/pidigits/pidigits.factor

index 5de5cc5e9945b1cee1ebd73ce90b3ee87bfacc82..0f8a98e6f9dede654385dd0e5472d0702acf1546 100644 (file)
@@ -18,7 +18,7 @@ IN: benchmark.pidigits
 : >matrix ( q s r t -- z )
     4array 2 group ;
 
-: produce ( z n -- z' )
+: produce ( z y -- z' )
     [ 10 ] dip -10 * 0 1 >matrix swap m. ;
 
 : gen-x ( x -- matrix )