Last change
on this file since 8aad29e was 7bf3856, checked in by Thomas Lopatic <thomas@…>, 7 years ago |
Added Alcyon C reference output.
|
-
Property mode
set to
100644
|
File size:
4.0 KB
|
Rev | Line | |
---|
[7bf3856] | 1 | .globl _ac_code
|
---|
| 2 | .globl _scname
|
---|
| 3 | .globl _se_chg
|
---|
| 4 | .globl _curscor
|
---|
| 5 | .globl _cursect
|
---|
| 6 | .globl _se1_cnt
|
---|
| 7 | .globl _se2_cnt
|
---|
| 8 | .globl _se3_cnt
|
---|
| 9 | .globl _spool
|
---|
| 10 | .globl _pspool
|
---|
| 11 | .globl _spcount
|
---|
| 12 | .globl _frags
|
---|
| 13 | .globl _t_bak
|
---|
| 14 | .globl _t_cur
|
---|
| 15 | .globl _t_ctr
|
---|
| 16 | .globl _t_fwd
|
---|
| 17 | .globl _size1
|
---|
| 18 | .globl _size2
|
---|
| 19 | .globl _size3
|
---|
| 20 | .globl _scores
|
---|
| 21 | .globl _scp
|
---|
| 22 | .globl _seclist
|
---|
| 23 | .globl _hplist
|
---|
| 24 | .globl _p_bak
|
---|
| 25 | .globl _p_cur
|
---|
| 26 | .globl _p_ctr
|
---|
| 27 | .globl _p_fwd
|
---|
| 28 | .globl _cflag
|
---|
| 29 | .globl _cnote
|
---|
| 30 | .globl _cyval
|
---|
| 31 | .globl _cxval
|
---|
| 32 | .globl _ctime
|
---|
| 33 | .globl _t_cur
|
---|
| 34 | .globl _mpixtab
|
---|
| 35 | .data
|
---|
| 36 | _mpixtab:
|
---|
| 37 | .dc.w $1
|
---|
| 38 | .dc.w $6C
|
---|
| 39 | .dc.w $0
|
---|
| 40 | .dc.w $0
|
---|
| 41 | .dc.w $5
|
---|
| 42 | .dc.w $6B
|
---|
| 43 | .dc.w $0
|
---|
| 44 | .dc.w $1
|
---|
| 45 | .dc.w $9
|
---|
| 46 | .dc.w $69
|
---|
| 47 | .dc.w $1
|
---|
| 48 | .dc.w $1
|
---|
| 49 | .dc.w $D
|
---|
| 50 | .dc.w $67
|
---|
| 51 | .dc.w $1
|
---|
| 52 | .dc.w $1
|
---|
| 53 | .dc.w $11
|
---|
| 54 | .dc.w $65
|
---|
| 55 | .dc.w $1
|
---|
| 56 | .dc.w $0
|
---|
| 57 | .dc.w $15
|
---|
| 58 | .dc.w $64
|
---|
| 59 | .dc.w $0
|
---|
| 60 | .dc.w $1
|
---|
| 61 | .dc.w $19
|
---|
| 62 | .dc.w $62
|
---|
| 63 | .dc.w $1
|
---|
| 64 | .dc.w $1
|
---|
| 65 | .dc.w $1D
|
---|
| 66 | .dc.w $60
|
---|
| 67 | .dc.w $1
|
---|
| 68 | .dc.w $0
|
---|
| 69 | .dc.w $21
|
---|
| 70 | .dc.w $5F
|
---|
| 71 | .dc.w $0
|
---|
| 72 | .dc.w $1
|
---|
| 73 | .dc.w $25
|
---|
| 74 | .dc.w $5D
|
---|
| 75 | .dc.w $1
|
---|
| 76 | .dc.w $1
|
---|
| 77 | .dc.w $29
|
---|
| 78 | .dc.w $5B
|
---|
| 79 | .dc.w $1
|
---|
| 80 | .dc.w $1
|
---|
| 81 | .dc.w $2D
|
---|
| 82 | .dc.w $59
|
---|
| 83 | .dc.w $1
|
---|
| 84 | .dc.w $0
|
---|
| 85 | .dc.w $31
|
---|
| 86 | .dc.w $58
|
---|
| 87 | .dc.w $0
|
---|
| 88 | .dc.w $1
|
---|
| 89 | .dc.w $35
|
---|
| 90 | .dc.w $56
|
---|
| 91 | .dc.w $1
|
---|
| 92 | .dc.w $1
|
---|
| 93 | .dc.w $39
|
---|
| 94 | .dc.w $54
|
---|
| 95 | .dc.w $1
|
---|
| 96 | .dc.w $0
|
---|
| 97 | .dc.w $3D
|
---|
| 98 | .dc.w $53
|
---|
| 99 | .dc.w $0
|
---|
| 100 | .dc.w $1
|
---|
| 101 | .dc.w $41
|
---|
| 102 | .dc.w $51
|
---|
| 103 | .dc.w $1
|
---|
| 104 | .dc.w $1
|
---|
| 105 | .dc.w $45
|
---|
| 106 | .dc.w $4F
|
---|
| 107 | .dc.w $1
|
---|
| 108 | .dc.w $1
|
---|
| 109 | .dc.w $49
|
---|
| 110 | .dc.w $4D
|
---|
| 111 | .dc.w $1
|
---|
| 112 | .dc.w $0
|
---|
| 113 | .dc.w $4D
|
---|
| 114 | .dc.w $4C
|
---|
| 115 | .dc.w $0
|
---|
| 116 | .dc.w $1
|
---|
| 117 | .dc.w $51
|
---|
| 118 | .dc.w $4A
|
---|
| 119 | .dc.w $1
|
---|
| 120 | .dc.w $1
|
---|
| 121 | .dc.w $55
|
---|
| 122 | .dc.w $48
|
---|
| 123 | .dc.w $1
|
---|
| 124 | .dc.w $0
|
---|
| 125 | .dc.w $59
|
---|
| 126 | .dc.w $47
|
---|
| 127 | .dc.w $0
|
---|
| 128 | .dc.w $1
|
---|
| 129 | .dc.w $5D
|
---|
| 130 | .dc.w $45
|
---|
| 131 | .dc.w $1
|
---|
| 132 | .dc.w $1
|
---|
| 133 | .dc.w $61
|
---|
| 134 | .dc.w $43
|
---|
| 135 | .dc.w $1
|
---|
| 136 | .dc.w $1
|
---|
| 137 | .dc.w $65
|
---|
| 138 | .dc.w $41
|
---|
| 139 | .dc.w $1
|
---|
| 140 | .dc.w $0
|
---|
| 141 | .dc.w $69
|
---|
| 142 | .dc.w $40
|
---|
| 143 | .dc.w $0
|
---|
| 144 | .dc.w $1
|
---|
| 145 | .dc.w $6D
|
---|
| 146 | .dc.w $3E
|
---|
| 147 | .dc.w $1
|
---|
| 148 | .dc.w $1
|
---|
| 149 | .dc.w $71
|
---|
| 150 | .dc.w $3C
|
---|
| 151 | .dc.w $1
|
---|
| 152 | .dc.w $0
|
---|
| 153 | .dc.w $75
|
---|
| 154 | .dc.w $3B
|
---|
| 155 | .dc.w $0
|
---|
| 156 | .dc.w $1
|
---|
| 157 | .dc.w $79
|
---|
| 158 | .dc.w $39
|
---|
| 159 | .dc.w $1
|
---|
| 160 | .dc.w $1
|
---|
| 161 | .dc.w $7D
|
---|
| 162 | .dc.w $37
|
---|
| 163 | .dc.w $1
|
---|
| 164 | .dc.w $1
|
---|
| 165 | .dc.w $81
|
---|
| 166 | .dc.w $35
|
---|
| 167 | .dc.w $1
|
---|
| 168 | .dc.w $0
|
---|
| 169 | .dc.w $85
|
---|
| 170 | .dc.w $34
|
---|
| 171 | .dc.w $0
|
---|
| 172 | .dc.w $1
|
---|
| 173 | .dc.w $89
|
---|
| 174 | .dc.w $32
|
---|
| 175 | .dc.w $1
|
---|
| 176 | .dc.w $1
|
---|
| 177 | .dc.w $8D
|
---|
| 178 | .dc.w $30
|
---|
| 179 | .dc.w $1
|
---|
| 180 | .dc.w $0
|
---|
| 181 | .dc.w $91
|
---|
| 182 | .dc.w $2F
|
---|
| 183 | .dc.w $0
|
---|
| 184 | .dc.w $1
|
---|
| 185 | .dc.w $95
|
---|
| 186 | .dc.w $2D
|
---|
| 187 | .dc.w $1
|
---|
| 188 | .dc.w $1
|
---|
| 189 | .dc.w $99
|
---|
| 190 | .dc.w $2B
|
---|
| 191 | .dc.w $1
|
---|
| 192 | .dc.w $1
|
---|
| 193 | .dc.w $9D
|
---|
| 194 | .dc.w $29
|
---|
| 195 | .dc.w $1
|
---|
| 196 | .dc.w $0
|
---|
| 197 | .dc.w $A1
|
---|
| 198 | .dc.w $28
|
---|
| 199 | .dc.w $0
|
---|
| 200 | .dc.w $1
|
---|
| 201 | .dc.w $A5
|
---|
| 202 | .dc.w $26
|
---|
| 203 | .dc.w $1
|
---|
| 204 | .dc.w $1
|
---|
| 205 | .dc.w $A9
|
---|
| 206 | .dc.w $24
|
---|
| 207 | .dc.w $1
|
---|
| 208 | .dc.w $0
|
---|
| 209 | .dc.w $AD
|
---|
| 210 | .dc.w $23
|
---|
| 211 | .dc.w $0
|
---|
| 212 | .dc.w $1
|
---|
| 213 | .dc.w $B1
|
---|
| 214 | .dc.w $21
|
---|
| 215 | .dc.w $1
|
---|
| 216 | .dc.w $1
|
---|
| 217 | .dc.w $B5
|
---|
| 218 | .dc.w $1F
|
---|
| 219 | .dc.w $1
|
---|
| 220 | .dc.w $1
|
---|
| 221 | .dc.w $B9
|
---|
| 222 | .dc.w $1D
|
---|
| 223 | .dc.w $1
|
---|
| 224 | .dc.w $0
|
---|
| 225 | .dc.w $BD
|
---|
| 226 | .dc.w $1C
|
---|
| 227 | .dc.w $0
|
---|
| 228 | .dc.w $1
|
---|
| 229 | .dc.w $C1
|
---|
| 230 | .dc.w $1A
|
---|
| 231 | .dc.w $1
|
---|
| 232 | .dc.w $1
|
---|
| 233 | .dc.w $C5
|
---|
| 234 | .dc.w $18
|
---|
| 235 | .dc.w $1
|
---|
| 236 | .dc.w $0
|
---|
| 237 | .dc.w $C9
|
---|
| 238 | .dc.w $17
|
---|
| 239 | .dc.w $0
|
---|
| 240 | .dc.w $1
|
---|
| 241 | .dc.w $CD
|
---|
| 242 | .dc.w $15
|
---|
| 243 | .dc.w $1
|
---|
| 244 | .dc.w $0
|
---|
| 245 | .globl _pix2mid
|
---|
| 246 | .text
|
---|
| 247 | _pix2mid:
|
---|
| 248 | ~~pix2mid:
|
---|
| 249 | link R14,#0
|
---|
| 250 | movem.l R3-R7,-(sp)
|
---|
| 251 | ~i=R7
|
---|
| 252 | ~cy=R6
|
---|
| 253 | ~mpc=R5
|
---|
| 254 | ~ct=R4
|
---|
| 255 | *line 127
|
---|
| 256 | move #-1,_cnote
|
---|
| 257 | *line 128
|
---|
| 258 | move.l #$ffffffff,_ctime
|
---|
| 259 | *line 129
|
---|
| 260 | move #-1,_cflag
|
---|
| 261 | *line 130
|
---|
| 262 | cmp.b #4,_ac_code
|
---|
| 263 | bne L10000
|
---|
| 264 | move #2,R0
|
---|
| 265 | bra L10002
|
---|
| 266 | L10000:move #3,R0
|
---|
| 267 | L10002:move R0,R5
|
---|
| 268 | *line 132
|
---|
| 269 | move _cxval,R4
|
---|
| 270 | ext.l R4
|
---|
| 271 | add.l _t_cur,R4
|
---|
| 272 | add.l #$ffffff00,R4
|
---|
| 273 | *line 134
|
---|
| 274 | *line 135
|
---|
| 275 | tst.l R4
|
---|
| 276 | bge L2
|
---|
| 277 | *line 135
|
---|
| 278 | move #-1,R0
|
---|
| 279 | bra L1
|
---|
| 280 | *line 136
|
---|
| 281 | L2:
|
---|
| 282 | *line 137
|
---|
| 283 | move.l R4,_ctime
|
---|
| 284 | *line 138
|
---|
| 285 | move _cyval,R6
|
---|
| 286 | add #-14,R6
|
---|
| 287 | *line 140
|
---|
| 288 | clr R7
|
---|
| 289 | bra L5
|
---|
| 290 | L6:
|
---|
| 291 | *line 141
|
---|
| 292 | *line 142
|
---|
| 293 | *line 143
|
---|
| 294 | move R7,R0
|
---|
| 295 | asl #3,R0
|
---|
| 296 | ext.l R0
|
---|
| 297 | add.l #_mpixtab,R0
|
---|
| 298 | move.l R0,R8
|
---|
| 299 | cmp (R8),R6
|
---|
| 300 | blt L7
|
---|
| 301 | move R7,R0
|
---|
| 302 | asl #3,R0
|
---|
| 303 | ext.l R0
|
---|
| 304 | move.l R0,R8
|
---|
| 305 | move.l #_mpixtab,R9
|
---|
| 306 | move 0(R8,R9.l),R0
|
---|
| 307 | add #2,R0
|
---|
| 308 | cmp R0,R6
|
---|
| 309 | bgt L7
|
---|
| 310 | *line 144
|
---|
| 311 | *line 145
|
---|
| 312 | move R7,R0
|
---|
| 313 | asl #3,R0
|
---|
| 314 | ext.l R0
|
---|
| 315 | add.l #_mpixtab,R0
|
---|
| 316 | move.l R0,R8
|
---|
| 317 | move 2(R8),_cnote
|
---|
| 318 | *line 146
|
---|
| 319 | move R7,R0
|
---|
| 320 | asl #3,R0
|
---|
| 321 | ext.l R0
|
---|
| 322 | move R5,R1
|
---|
| 323 | asl #1,R1
|
---|
| 324 | ext.l R1
|
---|
| 325 | add.l R1,R0
|
---|
| 326 | add.l #_mpixtab,R0
|
---|
| 327 | move.l R0,R8
|
---|
| 328 | move (R8),_cflag
|
---|
| 329 | bra L3
|
---|
| 330 | *line 147
|
---|
| 331 | *line 148
|
---|
| 332 | L7:L4:
|
---|
| 333 | *line 140
|
---|
| 334 | add #1,R7
|
---|
| 335 | L5:
|
---|
| 336 | *line 140
|
---|
| 337 | cmp #52,R7
|
---|
| 338 | blt L6
|
---|
| 339 | L3:
|
---|
| 340 | *line 151
|
---|
| 341 | cmp #$ffffffff,_cnote
|
---|
| 342 | bne L10003
|
---|
| 343 | move #-1,R0
|
---|
| 344 | bra L10005
|
---|
| 345 | L10003:clr R0
|
---|
| 346 | L10005:bra L1
|
---|
| 347 | L1:tst.l (sp)+
|
---|
| 348 | movem.l (sp)+,R4-R7
|
---|
| 349 | unlk R14
|
---|
| 350 | rts
|
---|
| 351 | .data
|
---|
Note:
See
TracBrowser
for help on using the repository browser.