update the curl patch for 7.60.0
[AROS-Contrib.git] / Misc / berger / samples / branchtest.S
blob206ac4e8f32a98982eb2d8c059bcdc71e68ebe71
1         moveq   #$1,d0
2         subq    #$1,d0
3         beq     label1
5 dead:   move.l  #$deadbeef,d0
6         rts
8 label1: subq    #$1,d0
9         bmi     label2
10         bra     dead
12 label2: moveq   #$1,d0
13         bpl     label3
14         bra     dead
16 label3: move.l  #-1,d0
17         bmi     label4
18         bra     dead
20 label4: move.l  #$1,d0
21         cmpi.l  #$1,d0
22         beq     label5
23         bra     dead
25 label5: cmpi.l  #$0,d0
26         bgt     label6
27         bra     dead
29 label6: cmp.l   #2,d0   ; X=1 N=1 C=1
30         blt     label7
31         bra     dead
33 label7: cmp.l   #$1,d0
34         bge     label8
35         bra     dead
37 label8: cmp.l   #2,d0   ; X=1 N=1 C=1
38         ble     label9
39         bra     dead
41 label9: moveq   #$2,d1  ; X=1
42         btst    #1,d1   ; X=1
43         bne     label10
44         bra     dead
46 label10:moveq   #$1,d0  ; X=1
47         bchg    d0,d1   ; X=1
48         bne     label11 ; 
49         bra     dead
51 label11:move.l  #$10,d0 ; X=1
52         add.b   #$70,d0 ; N=1 V=1
53         bvs     label12
54         bra     dead
56 label12:move.l  #$10,d0 ; all 0
57         add.b   #$6f,d0 ; all 0
58         bvc     label13
59         bra     dead
61 label13:moveq   #0,d0   ; Z=1
62         sub.b   #127,d0 ; X=1 N=1 C=1
63         bvc     label14
64         bra     dead
66 label14:moveq   #0,d0   ; X=1 Z=1
67         sub.b   #128,d0 ; X=1 N=1 V=1 C=1
68         bvs     label15
69         bra     dead
71 label15:rts
73         END