1// ACP 5.7 ABS(A1) sets AV0 2# mach: bfin 3 4.include "testutils.inc" 5 start 6 7 r1=0x80 (z); 8 A0=0; 9 A0.x=r1; 10 A0=abs A0; 11 _DBG astat; 12//r7=astat; 13//dbga (r7.h, 0x3); 14//dbga (r7.l, 0x0); 15 cc = az; 16 r7 = cc; 17 dbga( r7.l, 0); 18 cc = an; 19 r7 = cc; 20 dbga( r7.l, 0); 21 cc = av0; 22 r7 = cc; 23 dbga( r7.l, 1); 24 cc = av0s; 25 r7 = cc; 26 dbga( r7.l, 1); 27 cc = av1; 28 r7 = cc; 29 dbga( r7.l, 0); 30 cc = av1s; 31 r7 = cc; 32 dbga( r7.l, 0); 33 34 r6=A0.x; 35 dbga (r6.l, 0x7f); 36 37 r1=0x80 (z); 38 A1=0; 39 A1.x=r1; 40 A1=abs A1; 41 _DBG astat; 42//r7=astat; 43//dbga (r7.h, 0xf); 44//dbga (r7.l, 0x0); 45 cc = az; 46 r7 = cc; 47 dbga( r7.l, 0); 48 cc = an; 49 r7 = cc; 50 dbga( r7.l, 0); 51 cc = av0; 52 r7 = cc; 53 dbga( r7.l, 1); 54 cc = av0s; 55 r7 = cc; 56 dbga( r7.l, 1); 57 cc = av1; 58 r7 = cc; 59 dbga( r7.l, 1); 60 cc = av1s; 61 r7 = cc; 62 dbga( r7.l, 1); 63 64 r6=A1.x; 65 dbga (r6.l, 0x7f); 66 67 r7=0; 68 astat=r7; 69 r1=0x80 (z); 70 A1=0; 71 A1.x=r1; 72 A0 = abs A1; 73 _DBG astat; 74//r7=astat; 75//dbga (r7.h, 0x3); 76//dbga (r7.l, 0x0); 77 cc = az; 78 r7 = cc; 79 dbga( r7.l, 0); 80 cc = an; 81 r7 = cc; 82 dbga( r7.l, 0); 83 cc = av0; 84 r7 = cc; 85 dbga( r7.l, 1); 86 cc = av0s; 87 r7 = cc; 88 dbga( r7.l, 1); 89 cc = av1; 90 r7 = cc; 91 dbga( r7.l, 0); 92 cc = av1s; 93 r7 = cc; 94 dbga( r7.l, 0); 95 96 r6=A0.x; 97 dbga (r6.l, 0x7f); 98 99 r7=0; 100 astat=r7; 101 r1=0x80 (z); 102 A0=0; 103 A0.x=r1; 104 A1 = abs A0; 105 _DBG astat; 106//r7=astat; 107//dbga (r7.h, 0xc); 108//dbga (r7.l, 0x0); 109 cc = az; 110 r3 = cc; 111 dbga( r3.l, 0); 112 cc = an; 113 r3 = cc; 114 dbga( r3.l, 0); 115 cc = av0; 116 r3 = cc; 117 dbga( r3.l, 0); 118 cc = av0s; 119 r3 = cc; 120 dbga( r3.l, 0); 121 cc = av1; 122 r3 = cc; 123 dbga( r3.l, 1); 124 cc = av1s; 125 r3 = cc; 126 dbga( r3.l, 1); 127 128 r6=A1.x; 129 dbga (r6.l, 0x7f); 130 131 r7=0; 132 astat=r7; 133 r1=0x80 (z); 134 A1=0; 135 A1.x=r1; 136 A0.x=r6; 137 _DBG A1; 138 _DBG A0; 139 A1=abs A1, A0=abs A0; 140 _DBG ASTAT; 141//r7=astat; 142//dbga (r7.h, 0xc); 143//dbga (r7.l, 0x0); 144 cc = az; 145 r4 = cc; 146 dbga( r4.l, 0); 147 cc = an; 148 r4 = cc; 149 dbga( r4.l, 0); 150 cc = av0; 151 r4 = cc; 152 dbga( r4.l, 0); 153 cc = av0s; 154 r4 = cc; 155 dbga( r4.l, 0); 156 cc = av1; 157 r4 = cc; 158 dbga( r4.l, 1); 159 cc = av1s; 160 r4 = cc; 161 dbga( r4.l, 1); 162 163 r7=0; 164 astat=r7; 165 r1=0x80 (z); 166 A1=0; 167 A1.x=r1; 168 A0 = A1; 169 A1=abs A1, A0=abs A0; 170 _DBG ASTAT; 171//r7=astat; 172//dbga (r7.h, 0xf); 173//dbga (r7.l, 0x0); 174 cc = az; 175 r7 = cc; 176 dbga( r7.l, 0); 177 cc = an; 178 r7 = cc; 179 dbga( r7.l, 0); 180 cc = av0; 181 r7 = cc; 182 dbga( r7.l, 1); 183 cc = av0s; 184 r7 = cc; 185 dbga( r7.l, 1); 186 cc = av1; 187 r7 = cc; 188 dbga( r7.l, 1); 189 cc = av1s; 190 r7 = cc; 191 dbga( r7.l, 1); 192 193// ACP 5.8 ABS sometimes sets AN 194 195 r7=0; 196 astat=r7; 197 r0=1; 198 r1=abs r0; 199 _DBG r0; 200 _DBG r1; 201 _DBG astat; 202//r7=astat; 203//dbga (r7.h, 0x0); 204//dbga (r7.l, 0x0); 205 cc = az; 206 r7 = cc; 207 dbga( r7.l, 0); 208 cc = an; 209 r7 = cc; 210 dbga( r7.l, 0); 211 cc = av0; 212 r7 = cc; 213 dbga( r7.l, 0); 214 cc = av0s; 215 r7 = cc; 216 dbga( r7.l, 0); 217 cc = av1; 218 r7 = cc; 219 dbga( r7.l, 0); 220 cc = av1s; 221 r7 = cc; 222 dbga( r7.l, 0); 223 224 pass; 225