ghc/tests/programs/jeff-bug/DLX_Reg.hs

   1 module DLX_Reg where
   2
   3 import Ix
   4
   5
   6 data DLXReg = R0  | R1  | R2  | R3  | R4  | R5  | R6  | R7  |
   7         R8  | R9  | R10 | R11 | R12 | R13 | R14 | R15 |
   8         R16 | R17 | R18 | R19 | R20 | R21 | R22 | R23 |
   9         R24 | R25 | R26 | R27 | R28 | R29 | R30 | R31 |
  10         F0  | F1  | F2  | F3  | F4  | F5  | F6  | F7  |
  11         F8  | F9  | F10 | F11 | F12 | F13 | F14 | F15 |
  12         F16 | F17 | F18 | F19 | F20 | F21 | F22 | F23 |
  13         F24 | F25 | F26 | F27 | F28 | F29 | F30 | F31 |
  14         IAR | PC | SpecPC | Dummy
  15         deriving (Ix,Eq,Ord,Bounded,Show,Read,Enum)