From: Michael D. Adams <t-madams@microsoft.com>
Date: Thu, 5 Jul 2007 09:47:02 +0000 (+0000)
Subject: Ensure no statements after CmmReturn are emitted
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=5f00461a637a25a6facecda2d9b0a2c0a44e9008

Ensure no statements after CmmReturn are emitted
---

diff --git a/compiler/codeGen/CgMonad.lhs b/compiler/codeGen/CgMonad.lhs
index 8723e46..b96db80 100644
--- a/compiler/codeGen/CgMonad.lhs
+++ b/compiler/codeGen/CgMonad.lhs
@@ -247,6 +247,7 @@ flattenCgStmts id stmts =
 isJump (CmmJump _ _) = True
 isJump (CmmBranch _) = True
 isJump (CmmSwitch _ _) = True
+isJump (CmmReturn _) = True
 isJump _ = False
 
 isOrdinaryStmt (CgStmt _) = True