Fixing typo in modular arithmetic unit test (should use iota, not integer sequences, and just happened to work still)

2010-06-15 16:15:49 -04:00 · 2010-06-15 16:15:49 -04:00 · 970f96c8b8
parent b362fe25b1
commit 970f96c8b8
1 changed files with 2 additions and 2 deletions
--- a/basis/compiler/tree/modular-arithmetic/modular-arithmetic-tests.factor
+++ b/basis/compiler/tree/modular-arithmetic/modular-arithmetic-tests.factor
@ -130,7 +130,7 @@ TUPLE: declared-fixnum { x fixnum } ;

 [ t ] [
    [
-        { integer } declare [ 256 rem ] map
+        { iota } declare [ 256 rem ] map
    ] { mod fixnum-mod rem } inlined?
 ] unit-test

@ -289,4 +289,4 @@ cell {
            ] keep bitxor >fixnum
        ] with each
    ] { + bignum+ fixnum-shift bitxor bignum-bitxor } inlined?
-] unit-test
+] unit-test