]> gitweb.factorcode.org Git - factor.git/commitdiff
fix cmwc on 32 bit factor
authorDoug Coleman <doug.coleman@gmail.com>
Sat, 17 Oct 2009 05:09:01 +0000 (00:09 -0500)
committerDoug Coleman <doug.coleman@gmail.com>
Sat, 17 Oct 2009 05:09:01 +0000 (00:09 -0500)
extra/random/cmwc/cmwc.factor

index 1be58d489fec6b08ea391fdcde1fb18ee027636f..941840f23ad9e7a1e0f74cd5dcf2cc6c1e238937 100644 (file)
@@ -9,11 +9,11 @@ IN: random.cmwc
 
 TUPLE: cmwc
     { Q uint-array }
-    { a fixnum }
-    { b fixnum }
-    { c fixnum }
-    { i fixnum }
-    { r fixnum }
+    { a integer }
+    { b integer }
+    { c integer }
+    { i integer }
+    { r integer }
     { mod fixnum } ;
 
 TUPLE: cmwc-seed { Q uint-array read-only } { c read-only } ;