diff options
| author | Ian Lynagh <igloo@earth.li> | 2011-10-19 21:49:26 +0100 |
|---|---|---|
| committer | Ian Lynagh <igloo@earth.li> | 2011-10-19 21:49:26 +0100 |
| commit | bc876206b80f060ad1bbbaa681d1171d1980cdfc (patch) | |
| tree | 32f4bf6615260cf5ce940468474ae0520859cd58 /compiler/nativeGen/RegAlloc/Linear/Main.hs | |
| parent | 7dd60dddc194cd2f32d3685f396e8d09fcb2ce42 (diff) | |
| download | haskell-bc876206b80f060ad1bbbaa681d1171d1980cdfc.tar.gz | |
A little more CPP removal
Diffstat (limited to 'compiler/nativeGen/RegAlloc/Linear/Main.hs')
| -rw-r--r-- | compiler/nativeGen/RegAlloc/Linear/Main.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/compiler/nativeGen/RegAlloc/Linear/Main.hs b/compiler/nativeGen/RegAlloc/Linear/Main.hs index fc0bde44a0..bda9c46fef 100644 --- a/compiler/nativeGen/RegAlloc/Linear/Main.hs +++ b/compiler/nativeGen/RegAlloc/Linear/Main.hs @@ -186,6 +186,9 @@ linearRegAlloc dflags first_id block_live sccs ArchPPC -> linearRegAlloc' platform (frInitFreeRegs :: PPC.FreeRegs) first_id block_live sccs ArchARM _ _ -> panic "linearRegAlloc ArchARM" ArchPPC_64 -> panic "linearRegAlloc ArchPPC_64" + ArchAlpha -> panic "linearRegAlloc ArchAlpha" + ArchMipseb -> panic "linearRegAlloc ArchMipseb" + ArchMipsel -> panic "linearRegAlloc ArchMipsel" ArchUnknown -> panic "linearRegAlloc ArchUnknown" linearRegAlloc' |