X-Git-Url: http://git.joshuawise.com/snipe.git/blobdiff_plain/c2b45b3681553192a462bcdd376ee7a9bf83eef3..5c90fbb8681e975ccd0a1bc407b31daa1daef38a:/top/top.sml?ds=inline

diff --git a/top/top.sml b/top/top.sml
index 49e7dc6..006fa46 100644
--- a/top/top.sml
+++ b/top/top.sml
@@ -142,10 +142,10 @@ struct
                   (fn () => List.app (TextIO.print o
                     (fn (t, i) =>
                       (Temp.name t) ^ " => " ^ (
-                        if (i <= Blarg.regtonum Blarg.R3)
+                        if (i <= 15)
                           then (Blarg.pp_oper (Blarg.REG (Blarg.numtoreg i)))
                         else
-                          "spill[" ^ Int.toString (i - Blarg.regtonum Blarg.R3) ^ "]")
+                          "spill[" ^ Int.toString (i - Blarg.regtonum Blarg.PC) ^ "]")
                         ^ "--"^ Int.toString i ^ "\n"))
                     colors) ()