diff options
| author | David Terei <davidterei@gmail.com> | 2011-12-22 14:48:56 -0800 |
|---|---|---|
| committer | David Terei <davidterei@gmail.com> | 2012-01-05 17:05:44 -0800 |
| commit | 419af4e718b3c79ee814fb36bd6f5da5e06e7001 (patch) | |
| tree | 509f68331328c1147e16ea019260e85dacf50516 /compiler/nativeGen | |
| parent | ccba0c2275f16d816e212448466a60866fe5183f (diff) | |
| download | haskell-419af4e718b3c79ee814fb36bd6f5da5e06e7001.tar.gz | |
Remove unused arg field of CmmReturn
Diffstat (limited to 'compiler/nativeGen')
| -rw-r--r-- | compiler/nativeGen/PPC/CodeGen.hs | 2 | ||||
| -rw-r--r-- | compiler/nativeGen/SPARC/CodeGen.hs | 2 | ||||
| -rw-r--r-- | compiler/nativeGen/X86/CodeGen.hs | 2 |
3 files changed, 3 insertions, 3 deletions
diff --git a/compiler/nativeGen/PPC/CodeGen.hs b/compiler/nativeGen/PPC/CodeGen.hs index 6d91bacb31..8b96f7140a 100644 --- a/compiler/nativeGen/PPC/CodeGen.hs +++ b/compiler/nativeGen/PPC/CodeGen.hs @@ -142,7 +142,7 @@ stmtToInstrs stmt = do CmmCondBranch arg id -> genCondJump id arg CmmSwitch arg ids -> genSwitch arg ids CmmJump arg -> genJump arg - CmmReturn _ -> + CmmReturn -> panic "stmtToInstrs: return statement should have been cps'd away" diff --git a/compiler/nativeGen/SPARC/CodeGen.hs b/compiler/nativeGen/SPARC/CodeGen.hs index c37cdd6760..0022e043ee 100644 --- a/compiler/nativeGen/SPARC/CodeGen.hs +++ b/compiler/nativeGen/SPARC/CodeGen.hs @@ -143,7 +143,7 @@ stmtToInstrs stmt = case stmt of CmmSwitch arg ids -> genSwitch arg ids CmmJump arg -> genJump arg - CmmReturn _ + CmmReturn -> panic "stmtToInstrs: return statement should have been cps'd away" diff --git a/compiler/nativeGen/X86/CodeGen.hs b/compiler/nativeGen/X86/CodeGen.hs index 9ddcf460b4..b7356ea3fd 100644 --- a/compiler/nativeGen/X86/CodeGen.hs +++ b/compiler/nativeGen/X86/CodeGen.hs @@ -167,7 +167,7 @@ stmtToInstrs stmt = do CmmCondBranch arg id -> genCondJump id arg CmmSwitch arg ids -> genSwitch arg ids CmmJump arg -> genJump arg - CmmReturn _ -> + CmmReturn -> panic "stmtToInstrs: return statement should have been cps'd away" |