steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

fix cmwc on 32 bit factor

db4
Doug Coleman 2009-10-17 00:09:01 -05:00
parent fae924ece3
commit 26d8690ec2
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
extra/random/cmwc/cmwc.factor
View File

@ -9,11 +9,11 @@ IN: random.cmwc
TUPLE: cmwc TUPLE: cmwc
{ Q uint-array } { Q uint-array }
{ a fixnum } { a integer }
{ b fixnum } { b integer }
{ c fixnum } { c integer }
{ i fixnum } { i integer }
{ r fixnum } { r integer }
{ mod fixnum } ; { mod fixnum } ;
TUPLE: cmwc-seed { Q uint-array read-only } { c read-only } ; TUPLE: cmwc-seed { Q uint-array read-only } { c read-only } ;