X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2FnativeGen%2FMachCodeGen.hs;fp=compiler%2FnativeGen%2FMachCodeGen.hs;h=d16962cfbe1ebe56cf121b61d691cd27273f899d;hb=a12e845684c10955bc594cdb20d1f13fae14873d;hp=5f973ef1b609e613b7d20ab98b8573b728e3522b;hpb=9de520b7194c9d759147db98deb3cd8d47d0de76;p=ghc-hetmet.git diff --git a/compiler/nativeGen/MachCodeGen.hs b/compiler/nativeGen/MachCodeGen.hs index 5f973ef..d16962c 100644 --- a/compiler/nativeGen/MachCodeGen.hs +++ b/compiler/nativeGen/MachCodeGen.hs @@ -25,12 +25,11 @@ module MachCodeGen ( cmmTopCodeGen, InstrBlock ) where #include "MachDeps.h" -- NCG stuff: -import MachInstrs -import MachRegs +import Instrs +import Regs import NCGMonad import PositionIndependentCode import RegAllocInfo ( mkBranchInstr, mkRegRegMoveInstr ) -import MachRegs import PprMach -- Our intermediate code: @@ -5190,7 +5189,7 @@ coerceFP2Int fromRep toRep x = do -- We (allegedly) put the first six C-call arguments in registers; -- where do we start putting the rest of them? --- Moved from MachInstrs (SDM): +-- Moved from Instrs (SDM): #if alpha_TARGET_ARCH || sparc_TARGET_ARCH eXTRA_STK_ARGS_HERE :: Int