11 -- | Branch condition codes.
32 condUnsigned :: Cond -> Bool
33 condUnsigned GU = True
34 condUnsigned LU = True
35 condUnsigned GEU = True
36 condUnsigned LEU = True
37 condUnsigned _ = False
40 condToSigned :: Cond -> Cond
48 condToUnsigned :: Cond -> Cond
49 condToUnsigned GTT = GU
50 condToUnsigned LTT = LU
51 condToUnsigned GE = GEU
52 condToUnsigned LE = LEU