js/src/lirasm/tests/cond_gtui.in

   1 ; A few utility constants.
   2 sh0 = immi 0
   3 sh1 = immi 1
   4 sh2 = immi 2
   5 sh3 = immi 3
   6 sh4 = immi 4
   7 sh5 = immi 5
   8 sh6 = immi 6
   9 sh7 = immi 7
  10 sh8 = immi 8
  11
  12 i0 = immi 0
  13 i1 = immi 1
  14 i2 = immi -1
  15
  16 ; ----------------------------------------------------------------------------
  17 ; Combinations of 'gtui'.
  18 gt0 = gtui i0 i0 ; 0
  19 gt1 = gtui i0 i1 ; 0
  20 gt2 = gtui i0 i2 ; 0
  21 gt3 = gtui i1 i0 ; 1
  22 gt4 = gtui i1 i1 ; 0
  23 gt5 = gtui i1 i2 ; 0
  24 gt6 = gtui i2 i0 ; 1
  25 gt7 = gtui i2 i1 ; 1
  26 gt8 = gtui i2 i2 ; 0
  27
  28 ; Aggregate the results.
  29 gt0sh = lshi gt0 sh0
  30 gt1sh = lshi gt1 sh1
  31 gt2sh = lshi gt2 sh2
  32 gt3sh = lshi gt3 sh3
  33 gt4sh = lshi gt4 sh4
  34 gt5sh = lshi gt5 sh5
  35 gt6sh = lshi gt6 sh6
  36 gt7sh = lshi gt7 sh7
  37 gt8sh = lshi gt8 sh8
  38
  39 gt0_1 = ori gt0sh gt1sh
  40 gt2_3 = ori gt2sh gt3sh
  41 gt4_5 = ori gt4sh gt5sh
  42 gt6_7 = ori gt6sh gt7sh
  43
  44 gt0_3 = ori gt0_1 gt2_3
  45 gt4_7 = ori gt4_5 gt6_7
  46
  47 gt0_7 = ori gt0_3 gt4_7
  48
  49 gt = ori gt0_7 gt8sh
  50
  51 ; The result should be {0000,1100,1000}, 0x0c8, or 200.
  52
  53 reti gt