diff options
Diffstat (limited to 'compiler/nativeGen/SPARC/CodeGen/CondCode.hs')
| -rw-r--r-- | compiler/nativeGen/SPARC/CodeGen/CondCode.hs | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/compiler/nativeGen/SPARC/CodeGen/CondCode.hs b/compiler/nativeGen/SPARC/CodeGen/CondCode.hs index f02b7a45a8..74f20196df 100644 --- a/compiler/nativeGen/SPARC/CodeGen/CondCode.hs +++ b/compiler/nativeGen/SPARC/CodeGen/CondCode.hs @@ -26,7 +26,6 @@ import Size import OldCmm -import DynFlags import OrdList import Outputable @@ -62,11 +61,9 @@ getCondCode (CmmMachOp mop [x, y]) MO_U_Lt _ -> condIntCode LU x y MO_U_Le _ -> condIntCode LEU x y - _ -> do dflags <- getDynFlags - pprPanic "SPARC.CodeGen.CondCode.getCondCode" (pprPlatform (targetPlatform dflags) (CmmMachOp mop [x,y])) + _ -> pprPanic "SPARC.CodeGen.CondCode.getCondCode" (ppr (CmmMachOp mop [x,y])) -getCondCode other = do dflags <- getDynFlags - pprPanic "SPARC.CodeGen.CondCode.getCondCode" (pprPlatform (targetPlatform dflags) other) +getCondCode other = pprPanic "SPARC.CodeGen.CondCode.getCondCode" (ppr other) |