]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/benchmark/sfmt/sfmt.factor
use radix literals
[factor.git] / extra / benchmark / sfmt / sfmt.factor
index e9c69303bd247bbd2471a724054c29b575a5949f..b13f09349747bb81b1ba445245b6e7e45e314a99 100644 (file)
@@ -4,7 +4,7 @@ USING: fry kernel math random random.sfmt ;
 IN: benchmark.sfmt
 
 : sfmt-benchmark ( n -- )
-    >fixnum HEX: 533d <sfmt-19937> '[ _ random-32* drop ] times ;
+    >fixnum 0x533d <sfmt-19937> '[ _ random-32* drop ] times ;
 
 : sfmt-main ( -- ) 10000000 sfmt-benchmark ;