From: igloo <unknown>
Date: Tue, 29 Jul 2003 16:31:39 +0000 (+0000)
Subject: [project @ 2003-07-29 16:31:39 by igloo]
X-Git-Tag: Approx_11550_changesets_converted~614
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=5b1a5b1e82c9a75f9c657839d8d321822622a1e8

[project @ 2003-07-29 16:31:39 by igloo]
gcc 3.3's cpp fix on sparc.

Could be merged to stable if it's not too late.
---

diff --git a/ghc/compiler/nativeGen/MachRegs.lhs b/ghc/compiler/nativeGen/MachRegs.lhs
index db202fe..494b983 100644
--- a/ghc/compiler/nativeGen/MachRegs.lhs
+++ b/ghc/compiler/nativeGen/MachRegs.lhs
@@ -87,12 +87,12 @@ data Imm
   | ImmFloat	Rational
   | ImmDouble	Rational
   IF_ARCH_sparc(
-  | LO Imm		    -- Possible restrictions...
+  | LO Imm		    {- Possible restrictions... -}
   | HI Imm
   ,IF_ARCH_powerpc(
   | LO Imm
   | HI Imm
-  | HA Imm	-- high halfword adjusted
+  | HA Imm	{- high halfword adjusted -}
   ,))
 strImmLit s = ImmLit (text s)
 \end{code}