[project @ 2005-01-16 02:50:16 by wolfgang]
authorwolfgang <unknown>
Sun, 16 Jan 2005 02:50:16 +0000 (02:50 +0000)
committerwolfgang <unknown>
Sun, 16 Jan 2005 02:50:16 +0000 (02:50 +0000)
pprExpr: add cases for CmmPicBaseReg and CmmRegOff
so that we can do -fPIC -ddump-opt-cmm

ghc/compiler/cmm/PprCmm.hs

index 38e7e06..5279f05 100644 (file)
@@ -315,7 +315,9 @@ pprExpr9 e =
         CmmLit    lit       -> pprLit1 lit
         CmmLoad   expr rep  -> ppr rep <> brackets( ppr expr )
         CmmReg    reg       -> ppr reg
+        CmmRegOff reg off   -> parens (ppr reg <+> char '+' <+> int off)
        CmmMachOp mop args  -> genMachOp mop args
+        CmmPicBaseReg       -> text "PIC_BASE_REG"
        e                   -> parens (pprExpr e)
 
 genMachOp :: MachOp -> [CmmExpr] -> SDoc