diff options
| author | Ian Lynagh <igloo@earth.li> | 2011-12-19 15:56:25 +0000 |
|---|---|---|
| committer | Ian Lynagh <igloo@earth.li> | 2011-12-19 15:57:22 +0000 |
| commit | b442c077593b10d5226edf2afd60918a90a23315 (patch) | |
| tree | cf88c18445afe3ad7a27a1c5d755b59609c2554e /compiler/nativeGen/SPARC/CodeGen/Gen64.hs | |
| parent | 06c6d9709fb73cbaf9c0e1da337c5467c2839f0a (diff) | |
| download | haskell-b442c077593b10d5226edf2afd60918a90a23315.tar.gz | |
Make getDynFlags* functions use HasDynFlags/getDynFlags too
Diffstat (limited to 'compiler/nativeGen/SPARC/CodeGen/Gen64.hs')
| -rw-r--r-- | compiler/nativeGen/SPARC/CodeGen/Gen64.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/nativeGen/SPARC/CodeGen/Gen64.hs b/compiler/nativeGen/SPARC/CodeGen/Gen64.hs index 5bcab2cb10..5352281296 100644 --- a/compiler/nativeGen/SPARC/CodeGen/Gen64.hs +++ b/compiler/nativeGen/SPARC/CodeGen/Gen64.hs @@ -190,7 +190,7 @@ iselExpr64 (CmmMachOp (MO_UU_Conv _ W64) [expr]) -- compute expr and load it into r_dst_lo (a_reg, a_code) <- getSomeReg expr - dflags <- getDynFlagsNat + dflags <- getDynFlags let platform = targetPlatform dflags code = a_code `appOL` toOL @@ -201,7 +201,7 @@ iselExpr64 (CmmMachOp (MO_UU_Conv _ W64) [expr]) iselExpr64 expr - = do dflags <- getDynFlagsNat + = do dflags <- getDynFlags pprPanic "iselExpr64(sparc)" (pprPlatform (targetPlatform dflags) expr) |