Remove unused IF_OS_* CPP definitions
authorIan Lynagh <igloo@earth.li>
Sun, 23 Oct 2011 21:49:26 +0000 (22:49 +0100)
committerIan Lynagh <igloo@earth.li>
Sun, 23 Oct 2011 21:49:26 +0000 (22:49 +0100)
compiler/nativeGen/NCG.h
compiler/nativeGen/PPC/Ppr.hs

index 81cbf61..ad87a67 100644 (file)
 
 #define COMMA ,
 
--- - - - - - - - - - - - - - - - - - - - - - 
 #if i386_TARGET_ARCH
 # define IF_ARCH_i386(x,y) x
 #else
 # define IF_ARCH_i386(x,y) y
 #endif
--- - - - - - - - - - - - - - - - - - - - - - 
-#if linux_TARGET_OS
-# define IF_OS_linux(x,y) x
-#else
-# define IF_OS_linux(x,y) y
-#endif
--- - - - - - - - - - - - - - - - - - - - - - 
-#if darwin_TARGET_OS
-# define IF_OS_darwin(x,y) x
-#else
-# define IF_OS_darwin(x,y) y
-#endif
-#endif
index 9de671e..a2797a4 100644 (file)
@@ -318,10 +318,10 @@ pprInstr :: Platform -> Instr -> Doc
 
 pprInstr _ (COMMENT _) = empty -- nuke 'em
 {-
-pprInstr _ (COMMENT s)
-     IF_OS_linux(
-        ((<>) (ptext (sLit "# ")) (ftext s)),
-        ((<>) (ptext (sLit "; ")) (ftext s)))
+pprInstr platform (COMMENT s) =
+     if platformOS platform == OSLinux
+     then ptext (sLit "# ") <> ftext s
+     else ptext (sLit "; ") <> ftext s
 -}
 pprInstr platform (DELTA d)
    = pprInstr platform (COMMENT (mkFastString ("\tdelta = " ++ show d)))