1 1 ;--------------------------------------------------------
2 2 ; File Created by SDCC : FreeWare ANSI-C Compiler
3 3 ; Version 2.1.9Ga Sun Jan 16 17:31:25 2000
5 5 ;--------------------------------------------------------
7 7 ;--------------------------------------------------------
8 8 ; publics variables in this module
9 9 ;--------------------------------------------------------
10 10 .globl ___fsadd_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 ___fsadd_sloc0_1_0:
24 0004 24 ___fsadd_sloc1_1_0:
26 0006 26 ___fsadd_sloc2_1_0:
28 28 ;--------------------------------------------------------
29 29 ; overlayable items in internal ram
30 30 ;--------------------------------------------------------
31 31 .area OSEG (OVR,DATA)
32 32 ;--------------------------------------------------------
33 33 ; indirectly addressable internal ram data
34 34 ;--------------------------------------------------------
36 36 ;--------------------------------------------------------
38 38 ;--------------------------------------------------------
40 40 ;--------------------------------------------------------
41 41 ; external ram data
42 42 ;--------------------------------------------------------
44 0000 44 ___fsadd_PARM_2:
46 0004 46 ___fsadd_a1_1_1:
48 0008 48 ___fsadd_mant1_1_1:
50 000C 50 ___fsadd_mant2_1_1:
52 0010 52 ___fsadd_fl1_1_1:
54 0014 54 ___fsadd_fl2_1_1:
56 0018 56 ___fsadd_exp1_1_1:
58 001A 58 ___fsadd_exp2_1_1:
60 001C 60 ___fsadd_sign_1_1:
62 62 ;--------------------------------------------------------
63 63 ; global & static initialisations
64 64 ;--------------------------------------------------------
65 65 .area GSINIT (CODE)
66 66 ;--------------------------------------------------------
68 68 ;--------------------------------------------------------
70 0000 70 G$__fsadd$0$0 ==.
72 72 ; -----------------------------------------
74 74 ; -----------------------------------------
85 0000 C0 E0 85 push acc
87 0004 C0 83 87 push dph
88 0006 C0 82 88 push dpl
89 0008 90s00r04 89 mov dptr,#___fsadd_a1_1_1
91 000D F0 91 movx @dptr,a
94 0011 F0 94 movx @dptr,a
97 0015 F0 97 movx @dptr,a
100 0019 F0 100 movx @dptr,a
102 001A 90s00r1C 102 mov dptr,#___fsadd_sign_1_1
107 0021 F0 107 movx @dptr,a
108 0022 12s00r00 108 lcall __decdptr
109 0025 F0 109 movx @dptr,a
110 0026 12s00r00 110 lcall __decdptr
111 0029 F0 111 movx @dptr,a
112 002A 12s00r00 112 lcall __decdptr
113 002D F0 113 movx @dptr,a
115 002E 90s00r04 115 mov dptr,#___fsadd_a1_1_1
116 0031 E0 116 movx a,@dptr
119 0034 E0 119 movx a,@dptr
122 0037 E0 122 movx a,@dptr
125 003A E0 125 movx a,@dptr
127 003C 90s00r10 127 mov dptr,#(___fsadd_fl1_1_1)
129 0040 F0 129 movx @dptr,a
132 0043 F0 132 movx @dptr,a
135 0046 F0 135 movx @dptr,a
138 0049 F0 138 movx @dptr,a
140 004A 90s00r00 140 mov dptr,#___fsadd_PARM_2
141 004D E0 141 movx a,@dptr
144 0050 E0 144 movx a,@dptr
147 0053 E0 147 movx a,@dptr
150 0056 E0 150 movx a,@dptr
152 0058 90s00r14 152 mov dptr,#(___fsadd_fl2_1_1)
154 005C F0 154 movx @dptr,a
157 005F F0 157 movx @dptr,a
160 0062 F0 160 movx @dptr,a
163 0065 F0 163 movx @dptr,a
165 0066 90s00r10 165 mov dptr,#(___fsadd_fl1_1_1)
166 0069 E0 166 movx a,@dptr
169 006C E0 169 movx a,@dptr
172 006F E0 172 movx a,@dptr
175 0072 E0 175 movx a,@dptr
181 181 ; Peephole 109 removed ljmp by inverse jump logic
182 0078 70 17 182 jnz 00102$
185 007A 90s00r14 185 mov dptr,#(___fsadd_fl2_1_1)
186 007D E0 186 movx a,@dptr
189 0080 E0 189 movx a,@dptr
192 0083 E0 192 movx a,@dptr
195 0086 E0 195 movx a,@dptr
196 196 ; Peephole 191 removed redundant mov
198 0088 8A 82 198 mov dpl,r2
199 008A 8B 83 199 mov dph,r3
200 008C 8C F0 200 mov b,r4
201 008E 02s07r14 201 ljmp 00128$
204 0091 90s00r14 204 mov dptr,#(___fsadd_fl2_1_1)
205 0094 E0 205 movx a,@dptr
208 0097 E0 208 movx a,@dptr
211 009A E0 211 movx a,@dptr
214 009D E0 214 movx a,@dptr
220 220 ; Peephole 109 removed ljmp by inverse jump logic
221 00A3 70 17 221 jnz 00104$
224 00A5 90s00r10 224 mov dptr,#(___fsadd_fl1_1_1)
225 00A8 E0 225 movx a,@dptr
228 00AB E0 228 movx a,@dptr
231 00AE E0 231 movx a,@dptr
234 00B1 E0 234 movx a,@dptr
235 235 ; Peephole 191 removed redundant mov
237 00B3 8A 82 237 mov dpl,r2
238 00B5 8B 83 238 mov dph,r3
239 00B7 8C F0 239 mov b,r4
240 00B9 02s07r14 240 ljmp 00128$
243 00BC 90s00r10 243 mov dptr,#(___fsadd_fl1_1_1)
244 00BF E0 244 movx a,@dptr
247 00C2 E0 247 movx a,@dptr
250 00C5 E0 250 movx a,@dptr
253 00C8 E0 253 movx a,@dptr
255 00CA 8C 02 255 mov ar2,r4
257 00CD A2 E7 257 mov c,acc.7
263 00D4 54 01 263 anl a,#0x01
264 00D6 30 E0 02 264 jnb acc.0,00148$
265 00D9 44 FE 265 orl a,#0xfe
269 00DD 95 E0 269 subb a,acc
272 00E1 90s00r18 272 mov dptr,#___fsadd_exp1_1_1
274 00E5 F0 274 movx @dptr,a
276 276 ; Peephole 180 changed mov to clr
278 00E8 F0 278 movx @dptr,a
280 00E9 90s00r14 280 mov dptr,#(___fsadd_fl2_1_1)
281 00EC E0 281 movx a,@dptr
284 00EF E0 284 movx a,@dptr
287 00F2 E0 287 movx a,@dptr
290 00F5 E0 290 movx a,@dptr
292 00F7 8E 02 292 mov ar2,r6
294 00FA A2 E7 294 mov c,acc.7
300 0101 54 01 300 anl a,#0x01
301 0103 30 E0 02 301 jnb acc.0,00149$
302 0106 44 FE 302 orl a,#0xfe
306 010A 95 E0 306 subb a,acc
309 010E 90s00r1A 309 mov dptr,#___fsadd_exp2_1_1
311 0112 F0 311 movx @dptr,a
313 313 ; Peephole 180 changed mov to clr
315 0115 F0 315 movx @dptr,a
317 0116 90s00r1A 317 mov dptr,#___fsadd_exp2_1_1
318 0119 E0 318 movx a,@dptr
321 011C E0 321 movx a,@dptr
323 011E 74 19 323 mov a,#0x19
326 326 ; Peephole 180 changed mov to clr
328 0123 3B 328 addc a,r3
330 0125 90s00r18 330 mov dptr,#___fsadd_exp1_1_1
331 0128 E0 331 movx a,@dptr
334 012B E0 334 movx a,@dptr
338 012F 98 338 subb a,r0
340 0131 64 80 340 xrl a,#0x80
341 0133 89 F0 341 mov b,r1
342 0135 63 F0 80 342 xrl b,#0x80
343 0138 95 F0 343 subb a,b
344 344 ; Peephole 108 removed ljmp by inverse jump logic
345 013A 50 27 345 jnc 00106$
348 013C 90s00r10 348 mov dptr,#(___fsadd_fl1_1_1)
349 013F E0 349 movx a,@dptr
352 0142 E0 352 movx a,@dptr
355 0145 E0 355 movx a,@dptr
358 0148 E0 358 movx a,@dptr
359 359 ; Peephole 191 removed redundant mov
361 014A 8A 82 361 mov dpl,r2
362 014C 8B 83 362 mov dph,r3
363 014E 88 F0 363 mov b,r0
364 0150 12s00r00 364 lcall ___long2fs
365 0153 AA 82 365 mov r2,dpl
366 0155 AB 83 366 mov r3,dph
367 0157 A8 F0 367 mov r0,b
368 368 ; Peephole 191 removed redundant mov
370 015A 8A 82 370 mov dpl,r2
371 015C 8B 83 371 mov dph,r3
372 015E 88 F0 372 mov b,r0
373 0160 02s07r14 373 ljmp 00128$
376 0163 90s00r18 376 mov dptr,#___fsadd_exp1_1_1
377 0166 E0 377 movx a,@dptr
380 0169 E0 380 movx a,@dptr
382 016B 74 19 382 mov a,#0x19
385 385 ; Peephole 180 changed mov to clr
387 0170 3B 387 addc a,r3
389 0172 90s00r1A 389 mov dptr,#___fsadd_exp2_1_1
390 0175 E0 390 movx a,@dptr
393 0178 E0 393 movx a,@dptr
397 017C 98 397 subb a,r0
399 017E 64 80 399 xrl a,#0x80
400 0180 89 F0 400 mov b,r1
401 0182 63 F0 80 401 xrl b,#0x80
402 0185 95 F0 402 subb a,b
403 403 ; Peephole 108 removed ljmp by inverse jump logic
404 0187 50 27 404 jnc 00108$
407 0189 90s00r14 407 mov dptr,#(___fsadd_fl2_1_1)
408 018C E0 408 movx a,@dptr
411 018F E0 411 movx a,@dptr
414 0192 E0 414 movx a,@dptr
417 0195 E0 417 movx a,@dptr
418 418 ; Peephole 191 removed redundant mov
420 0197 8A 82 420 mov dpl,r2
421 0199 8B 83 421 mov dph,r3
422 019B 88 F0 422 mov b,r0
423 019D 12s00r00 423 lcall ___long2fs
424 01A0 AA 82 424 mov r2,dpl
425 01A2 AB 83 425 mov r3,dph
426 01A4 A8 F0 426 mov r0,b
427 427 ; Peephole 191 removed redundant mov
429 01A7 8A 82 429 mov dpl,r2
430 01A9 8B 83 430 mov dph,r3
431 01AB 88 F0 431 mov b,r0
432 01AD 02s07r14 432 ljmp 00128$
435 01B0 90s00r10 435 mov dptr,#(___fsadd_fl1_1_1)
436 01B3 E0 436 movx a,@dptr
439 01B6 E0 439 movx a,@dptr
442 01B9 E0 442 movx a,@dptr
445 01BC E0 445 movx a,@dptr
447 01BE 53 00 7F 447 anl ar0,#0x7f
448 01C1 79 00 448 mov r1,#0x00
449 01C3 43 00 80 449 orl ar0,#0x80
451 01C7 54 03 451 anl a,#0x03
452 01C9 A2 E0 452 mov c,acc.0
466 01D8 54 3F 466 anl a,#0x3f
470 01DD 54 03 470 anl a,#0x03
471 01DF A2 E0 471 mov c,acc.0
482 01EB 90s00r08 482 mov dptr,#___fsadd_mant1_1_1
484 01EF F0 484 movx @dptr,a
487 01F2 F0 487 movx @dptr,a
490 01F5 F0 490 movx @dptr,a
493 01F8 F0 493 movx @dptr,a
495 01F9 90s00r14 495 mov dptr,#(___fsadd_fl2_1_1)
496 01FC E0 496 movx a,@dptr
499 01FF E0 499 movx a,@dptr
502 0202 E0 502 movx a,@dptr
505 0205 E0 505 movx a,@dptr
507 0207 53 00 7F 507 anl ar0,#0x7f
508 020A 79 00 508 mov r1,#0x00
509 020C 43 00 80 509 orl ar0,#0x80
511 0210 54 03 511 anl a,#0x03
512 0212 A2 E0 512 mov c,acc.0
526 0221 54 3F 526 anl a,#0x3f
530 0226 54 03 530 anl a,#0x03
531 0228 A2 E0 531 mov c,acc.0
542 0234 90s00r0C 542 mov dptr,#___fsadd_mant2_1_1
544 0238 F0 544 movx @dptr,a
547 023B F0 547 movx @dptr,a
550 023E F0 550 movx @dptr,a
553 0241 F0 553 movx @dptr,a
555 0242 90s00r10 555 mov dptr,#(___fsadd_fl1_1_1)
556 0245 E0 556 movx a,@dptr
559 0248 E0 559 movx a,@dptr
562 024B E0 562 movx a,@dptr
565 024E E0 565 movx a,@dptr
566 566 ; Peephole 105 removed redundant mov
569 0251 54 01 569 anl a,#0x01
570 570 ; Peephole 105 removed redundant mov
572 572 ; Peephole 110 removed ljmp by inverse jump logic
573 0254 60 29 573 jz 00110$
576 0256 90s00r08 576 mov dptr,#___fsadd_mant1_1_1
577 0259 E0 577 movx a,@dptr
578 025A F5*00 578 mov ___fsadd_sloc0_1_0,a
580 025D E0 580 movx a,@dptr
581 025E F5*01 581 mov (___fsadd_sloc0_1_0 + 1),a
583 0261 E0 583 movx a,@dptr
584 0262 F5*02 584 mov (___fsadd_sloc0_1_0 + 2),a
586 0265 E0 586 movx a,@dptr
587 0266 F5*03 587 mov (___fsadd_sloc0_1_0 + 3),a
588 0268 90s00r08 588 mov dptr,#___fsadd_mant1_1_1
591 026D 95*00 591 subb a,___fsadd_sloc0_1_0
592 026F F0 592 movx @dptr,a
594 0271 95*01 594 subb a,(___fsadd_sloc0_1_0 + 1)
596 0274 F0 596 movx @dptr,a
598 0276 95*02 598 subb a,(___fsadd_sloc0_1_0 + 2)
600 0279 F0 600 movx @dptr,a
602 027B 95*03 602 subb a,(___fsadd_sloc0_1_0 + 3)
604 027E F0 604 movx @dptr,a
607 027F 90s00r14 607 mov dptr,#(___fsadd_fl2_1_1)
608 0282 E0 608 movx a,@dptr
609 0283 F5*00 609 mov ___fsadd_sloc0_1_0,a
611 0286 E0 611 movx a,@dptr
612 0287 F5*01 612 mov (___fsadd_sloc0_1_0 + 1),a
614 028A E0 614 movx a,@dptr
615 028B F5*02 615 mov (___fsadd_sloc0_1_0 + 2),a
617 028E E0 617 movx a,@dptr
618 618 ; Peephole 105 removed redundant mov
619 028F F5*03 619 mov (___fsadd_sloc0_1_0 + 3),a
621 0292 54 01 621 anl a,#0x01
622 622 ; Peephole 105 removed redundant mov
624 624 ; Peephole 110 removed ljmp by inverse jump logic
625 0295 60 29 625 jz 00112$
628 0297 90s00r0C 628 mov dptr,#___fsadd_mant2_1_1
629 029A E0 629 movx a,@dptr
630 029B F5*00 630 mov ___fsadd_sloc0_1_0,a
632 029E E0 632 movx a,@dptr
633 029F F5*01 633 mov (___fsadd_sloc0_1_0 + 1),a
635 02A2 E0 635 movx a,@dptr
636 02A3 F5*02 636 mov (___fsadd_sloc0_1_0 + 2),a
638 02A6 E0 638 movx a,@dptr
639 02A7 F5*03 639 mov (___fsadd_sloc0_1_0 + 3),a
640 02A9 90s00r0C 640 mov dptr,#___fsadd_mant2_1_1
643 02AE 95*00 643 subb a,___fsadd_sloc0_1_0
644 02B0 F0 644 movx @dptr,a
646 02B2 95*01 646 subb a,(___fsadd_sloc0_1_0 + 1)
648 02B5 F0 648 movx @dptr,a
650 02B7 95*02 650 subb a,(___fsadd_sloc0_1_0 + 2)
652 02BA F0 652 movx @dptr,a
654 02BC 95*03 654 subb a,(___fsadd_sloc0_1_0 + 3)
656 02BF F0 656 movx @dptr,a
659 02C0 90s00r1A 659 mov dptr,#___fsadd_exp2_1_1
660 02C3 E0 660 movx a,@dptr
661 02C4 F5*00 661 mov ___fsadd_sloc0_1_0,a
663 02C7 E0 663 movx a,@dptr
664 02C8 F5*01 664 mov (___fsadd_sloc0_1_0 + 1),a
665 02CA 90s00r18 665 mov dptr,#___fsadd_exp1_1_1
666 02CD E0 666 movx a,@dptr
667 02CE F5*04 667 mov ___fsadd_sloc1_1_0,a
669 02D1 E0 669 movx a,@dptr
670 02D2 F5*05 670 mov (___fsadd_sloc1_1_0 + 1),a
672 02D5 E5*00 672 mov a,___fsadd_sloc0_1_0
673 02D7 95*04 673 subb a,___fsadd_sloc1_1_0
674 02D9 E5*01 674 mov a,(___fsadd_sloc0_1_0 + 1)
675 02DB 64 80 675 xrl a,#0x80
676 02DD 85*05 F0 676 mov b,(___fsadd_sloc1_1_0 + 1)
677 02E0 63 F0 80 677 xrl b,#0x80
678 02E3 95 F0 678 subb a,b
679 02E5 40 03 679 jc 00154$
680 02E7 02s03r57 680 ljmp 00114$
683 02EA 90s00r1A 683 mov dptr,#___fsadd_exp2_1_1
684 02ED E0 684 movx a,@dptr
685 02EE F5*04 685 mov ___fsadd_sloc1_1_0,a
687 02F1 E0 687 movx a,@dptr
688 02F2 F5*05 688 mov (___fsadd_sloc1_1_0 + 1),a
689 02F4 90s00r18 689 mov dptr,#___fsadd_exp1_1_1
690 02F7 E0 690 movx a,@dptr
691 02F8 F5*00 691 mov ___fsadd_sloc0_1_0,a
693 02FB E0 693 movx a,@dptr
694 02FC F5*01 694 mov (___fsadd_sloc0_1_0 + 1),a
696 02FF E5*00 696 mov a,___fsadd_sloc0_1_0
697 0301 95*04 697 subb a,___fsadd_sloc1_1_0
698 0303 F5*04 698 mov ___fsadd_sloc1_1_0,a
699 0305 E5*01 699 mov a,(___fsadd_sloc0_1_0 + 1)
700 0307 95*05 700 subb a,(___fsadd_sloc1_1_0 + 1)
701 0309 F5*05 701 mov (___fsadd_sloc1_1_0 + 1),a
702 030B 90s00r0C 702 mov dptr,#___fsadd_mant2_1_1
703 030E E0 703 movx a,@dptr
704 030F F5*00 704 mov ___fsadd_sloc0_1_0,a
706 0312 E0 706 movx a,@dptr
707 0313 F5*01 707 mov (___fsadd_sloc0_1_0 + 1),a
709 0316 E0 709 movx a,@dptr
710 0317 F5*02 710 mov (___fsadd_sloc0_1_0 + 2),a
712 031A E0 712 movx a,@dptr
713 031B F5*03 713 mov (___fsadd_sloc0_1_0 + 3),a
714 031D 85*04 F0 714 mov b,___fsadd_sloc1_1_0
716 0322 E5*03 716 mov a,(___fsadd_sloc0_1_0 + 3)
718 0325 92 D2 718 mov ov,c
719 0327 80 16 719 sjmp 00156$
721 0329 A2 D2 721 mov c,ov
722 032B E5*03 722 mov a,(___fsadd_sloc0_1_0 + 3)
724 032E F5*03 724 mov (___fsadd_sloc0_1_0 + 3),a
725 0330 E5*02 725 mov a,(___fsadd_sloc0_1_0 + 2)
727 0333 F5*02 727 mov (___fsadd_sloc0_1_0 + 2),a
728 0335 E5*01 728 mov a,(___fsadd_sloc0_1_0 + 1)
730 0338 F5*01 730 mov (___fsadd_sloc0_1_0 + 1),a
731 033A E5*00 731 mov a,___fsadd_sloc0_1_0
733 033D F5*00 733 mov ___fsadd_sloc0_1_0,a
735 033F D5 F0 E7 735 djnz b,00155$
736 0342 90s00r0C 736 mov dptr,#___fsadd_mant2_1_1
737 0345 E5*00 737 mov a,___fsadd_sloc0_1_0
738 0347 F0 738 movx @dptr,a
740 0349 E5*01 740 mov a,(___fsadd_sloc0_1_0 + 1)
741 034B F0 741 movx @dptr,a
743 034D E5*02 743 mov a,(___fsadd_sloc0_1_0 + 2)
744 034F F0 744 movx @dptr,a
746 0351 E5*03 746 mov a,(___fsadd_sloc0_1_0 + 3)
747 0353 F0 747 movx @dptr,a
748 0354 02s03rD5 748 ljmp 00115$
751 0357 90s00r18 751 mov dptr,#___fsadd_exp1_1_1
752 035A E0 752 movx a,@dptr
753 035B F5*04 753 mov ___fsadd_sloc1_1_0,a
755 035E E0 755 movx a,@dptr
756 035F F5*05 756 mov (___fsadd_sloc1_1_0 + 1),a
757 0361 90s00r1A 757 mov dptr,#___fsadd_exp2_1_1
758 0364 E0 758 movx a,@dptr
759 0365 F5*00 759 mov ___fsadd_sloc0_1_0,a
761 0368 E0 761 movx a,@dptr
762 0369 F5*01 762 mov (___fsadd_sloc0_1_0 + 1),a
764 036C E5*00 764 mov a,___fsadd_sloc0_1_0
765 036E 95*04 765 subb a,___fsadd_sloc1_1_0
766 0370 F5*04 766 mov ___fsadd_sloc1_1_0,a
767 0372 E5*01 767 mov a,(___fsadd_sloc0_1_0 + 1)
768 0374 95*05 768 subb a,(___fsadd_sloc1_1_0 + 1)
769 0376 F5*05 769 mov (___fsadd_sloc1_1_0 + 1),a
770 0378 90s00r08 770 mov dptr,#___fsadd_mant1_1_1
771 037B E0 771 movx a,@dptr
772 037C F5*00 772 mov ___fsadd_sloc0_1_0,a
774 037F E0 774 movx a,@dptr
775 0380 F5*01 775 mov (___fsadd_sloc0_1_0 + 1),a
777 0383 E0 777 movx a,@dptr
778 0384 F5*02 778 mov (___fsadd_sloc0_1_0 + 2),a
780 0387 E0 780 movx a,@dptr
781 0388 F5*03 781 mov (___fsadd_sloc0_1_0 + 3),a
782 038A 85*04 F0 782 mov b,___fsadd_sloc1_1_0
784 038F E5*03 784 mov a,(___fsadd_sloc0_1_0 + 3)
786 0392 92 D2 786 mov ov,c
787 0394 80 16 787 sjmp 00158$
789 0396 A2 D2 789 mov c,ov
790 0398 E5*03 790 mov a,(___fsadd_sloc0_1_0 + 3)
792 039B F5*03 792 mov (___fsadd_sloc0_1_0 + 3),a
793 039D E5*02 793 mov a,(___fsadd_sloc0_1_0 + 2)
795 03A0 F5*02 795 mov (___fsadd_sloc0_1_0 + 2),a
796 03A2 E5*01 796 mov a,(___fsadd_sloc0_1_0 + 1)
798 03A5 F5*01 798 mov (___fsadd_sloc0_1_0 + 1),a
799 03A7 E5*00 799 mov a,___fsadd_sloc0_1_0
801 03AA F5*00 801 mov ___fsadd_sloc0_1_0,a
803 03AC D5 F0 E7 803 djnz b,00157$
804 03AF 90s00r08 804 mov dptr,#___fsadd_mant1_1_1
805 03B2 E5*00 805 mov a,___fsadd_sloc0_1_0
806 03B4 F0 806 movx @dptr,a
808 03B6 E5*01 808 mov a,(___fsadd_sloc0_1_0 + 1)
809 03B8 F0 809 movx @dptr,a
811 03BA E5*02 811 mov a,(___fsadd_sloc0_1_0 + 2)
812 03BC F0 812 movx @dptr,a
814 03BE E5*03 814 mov a,(___fsadd_sloc0_1_0 + 3)
815 03C0 F0 815 movx @dptr,a
817 03C1 90s00r1A 817 mov dptr,#___fsadd_exp2_1_1
818 03C4 E0 818 movx a,@dptr
819 03C5 F5*04 819 mov ___fsadd_sloc1_1_0,a
821 03C8 E0 821 movx a,@dptr
822 03C9 F5*05 822 mov (___fsadd_sloc1_1_0 + 1),a
823 03CB 90s00r18 823 mov dptr,#___fsadd_exp1_1_1
824 03CE E5*04 824 mov a,___fsadd_sloc1_1_0
825 03D0 F0 825 movx @dptr,a
827 03D2 E5*05 827 mov a,(___fsadd_sloc1_1_0 + 1)
828 03D4 F0 828 movx @dptr,a
831 03D5 90s00r0C 831 mov dptr,#___fsadd_mant2_1_1
832 03D8 E0 832 movx a,@dptr
833 03D9 F5*00 833 mov ___fsadd_sloc0_1_0,a
835 03DC E0 835 movx a,@dptr
836 03DD F5*01 836 mov (___fsadd_sloc0_1_0 + 1),a
838 03E0 E0 838 movx a,@dptr
839 03E1 F5*02 839 mov (___fsadd_sloc0_1_0 + 2),a
841 03E4 E0 841 movx a,@dptr
842 03E5 F5*03 842 mov (___fsadd_sloc0_1_0 + 3),a
843 03E7 90s00r08 843 mov dptr,#___fsadd_mant1_1_1
844 03EA E0 844 movx a,@dptr
845 03EB F5*06 845 mov ___fsadd_sloc2_1_0,a
847 03EE E0 847 movx a,@dptr
848 03EF F5*07 848 mov (___fsadd_sloc2_1_0 + 1),a
850 03F2 E0 850 movx a,@dptr
851 03F3 F5*08 851 mov (___fsadd_sloc2_1_0 + 2),a
853 03F6 E0 853 movx a,@dptr
854 03F7 F5*09 854 mov (___fsadd_sloc2_1_0 + 3),a
855 03F9 90s00r08 855 mov dptr,#___fsadd_mant1_1_1
856 03FC E5*00 856 mov a,___fsadd_sloc0_1_0
857 03FE 25*06 857 add a,___fsadd_sloc2_1_0
858 0400 F0 858 movx @dptr,a
859 0401 E5*01 859 mov a,(___fsadd_sloc0_1_0 + 1)
860 0403 35*07 860 addc a,(___fsadd_sloc2_1_0 + 1)
862 0406 F0 862 movx @dptr,a
863 0407 E5*02 863 mov a,(___fsadd_sloc0_1_0 + 2)
864 0409 35*08 864 addc a,(___fsadd_sloc2_1_0 + 2)
866 040C F0 866 movx @dptr,a
867 040D E5*03 867 mov a,(___fsadd_sloc0_1_0 + 3)
868 040F 35*09 868 addc a,(___fsadd_sloc2_1_0 + 3)
870 0412 F0 870 movx @dptr,a
872 0413 90s00r08 872 mov dptr,#___fsadd_mant1_1_1
873 0416 E0 873 movx a,@dptr
874 0417 F5*06 874 mov ___fsadd_sloc2_1_0,a
876 041A E0 876 movx a,@dptr
877 041B F5*07 877 mov (___fsadd_sloc2_1_0 + 1),a
879 041E E0 879 movx a,@dptr
880 041F F5*08 880 mov (___fsadd_sloc2_1_0 + 2),a
882 0422 E0 882 movx a,@dptr
883 883 ; Peephole 105 removed redundant mov
884 0423 F5*09 884 mov (___fsadd_sloc2_1_0 + 3),a
885 885 ; Peephole 111 removed ljmp by inverse jump logic
886 0425 30 E7 39 886 jnb acc.7,00119$
889 0428 90s00r08 889 mov dptr,#___fsadd_mant1_1_1
890 042B E0 890 movx a,@dptr
891 042C F5*06 891 mov ___fsadd_sloc2_1_0,a
893 042F E0 893 movx a,@dptr
894 0430 F5*07 894 mov (___fsadd_sloc2_1_0 + 1),a
896 0433 E0 896 movx a,@dptr
897 0434 F5*08 897 mov (___fsadd_sloc2_1_0 + 2),a
899 0437 E0 899 movx a,@dptr
900 0438 F5*09 900 mov (___fsadd_sloc2_1_0 + 3),a
901 043A 90s00r08 901 mov dptr,#___fsadd_mant1_1_1
904 043F 95*06 904 subb a,___fsadd_sloc2_1_0
905 0441 F0 905 movx @dptr,a
907 0443 95*07 907 subb a,(___fsadd_sloc2_1_0 + 1)
909 0446 F0 909 movx @dptr,a
911 0448 95*08 911 subb a,(___fsadd_sloc2_1_0 + 2)
913 044B F0 913 movx @dptr,a
915 044D 95*09 915 subb a,(___fsadd_sloc2_1_0 + 3)
917 0450 F0 917 movx @dptr,a
919 0451 90s00r1C 919 mov dptr,#___fsadd_sign_1_1
920 920 ; Peephole 101 removed redundant mov
921 921 ; Peephole 180 changed mov to clr
923 0455 F0 923 movx @dptr,a
925 0457 F0 925 movx @dptr,a
927 927 ; Peephole 180 changed mov to clr
929 045A F0 929 movx @dptr,a
931 045C 74 80 931 mov a,#0x80
932 045E F0 932 movx @dptr,a
933 933 ; Peephole 132 changed ljmp to sjmp
934 045F 80 26 934 sjmp 00121$
937 0461 90s00r08 937 mov dptr,#___fsadd_mant1_1_1
938 0464 E0 938 movx a,@dptr
939 0465 F5*06 939 mov ___fsadd_sloc2_1_0,a
941 0468 E0 941 movx a,@dptr
942 0469 F5*07 942 mov (___fsadd_sloc2_1_0 + 1),a
944 046C E0 944 movx a,@dptr
945 046D F5*08 945 mov (___fsadd_sloc2_1_0 + 2),a
947 0470 E0 947 movx a,@dptr
948 0471 F5*09 948 mov (___fsadd_sloc2_1_0 + 3),a
949 0473 E5*06 949 mov a,___fsadd_sloc2_1_0
950 0475 45*07 950 orl a,(___fsadd_sloc2_1_0 + 1)
951 0477 45*08 951 orl a,(___fsadd_sloc2_1_0 + 2)
952 0479 45*09 952 orl a,(___fsadd_sloc2_1_0 + 3)
953 953 ; Peephole 109 removed ljmp by inverse jump logic
954 047B 70 0A 954 jnz 00121$
957 957 ; Peephole 3.a changed mov to clr
958 958 ; Peephole 3.b changed mov to clr
959 959 ; Peephole 3.b changed mov to clr
961 047E F5 82 961 mov dpl,a
962 0480 F5 83 962 mov dph,a
963 0482 F5 F0 963 mov b,a
964 0484 02s07r14 964 ljmp 00128$
967 0487 90s00r08 967 mov dptr,#___fsadd_mant1_1_1
968 048A E0 968 movx a,@dptr
969 048B F5*06 969 mov ___fsadd_sloc2_1_0,a
971 048E E0 971 movx a,@dptr
972 048F F5*07 972 mov (___fsadd_sloc2_1_0 + 1),a
974 0492 E0 974 movx a,@dptr
975 0493 F5*08 975 mov (___fsadd_sloc2_1_0 + 2),a
977 0496 E0 977 movx a,@dptr
978 978 ; Peephole 105 removed redundant mov
979 0497 F5*09 979 mov (___fsadd_sloc2_1_0 + 3),a
980 0499 54 E0 980 anl a,#0xe0
981 981 ; Peephole 162 removed sjmp by inverse jump logic
982 049B 60 03 982 jz 00162$
984 049D 02s04rF4 984 ljmp 00123$
987 04A0 90s00r08 987 mov dptr,#___fsadd_mant1_1_1
988 04A3 E0 988 movx a,@dptr
989 04A4 F5*06 989 mov ___fsadd_sloc2_1_0,a
991 04A7 E0 991 movx a,@dptr
992 04A8 F5*07 992 mov (___fsadd_sloc2_1_0 + 1),a
994 04AB E0 994 movx a,@dptr
995 04AC F5*08 995 mov (___fsadd_sloc2_1_0 + 2),a
997 04AF E0 997 movx a,@dptr
998 04B0 F5*09 998 mov (___fsadd_sloc2_1_0 + 3),a
999 04B2 E5*06 999 mov a,___fsadd_sloc2_1_0
1000 04B4 25 E0 1000 add a,acc
1001 04B6 F5*06 1001 mov ___fsadd_sloc2_1_0,a
1002 04B8 E5*07 1002 mov a,(___fsadd_sloc2_1_0 + 1)
1004 04BB F5*07 1004 mov (___fsadd_sloc2_1_0 + 1),a
1005 04BD E5*08 1005 mov a,(___fsadd_sloc2_1_0 + 2)
1007 04C0 F5*08 1007 mov (___fsadd_sloc2_1_0 + 2),a
1008 04C2 E5*09 1008 mov a,(___fsadd_sloc2_1_0 + 3)
1010 04C5 F5*09 1010 mov (___fsadd_sloc2_1_0 + 3),a
1011 04C7 90s00r08 1011 mov dptr,#___fsadd_mant1_1_1
1012 04CA E5*06 1012 mov a,___fsadd_sloc2_1_0
1013 04CC F0 1013 movx @dptr,a
1014 04CD A3 1014 inc dptr
1015 04CE E5*07 1015 mov a,(___fsadd_sloc2_1_0 + 1)
1016 04D0 F0 1016 movx @dptr,a
1017 04D1 A3 1017 inc dptr
1018 04D2 E5*08 1018 mov a,(___fsadd_sloc2_1_0 + 2)
1019 04D4 F0 1019 movx @dptr,a
1020 04D5 A3 1020 inc dptr
1021 04D6 E5*09 1021 mov a,(___fsadd_sloc2_1_0 + 3)
1022 04D8 F0 1022 movx @dptr,a
1024 04D9 90s00r18 1024 mov dptr,#___fsadd_exp1_1_1
1025 04DC E0 1025 movx a,@dptr
1026 04DD 24 FF 1026 add a,#0xff
1027 04DF F5*06 1027 mov ___fsadd_sloc2_1_0,a
1028 04E1 A3 1028 inc dptr
1029 04E2 E0 1029 movx a,@dptr
1030 04E3 34 FF 1030 addc a,#0xff
1031 04E5 F5*07 1031 mov (___fsadd_sloc2_1_0 + 1),a
1032 04E7 90s00r18 1032 mov dptr,#___fsadd_exp1_1_1
1033 04EA E5*06 1033 mov a,___fsadd_sloc2_1_0
1034 04EC F0 1034 movx @dptr,a
1035 04ED A3 1035 inc dptr
1036 04EE E5*07 1036 mov a,(___fsadd_sloc2_1_0 + 1)
1037 04F0 F0 1037 movx @dptr,a
1038 04F1 02s04r87 1038 ljmp 00121$
1041 04F4 90s00r08 1041 mov dptr,#___fsadd_mant1_1_1
1042 04F7 E0 1042 movx a,@dptr
1043 04F8 F5*06 1043 mov ___fsadd_sloc2_1_0,a
1044 04FA A3 1044 inc dptr
1045 04FB E0 1045 movx a,@dptr
1046 04FC F5*07 1046 mov (___fsadd_sloc2_1_0 + 1),a
1047 04FE A3 1047 inc dptr
1048 04FF E0 1048 movx a,@dptr
1049 0500 F5*08 1049 mov (___fsadd_sloc2_1_0 + 2),a
1050 0502 A3 1050 inc dptr
1051 0503 E0 1051 movx a,@dptr
1052 1052 ; Peephole 105 removed redundant mov
1053 0504 F5*09 1053 mov (___fsadd_sloc2_1_0 + 3),a
1054 1054 ; Peephole 111 removed ljmp by inverse jump logic
1055 0506 30 E6 42 1055 jnb acc.6,00125$
1058 0509 90s00r08 1058 mov dptr,#___fsadd_mant1_1_1
1059 050C E0 1059 movx a,@dptr
1060 050D F5*06 1060 mov ___fsadd_sloc2_1_0,a
1061 050F A3 1061 inc dptr
1062 0510 E0 1062 movx a,@dptr
1063 0511 F5*07 1063 mov (___fsadd_sloc2_1_0 + 1),a
1064 0513 A3 1064 inc dptr
1065 0514 E0 1065 movx a,@dptr
1066 0515 F5*08 1066 mov (___fsadd_sloc2_1_0 + 2),a
1067 0517 A3 1067 inc dptr
1068 0518 E0 1068 movx a,@dptr
1069 1069 ; Peephole 105 removed redundant mov
1070 0519 F5*09 1070 mov (___fsadd_sloc2_1_0 + 3),a
1071 051B A2 E7 1071 mov c,acc.7
1073 051E F5*09 1073 mov (___fsadd_sloc2_1_0 + 3),a
1074 0520 E5*08 1074 mov a,(___fsadd_sloc2_1_0 + 2)
1076 0523 F5*08 1076 mov (___fsadd_sloc2_1_0 + 2),a
1077 0525 E5*07 1077 mov a,(___fsadd_sloc2_1_0 + 1)
1079 0528 F5*07 1079 mov (___fsadd_sloc2_1_0 + 1),a
1080 052A E5*06 1080 mov a,___fsadd_sloc2_1_0
1082 1082 ; Peephole 100 removed redundant mov
1083 052D F5*06 1083 mov ___fsadd_sloc2_1_0,a
1084 052F 90s00r08 1084 mov dptr,#___fsadd_mant1_1_1
1085 0532 F0 1085 movx @dptr,a
1086 0533 A3 1086 inc dptr
1087 0534 E5*07 1087 mov a,(___fsadd_sloc2_1_0 + 1)
1088 0536 F0 1088 movx @dptr,a
1089 0537 A3 1089 inc dptr
1090 0538 E5*08 1090 mov a,(___fsadd_sloc2_1_0 + 2)
1091 053A F0 1091 movx @dptr,a
1092 053B A3 1092 inc dptr
1093 053C E5*09 1093 mov a,(___fsadd_sloc2_1_0 + 3)
1094 053E F0 1094 movx @dptr,a
1096 053F 90s00r18 1096 mov dptr,#___fsadd_exp1_1_1
1097 0542 E0 1097 movx a,@dptr
1098 0543 24 01 1098 add a,#0x01
1099 0545 F0 1099 movx @dptr,a
1100 0546 A3 1100 inc dptr
1101 0547 E0 1101 movx a,@dptr
1102 0548 34 00 1102 addc a,#0x00
1103 054A F0 1103 movx @dptr,a
1106 054B 90s00r08 1106 mov dptr,#___fsadd_mant1_1_1
1107 054E E0 1107 movx a,@dptr
1108 054F F5*06 1108 mov ___fsadd_sloc2_1_0,a
1109 0551 A3 1109 inc dptr
1110 0552 E0 1110 movx a,@dptr
1111 0553 F5*07 1111 mov (___fsadd_sloc2_1_0 + 1),a
1112 0555 A3 1112 inc dptr
1113 0556 E0 1113 movx a,@dptr
1114 0557 F5*08 1114 mov (___fsadd_sloc2_1_0 + 2),a
1115 0559 A3 1115 inc dptr
1116 055A E0 1116 movx a,@dptr
1117 055B F5*09 1117 mov (___fsadd_sloc2_1_0 + 3),a
1118 055D E5*06 1118 mov a,___fsadd_sloc2_1_0
1119 1119 ; Peephole 111 removed ljmp by inverse jump logic
1120 055F 30 E6 0C 1120 jnb acc.6,00130$
1123 0563 F5*09 1123 mov (___fsadd_sloc2_1_0 + 3),a
1124 0565 F5*08 1124 mov (___fsadd_sloc2_1_0 + 2),a
1125 0567 F5*07 1125 mov (___fsadd_sloc2_1_0 + 1),a
1126 0569 75*06 20 1126 mov ___fsadd_sloc2_1_0,#0x20
1127 1127 ; Peephole 132 changed ljmp to sjmp
1128 056C 80 0A 1128 sjmp 00131$
1131 056F F5*09 1131 mov (___fsadd_sloc2_1_0 + 3),a
1132 0571 F5*08 1132 mov (___fsadd_sloc2_1_0 + 2),a
1133 0573 F5*07 1133 mov (___fsadd_sloc2_1_0 + 1),a
1134 0575 75*06 1F 1134 mov ___fsadd_sloc2_1_0,#0x1f
1136 0578 90s00r08 1136 mov dptr,#___fsadd_mant1_1_1
1137 057B E0 1137 movx a,@dptr
1138 057C F5*00 1138 mov ___fsadd_sloc0_1_0,a
1139 057E A3 1139 inc dptr
1140 057F E0 1140 movx a,@dptr
1141 0580 F5*01 1141 mov (___fsadd_sloc0_1_0 + 1),a
1142 0582 A3 1142 inc dptr
1143 0583 E0 1143 movx a,@dptr
1144 0584 F5*02 1144 mov (___fsadd_sloc0_1_0 + 2),a
1145 0586 A3 1145 inc dptr
1146 0587 E0 1146 movx a,@dptr
1147 0588 F5*03 1147 mov (___fsadd_sloc0_1_0 + 3),a
1148 058A 90s00r08 1148 mov dptr,#___fsadd_mant1_1_1
1149 058D E5*06 1149 mov a,___fsadd_sloc2_1_0
1150 058F 25*00 1150 add a,___fsadd_sloc0_1_0
1151 0591 F0 1151 movx @dptr,a
1152 0592 E5*07 1152 mov a,(___fsadd_sloc2_1_0 + 1)
1153 0594 35*01 1153 addc a,(___fsadd_sloc0_1_0 + 1)
1154 0596 A3 1154 inc dptr
1155 0597 F0 1155 movx @dptr,a
1156 0598 E5*08 1156 mov a,(___fsadd_sloc2_1_0 + 2)
1157 059A 35*02 1157 addc a,(___fsadd_sloc0_1_0 + 2)
1158 059C A3 1158 inc dptr
1159 059D F0 1159 movx @dptr,a
1160 059E E5*09 1160 mov a,(___fsadd_sloc2_1_0 + 3)
1161 05A0 35*03 1161 addc a,(___fsadd_sloc0_1_0 + 3)
1162 05A2 A3 1162 inc dptr
1163 05A3 F0 1163 movx @dptr,a
1165 05A4 90s00r08 1165 mov dptr,#___fsadd_mant1_1_1
1166 05A7 E0 1166 movx a,@dptr
1167 05A8 F5*06 1167 mov ___fsadd_sloc2_1_0,a
1168 05AA A3 1168 inc dptr
1169 05AB E0 1169 movx a,@dptr
1170 05AC F5*07 1170 mov (___fsadd_sloc2_1_0 + 1),a
1171 05AE A3 1171 inc dptr
1172 05AF E0 1172 movx a,@dptr
1173 05B0 F5*08 1173 mov (___fsadd_sloc2_1_0 + 2),a
1174 05B2 A3 1174 inc dptr
1175 05B3 E0 1175 movx a,@dptr
1176 1176 ; Peephole 105 removed redundant mov
1177 05B4 F5*09 1177 mov (___fsadd_sloc2_1_0 + 3),a
1178 1178 ; Peephole 111 removed ljmp by inverse jump logic
1179 05B6 30 E6 42 1179 jnb acc.6,00127$
1182 05B9 90s00r08 1182 mov dptr,#___fsadd_mant1_1_1
1183 05BC E0 1183 movx a,@dptr
1184 05BD F5*06 1184 mov ___fsadd_sloc2_1_0,a
1185 05BF A3 1185 inc dptr
1186 05C0 E0 1186 movx a,@dptr
1187 05C1 F5*07 1187 mov (___fsadd_sloc2_1_0 + 1),a
1188 05C3 A3 1188 inc dptr
1189 05C4 E0 1189 movx a,@dptr
1190 05C5 F5*08 1190 mov (___fsadd_sloc2_1_0 + 2),a
1191 05C7 A3 1191 inc dptr
1192 05C8 E0 1192 movx a,@dptr
1193 1193 ; Peephole 105 removed redundant mov
1194 05C9 F5*09 1194 mov (___fsadd_sloc2_1_0 + 3),a
1195 05CB A2 E7 1195 mov c,acc.7
1197 05CE F5*09 1197 mov (___fsadd_sloc2_1_0 + 3),a
1198 05D0 E5*08 1198 mov a,(___fsadd_sloc2_1_0 + 2)
1200 05D3 F5*08 1200 mov (___fsadd_sloc2_1_0 + 2),a
1201 05D5 E5*07 1201 mov a,(___fsadd_sloc2_1_0 + 1)
1203 05D8 F5*07 1203 mov (___fsadd_sloc2_1_0 + 1),a
1204 05DA E5*06 1204 mov a,___fsadd_sloc2_1_0
1206 1206 ; Peephole 100 removed redundant mov
1207 05DD F5*06 1207 mov ___fsadd_sloc2_1_0,a
1208 05DF 90s00r08 1208 mov dptr,#___fsadd_mant1_1_1
1209 05E2 F0 1209 movx @dptr,a
1210 05E3 A3 1210 inc dptr
1211 05E4 E5*07 1211 mov a,(___fsadd_sloc2_1_0 + 1)
1212 05E6 F0 1212 movx @dptr,a
1213 05E7 A3 1213 inc dptr
1214 05E8 E5*08 1214 mov a,(___fsadd_sloc2_1_0 + 2)
1215 05EA F0 1215 movx @dptr,a
1216 05EB A3 1216 inc dptr
1217 05EC E5*09 1217 mov a,(___fsadd_sloc2_1_0 + 3)
1218 05EE F0 1218 movx @dptr,a
1220 05EF 90s00r18 1220 mov dptr,#___fsadd_exp1_1_1
1221 05F2 E0 1221 movx a,@dptr
1222 05F3 24 01 1222 add a,#0x01
1223 05F5 F0 1223 movx @dptr,a
1224 05F6 A3 1224 inc dptr
1225 05F7 E0 1225 movx a,@dptr
1226 05F8 34 00 1226 addc a,#0x00
1227 05FA F0 1227 movx @dptr,a
1230 05FB 90s00r08 1230 mov dptr,#___fsadd_mant1_1_1
1231 05FE E0 1231 movx a,@dptr
1232 05FF F5*06 1232 mov ___fsadd_sloc2_1_0,a
1233 0601 A3 1233 inc dptr
1234 0602 E0 1234 movx a,@dptr
1235 0603 F5*07 1235 mov (___fsadd_sloc2_1_0 + 1),a
1236 0605 A3 1236 inc dptr
1237 0606 E0 1237 movx a,@dptr
1238 0607 F5*08 1238 mov (___fsadd_sloc2_1_0 + 2),a
1239 0609 A3 1239 inc dptr
1240 060A E0 1240 movx a,@dptr
1241 060B F5*09 1241 mov (___fsadd_sloc2_1_0 + 3),a
1242 060D E5*07 1242 mov a,(___fsadd_sloc2_1_0 + 1)
1243 060F A2 E7 1243 mov c,acc.7
1244 0611 C5*06 1244 xch a,___fsadd_sloc2_1_0
1246 0614 C5*06 1246 xch a,___fsadd_sloc2_1_0
1248 0617 C5*06 1248 xch a,___fsadd_sloc2_1_0
1250 061A C5*06 1250 xch a,___fsadd_sloc2_1_0
1252 061D C5*06 1252 xch a,___fsadd_sloc2_1_0
1253 061F 54 03 1253 anl a,#0x03
1254 0621 F5*07 1254 mov (___fsadd_sloc2_1_0 + 1),a
1255 0623 E5*08 1255 mov a,(___fsadd_sloc2_1_0 + 2)
1256 0625 25 E0 1256 add a,acc
1257 0627 25 E0 1257 add a,acc
1258 0629 45*07 1258 orl a,(___fsadd_sloc2_1_0 + 1)
1259 062B F5*07 1259 mov (___fsadd_sloc2_1_0 + 1),a
1260 062D E5*09 1260 mov a,(___fsadd_sloc2_1_0 + 3)
1261 062F A2 E7 1261 mov c,acc.7
1262 0631 C5*08 1262 xch a,(___fsadd_sloc2_1_0 + 2)
1264 0634 C5*08 1264 xch a,(___fsadd_sloc2_1_0 + 2)
1266 0637 C5*08 1266 xch a,(___fsadd_sloc2_1_0 + 2)
1268 063A C5*08 1268 xch a,(___fsadd_sloc2_1_0 + 2)
1270 063D C5*08 1270 xch a,(___fsadd_sloc2_1_0 + 2)
1271 063F 54 03 1271 anl a,#0x03
1272 0641 30 E1 02 1272 jnb acc.1,00166$
1273 0644 44 FC 1273 orl a,#0xfc
1275 0646 F5*09 1275 mov (___fsadd_sloc2_1_0 + 3),a
1276 0648 90s00r08 1276 mov dptr,#___fsadd_mant1_1_1
1277 064B E5*06 1277 mov a,___fsadd_sloc2_1_0
1278 064D F0 1278 movx @dptr,a
1279 064E A3 1279 inc dptr
1280 064F E5*07 1280 mov a,(___fsadd_sloc2_1_0 + 1)
1281 0651 F0 1281 movx @dptr,a
1282 0652 A3 1282 inc dptr
1283 0653 E5*08 1283 mov a,(___fsadd_sloc2_1_0 + 2)
1284 0655 F0 1284 movx @dptr,a
1285 0656 A3 1285 inc dptr
1286 0657 E5*09 1286 mov a,(___fsadd_sloc2_1_0 + 3)
1287 0659 F0 1287 movx @dptr,a
1289 065A 90s00r08 1289 mov dptr,#___fsadd_mant1_1_1
1290 065D E0 1290 movx a,@dptr
1291 065E F5*06 1291 mov ___fsadd_sloc2_1_0,a
1292 0660 A3 1292 inc dptr
1293 0661 E0 1293 movx a,@dptr
1294 0662 F5*07 1294 mov (___fsadd_sloc2_1_0 + 1),a
1295 0664 A3 1295 inc dptr
1296 0665 E0 1296 movx a,@dptr
1297 0666 F5*08 1297 mov (___fsadd_sloc2_1_0 + 2),a
1298 0668 A3 1298 inc dptr
1299 0669 E0 1299 movx a,@dptr
1300 066A F5*09 1300 mov (___fsadd_sloc2_1_0 + 3),a
1301 066C 90s00r08 1301 mov dptr,#___fsadd_mant1_1_1
1302 066F E5*06 1302 mov a,___fsadd_sloc2_1_0
1303 0671 F0 1303 movx @dptr,a
1304 0672 A3 1304 inc dptr
1305 0673 E5*07 1305 mov a,(___fsadd_sloc2_1_0 + 1)
1306 0675 F0 1306 movx @dptr,a
1307 0676 74 7F 1307 mov a,#0x7f
1308 0678 55*08 1308 anl a,(___fsadd_sloc2_1_0 + 2)
1309 067A A3 1309 inc dptr
1310 067B F0 1310 movx @dptr,a
1311 067C A3 1311 inc dptr
1312 067D E5*09 1312 mov a,(___fsadd_sloc2_1_0 + 3)
1313 067F F0 1313 movx @dptr,a
1315 0680 90s00r18 1315 mov dptr,#___fsadd_exp1_1_1
1316 0683 E0 1316 movx a,@dptr
1317 0684 F5*06 1317 mov ___fsadd_sloc2_1_0,a
1318 0686 A3 1318 inc dptr
1319 0687 E0 1319 movx a,@dptr
1320 0688 F5*07 1320 mov (___fsadd_sloc2_1_0 + 1),a
1321 068A 85*06*08 1321 mov (___fsadd_sloc2_1_0 + 2),___fsadd_sloc2_1_0
1322 068D E5*07 1322 mov a,(___fsadd_sloc2_1_0 + 1)
1323 068F 54 01 1323 anl a,#0x01
1324 0691 A2 E0 1324 mov c,acc.0
1325 0693 C5*08 1325 xch a,(___fsadd_sloc2_1_0 + 2)
1327 0696 C5*08 1327 xch a,(___fsadd_sloc2_1_0 + 2)
1329 0699 C5*08 1329 xch a,(___fsadd_sloc2_1_0 + 2)
1330 069B F5*09 1330 mov (___fsadd_sloc2_1_0 + 3),a
1331 069D 75*07 00 1331 mov (___fsadd_sloc2_1_0 + 1),#0x00
1332 06A0 75*06 00 1332 mov ___fsadd_sloc2_1_0,#0x00
1333 06A3 90s00r1C 1333 mov dptr,#___fsadd_sign_1_1
1334 06A6 E0 1334 movx a,@dptr
1335 06A7 F5*00 1335 mov ___fsadd_sloc0_1_0,a
1336 06A9 A3 1336 inc dptr
1337 06AA E0 1337 movx a,@dptr
1338 06AB F5*01 1338 mov (___fsadd_sloc0_1_0 + 1),a
1339 06AD A3 1339 inc dptr
1340 06AE E0 1340 movx a,@dptr
1341 06AF F5*02 1341 mov (___fsadd_sloc0_1_0 + 2),a
1342 06B1 A3 1342 inc dptr
1343 06B2 E0 1343 movx a,@dptr
1344 06B3 F5*03 1344 mov (___fsadd_sloc0_1_0 + 3),a
1345 06B5 E5*00 1345 mov a,___fsadd_sloc0_1_0
1346 06B7 42*06 1346 orl ___fsadd_sloc2_1_0,a
1347 06B9 E5*01 1347 mov a,(___fsadd_sloc0_1_0 + 1)
1348 06BB 42*07 1348 orl (___fsadd_sloc2_1_0 + 1),a
1349 06BD E5*02 1349 mov a,(___fsadd_sloc0_1_0 + 2)
1350 06BF 42*08 1350 orl (___fsadd_sloc2_1_0 + 2),a
1351 06C1 E5*03 1351 mov a,(___fsadd_sloc0_1_0 + 3)
1352 06C3 42*09 1352 orl (___fsadd_sloc2_1_0 + 3),a
1353 06C5 90s00r08 1353 mov dptr,#___fsadd_mant1_1_1
1354 06C8 E0 1354 movx a,@dptr
1355 06C9 F5*00 1355 mov ___fsadd_sloc0_1_0,a
1356 06CB A3 1356 inc dptr
1357 06CC E0 1357 movx a,@dptr
1358 06CD F5*01 1358 mov (___fsadd_sloc0_1_0 + 1),a
1359 06CF A3 1359 inc dptr
1360 06D0 E0 1360 movx a,@dptr
1361 06D1 F5*02 1361 mov (___fsadd_sloc0_1_0 + 2),a
1362 06D3 A3 1362 inc dptr
1363 06D4 E0 1363 movx a,@dptr
1364 06D5 F5*03 1364 mov (___fsadd_sloc0_1_0 + 3),a
1365 06D7 E5*00 1365 mov a,___fsadd_sloc0_1_0
1366 06D9 42*06 1366 orl ___fsadd_sloc2_1_0,a
1367 06DB E5*01 1367 mov a,(___fsadd_sloc0_1_0 + 1)
1368 06DD 42*07 1368 orl (___fsadd_sloc2_1_0 + 1),a
1369 06DF E5*02 1369 mov a,(___fsadd_sloc0_1_0 + 2)
1370 06E1 42*08 1370 orl (___fsadd_sloc2_1_0 + 2),a
1371 06E3 E5*03 1371 mov a,(___fsadd_sloc0_1_0 + 3)
1372 06E5 42*09 1372 orl (___fsadd_sloc2_1_0 + 3),a
1373 06E7 90s00r10 1373 mov dptr,#(___fsadd_fl1_1_1)
1374 06EA E5*06 1374 mov a,___fsadd_sloc2_1_0
1375 06EC F0 1375 movx @dptr,a
1376 06ED A3 1376 inc dptr
1377 06EE E5*07 1377 mov a,(___fsadd_sloc2_1_0 + 1)
1378 06F0 F0 1378 movx @dptr,a
1379 06F1 A3 1379 inc dptr
1380 06F2 E5*08 1380 mov a,(___fsadd_sloc2_1_0 + 2)
1381 06F4 F0 1381 movx @dptr,a
1382 06F5 A3 1382 inc dptr
1383 06F6 E5*09 1383 mov a,(___fsadd_sloc2_1_0 + 3)
1384 06F8 F0 1384 movx @dptr,a
1386 06F9 90s00r10 1386 mov dptr,#(___fsadd_fl1_1_1)
1387 06FC E0 1387 movx a,@dptr
1388 06FD F5*06 1388 mov ___fsadd_sloc2_1_0,a
1389 06FF A3 1389 inc dptr
1390 0700 E0 1390 movx a,@dptr
1391 0701 F5*07 1391 mov (___fsadd_sloc2_1_0 + 1),a
1392 0703 A3 1392 inc dptr
1393 0704 E0 1393 movx a,@dptr
1394 0705 F5*08 1394 mov (___fsadd_sloc2_1_0 + 2),a
1395 0707 A3 1395 inc dptr
1396 0708 E0 1396 movx a,@dptr
1397 1397 ; Peephole 191 removed redundant mov
1398 0709 F5*09 1398 mov (___fsadd_sloc2_1_0 + 3),a
1399 070B 85*06 82 1399 mov dpl,___fsadd_sloc2_1_0
1400 070E 85*07 83 1400 mov dph,(___fsadd_sloc2_1_0 + 1)
1401 0711 85*08 F0 1401 mov b,(___fsadd_sloc2_1_0 + 2)
1403 0714 1403 C$_fsadd.c$102$1$1 ==.
1404 0714 1404 XG$__fsadd$0$0 ==.
1406 1406 .area CSEG (CODE)