[project @ 2001-01-31 15:36:42 by sewardj]
authorsewardj <unknown>
Wed, 31 Jan 2001 15:36:42 +0000 (15:36 +0000)
committersewardj <unknown>
Wed, 31 Jan 2001 15:36:42 +0000 (15:36 +0000)
Un-break the x86 world following sparc byte-extend (Word8Rep) fix.  Duh.

ghc/compiler/nativeGen/MachMisc.lhs

index 85daf92..9aba016 100644 (file)
@@ -274,7 +274,7 @@ primRepToSize CostCentreRep = IF_ARCH_alpha( Q,      IF_ARCH_i386( L, IF_ARCH_sparc(
 primRepToSize CharRep      = IF_ARCH_alpha( L,  IF_ARCH_i386( L, IF_ARCH_sparc( W ,)))
 
 primRepToSize Int8Rep      = IF_ARCH_alpha( B,  IF_ARCH_i386( B, IF_ARCH_sparc( B ,)))
-primRepToSize Word8Rep     = IF_ARCH_alpha( B,  IF_ARCH_i386( B, IF_ARCH_sparc( BU,)))
+primRepToSize Word8Rep     = IF_ARCH_alpha( BU, IF_ARCH_i386( BU, IF_ARCH_sparc( BU,)))
 
 primRepToSize IntRep       = IF_ARCH_alpha( Q,  IF_ARCH_i386( L, IF_ARCH_sparc( W ,)))
 primRepToSize WordRep      = IF_ARCH_alpha( Q,  IF_ARCH_i386( L, IF_ARCH_sparc( W ,)))