From c936f9d5e5fbf5045f3091b55930c00a0fbc632f Mon Sep 17 00:00:00 2001
From: Doug Coleman <doug.coleman@gmail.com>
Date: Mon, 23 Jul 2012 11:51:12 -0700
Subject: [PATCH] modular-arithmetic: Fix unit test. Should expect
 integer>fixnum, not >fixnum.

---
 .../tree/modular-arithmetic/modular-arithmetic-tests.factor     | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/basis/compiler/tree/modular-arithmetic/modular-arithmetic-tests.factor b/basis/compiler/tree/modular-arithmetic/modular-arithmetic-tests.factor
index 67612a40b7..f3636af8df 100644
--- a/basis/compiler/tree/modular-arithmetic/modular-arithmetic-tests.factor
+++ b/basis/compiler/tree/modular-arithmetic/modular-arithmetic-tests.factor
@@ -43,7 +43,7 @@ TUPLE: declared-fixnum { x fixnum } ;
 
 [ f ] [
     [ { integer } declare 127 bitand 3 + ]
-    { >fixnum } inlined?
+    { integer>fixnum } inlined?
 ] unit-test
 
 [ t ] [