From bd70967f8a2c5ab2b4b371d24cdf2f2c06c8d5d3 Mon Sep 17 00:00:00 2001
From: Slava Pestov <slava@shill.local>
Date: Wed, 29 Jul 2009 06:48:01 -0500
Subject: [PATCH] compiler.cfg.linear-scan.resolve: fix unit tests to not
 depend on hashing

---
 .../linear-scan/resolve/resolve-tests.factor  | 19 +++++++++++++------
 1 file changed, 13 insertions(+), 6 deletions(-)

diff --git a/basis/compiler/cfg/linear-scan/resolve/resolve-tests.factor b/basis/compiler/cfg/linear-scan/resolve/resolve-tests.factor
index 68f7544e8e..b1b44cde44 100644
--- a/basis/compiler/cfg/linear-scan/resolve/resolve-tests.factor
+++ b/basis/compiler/cfg/linear-scan/resolve/resolve-tests.factor
@@ -47,12 +47,19 @@ H{ { int-regs 10 } { float-regs 20 } } clone spill-counts set
 H{ } clone spill-temps set
 
 [
-    {
-        T{ _spill { src 0 } { class int-regs } { n 10 } }
-        T{ _copy { dst 0 } { src 1 } { class int-regs } }
-        T{ _reload { dst 1 } { class int-regs } { n 10 } }
-    }
+    t
 ] [
     { { { 0 int-regs } { 1 int-regs } } { { 1 int-regs } { 0 int-regs } } }
-    mapping-instructions
+    mapping-instructions {
+        {
+            T{ _spill { src 0 } { class int-regs } { n 10 } }
+            T{ _copy { dst 0 } { src 1 } { class int-regs } }
+            T{ _reload { dst 1 } { class int-regs } { n 10 } }
+        }
+        {
+            T{ _spill { src 1 } { class int-regs } { n 10 } }
+            T{ _copy { dst 1 } { src 0 } { class int-regs } }
+            T{ _reload { dst 0 } { class int-regs } { n 10 } }
+        }
+    } member?
 ] unit-test
\ No newline at end of file