From: wolfgang.thaller@gmx.net <unknown>
Date: Mon, 11 Dec 2006 22:26:35 +0000 (+0000)
Subject: Unbreak x86_64 PIC patch, part 3
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=b876d4b8495e5d393e50f0cee979c899b50f6bfb

Unbreak x86_64 PIC patch, part 3

This time, the PowerPC NCG suffered from a typo.

(I've really grown to hate all those #if foo_TARGET_ARCH
 lines. I need to build GHC for at least four different
 platforms just to make sure that there are no typos...)
---

diff --git a/compiler/nativeGen/MachCodeGen.hs b/compiler/nativeGen/MachCodeGen.hs
index 3d7296d..007f472 100644
--- a/compiler/nativeGen/MachCodeGen.hs
+++ b/compiler/nativeGen/MachCodeGen.hs
@@ -3836,7 +3836,7 @@ genSwitch expr ids
         (reg,e_code) <- getSomeReg expr
         tmp <- getNewRegNat I32
         lbl <- getNewLabelNat
-        dynRef <- cmmMakeDynamicReference addImportNat DatReference lbl
+        dynRef <- cmmMakeDynamicReference addImportNat DataReference lbl
         (tableReg,t_code) <- getSomeReg $ dynRef
         let
             jumpTable = map jumpTableEntryRel ids