git.gag.com Git - fw/sdcc/blob - device/lib/_fs2long.lst

   1                               1 ;--------------------------------------------------------
   2                               2 ; File Created by SDCC : FreeWare ANSI-C Compiler
   3                               3 ; Version 2.1.9Ga Sun Jan 16 17:31:24 2000
   4                               4
   5                               5 ;--------------------------------------------------------
   6                               6         .module _fs2long
   7                               7 ;--------------------------------------------------------
   8                               8 ; publics variables in this module
   9                               9 ;--------------------------------------------------------
  10                              10         .globl ___fs2long
  11                              11 ;--------------------------------------------------------
  12                              12 ; special function registers
  13                              13 ;--------------------------------------------------------
  14                              14 ;--------------------------------------------------------
  15                              15 ; special function bits
  16                              16 ;--------------------------------------------------------
  17                              17 ;--------------------------------------------------------
  18                              18 ; internal ram data
  19                              19 ;--------------------------------------------------------
  20                              20         .area   DSEG    (DATA)
  21    0000                      21 ___fs2long_sloc0_1_0:
  22    0000                      22         .ds     0x0004
  23    0004                      23 ___fs2long_sloc1_1_0:
  24    0004                      24         .ds     0x0004
  25                              25 ;--------------------------------------------------------
  26                              26 ; overlayable items in internal ram
  27                              27 ;--------------------------------------------------------
  28                              28         .area   OSEG    (OVR,DATA)
  29                              29 ;--------------------------------------------------------
  30                              30 ; indirectly addressable internal ram data
  31                              31 ;--------------------------------------------------------
  32                              32         .area   ISEG    (DATA)
  33                              33 ;--------------------------------------------------------
  34                              34 ; bit data
  35                              35 ;--------------------------------------------------------
  36                              36         .area   BSEG    (BIT)
  37                              37 ;--------------------------------------------------------
  38                              38 ; external ram data
  39                              39 ;--------------------------------------------------------
  40                              40         .area   XSEG    (XDATA)
  41    0000                      41 ___fs2long_a1_1_1:
  42    0000                      42         .ds     0x0004
  43    0004                      43 ___fs2long_fl1_1_1:
  44    0004                      44         .ds     0x0004
  45    0008                      45 ___fs2long_exp_1_1:
  46    0008                      46         .ds     0x0002
  47    000A                      47 ___fs2long_l_1_1:
  48    000A                      48         .ds     0x0004
  49                              49 ;--------------------------------------------------------
  50                              50 ; global & static initialisations
  51                              51 ;--------------------------------------------------------
  52                              52         .area GSINIT (CODE)
  53                              53 ;--------------------------------------------------------
  54                              54 ; code
  55                              55 ;--------------------------------------------------------
  56                              56         .area CSEG (CODE)
  57                     0000     57         G$__fs2long$0$0 ==.
  58                              58 ;       _fs2long.c 73
  59                              59 ;       -----------------------------------------
  60                              60 ;        function __fs2long
  61                              61 ;       -----------------------------------------
  62    0000                      62 ___fs2long:
  63                     0002     63         ar2 = 0x02
  64                     0003     64         ar3 = 0x03
  65                     0004     65         ar4 = 0x04
  66                     0005     66         ar5 = 0x05
  67                     0006     67         ar6 = 0x06
  68                     0007     68         ar7 = 0x07
  69                     0000     69         ar0 = 0x00
  70                     0001     70         ar1 = 0x01
  71                              71 ;       _fs2long.c 0
  72    0000 C0 E0                72         push    acc
  73    0002 C0 F0                73         push    b
  74    0004 C0 83                74         push    dph
  75    0006 C0 82                75         push    dpl
  76    0008 90s00r00             76         mov     dptr,#___fs2long_a1_1_1
  77    000B D0 E0                77         pop     acc
  78    000D F0                   78         movx    @dptr,a
  79    000E D0 E0                79         pop     acc
  80    0010 A3                   80         inc     dptr
  81    0011 F0                   81         movx    @dptr,a
  82    0012 D0 E0                82         pop     acc
  83    0014 A3                   83         inc     dptr
  84    0015 F0                   84         movx    @dptr,a
  85    0016 D0 E0                85         pop     acc
  86    0018 A3                   86         inc     dptr
  87    0019 F0                   87         movx    @dptr,a
  88                              88 ;       _fs2long.c 79
  89    001A 90s00r00             89         mov     dptr,#___fs2long_a1_1_1
  90    001D E0                   90         movx    a,@dptr
  91    001E FA                   91         mov     r2,a
  92    001F A3                   92         inc     dptr
  93    0020 E0                   93         movx    a,@dptr
  94    0021 FB                   94         mov     r3,a
  95    0022 A3                   95         inc     dptr
  96    0023 E0                   96         movx    a,@dptr
  97    0024 FC                   97         mov     r4,a
  98    0025 A3                   98         inc     dptr
  99    0026 E0                   99         movx    a,@dptr
 100    0027 FD                  100         mov     r5,a
 101    0028 90s00r04            101         mov     dptr,#(___fs2long_fl1_1_1)
 102    002B EA                  102         mov     a,r2
 103    002C F0                  103         movx    @dptr,a
 104    002D A3                  104         inc     dptr
 105    002E EB                  105         mov     a,r3
 106    002F F0                  106         movx    @dptr,a
 107    0030 A3                  107         inc     dptr
 108    0031 EC                  108         mov     a,r4
 109    0032 F0                  109         movx    @dptr,a
 110    0033 A3                  110         inc     dptr
 111    0034 ED                  111         mov     a,r5
 112    0035 F0                  112         movx    @dptr,a
 113                             113 ;       _fs2long.c 81
 114    0036 90s00r04            114         mov     dptr,#(___fs2long_fl1_1_1)
 115    0039 E0                  115         movx    a,@dptr
 116    003A FA                  116         mov     r2,a
 117    003B A3                  117         inc     dptr
 118    003C E0                  118         movx    a,@dptr
 119    003D FB                  119         mov     r3,a
 120    003E A3                  120         inc     dptr
 121    003F E0                  121         movx    a,@dptr
 122    0040 FC                  122         mov     r4,a
 123    0041 A3                  123         inc     dptr
 124    0042 E0                  124         movx    a,@dptr
 125    0043 FD                  125         mov     r5,a
 126    0044 EA                  126         mov     a,r2
 127    0045 4B                  127         orl     a,r3
 128    0046 4C                  128         orl     a,r4
 129    0047 4D                  129         orl     a,r5
 130                             130 ; Peephole 109   removed ljmp by inverse jump logic
 131    0048 70 0A               131         jnz  00102$
 132    004A                     132 00120$:
 133                             133 ;       _fs2long.c 82
 134                             134 ; Peephole 3.a   changed mov to clr
 135                             135 ; Peephole 3.b   changed mov to clr
 136                             136 ; Peephole 3.b   changed mov to clr
 137    004A E4                  137         clr  a
 138    004B F5 82               138         mov  dpl,a
 139    004D F5 83               139         mov  dph,a
 140    004F F5 F0               140         mov  b,a
 141    0051 02s01rFE            141         ljmp    00110$
 142    0054                     142 00102$:
 143                             143 ;       _fs2long.c 84
 144    0054 90s00r04            144         mov     dptr,#(___fs2long_fl1_1_1)
 145    0057 E0                  145         movx    a,@dptr
 146    0058 FA                  146         mov     r2,a
 147    0059 A3                  147         inc     dptr
 148    005A E0                  148         movx    a,@dptr
 149    005B FB                  149         mov     r3,a
 150    005C A3                  150         inc     dptr
 151    005D E0                  151         movx    a,@dptr
 152    005E FC                  152         mov     r4,a
 153    005F A3                  153         inc     dptr
 154    0060 E0                  154         movx    a,@dptr
 155    0061 FD                  155         mov     r5,a
 156    0062 8C 02               156         mov     ar2,r4
 157    0064 ED                  157         mov     a,r5
 158    0065 A2 E7               158         mov     c,acc.7
 159    0067 CA                  159         xch     a,r2
 160    0068 33                  160         rlc     a
 161    0069 CA                  161         xch     a,r2
 162    006A 33                  162         rlc     a
 163    006B CA                  163         xch     a,r2
 164    006C 54 01               164         anl     a,#0x01
 165    006E 30 E0 02            165         jnb     acc.0,00121$
 166    0071 44 FE               166         orl     a,#0xfe
 167    0073                     167 00121$:
 168    0073 FB                  168         mov     r3,a
 169    0074 33                  169         rlc     a
 170    0075 95 E0               170         subb    a,acc
 171    0077 FC                  171         mov     r4,a
 172    0078 FD                  172         mov     r5,a
 173    0079 EA                  173         mov     a,r2
 174    007A 75 F0 00            174         mov     b,#0x00
 175    007D 24 6A               175         add     a,#0x6a
 176    007F FA                  176         mov     r2,a
 177    0080 E5 F0               177         mov     a,b
 178    0082 34 FF               178         addc    a,#0xff
 179    0084 FB                  179         mov     r3,a
 180    0085 90s00r08            180         mov     dptr,#___fs2long_exp_1_1
 181    0088 EA                  181         mov     a,r2
 182    0089 F0                  182         movx    @dptr,a
 183    008A A3                  183         inc     dptr
 184    008B EB                  184         mov     a,r3
 185    008C F0                  185         movx    @dptr,a
 186                             186 ;       _fs2long.c 85
 187    008D 90s00r04            187         mov     dptr,#(___fs2long_fl1_1_1)
 188    0090 E0                  188         movx    a,@dptr
 189    0091 FA                  189         mov     r2,a
 190    0092 A3                  190         inc     dptr
 191    0093 E0                  191         movx    a,@dptr
 192    0094 FB                  192         mov     r3,a
 193    0095 A3                  193         inc     dptr
 194    0096 E0                  194         movx    a,@dptr
 195    0097 FE                  195         mov     r6,a
 196    0098 A3                  196         inc     dptr
 197    0099 E0                  197         movx    a,@dptr
 198    009A FF                  198         mov     r7,a
 199    009B 53 06 7F            199         anl     ar6,#0x7f
 200    009E 7F 00               200         mov     r7,#0x00
 201    00A0 90s00r0A            201         mov     dptr,#___fs2long_l_1_1
 202    00A3 EA                  202         mov     a,r2
 203    00A4 F0                  203         movx    @dptr,a
 204    00A5 A3                  204         inc     dptr
 205    00A6 EB                  205         mov     a,r3
 206    00A7 F0                  206         movx    @dptr,a
 207    00A8 74 80               207         mov     a,#0x80
 208    00AA 4E                  208         orl     a,r6
 209    00AB A3                  209         inc     dptr
 210    00AC F0                  210         movx    @dptr,a
 211    00AD A3                  211         inc     dptr
 212    00AE EF                  212         mov     a,r7
 213    00AF F0                  213         movx    @dptr,a
 214                             214 ;       _fs2long.c 87
 215    00B0 90s00r08            215         mov     dptr,#___fs2long_exp_1_1
 216    00B3 E0                  216         movx    a,@dptr
 217    00B4 FA                  217         mov     r2,a
 218    00B5 A3                  218         inc     dptr
 219    00B6 E0                  219         movx    a,@dptr
 220    00B7 FB                  220         mov     r3,a
 221    00B8 C3                  221         clr     c
 222                             222 ; Peephole 180   changed mov to clr
 223    00B9 E4                  223         clr  a
 224    00BA 9A                  224         subb    a,r2
 225                             225 ; Peephole 159   avoided xrl during execution
 226    00BB 74 80               226         mov  a,#(0x00 ^ 0x80)
 227    00BD 8B F0               227         mov     b,r3
 228    00BF 63 F0 80            228         xrl     b,#0x80
 229    00C2 95 F0               229         subb    a,b
 230                             230 ; Peephole 108   removed ljmp by inverse jump logic
 231    00C4 50 2D               231         jnc  00104$
 232    00C6                     232 00122$:
 233                             233 ;       _fs2long.c 88
 234    00C6 90s00r04            234         mov     dptr,#(___fs2long_fl1_1_1)
 235    00C9 E0                  235         movx    a,@dptr
 236    00CA FA                  236         mov     r2,a
 237    00CB A3                  237         inc     dptr
 238    00CC E0                  238         movx    a,@dptr
 239    00CD FB                  239         mov     r3,a
 240    00CE A3                  240         inc     dptr
 241    00CF E0                  241         movx    a,@dptr
 242    00D0 FE                  242         mov     r6,a
 243    00D1 A3                  243         inc     dptr
 244    00D2 E0                  244         movx    a,@dptr
 245                             245 ; Peephole 105   removed redundant mov
 246    00D3 FF                  246         mov  r7,a
 247    00D4 23                  247         rl      a
 248    00D5 54 01               248         anl     a,#0x01
 249    00D7 FA                  249         mov     r2,a
 250    00D8 43 02 7F            250         orl     ar2,#0x7f
 251    00DB 8A*00               251         mov     ___fs2long_sloc0_1_0,r2
 252    00DD EA                  252         mov     a,r2
 253    00DE 33                  253         rlc     a
 254    00DF 95 E0               254         subb    a,acc
 255    00E1 F5*01               255         mov     (___fs2long_sloc0_1_0 + 1),a
 256    00E3 F5*02               256         mov     (___fs2long_sloc0_1_0 + 2),a
 257                             257 ; Peephole 191   removed redundant mov
 258    00E5 F5*03               258         mov  (___fs2long_sloc0_1_0 + 3),a
 259    00E7 85*00 82            259         mov  dpl,___fs2long_sloc0_1_0
 260    00EA 85*01 83            260         mov  dph,(___fs2long_sloc0_1_0 + 1)
 261    00ED 85*02 F0            261         mov  b,(___fs2long_sloc0_1_0 + 2)
 262    00F0 02s01rFE            262         ljmp    00110$
 263    00F3                     263 00104$:
 264                             264 ;       _fs2long.c 91
 265    00F3 90s00r08            265         mov     dptr,#___fs2long_exp_1_1
 266    00F6 E0                  266         movx    a,@dptr
 267    00F7 FA                  267         mov     r2,a
 268    00F8 A3                  268         inc     dptr
 269    00F9 E0                  269         movx    a,@dptr
 270                             270 ; Peephole 105   removed redundant mov
 271    00FA F8                  271         mov  r0,a
 272    00FB 20 E7 03            272         jb      acc.7,00123$
 273    00FE 02s01r96            273         ljmp    00106$
 274    0101                     274 00123$:
 275    0101 90s00r08            275         mov     dptr,#___fs2long_exp_1_1
 276    0104 E0                  276         movx    a,@dptr
 277    0105 FA                  277         mov     r2,a
 278    0106 A3                  278         inc     dptr
 279    0107 E0                  279         movx    a,@dptr
 280    0108 F8                  280         mov     r0,a
 281    0109 C3                  281         clr     c
 282    010A 74 E7               282         mov     a,#0xe7
 283    010C 9A                  283         subb    a,r2
 284                             284 ; Peephole 159   avoided xrl during execution
 285    010D 74 7F               285         mov  a,#(0xff ^ 0x80)
 286    010F 88 F0               286         mov     b,r0
 287    0111 63 F0 80            287         xrl     b,#0x80
 288    0114 95 F0               288         subb    a,b
 289    0116 40 03               289         jc      00124$
 290    0118 02s01r96            290         ljmp    00106$
 291    011B                     291 00124$:
 292    011B 90s00r0A            292         mov     dptr,#___fs2long_l_1_1
 293    011E E0                  293         movx    a,@dptr
 294    011F F5*00               294         mov     ___fs2long_sloc0_1_0,a
 295    0121 A3                  295         inc     dptr
 296    0122 E0                  296         movx    a,@dptr
 297    0123 F5*01               297         mov     (___fs2long_sloc0_1_0 + 1),a
 298    0125 A3                  298         inc     dptr
 299    0126 E0                  299         movx    a,@dptr
 300    0127 F5*02               300         mov     (___fs2long_sloc0_1_0 + 2),a
 301    0129 A3                  301         inc     dptr
 302    012A E0                  302         movx    a,@dptr
 303    012B F5*03               303         mov     (___fs2long_sloc0_1_0 + 3),a
 304    012D E5*00               304         mov     a,___fs2long_sloc0_1_0
 305    012F 45*01               305         orl     a,(___fs2long_sloc0_1_0 + 1)
 306    0131 45*02               306         orl     a,(___fs2long_sloc0_1_0 + 2)
 307    0133 45*03               307         orl     a,(___fs2long_sloc0_1_0 + 3)
 308    0135 70 03               308         jnz     00125$
 309    0137 02s01r96            309         ljmp    00106$
 310    013A                     310 00125$:
 311                             311 ;       _fs2long.c 92
 312    013A 90s00r08            312         mov     dptr,#___fs2long_exp_1_1
 313    013D E0                  313         movx    a,@dptr
 314    013E FA                  314         mov     r2,a
 315    013F A3                  315         inc     dptr
 316    0140 E0                  316         movx    a,@dptr
 317    0141 F8                  317         mov     r0,a
 318    0142 C3                  318         clr     c
 319    0143 E4                  319         clr     a
 320    0144 9A                  320         subb    a,r2
 321    0145 F5*00               321         mov     ___fs2long_sloc0_1_0,a
 322    0147 E4                  322         clr     a
 323    0148 98                  323         subb    a,r0
 324    0149 F5*01               324         mov     (___fs2long_sloc0_1_0 + 1),a
 325    014B 90s00r0A            325         mov     dptr,#___fs2long_l_1_1
 326    014E E0                  326         movx    a,@dptr
 327    014F F5*04               327         mov     ___fs2long_sloc1_1_0,a
 328    0151 A3                  328         inc     dptr
 329    0152 E0                  329         movx    a,@dptr
 330    0153 F5*05               330         mov     (___fs2long_sloc1_1_0 + 1),a
 331    0155 A3                  331         inc     dptr
 332    0156 E0                  332         movx    a,@dptr
 333    0157 F5*06               333         mov     (___fs2long_sloc1_1_0 + 2),a
 334    0159 A3                  334         inc     dptr
 335    015A E0                  335         movx    a,@dptr
 336    015B F5*07               336         mov     (___fs2long_sloc1_1_0 + 3),a
 337    015D 85*00 F0            337         mov     b,___fs2long_sloc0_1_0
 338    0160 05 F0               338         inc     b
 339    0162 E5*07               339         mov     a,(___fs2long_sloc1_1_0 + 3)
 340    0164 33                  340         rlc     a
 341    0165 92 D2               341         mov     ov,c
 342    0167 80 16               342         sjmp    00127$
 343    0169                     343 00126$:
 344    0169 A2 D2               344         mov     c,ov
 345    016B E5*07               345         mov     a,(___fs2long_sloc1_1_0 + 3)
 346    016D 13                  346         rrc     a
 347    016E F5*07               347         mov     (___fs2long_sloc1_1_0 + 3),a
 348    0170 E5*06               348         mov     a,(___fs2long_sloc1_1_0 + 2)
 349    0172 13                  349         rrc     a
 350    0173 F5*06               350         mov     (___fs2long_sloc1_1_0 + 2),a
 351    0175 E5*05               351         mov     a,(___fs2long_sloc1_1_0 + 1)
 352    0177 13                  352         rrc     a
 353    0178 F5*05               353         mov     (___fs2long_sloc1_1_0 + 1),a
 354    017A E5*04               354         mov     a,___fs2long_sloc1_1_0
 355    017C 13                  355         rrc     a
 356    017D F5*04               356         mov     ___fs2long_sloc1_1_0,a
 357    017F                     357 00127$:
 358    017F D5 F0 E7            358         djnz    b,00126$
 359    0182 90s00r0A            359         mov     dptr,#___fs2long_l_1_1
 360    0185 E5*04               360         mov     a,___fs2long_sloc1_1_0
 361    0187 F0                  361         movx    @dptr,a
 362    0188 A3                  362         inc     dptr
 363    0189 E5*05               363         mov     a,(___fs2long_sloc1_1_0 + 1)
 364    018B F0                  364         movx    @dptr,a
 365    018C A3                  365         inc     dptr
 366    018D E5*06               366         mov     a,(___fs2long_sloc1_1_0 + 2)
 367    018F F0                  367         movx    @dptr,a
 368    0190 A3                  368         inc     dptr
 369    0191 E5*07               369         mov     a,(___fs2long_sloc1_1_0 + 3)
 370    0193 F0                  370         movx    @dptr,a
 371                             371 ; Peephole 132   changed ljmp to sjmp
 372    0194 80 0A               372         sjmp 00107$
 373    0196                     373 00106$:
 374                             374 ;       _fs2long.c 94
 375                             375 ; Peephole 3.a   changed mov to clr
 376                             376 ; Peephole 3.b   changed mov to clr
 377                             377 ; Peephole 3.b   changed mov to clr
 378    0196 E4                  378         clr  a
 379    0197 F5 82               379         mov  dpl,a
 380    0199 F5 83               380         mov  dph,a
 381    019B F5 F0               381         mov  b,a
 382    019D 02s01rFE            382         ljmp    00110$
 383    01A0                     383 00107$:
 384                             384 ;       _fs2long.c 96
 385    01A0 90s00r04            385         mov     dptr,#(___fs2long_fl1_1_1)
 386    01A3 E0                  386         movx    a,@dptr
 387    01A4 F5*04               387         mov     ___fs2long_sloc1_1_0,a
 388    01A6 A3                  388         inc     dptr
 389    01A7 E0                  389         movx    a,@dptr
 390    01A8 F5*05               390         mov     (___fs2long_sloc1_1_0 + 1),a
 391    01AA A3                  391         inc     dptr
 392    01AB E0                  392         movx    a,@dptr
 393    01AC F5*06               393         mov     (___fs2long_sloc1_1_0 + 2),a
 394    01AE A3                  394         inc     dptr
 395    01AF E0                  395         movx    a,@dptr
 396                             396 ; Peephole 105   removed redundant mov
 397    01B0 F5*07               397         mov  (___fs2long_sloc1_1_0 + 3),a
 398    01B2 23                  398         rl      a
 399    01B3 54 01               399         anl     a,#0x01
 400                             400 ; Peephole 105   removed redundant mov
 401    01B5 FA                  401         mov  r2,a
 402                             402 ; Peephole 110   removed ljmp by inverse jump logic
 403    01B6 60 29               403         jz  00112$
 404    01B8                     404 00128$:
 405    01B8 90s00r0A            405         mov     dptr,#___fs2long_l_1_1
 406    01BB E0                  406         movx    a,@dptr
 407    01BC F5*04               407         mov     ___fs2long_sloc1_1_0,a
 408    01BE A3                  408         inc     dptr
 409    01BF E0                  409         movx    a,@dptr
 410    01C0 F5*05               410         mov     (___fs2long_sloc1_1_0 + 1),a
 411    01C2 A3                  411         inc     dptr
 412    01C3 E0                  412         movx    a,@dptr
 413    01C4 F5*06               413         mov     (___fs2long_sloc1_1_0 + 2),a
 414    01C6 A3                  414         inc     dptr
 415    01C7 E0                  415         movx    a,@dptr
 416    01C8 F5*07               416         mov     (___fs2long_sloc1_1_0 + 3),a
 417    01CA C3                  417         clr     c
 418    01CB E4                  418         clr     a
 419    01CC 95*04               419         subb    a,___fs2long_sloc1_1_0
 420    01CE F5*04               420         mov     ___fs2long_sloc1_1_0,a
 421    01D0 E4                  421         clr     a
 422    01D1 95*05               422         subb    a,(___fs2long_sloc1_1_0 + 1)
 423    01D3 F5*05               423         mov     (___fs2long_sloc1_1_0 + 1),a
 424    01D5 E4                  424         clr     a
 425    01D6 95*06               425         subb    a,(___fs2long_sloc1_1_0 + 2)
 426    01D8 F5*06               426         mov     (___fs2long_sloc1_1_0 + 2),a
 427    01DA E4                  427         clr     a
 428    01DB 95*07               428         subb    a,(___fs2long_sloc1_1_0 + 3)
 429    01DD F5*07               429         mov     (___fs2long_sloc1_1_0 + 3),a
 430                             430 ; Peephole 132   changed ljmp to sjmp
 431    01DF 80 12               431         sjmp 00113$
 432    01E1                     432 00112$:
 433    01E1 90s00r0A            433         mov     dptr,#___fs2long_l_1_1
 434    01E4 E0                  434         movx    a,@dptr
 435    01E5 F5*04               435         mov     ___fs2long_sloc1_1_0,a
 436    01E7 A3                  436         inc     dptr
 437    01E8 E0                  437         movx    a,@dptr
 438    01E9 F5*05               438         mov     (___fs2long_sloc1_1_0 + 1),a
 439    01EB A3                  439         inc     dptr
 440    01EC E0                  440         movx    a,@dptr
 441    01ED F5*06               441         mov     (___fs2long_sloc1_1_0 + 2),a
 442    01EF A3                  442         inc     dptr
 443    01F0 E0                  443         movx    a,@dptr
 444    01F1 F5*07               444         mov     (___fs2long_sloc1_1_0 + 3),a
 445    01F3                     445 00113$:
 446    01F3 85*04 82            446         mov     dpl,___fs2long_sloc1_1_0
 447    01F6 85*05 83            447         mov     dph,(___fs2long_sloc1_1_0 + 1)
 448    01F9 85*06 F0            448         mov     b,(___fs2long_sloc1_1_0 + 2)
 449    01FC E5*07               449         mov     a,(___fs2long_sloc1_1_0 + 3)
 450    01FE                     450 00110$:
 451                     01FE    451         C$_fs2long.c$97$1$1 ==.
 452                     01FE    452         XG$__fs2long$0$0 ==.
 453    01FE 22                  453         ret
 454                             454         .area   CSEG    (CODE)