From 970f96c8b85858f68c55f3ac9c02ed652f754644 Mon Sep 17 00:00:00 2001
From: Daniel Ehrenberg <littledan@Macintosh-122.local>
Date: Tue, 15 Jun 2010 16:15:49 -0400
Subject: [PATCH] Fixing typo in modular arithmetic unit test (should use iota,
 not integer sequences, and just happened to work still)

---
 .../tree/modular-arithmetic/modular-arithmetic-tests.factor   | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/basis/compiler/tree/modular-arithmetic/modular-arithmetic-tests.factor b/basis/compiler/tree/modular-arithmetic/modular-arithmetic-tests.factor
index 7366a83ee1..b20ad3ee51 100644
--- 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
\ No newline at end of file
+] unit-test