basicblock: remove warning

[mate.git] / Mate / BasicBlocks.hs

diff --git a/Mate/BasicBlocks.hs b/Mate/BasicBlocks.hs
index 45ec857df8259ea6d679d52d7946f738c4ec3a67..e80d388c05f17e977687d0888b89c22a893c9dc9 100644 (file)
--- a/Mate/BasicBlocks.hs
+++ b/Mate/BasicBlocks.hs
@@ -116,7 +116,7 @@ buildCFG' hmap (((off, Just entry), _):xs) insns = buildCFG' (insertlist entryi
         case entry of
         TwoTarget t1 t2 -> [t1, t2]
         OneTarget t -> [t]
-        Return -> trace "should not happen" []
+        Return -> []
 
 buildCFG' hmap (((_, Nothing), _):xs) insns = buildCFG' hmap xs insns