Follow vreg/hreg patch in x86 NCG

[ghc-hetmet.git] / compiler / nativeGen / RegAlloc / Graph / Main.hs

diff --git a/compiler/nativeGen/RegAlloc/Graph/Main.hs b/compiler/nativeGen/RegAlloc/Graph/Main.hs
index d239d0d..4ffcfee 100644 (file)
--- a/compiler/nativeGen/RegAlloc/Graph/Main.hs
+++ b/compiler/nativeGen/RegAlloc/Graph/Main.hs
@@ -317,6 +317,9 @@ graphAddCoalesce (r1, r2) graph
        | RegReal _             <- r1
        , RegReal _             <- r2
        = graph
+
+graphAddCoalesce _ _
+       = panic "graphAddCoalesce: bogus"
        
 
 -- | Patch registers in code using the reg -> reg mapping in this graph.