diff options
Diffstat (limited to 'compiler/nativeGen/SPARC/CodeGen/Expand.hs')
| -rw-r--r-- | compiler/nativeGen/SPARC/CodeGen/Expand.hs | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/compiler/nativeGen/SPARC/CodeGen/Expand.hs b/compiler/nativeGen/SPARC/CodeGen/Expand.hs index 70cb0111c0..0b318740db 100644 --- a/compiler/nativeGen/SPARC/CodeGen/Expand.hs +++ b/compiler/nativeGen/SPARC/CodeGen/Expand.hs @@ -5,6 +5,8 @@ module SPARC.CodeGen.Expand ( where +import GhcPrelude + import SPARC.Instr import SPARC.Imm import SPARC.AddrMode @@ -140,7 +142,7 @@ expandMisalignedDoubles instr --- | The the high partner for this float reg. +-- | The high partner for this float reg. fRegHi :: Reg -> Reg fRegHi (RegReal (RealRegSingle r1)) | r1 >= 32 |