Update a panic message
authorIan Lynagh <igloo@earth.li>
Wed, 30 Apr 2008 13:10:21 +0000 (13:10 +0000)
committerIan Lynagh <igloo@earth.li>
Wed, 30 Apr 2008 13:10:21 +0000 (13:10 +0000)
It was (panic "RegisterAlloc.joinToTargets"), but had since moved to
RegAllocLinear.makeRegMovementGraph.

compiler/nativeGen/RegAllocLinear.hs

index bc538a8..9478979 100644 (file)
@@ -826,7 +826,7 @@ makeRegMovementGraph adjusted_assig dest_assig
         = expandNode vreg src
         $ lookupWithDefaultUFM_Directly
                dest_assig
-                (panic "RegisterAlloc.joinToTargets")
+                (panic "RegAllocLinear.makeRegMovementGraph")
                vreg
 
    in  [ node  | (vreg, src) <- ufmToList adjusted_assig