tests/tcg/cris/check_bcc.s

   1         .global main
   2         .type   main, @function
   3 main:
   4         clearf nzvc
   5         setf   nzv
   6         bcc    0f
   7         addq   1, $r3
   8         jump   dofail
   9
  10 0:
  11         clearf nzvc
  12         setf   nzv
  13         bcs    dofail
  14         addq   1,$r3
  15
  16         clearf nzvc
  17         setf   ncv
  18         bne    1f
  19         addq   1, $r3
  20
  21 fail:
  22 dofail:
  23         jump    _fail
  24
  25 1:
  26         clearf nzvc
  27         setf ncv
  28         beq dofail
  29         addq 1,$r3
  30
  31         clearf nzvc
  32         setf ncz
  33         bvc 2f
  34         addq 1,$r3
  35         jump dofail
  36
  37 2:
  38         clearf nzvc
  39         setf ncz
  40         bvs dofail
  41         addq 1,$r3
  42
  43         clearf  nzvc
  44         setf    vcz
  45         bpl     3f
  46         addq    1,$r3
  47         jump    fail
  48 3:
  49         clearf  nzvc
  50         setf    vcz
  51         bmi     dofail
  52         addq    1,$r3
  53
  54         clearf  nzvc
  55         setf    nv
  56         bls     dofail
  57         addq    1,$r3
  58
  59         clearf  nzvc
  60         setf    nv
  61         bhi     4f
  62         addq    1,$r3
  63         jump    dofail
  64
  65 4:
  66         clearf  nzvc
  67         setf    zc
  68         bge     5f
  69         addq    1,$r3
  70         jump    dofail
  71
  72 5:
  73         clearf  nzvc
  74         setf zc
  75         blt dofail
  76         addq 1,$r3
  77
  78         clearf nzvc
  79         setf c
  80         bgt 6f
  81         addq 1,$r3
  82         jump  fail
  83
  84 6:
  85  clearf nzvc
  86  setf c
  87  ble dofail
  88  addq 1,$r3
  89
  90 ;;;;;;;;;;
  91
  92  setf nzvc
  93  clearf nzv
  94  bcc dofail
  95  addq 1,$r3
  96
  97  setf nzvc
  98  clearf nzv
  99  bcs 0f
 100  addq 1,$r3
 101  jump fail
 102
 103 0:
 104  setf nzvc
 105  clearf ncv
 106  bne dofail
 107  addq 1,$r3
 108
 109  setf nzvc
 110  clearf ncv
 111  beq 1f
 112  addq 1,$r3
 113  jump fail
 114
 115 1:
 116  setf nzvc
 117  clearf ncz
 118  bvc dofail
 119  addq 1,$r3
 120
 121  setf nzvc
 122  clearf ncz
 123  bvs 2f
 124  addq 1,$r3
 125  jump fail
 126
 127 2:
 128  setf nzvc
 129  clearf vcz
 130  bpl dofail
 131  addq 1,$r3
 132
 133  setf nzvc
 134  clearf vcz
 135  bmi 3f
 136  addq 1,$r3
 137  jump fail
 138
 139 3:
 140  setf nzvc
 141  clearf nv
 142  bls 4f
 143  addq 1,$r3
 144  jump fail
 145
 146 4:
 147  setf nzvc
 148  clearf nv
 149  bhi dofail
 150  addq 1,$r3
 151
 152  setf zvc
 153  clearf nzc
 154  bge dofail
 155  addq 1,$r3
 156
 157  setf nzc
 158  clearf vzc
 159  blt 5f
 160  addq 1,$r3
 161  jump fail
 162
 163 5:
 164  setf nzvc
 165  clearf c
 166  bgt dofail
 167  addq 1,$r3
 168
 169  setf nzvc
 170  clearf c
 171  ble 6f
 172  addq 1,$r3
 173  jump fail
 174
 175 6:
 176         ; do a forward branch.
 177         ba   2f
 178         nop
 179         .fill   100
 180 1:
 181         ba      3f
 182         nop
 183         .fill   800
 184 2:
 185         ba      1b
 186         nop
 187         .fill   1024
 188 3:
 189
 190         moveq   31, $r0
 191 1:      bne     1b
 192         subq    1, $r0
 193
 194         jsr     pass
 195         moveq   0, $r10
 196         ret
 197         nop