Unbreak x86_64 PIC patch, part 3
authorwolfgang.thaller@gmx.net <unknown>
Mon, 11 Dec 2006 22:26:35 +0000 (22:26 +0000)
committerwolfgang.thaller@gmx.net <unknown>
Mon, 11 Dec 2006 22:26:35 +0000 (22:26 +0000)
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...)

compiler/nativeGen/MachCodeGen.hs

index 3d7296d..007f472 100644 (file)
@@ -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