1 1 ;--------------------------------------------------------
2 2 ; File Created by SDCC : FreeWare ANSI-C Compiler
3 3 ; Version 2.1.9Ga Sun Jan 16 17:31:26 2000
5 5 ;--------------------------------------------------------
7 7 ;--------------------------------------------------------
8 8 ; publics variables in this module
9 9 ;--------------------------------------------------------
10 10 .globl ___fsdiv_PARM_2
12 12 ;--------------------------------------------------------
13 13 ; special function registers
14 14 ;--------------------------------------------------------
15 15 ;--------------------------------------------------------
16 16 ; special function bits
17 17 ;--------------------------------------------------------
18 18 ;--------------------------------------------------------
19 19 ; internal ram data
20 20 ;--------------------------------------------------------
22 0000 22 ___fsdiv_sloc0_1_0:
24 0001 24 ___fsdiv_sloc1_1_0:
26 0005 26 ___fsdiv_sloc2_1_0:
28 0009 28 ___fsdiv_sloc3_1_0:
30 30 ;--------------------------------------------------------
31 31 ; overlayable items in internal ram
32 32 ;--------------------------------------------------------
33 33 .area OSEG (OVR,DATA)
34 34 ;--------------------------------------------------------
35 35 ; indirectly addressable internal ram data
36 36 ;--------------------------------------------------------
38 38 ;--------------------------------------------------------
40 40 ;--------------------------------------------------------
42 42 ;--------------------------------------------------------
43 43 ; external ram data
44 44 ;--------------------------------------------------------
46 0000 46 ___fsdiv_PARM_2:
48 0004 48 ___fsdiv_a1_1_1:
50 0008 50 ___fsdiv_fl1_1_1:
52 000C 52 ___fsdiv_fl2_1_1:
54 0010 54 ___fsdiv_result_1_1:
56 0014 56 ___fsdiv_mask_1_1:
58 0018 58 ___fsdiv_mant1_1_1:
60 001C 60 ___fsdiv_mant2_1_1:
62 0020 62 ___fsdiv_exp_1_1:
64 64 ;--------------------------------------------------------
65 65 ; global & static initialisations
66 66 ;--------------------------------------------------------
67 67 .area GSINIT (CODE)
68 68 ;--------------------------------------------------------
70 70 ;--------------------------------------------------------
72 0000 72 G$__fsdiv$0$0 ==.
74 74 ; -----------------------------------------
76 76 ; -----------------------------------------
87 0000 C0 E0 87 push acc
89 0004 C0 83 89 push dph
90 0006 C0 82 90 push dpl
91 0008 90s00r04 91 mov dptr,#___fsdiv_a1_1_1
93 000D F0 93 movx @dptr,a
96 0011 F0 96 movx @dptr,a
99 0015 F0 99 movx @dptr,a
100 0016 D0 E0 100 pop acc
102 0019 F0 102 movx @dptr,a
104 001A 90s00r04 104 mov dptr,#___fsdiv_a1_1_1
105 001D E0 105 movx a,@dptr
108 0020 E0 108 movx a,@dptr
111 0023 E0 111 movx a,@dptr
114 0026 E0 114 movx a,@dptr
116 0028 90s00r08 116 mov dptr,#(___fsdiv_fl1_1_1)
118 002C F0 118 movx @dptr,a
121 002F F0 121 movx @dptr,a
124 0032 F0 124 movx @dptr,a
127 0035 F0 127 movx @dptr,a
129 0036 90s00r00 129 mov dptr,#___fsdiv_PARM_2
130 0039 E0 130 movx a,@dptr
133 003C E0 133 movx a,@dptr
136 003F E0 136 movx a,@dptr
139 0042 E0 139 movx a,@dptr
141 0044 90s00r0C 141 mov dptr,#(___fsdiv_fl2_1_1)
143 0048 F0 143 movx @dptr,a
146 004B F0 146 movx @dptr,a
149 004E F0 149 movx @dptr,a
152 0051 F0 152 movx @dptr,a
154 0052 90s00r08 154 mov dptr,#(___fsdiv_fl1_1_1)
155 0055 E0 155 movx a,@dptr
158 0058 E0 158 movx a,@dptr
161 005B E0 161 movx a,@dptr
164 005E E0 164 movx a,@dptr
166 0060 8C 02 166 mov ar2,r4
168 0063 A2 E7 168 mov c,acc.7
174 006A 54 01 174 anl a,#0x01
175 006C 30 E0 02 175 jnb acc.0,00120$
176 006F 44 FE 176 orl a,#0xfe
180 0073 95 E0 180 subb a,acc
183 0077 90s00r20 183 mov dptr,#___fsdiv_exp_1_1
185 007B F0 185 movx @dptr,a
187 187 ; Peephole 180 changed mov to clr
189 007E F0 189 movx @dptr,a
191 007F 90s00r0C 191 mov dptr,#(___fsdiv_fl2_1_1)
192 0082 E0 192 movx a,@dptr
195 0085 E0 195 movx a,@dptr
198 0088 E0 198 movx a,@dptr
201 008B E0 201 movx a,@dptr
203 008D 8E 02 203 mov ar2,r6
205 0090 A2 E7 205 mov c,acc.7
211 0097 54 01 211 anl a,#0x01
212 0099 30 E0 02 212 jnb acc.0,00121$
213 009C 44 FE 213 orl a,#0xfe
217 00A0 95 E0 217 subb a,acc
220 00A4 7B 00 220 mov r3,#0x00
221 00A6 90s00r20 221 mov dptr,#___fsdiv_exp_1_1
222 00A9 E0 222 movx a,@dptr
225 00AC E0 225 movx a,@dptr
227 00AE 90s00r20 227 mov dptr,#___fsdiv_exp_1_1
230 00B3 9A 230 subb a,r2
231 00B4 F0 231 movx @dptr,a
233 00B6 9B 233 subb a,r3
235 00B8 F0 235 movx @dptr,a
237 00B9 90s00r20 237 mov dptr,#___fsdiv_exp_1_1
238 00BC E0 238 movx a,@dptr
241 00BF E0 241 movx a,@dptr
243 00C1 90s00r20 243 mov dptr,#___fsdiv_exp_1_1
244 00C4 74 7E 244 mov a,#0x7e
246 00C7 F0 246 movx @dptr,a
247 247 ; Peephole 180 changed mov to clr
249 00C9 3B 249 addc a,r3
251 00CB F0 251 movx @dptr,a
253 00CC 90s00r08 253 mov dptr,#(___fsdiv_fl1_1_1)
254 00CF E0 254 movx a,@dptr
257 00D2 E0 257 movx a,@dptr
260 00D5 E0 260 movx a,@dptr
263 00D8 E0 263 movx a,@dptr
264 264 ; Peephole 105 removed redundant mov
267 00DB 54 01 267 anl a,#0x01
268 00DD F5*00 268 mov ___fsdiv_sloc0_1_0,a
269 00DF 90s00r0C 269 mov dptr,#(___fsdiv_fl2_1_1)
270 00E2 E0 270 movx a,@dptr
271 00E3 F5*01 271 mov ___fsdiv_sloc1_1_0,a
273 00E6 E0 273 movx a,@dptr
274 00E7 F5*02 274 mov (___fsdiv_sloc1_1_0 + 1),a
276 00EA E0 276 movx a,@dptr
277 00EB F5*03 277 mov (___fsdiv_sloc1_1_0 + 2),a
279 00EE E0 279 movx a,@dptr
280 280 ; Peephole 105 removed redundant mov
281 00EF F5*04 281 mov (___fsdiv_sloc1_1_0 + 3),a
283 00F2 54 01 283 anl a,#0x01
284 284 ; Peephole 105 removed redundant mov
286 00F5 65*00 286 xrl a,___fsdiv_sloc0_1_0
287 00F7 F5*01 287 mov ___fsdiv_sloc1_1_0,a
289 00F9 90s00r0C 289 mov dptr,#(___fsdiv_fl2_1_1)
290 00FC E0 290 movx a,@dptr
291 00FD F5*05 291 mov ___fsdiv_sloc2_1_0,a
293 0100 E0 293 movx a,@dptr
294 0101 F5*06 294 mov (___fsdiv_sloc2_1_0 + 1),a
296 0104 E0 296 movx a,@dptr
297 0105 F5*07 297 mov (___fsdiv_sloc2_1_0 + 2),a
299 0108 E0 299 movx a,@dptr
300 0109 F5*08 300 mov (___fsdiv_sloc2_1_0 + 3),a
301 010B E5*05 301 mov a,___fsdiv_sloc2_1_0
302 010D 45*06 302 orl a,(___fsdiv_sloc2_1_0 + 1)
303 010F 45*07 303 orl a,(___fsdiv_sloc2_1_0 + 2)
304 0111 45*08 304 orl a,(___fsdiv_sloc2_1_0 + 3)
305 305 ; Peephole 109 removed ljmp by inverse jump logic
306 0113 70 0B 306 jnz 00102$
309 309 ; Peephole 181 used 16 bit load of dptr
310 0115 90 00 00 310 mov dptr,#0x0000
311 0118 75 F0 80 311 mov b,#0x80
312 011B 74 BF 312 mov a,#0xbf
313 011D 02s04rBF 313 ljmp 00112$
316 0120 90s00r08 316 mov dptr,#(___fsdiv_fl1_1_1)
317 0123 E0 317 movx a,@dptr
318 0124 F5*05 318 mov ___fsdiv_sloc2_1_0,a
320 0127 E0 320 movx a,@dptr
321 0128 F5*06 321 mov (___fsdiv_sloc2_1_0 + 1),a
323 012B E0 323 movx a,@dptr
324 012C F5*07 324 mov (___fsdiv_sloc2_1_0 + 2),a
326 012F E0 326 movx a,@dptr
327 0130 F5*08 327 mov (___fsdiv_sloc2_1_0 + 3),a
328 0132 E5*05 328 mov a,___fsdiv_sloc2_1_0
329 0134 45*06 329 orl a,(___fsdiv_sloc2_1_0 + 1)
330 0136 45*07 330 orl a,(___fsdiv_sloc2_1_0 + 2)
331 0138 45*08 331 orl a,(___fsdiv_sloc2_1_0 + 3)
332 332 ; Peephole 109 removed ljmp by inverse jump logic
333 013A 70 0A 333 jnz 00104$
336 336 ; Peephole 3.a changed mov to clr
337 337 ; Peephole 3.b changed mov to clr
338 338 ; Peephole 3.b changed mov to clr
340 013D F5 82 340 mov dpl,a
341 013F F5 83 341 mov dph,a
342 0141 F5 F0 342 mov b,a
343 0143 02s04rBF 343 ljmp 00112$
346 0146 90s00r08 346 mov dptr,#(___fsdiv_fl1_1_1)
347 0149 E0 347 movx a,@dptr
348 014A F5*05 348 mov ___fsdiv_sloc2_1_0,a
350 014D E0 350 movx a,@dptr
351 014E F5*06 351 mov (___fsdiv_sloc2_1_0 + 1),a
353 0151 E0 353 movx a,@dptr
354 0152 F5*07 354 mov (___fsdiv_sloc2_1_0 + 2),a
356 0155 E0 356 movx a,@dptr
357 0156 F5*08 357 mov (___fsdiv_sloc2_1_0 + 3),a
358 0158 53r07 7F 358 anl (___fsdiv_sloc2_1_0 + 2),#0x7f
359 015B 75*08 00 359 mov (___fsdiv_sloc2_1_0 + 3),#0x00
360 015E 90s00r18 360 mov dptr,#___fsdiv_mant1_1_1
361 0161 E5*05 361 mov a,___fsdiv_sloc2_1_0
362 0163 F0 362 movx @dptr,a
364 0165 E5*06 364 mov a,(___fsdiv_sloc2_1_0 + 1)
365 0167 F0 365 movx @dptr,a
366 0168 74 80 366 mov a,#0x80
367 016A 45*07 367 orl a,(___fsdiv_sloc2_1_0 + 2)
369 016D F0 369 movx @dptr,a
371 016F E5*08 371 mov a,(___fsdiv_sloc2_1_0 + 3)
372 0171 F0 372 movx @dptr,a
374 0172 90s00r0C 374 mov dptr,#(___fsdiv_fl2_1_1)
375 0175 E0 375 movx a,@dptr
376 0176 F5*05 376 mov ___fsdiv_sloc2_1_0,a
378 0179 E0 378 movx a,@dptr
379 017A F5*06 379 mov (___fsdiv_sloc2_1_0 + 1),a
381 017D E0 381 movx a,@dptr
382 017E F5*07 382 mov (___fsdiv_sloc2_1_0 + 2),a
384 0181 E0 384 movx a,@dptr
385 0182 F5*08 385 mov (___fsdiv_sloc2_1_0 + 3),a
386 0184 53r07 7F 386 anl (___fsdiv_sloc2_1_0 + 2),#0x7f
387 0187 75*08 00 387 mov (___fsdiv_sloc2_1_0 + 3),#0x00
388 018A 90s00r1C 388 mov dptr,#___fsdiv_mant2_1_1
389 018D E5*05 389 mov a,___fsdiv_sloc2_1_0
390 018F F0 390 movx @dptr,a
392 0191 E5*06 392 mov a,(___fsdiv_sloc2_1_0 + 1)
393 0193 F0 393 movx @dptr,a
394 0194 74 80 394 mov a,#0x80
395 0196 45*07 395 orl a,(___fsdiv_sloc2_1_0 + 2)
397 0199 F0 397 movx @dptr,a
399 019B E5*08 399 mov a,(___fsdiv_sloc2_1_0 + 3)
400 019D F0 400 movx @dptr,a
402 019E 90s00r1C 402 mov dptr,#___fsdiv_mant2_1_1
403 01A1 E0 403 movx a,@dptr
404 01A2 F5*05 404 mov ___fsdiv_sloc2_1_0,a
406 01A5 E0 406 movx a,@dptr
407 01A6 F5*06 407 mov (___fsdiv_sloc2_1_0 + 1),a
409 01A9 E0 409 movx a,@dptr
410 01AA F5*07 410 mov (___fsdiv_sloc2_1_0 + 2),a
412 01AD E0 412 movx a,@dptr
413 01AE F5*08 413 mov (___fsdiv_sloc2_1_0 + 3),a
414 01B0 90s00r18 414 mov dptr,#___fsdiv_mant1_1_1
415 01B3 E0 415 movx a,@dptr
416 01B4 F5*09 416 mov ___fsdiv_sloc3_1_0,a
418 01B7 E0 418 movx a,@dptr
419 01B8 F5*0A 419 mov (___fsdiv_sloc3_1_0 + 1),a
421 01BB E0 421 movx a,@dptr
422 01BC F5*0B 422 mov (___fsdiv_sloc3_1_0 + 2),a
424 01BF E0 424 movx a,@dptr
425 01C0 F5*0C 425 mov (___fsdiv_sloc3_1_0 + 3),a
427 01C3 E5*09 427 mov a,___fsdiv_sloc3_1_0
428 01C5 95*05 428 subb a,___fsdiv_sloc2_1_0
429 01C7 E5*0A 429 mov a,(___fsdiv_sloc3_1_0 + 1)
430 01C9 95*06 430 subb a,(___fsdiv_sloc2_1_0 + 1)
431 01CB E5*0B 431 mov a,(___fsdiv_sloc3_1_0 + 2)
432 01CD 95*07 432 subb a,(___fsdiv_sloc2_1_0 + 2)
433 01CF E5*0C 433 mov a,(___fsdiv_sloc3_1_0 + 3)
434 01D1 64 80 434 xrl a,#0x80
435 01D3 85*08 F0 435 mov b,(___fsdiv_sloc2_1_0 + 3)
436 01D6 63 F0 80 436 xrl b,#0x80
437 01D9 95 F0 437 subb a,b
438 01DB 40 03 438 jc 00124$
439 01DD 02s02r31 439 ljmp 00106$
442 01E0 90s00r18 442 mov dptr,#___fsdiv_mant1_1_1
443 01E3 E0 443 movx a,@dptr
444 01E4 F5*09 444 mov ___fsdiv_sloc3_1_0,a
446 01E7 E0 446 movx a,@dptr
447 01E8 F5*0A 447 mov (___fsdiv_sloc3_1_0 + 1),a
449 01EB E0 449 movx a,@dptr
450 01EC F5*0B 450 mov (___fsdiv_sloc3_1_0 + 2),a
452 01EF E0 452 movx a,@dptr
453 01F0 F5*0C 453 mov (___fsdiv_sloc3_1_0 + 3),a
454 01F2 E5*09 454 mov a,___fsdiv_sloc3_1_0
455 01F4 25 E0 455 add a,acc
456 01F6 F5*09 456 mov ___fsdiv_sloc3_1_0,a
457 01F8 E5*0A 457 mov a,(___fsdiv_sloc3_1_0 + 1)
459 01FB F5*0A 459 mov (___fsdiv_sloc3_1_0 + 1),a
460 01FD E5*0B 460 mov a,(___fsdiv_sloc3_1_0 + 2)
462 0200 F5*0B 462 mov (___fsdiv_sloc3_1_0 + 2),a
463 0202 E5*0C 463 mov a,(___fsdiv_sloc3_1_0 + 3)
465 0205 F5*0C 465 mov (___fsdiv_sloc3_1_0 + 3),a
466 0207 90s00r18 466 mov dptr,#___fsdiv_mant1_1_1
467 020A E5*09 467 mov a,___fsdiv_sloc3_1_0
468 020C F0 468 movx @dptr,a
470 020E E5*0A 470 mov a,(___fsdiv_sloc3_1_0 + 1)
471 0210 F0 471 movx @dptr,a
473 0212 E5*0B 473 mov a,(___fsdiv_sloc3_1_0 + 2)
474 0214 F0 474 movx @dptr,a
476 0216 E5*0C 476 mov a,(___fsdiv_sloc3_1_0 + 3)
477 0218 F0 477 movx @dptr,a
479 0219 90s00r20 479 mov dptr,#___fsdiv_exp_1_1
480 021C E0 480 movx a,@dptr
481 021D 24 FF 481 add a,#0xff
482 021F F5*09 482 mov ___fsdiv_sloc3_1_0,a
484 0222 E0 484 movx a,@dptr
485 0223 34 FF 485 addc a,#0xff
486 0225 F5*0A 486 mov (___fsdiv_sloc3_1_0 + 1),a
487 0227 90s00r20 487 mov dptr,#___fsdiv_exp_1_1
488 022A E5*09 488 mov a,___fsdiv_sloc3_1_0
489 022C F0 489 movx @dptr,a
491 022E E5*0A 491 mov a,(___fsdiv_sloc3_1_0 + 1)
492 0230 F0 492 movx @dptr,a
495 0231 90s00r14 495 mov dptr,#___fsdiv_mask_1_1
496 496 ; Peephole 101 removed redundant mov
497 497 ; Peephole 180 changed mov to clr
499 0235 F0 499 movx @dptr,a
501 0237 F0 501 movx @dptr,a
503 503 ; Peephole 180 changed mov to clr
505 023A F0 505 movx @dptr,a
507 023C 74 01 507 mov a,#0x01
508 023E F0 508 movx @dptr,a
510 023F 90s00r10 510 mov dptr,#___fsdiv_result_1_1
515 0246 F0 515 movx @dptr,a
516 0247 12s00r00 516 lcall __decdptr
517 024A F0 517 movx @dptr,a
518 024B 12s00r00 518 lcall __decdptr
519 024E F0 519 movx @dptr,a
520 024F 12s00r00 520 lcall __decdptr
521 0252 F0 521 movx @dptr,a
524 0253 90s00r14 524 mov dptr,#___fsdiv_mask_1_1
525 0256 E0 525 movx a,@dptr
526 0257 F5*09 526 mov ___fsdiv_sloc3_1_0,a
528 025A E0 528 movx a,@dptr
529 025B F5*0A 529 mov (___fsdiv_sloc3_1_0 + 1),a
531 025E E0 531 movx a,@dptr
532 025F F5*0B 532 mov (___fsdiv_sloc3_1_0 + 2),a
534 0262 E0 534 movx a,@dptr
535 0263 F5*0C 535 mov (___fsdiv_sloc3_1_0 + 3),a
536 0265 E5*09 536 mov a,___fsdiv_sloc3_1_0
537 0267 45*0A 537 orl a,(___fsdiv_sloc3_1_0 + 1)
538 0269 45*0B 538 orl a,(___fsdiv_sloc3_1_0 + 2)
539 026B 45*0C 539 orl a,(___fsdiv_sloc3_1_0 + 3)
540 026D 70 03 540 jnz 00125$
541 026F 02s03rA2 541 ljmp 00111$
544 0272 90s00r1C 544 mov dptr,#___fsdiv_mant2_1_1
545 0275 E0 545 movx a,@dptr
546 0276 F5*09 546 mov ___fsdiv_sloc3_1_0,a
548 0279 E0 548 movx a,@dptr
549 027A F5*0A 549 mov (___fsdiv_sloc3_1_0 + 1),a
551 027D E0 551 movx a,@dptr
552 027E F5*0B 552 mov (___fsdiv_sloc3_1_0 + 2),a
554 0281 E0 554 movx a,@dptr
555 0282 F5*0C 555 mov (___fsdiv_sloc3_1_0 + 3),a
556 0284 90s00r18 556 mov dptr,#___fsdiv_mant1_1_1
557 0287 E0 557 movx a,@dptr
558 0288 F5*05 558 mov ___fsdiv_sloc2_1_0,a
560 028B E0 560 movx a,@dptr
561 028C F5*06 561 mov (___fsdiv_sloc2_1_0 + 1),a
563 028F E0 563 movx a,@dptr
564 0290 F5*07 564 mov (___fsdiv_sloc2_1_0 + 2),a
566 0293 E0 566 movx a,@dptr
567 0294 F5*08 567 mov (___fsdiv_sloc2_1_0 + 3),a
569 0297 E5*05 569 mov a,___fsdiv_sloc2_1_0
570 0299 95*09 570 subb a,___fsdiv_sloc3_1_0
571 029B E5*06 571 mov a,(___fsdiv_sloc2_1_0 + 1)
572 029D 95*0A 572 subb a,(___fsdiv_sloc3_1_0 + 1)
573 029F E5*07 573 mov a,(___fsdiv_sloc2_1_0 + 2)
574 02A1 95*0B 574 subb a,(___fsdiv_sloc3_1_0 + 2)
575 02A3 E5*08 575 mov a,(___fsdiv_sloc2_1_0 + 3)
576 02A5 64 80 576 xrl a,#0x80
577 02A7 85*0C F0 577 mov b,(___fsdiv_sloc3_1_0 + 3)
578 02AA 63 F0 80 578 xrl b,#0x80
579 02AD 95 F0 579 subb a,b
580 02AF 50 03 580 jnc 00126$
581 02B1 02s03r31 581 ljmp 00108$
584 02B4 90s00r14 584 mov dptr,#___fsdiv_mask_1_1
585 02B7 E0 585 movx a,@dptr
586 02B8 F5*09 586 mov ___fsdiv_sloc3_1_0,a
588 02BB E0 588 movx a,@dptr
589 02BC F5*0A 589 mov (___fsdiv_sloc3_1_0 + 1),a
591 02BF E0 591 movx a,@dptr
592 02C0 F5*0B 592 mov (___fsdiv_sloc3_1_0 + 2),a
594 02C3 E0 594 movx a,@dptr
595 02C4 F5*0C 595 mov (___fsdiv_sloc3_1_0 + 3),a
596 02C6 90s00r10 596 mov dptr,#___fsdiv_result_1_1
597 02C9 E0 597 movx a,@dptr
598 02CA F5*05 598 mov ___fsdiv_sloc2_1_0,a
600 02CD E0 600 movx a,@dptr
601 02CE F5*06 601 mov (___fsdiv_sloc2_1_0 + 1),a
603 02D1 E0 603 movx a,@dptr
604 02D2 F5*07 604 mov (___fsdiv_sloc2_1_0 + 2),a
606 02D5 E0 606 movx a,@dptr
607 02D6 F5*08 607 mov (___fsdiv_sloc2_1_0 + 3),a
608 02D8 90s00r10 608 mov dptr,#___fsdiv_result_1_1
609 02DB E5*09 609 mov a,___fsdiv_sloc3_1_0
610 02DD 45*05 610 orl a,___fsdiv_sloc2_1_0
611 02DF F0 611 movx @dptr,a
612 02E0 E5*0A 612 mov a,(___fsdiv_sloc3_1_0 + 1)
613 02E2 45*06 613 orl a,(___fsdiv_sloc2_1_0 + 1)
615 02E5 F0 615 movx @dptr,a
616 02E6 E5*0B 616 mov a,(___fsdiv_sloc3_1_0 + 2)
617 02E8 45*07 617 orl a,(___fsdiv_sloc2_1_0 + 2)
619 02EB F0 619 movx @dptr,a
620 02EC E5*0C 620 mov a,(___fsdiv_sloc3_1_0 + 3)
621 02EE 45*08 621 orl a,(___fsdiv_sloc2_1_0 + 3)
623 02F1 F0 623 movx @dptr,a
625 02F2 90s00r1C 625 mov dptr,#___fsdiv_mant2_1_1
626 02F5 E0 626 movx a,@dptr
627 02F6 F5*09 627 mov ___fsdiv_sloc3_1_0,a
629 02F9 E0 629 movx a,@dptr
630 02FA F5*0A 630 mov (___fsdiv_sloc3_1_0 + 1),a
632 02FD E0 632 movx a,@dptr
633 02FE F5*0B 633 mov (___fsdiv_sloc3_1_0 + 2),a
635 0301 E0 635 movx a,@dptr
636 0302 F5*0C 636 mov (___fsdiv_sloc3_1_0 + 3),a
637 0304 90s00r18 637 mov dptr,#___fsdiv_mant1_1_1
638 0307 E0 638 movx a,@dptr
639 0308 F5*05 639 mov ___fsdiv_sloc2_1_0,a
641 030B E0 641 movx a,@dptr
642 030C F5*06 642 mov (___fsdiv_sloc2_1_0 + 1),a
644 030F E0 644 movx a,@dptr
645 0310 F5*07 645 mov (___fsdiv_sloc2_1_0 + 2),a
647 0313 E0 647 movx a,@dptr
648 0314 F5*08 648 mov (___fsdiv_sloc2_1_0 + 3),a
649 0316 90s00r18 649 mov dptr,#___fsdiv_mant1_1_1
651 031A E5*05 651 mov a,___fsdiv_sloc2_1_0
652 031C 95*09 652 subb a,___fsdiv_sloc3_1_0
653 031E F0 653 movx @dptr,a
654 031F E5*06 654 mov a,(___fsdiv_sloc2_1_0 + 1)
655 0321 95*0A 655 subb a,(___fsdiv_sloc3_1_0 + 1)
657 0324 F0 657 movx @dptr,a
658 0325 E5*07 658 mov a,(___fsdiv_sloc2_1_0 + 2)
659 0327 95*0B 659 subb a,(___fsdiv_sloc3_1_0 + 2)
661 032A F0 661 movx @dptr,a
662 032B E5*08 662 mov a,(___fsdiv_sloc2_1_0 + 3)
663 032D 95*0C 663 subb a,(___fsdiv_sloc3_1_0 + 3)
665 0330 F0 665 movx @dptr,a
668 0331 90s00r18 668 mov dptr,#___fsdiv_mant1_1_1
669 0334 E0 669 movx a,@dptr
670 0335 F5*09 670 mov ___fsdiv_sloc3_1_0,a
672 0338 E0 672 movx a,@dptr
673 0339 F5*0A 673 mov (___fsdiv_sloc3_1_0 + 1),a
675 033C E0 675 movx a,@dptr
676 033D F5*0B 676 mov (___fsdiv_sloc3_1_0 + 2),a
678 0340 E0 678 movx a,@dptr
679 0341 F5*0C 679 mov (___fsdiv_sloc3_1_0 + 3),a
680 0343 E5*09 680 mov a,___fsdiv_sloc3_1_0
681 0345 25 E0 681 add a,acc
682 0347 F5*09 682 mov ___fsdiv_sloc3_1_0,a
683 0349 E5*0A 683 mov a,(___fsdiv_sloc3_1_0 + 1)
685 034C F5*0A 685 mov (___fsdiv_sloc3_1_0 + 1),a
686 034E E5*0B 686 mov a,(___fsdiv_sloc3_1_0 + 2)
688 0351 F5*0B 688 mov (___fsdiv_sloc3_1_0 + 2),a
689 0353 E5*0C 689 mov a,(___fsdiv_sloc3_1_0 + 3)
691 0356 F5*0C 691 mov (___fsdiv_sloc3_1_0 + 3),a
692 0358 90s00r18 692 mov dptr,#___fsdiv_mant1_1_1
693 035B E5*09 693 mov a,___fsdiv_sloc3_1_0
694 035D F0 694 movx @dptr,a
696 035F E5*0A 696 mov a,(___fsdiv_sloc3_1_0 + 1)
697 0361 F0 697 movx @dptr,a
699 0363 E5*0B 699 mov a,(___fsdiv_sloc3_1_0 + 2)
700 0365 F0 700 movx @dptr,a
702 0367 E5*0C 702 mov a,(___fsdiv_sloc3_1_0 + 3)
703 0369 F0 703 movx @dptr,a
705 036A 90s00r14 705 mov dptr,#___fsdiv_mask_1_1
706 036D E0 706 movx a,@dptr
707 036E F5*09 707 mov ___fsdiv_sloc3_1_0,a
709 0371 E0 709 movx a,@dptr
710 0372 F5*0A 710 mov (___fsdiv_sloc3_1_0 + 1),a
712 0375 E0 712 movx a,@dptr
713 0376 F5*0B 713 mov (___fsdiv_sloc3_1_0 + 2),a
715 0379 E0 715 movx a,@dptr
716 716 ; Peephole 106 removed redundant mov
717 037A F5*0C 717 mov (___fsdiv_sloc3_1_0 + 3),a
720 037E F5*0C 720 mov (___fsdiv_sloc3_1_0 + 3),a
721 0380 E5*0B 721 mov a,(___fsdiv_sloc3_1_0 + 2)
723 0383 F5*0B 723 mov (___fsdiv_sloc3_1_0 + 2),a
724 0385 E5*0A 724 mov a,(___fsdiv_sloc3_1_0 + 1)
726 0388 F5*0A 726 mov (___fsdiv_sloc3_1_0 + 1),a
727 038A E5*09 727 mov a,___fsdiv_sloc3_1_0
729 729 ; Peephole 100 removed redundant mov
730 038D F5*09 730 mov ___fsdiv_sloc3_1_0,a
731 038F 90s00r14 731 mov dptr,#___fsdiv_mask_1_1
732 0392 F0 732 movx @dptr,a
734 0394 E5*0A 734 mov a,(___fsdiv_sloc3_1_0 + 1)
735 0396 F0 735 movx @dptr,a
737 0398 E5*0B 737 mov a,(___fsdiv_sloc3_1_0 + 2)
738 039A F0 738 movx @dptr,a
740 039C E5*0C 740 mov a,(___fsdiv_sloc3_1_0 + 3)
741 039E F0 741 movx @dptr,a
742 039F 02s02r53 742 ljmp 00109$
745 03A2 90s00r10 745 mov dptr,#___fsdiv_result_1_1
746 03A5 E0 746 movx a,@dptr
747 03A6 F5*09 747 mov ___fsdiv_sloc3_1_0,a
749 03A9 E0 749 movx a,@dptr
750 03AA F5*0A 750 mov (___fsdiv_sloc3_1_0 + 1),a
752 03AD E0 752 movx a,@dptr
753 03AE F5*0B 753 mov (___fsdiv_sloc3_1_0 + 2),a
755 03B1 E0 755 movx a,@dptr
756 03B2 F5*0C 756 mov (___fsdiv_sloc3_1_0 + 3),a
757 03B4 90s00r10 757 mov dptr,#___fsdiv_result_1_1
758 03B7 74 01 758 mov a,#0x01
759 03B9 25*09 759 add a,___fsdiv_sloc3_1_0
760 03BB F0 760 movx @dptr,a
761 761 ; Peephole 180 changed mov to clr
763 03BD 35*0A 763 addc a,(___fsdiv_sloc3_1_0 + 1)
765 03C0 F0 765 movx @dptr,a
766 766 ; Peephole 180 changed mov to clr
768 03C2 35*0B 768 addc a,(___fsdiv_sloc3_1_0 + 2)
770 03C5 F0 770 movx @dptr,a
771 771 ; Peephole 180 changed mov to clr
773 03C7 35*0C 773 addc a,(___fsdiv_sloc3_1_0 + 3)
775 03CA F0 775 movx @dptr,a
777 03CB 90s00r20 777 mov dptr,#___fsdiv_exp_1_1
778 03CE E0 778 movx a,@dptr
779 03CF 24 01 779 add a,#0x01
780 03D1 F0 780 movx @dptr,a
782 03D3 E0 782 movx a,@dptr
783 03D4 34 00 783 addc a,#0x00
784 03D6 F0 784 movx @dptr,a
786 03D7 90s00r10 786 mov dptr,#___fsdiv_result_1_1
787 03DA E0 787 movx a,@dptr
788 03DB F5*09 788 mov ___fsdiv_sloc3_1_0,a
790 03DE E0 790 movx a,@dptr
791 03DF F5*0A 791 mov (___fsdiv_sloc3_1_0 + 1),a
793 03E2 E0 793 movx a,@dptr
794 03E3 F5*0B 794 mov (___fsdiv_sloc3_1_0 + 2),a
796 03E6 E0 796 movx a,@dptr
797 797 ; Peephole 105 removed redundant mov
798 03E7 F5*0C 798 mov (___fsdiv_sloc3_1_0 + 3),a
799 03E9 A2 E7 799 mov c,acc.7
801 03EC F5*0C 801 mov (___fsdiv_sloc3_1_0 + 3),a
802 03EE E5*0B 802 mov a,(___fsdiv_sloc3_1_0 + 2)
804 03F1 F5*0B 804 mov (___fsdiv_sloc3_1_0 + 2),a
805 03F3 E5*0A 805 mov a,(___fsdiv_sloc3_1_0 + 1)
807 03F6 F5*0A 807 mov (___fsdiv_sloc3_1_0 + 1),a
808 03F8 E5*09 808 mov a,___fsdiv_sloc3_1_0
810 810 ; Peephole 100 removed redundant mov
811 03FB F5*09 811 mov ___fsdiv_sloc3_1_0,a
812 03FD 90s00r10 812 mov dptr,#___fsdiv_result_1_1
813 0400 F0 813 movx @dptr,a
815 0402 E5*0A 815 mov a,(___fsdiv_sloc3_1_0 + 1)
816 0404 F0 816 movx @dptr,a
818 0406 E5*0B 818 mov a,(___fsdiv_sloc3_1_0 + 2)
819 0408 F0 819 movx @dptr,a
821 040A E5*0C 821 mov a,(___fsdiv_sloc3_1_0 + 3)
822 040C F0 822 movx @dptr,a
824 040D 90s00r10 824 mov dptr,#___fsdiv_result_1_1
825 0410 E0 825 movx a,@dptr
826 0411 F5*09 826 mov ___fsdiv_sloc3_1_0,a
828 0414 E0 828 movx a,@dptr
829 0415 F5*0A 829 mov (___fsdiv_sloc3_1_0 + 1),a
831 0418 E0 831 movx a,@dptr
832 0419 F5*0B 832 mov (___fsdiv_sloc3_1_0 + 2),a
834 041C E0 834 movx a,@dptr
835 041D F5*0C 835 mov (___fsdiv_sloc3_1_0 + 3),a
836 041F 90s00r10 836 mov dptr,#___fsdiv_result_1_1
837 0422 E5*09 837 mov a,___fsdiv_sloc3_1_0
838 0424 F0 838 movx @dptr,a
840 0426 E5*0A 840 mov a,(___fsdiv_sloc3_1_0 + 1)
841 0428 F0 841 movx @dptr,a
842 0429 74 7F 842 mov a,#0x7f
843 042B 55*0B 843 anl a,(___fsdiv_sloc3_1_0 + 2)
845 042E F0 845 movx @dptr,a
847 0430 E5*0C 847 mov a,(___fsdiv_sloc3_1_0 + 3)
848 0432 F0 848 movx @dptr,a
850 0433 90s00r20 850 mov dptr,#___fsdiv_exp_1_1
851 0436 E0 851 movx a,@dptr
852 0437 F5*09 852 mov ___fsdiv_sloc3_1_0,a
854 043A E0 854 movx a,@dptr
855 043B F5*0A 855 mov (___fsdiv_sloc3_1_0 + 1),a
856 043D 85*09*0B 856 mov (___fsdiv_sloc3_1_0 + 2),___fsdiv_sloc3_1_0
857 0440 E5*0A 857 mov a,(___fsdiv_sloc3_1_0 + 1)
858 0442 54 01 858 anl a,#0x01
859 0444 A2 E0 859 mov c,acc.0
860 0446 C5*0B 860 xch a,(___fsdiv_sloc3_1_0 + 2)
862 0449 C5*0B 862 xch a,(___fsdiv_sloc3_1_0 + 2)
864 044C C5*0B 864 xch a,(___fsdiv_sloc3_1_0 + 2)
865 044E F5*0C 865 mov (___fsdiv_sloc3_1_0 + 3),a
866 0450 75*0A 00 866 mov (___fsdiv_sloc3_1_0 + 1),#0x00
867 0453 75*09 00 867 mov ___fsdiv_sloc3_1_0,#0x00
868 0456 85*01*05 868 mov ___fsdiv_sloc2_1_0,___fsdiv_sloc1_1_0
869 869 ; Peephole 3.c changed mov to clr
870 870 ; Peephole 3.b changed mov to clr
872 045A F5*06 872 mov (___fsdiv_sloc2_1_0 + 1),a
873 045C F5*07 873 mov (___fsdiv_sloc2_1_0 + 2),a
874 045E F5*08 874 mov (___fsdiv_sloc2_1_0 + 3),a
875 0460 E5*05 875 mov a,___fsdiv_sloc2_1_0
876 0462 42*09 876 orl ___fsdiv_sloc3_1_0,a
877 0464 E5*06 877 mov a,(___fsdiv_sloc2_1_0 + 1)
878 0466 42*0A 878 orl (___fsdiv_sloc3_1_0 + 1),a
879 0468 E5*07 879 mov a,(___fsdiv_sloc2_1_0 + 2)
880 046A 42*0B 880 orl (___fsdiv_sloc3_1_0 + 2),a
881 046C E5*08 881 mov a,(___fsdiv_sloc2_1_0 + 3)
882 046E 42*0C 882 orl (___fsdiv_sloc3_1_0 + 3),a
883 0470 90s00r10 883 mov dptr,#___fsdiv_result_1_1
884 0473 E0 884 movx a,@dptr
885 0474 F5*05 885 mov ___fsdiv_sloc2_1_0,a
887 0477 E0 887 movx a,@dptr
888 0478 F5*06 888 mov (___fsdiv_sloc2_1_0 + 1),a
890 047B E0 890 movx a,@dptr
891 047C F5*07 891 mov (___fsdiv_sloc2_1_0 + 2),a
893 047F E0 893 movx a,@dptr
894 0480 F5*08 894 mov (___fsdiv_sloc2_1_0 + 3),a
895 0482 E5*05 895 mov a,___fsdiv_sloc2_1_0
896 0484 42*09 896 orl ___fsdiv_sloc3_1_0,a
897 0486 E5*06 897 mov a,(___fsdiv_sloc2_1_0 + 1)
898 0488 42*0A 898 orl (___fsdiv_sloc3_1_0 + 1),a
899 048A E5*07 899 mov a,(___fsdiv_sloc2_1_0 + 2)
900 048C 42*0B 900 orl (___fsdiv_sloc3_1_0 + 2),a
901 048E E5*08 901 mov a,(___fsdiv_sloc2_1_0 + 3)
902 0490 42*0C 902 orl (___fsdiv_sloc3_1_0 + 3),a
903 0492 90s00r08 903 mov dptr,#(___fsdiv_fl1_1_1)
904 0495 E5*09 904 mov a,___fsdiv_sloc3_1_0
905 0497 F0 905 movx @dptr,a
907 0499 E5*0A 907 mov a,(___fsdiv_sloc3_1_0 + 1)
908 049B F0 908 movx @dptr,a
910 049D E5*0B 910 mov a,(___fsdiv_sloc3_1_0 + 2)
911 049F F0 911 movx @dptr,a
913 04A1 E5*0C 913 mov a,(___fsdiv_sloc3_1_0 + 3)
914 04A3 F0 914 movx @dptr,a
916 04A4 90s00r08 916 mov dptr,#(___fsdiv_fl1_1_1)
917 04A7 E0 917 movx a,@dptr
918 04A8 F5*09 918 mov ___fsdiv_sloc3_1_0,a
920 04AB E0 920 movx a,@dptr
921 04AC F5*0A 921 mov (___fsdiv_sloc3_1_0 + 1),a
923 04AF E0 923 movx a,@dptr
924 04B0 F5*0B 924 mov (___fsdiv_sloc3_1_0 + 2),a
926 04B3 E0 926 movx a,@dptr
927 927 ; Peephole 191 removed redundant mov
928 04B4 F5*0C 928 mov (___fsdiv_sloc3_1_0 + 3),a
929 04B6 85*09 82 929 mov dpl,___fsdiv_sloc3_1_0
930 04B9 85*0A 83 930 mov dph,(___fsdiv_sloc3_1_0 + 1)
931 04BC 85*0B F0 931 mov b,(___fsdiv_sloc3_1_0 + 2)
933 04BF 933 C$_fsdiv.c$139$1$1 ==.
934 04BF 934 XG$__fsdiv$0$0 ==.
936 936 .area CSEG (CODE)