From e195ea859d2d4227c478a3b5e1e9ac20b086b0c7 Mon Sep 17 00:00:00 2001
From: wolfgang <unknown>
Date: Sun, 16 Jan 2005 02:50:16 +0000
Subject: [PATCH] [project @ 2005-01-16 02:50:16 by wolfgang] pprExpr: add
 cases for CmmPicBaseReg and CmmRegOff so that we can do
 -fPIC -ddump-opt-cmm

---
 ghc/compiler/cmm/PprCmm.hs |    2 ++
 1 file changed, 2 insertions(+)

diff --git a/ghc/compiler/cmm/PprCmm.hs b/ghc/compiler/cmm/PprCmm.hs
index 38e7e06..5279f05 100644
--- a/ghc/compiler/cmm/PprCmm.hs
+++ b/ghc/compiler/cmm/PprCmm.hs
@@ -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
-- 
1.7.10.4