From ffd3598eae8af63e350179498cf150ed5e0604b8 Mon Sep 17 00:00:00 2001 From: Norman Ramsey Date: Sat, 15 Sep 2007 20:17:19 +0000 Subject: [PATCH] scrub away remaining MidNop --- compiler/cmm/CmmCvt.hs | 1 - 1 file changed, 1 deletion(-) diff --git a/compiler/cmm/CmmCvt.hs b/compiler/cmm/CmmCvt.hs index 7beeb6b..42859ab 100644 --- a/compiler/cmm/CmmCvt.hs +++ b/compiler/cmm/CmmCvt.hs @@ -81,7 +81,6 @@ ofZgraph g = ListGraph $ swallow blocks tail id prev' out (G.ZTail m t) rest = tail id (mid m : prev') out t rest tail id prev' out (G.ZLast G.LastExit) rest = exit id prev' out rest tail id prev' out (G.ZLast (G.LastOther l)) rest = last id prev' out l rest - mid (MidNop) = CmmNop mid (MidComment s) = CmmComment s mid (MidAssign l r) = CmmAssign l r mid (MidStore l r) = CmmStore l r -- 1.7.10.4