diff options
author | Ryan Scott <ryan.gl.scott@gmail.com> | 2017-01-25 23:51:32 -0500 |
---|---|---|
committer | Ryan Scott <ryan.gl.scott@gmail.com> | 2017-01-25 23:51:59 -0500 |
commit | 88a89b761ae37c38c190779b64e97bdd8cc10253 (patch) | |
tree | 86190ae7e124f54b7fe0f3eaa5ff5aef331865d6 /compiler/nativeGen/SPARC/CodeGen | |
parent | e4ab8ba72af27cd23ecd3737b166b625190c34a5 (diff) | |
download | haskell-88a89b761ae37c38c190779b64e97bdd8cc10253.tar.gz |
Nix typo and redundant where-clauses
Diffstat (limited to 'compiler/nativeGen/SPARC/CodeGen')
-rw-r--r-- | compiler/nativeGen/SPARC/CodeGen/Gen32.hs | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/compiler/nativeGen/SPARC/CodeGen/Gen32.hs b/compiler/nativeGen/SPARC/CodeGen/Gen32.hs index a7085588e9..a0e86f14c4 100644 --- a/compiler/nativeGen/SPARC/CodeGen/Gen32.hs +++ b/compiler/nativeGen/SPARC/CodeGen/Gen32.hs @@ -234,8 +234,6 @@ getRegister (CmmMachOp mop [x, y]) MO_S_Shr rep -> trivialCode rep SRA x y _ -> pprPanic "getRegister(sparc) - binary CmmMachOp (1)" (pprMachOp mop) - where - getRegister (CmmLoad mem pk) = do Amode src code <- getAmode mem |