12 = ALWAYS -- What's really used? ToDo
31 condUnsigned :: Cond -> Bool
32 condUnsigned GU = True
33 condUnsigned LU = True
34 condUnsigned GEU = True
35 condUnsigned LEU = True
36 condUnsigned _ = False
39 condToSigned :: Cond -> Cond
47 condToUnsigned :: Cond -> Cond
48 condToUnsigned GTT = GU
49 condToUnsigned LTT = LU
50 condToUnsigned GE = GEU
51 condToUnsigned LE = LEU