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

   1                               1 ;--------------------------------------------------------
   2                               2 ; File Created by SDCC : FreeWare ANSI-C Compiler
   3                               3 ; Version 2.1.9Ga Sun Jan 16 17:31:22 2000
   4                               4
   5                               5 ;--------------------------------------------------------
   6                               6         .module _atoi
   7                               7 ;--------------------------------------------------------
   8                               8 ; publics variables in this module
   9                               9 ;--------------------------------------------------------
  10                              10         .globl _atoi
  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                              21 ;--------------------------------------------------------
  22                              22 ; overlayable items in internal ram
  23                              23 ;--------------------------------------------------------
  24                              24         .area   OSEG    (OVR,DATA)
  25                              25 ;--------------------------------------------------------
  26                              26 ; indirectly addressable internal ram data
  27                              27 ;--------------------------------------------------------
  28                              28         .area   ISEG    (DATA)
  29                              29 ;--------------------------------------------------------
  30                              30 ; bit data
  31                              31 ;--------------------------------------------------------
  32                              32         .area   BSEG    (BIT)
  33                              33 ;--------------------------------------------------------
  34                              34 ; external ram data
  35                              35 ;--------------------------------------------------------
  36                              36         .area   XSEG    (XDATA)
  37    0000                      37 _atoi_s_1_1:
  38    0000                      38         .ds     0x0003
  39    0003                      39 _atoi_rv_1_1:
  40    0003                      40         .ds     0x0002
  41                              41 ;--------------------------------------------------------
  42                              42 ; global & static initialisations
  43                              43 ;--------------------------------------------------------
  44                              44         .area GSINIT (CODE)
  45                              45 ;--------------------------------------------------------
  46                              46 ; code
  47                              47 ;--------------------------------------------------------
  48                              48         .area CSEG (CODE)
  49                     0000     49         G$atoi$0$0 ==.
  50                              50 ;       _atoi.c 25
  51                              51 ;       -----------------------------------------
  52                              52 ;        function atoi
  53                              53 ;       -----------------------------------------
  54    0000                      54 _atoi:
  55                     0002     55         ar2 = 0x02
  56                     0003     56         ar3 = 0x03
  57                     0004     57         ar4 = 0x04
  58                     0005     58         ar5 = 0x05
  59                     0006     59         ar6 = 0x06
  60                     0007     60         ar7 = 0x07
  61                     0000     61         ar0 = 0x00
  62                     0001     62         ar1 = 0x01
  63                              63 ;       _atoi.c 0
  64    0000 C0 F0                64         push    b
  65    0002 C0 83                65         push    dph
  66    0004 C0 82                66         push    dpl
  67    0006 90s00r00             67         mov     dptr,#_atoi_s_1_1
  68    0009 D0 E0                68         pop     acc
  69    000B F0                   69         movx    @dptr,a
  70    000C D0 E0                70         pop     acc
  71    000E A3                   71         inc     dptr
  72    000F F0                   72         movx    @dptr,a
  73    0010 D0 E0                73         pop     acc
  74    0012 A3                   74         inc     dptr
  75    0013 F0                   75         movx    @dptr,a
  76                              76 ;       _atoi.c 27
  77    0014 90s00r03             77         mov     dptr,#_atoi_rv_1_1
  78    0017 E4                   78         clr     a
  79    0018 A3                   79         inc     dptr
  80    0019 F0                   80         movx    @dptr,a
  81    001A 12s00r00             81         lcall   __decdptr
  82    001D F0                   82         movx    @dptr,a
  83                              83 ;       _atoi.c 31
  84    001E 90s00r00             84         mov     dptr,#_atoi_s_1_1
  85    0021 E0                   85         movx    a,@dptr
  86    0022 FA                   86         mov     r2,a
  87    0023 A3                   87         inc     dptr
  88    0024 E0                   88         movx    a,@dptr
  89    0025 FB                   89         mov     r3,a
  90    0026 A3                   90         inc     dptr
  91    0027 E0                   91         movx    a,@dptr
  92    0028 FC                   92         mov     r4,a
  93    0029                      93 00107$:
  94    0029 8A 82                94         mov     dpl,r2
  95    002B 8B 83                95         mov     dph,r3
  96    002D 8C F0                96         mov     b,r4
  97    002F 12s00r00             97         lcall   __gptrget
  98                              98 ; Peephole 105   removed redundant mov
  99    0032 FD                   99         mov  r5,a
 100                             100 ; Peephole 110   removed ljmp by inverse jump logic
 101    0033 60 30               101         jz  00109$
 102    0035                     102 00133$:
 103                             103 ;       _atoi.c 32
 104    0035 C3                  104         clr     c
 105                             105 ; Peephole 159   avoided xrl during execution
 106    0036 74 B9               106         mov  a,#(0x39 ^ 0x80)
 107    0038 8D F0               107         mov     b,r5
 108    003A 63 F0 80            108         xrl     b,#0x80
 109    003D 95 F0               109         subb    a,b
 110                             110 ; Peephole 132   changed ljmp to sjmp
 111                             111 ; Peephole 160   removed sjmp by inverse jump logic
 112    003F 40 08               112         jc   00102$
 113    0041                     113 00134$:
 114    0041 C3                  114         clr     c
 115    0042 ED                  115         mov     a,r5
 116    0043 64 80               116         xrl     a,#0x80
 117    0045 94 B0               117         subb    a,#0xb0
 118                             118 ; Peephole 108   removed ljmp by inverse jump logic
 119    0047 50 1C               119         jnc  00109$
 120    0049                     120 00135$:
 121                             121 ;       _atoi.c 33
 122    0049                     122 00102$:
 123                             123 ;       _atoi.c 34
 124    0049 BD 2D 02            124         cjne    r5,#0x2d,00136$
 125                             125 ; Peephole 132   changed ljmp to sjmp
 126    004C 80 17               126         sjmp 00109$
 127    004E                     127 00136$:
 128    004E BD 2B 02            128         cjne    r5,#0x2b,00137$
 129                             129 ; Peephole 132   changed ljmp to sjmp
 130    0051 80 12               130         sjmp 00109$
 131    0053                     131 00137$:
 132                             132 ;       _atoi.c 36
 133    0053 0A                  133         inc     r2
 134    0054 BA 00 01            134         cjne    r2,#0x00,00138$
 135    0057 0B                  135         inc     r3
 136    0058                     136 00138$:
 137    0058 90s00r00            137         mov     dptr,#_atoi_s_1_1
 138    005B EA                  138         mov     a,r2
 139    005C F0                  139         movx    @dptr,a
 140    005D A3                  140         inc     dptr
 141    005E EB                  141         mov     a,r3
 142    005F F0                  142         movx    @dptr,a
 143    0060 A3                  143         inc     dptr
 144    0061 EC                  144         mov     a,r4
 145    0062 F0                  145         movx    @dptr,a
 146                             146 ; Peephole 132   changed ljmp to sjmp
 147    0063 80 C4               147         sjmp 00107$
 148    0065                     148 00109$:
 149                             149 ;       _atoi.c 39
 150    0065 90s00r00            150         mov     dptr,#_atoi_s_1_1
 151    0068 EA                  151         mov     a,r2
 152    0069 F0                  152         movx    @dptr,a
 153    006A A3                  153         inc     dptr
 154    006B EB                  154         mov     a,r3
 155    006C F0                  155         movx    @dptr,a
 156    006D A3                  156         inc     dptr
 157    006E EC                  157         mov     a,r4
 158    006F F0                  158         movx    @dptr,a
 159    0070 8A 82               159         mov     dpl,r2
 160    0072 8B 83               160         mov     dph,r3
 161    0074 8C F0               161         mov     b,r4
 162    0076 12s00r00            162         lcall   __gptrget
 163    0079 FD                  163         mov     r5,a
 164    007A BD 2D 04            164         cjne    r5,#0x2d,00139$
 165    007D 74 01               165         mov     a,#0x01
 166    007F 80 01               166         sjmp    00140$
 167    0081                     167 00139$:
 168    0081 E4                  168         clr     a
 169    0082                     169 00140$:
 170                             170 ;       _atoi.c 40
 171                             171 ; Peephole 105   removed redundant mov
 172    0082 FE                  172         mov  r6,a
 173                             173 ; Peephole 109   removed ljmp by inverse jump logic
 174    0083 70 03               174         jnz  00110$
 175    0085                     175 00141$:
 176                             176 ; Peephole 132   changed ljmp to sjmp
 177                             177 ; Peephole 199   optimized misc jump sequence
 178    0085 BD 2B 0E            178         cjne r5,#0x2b,00131$
 179                             179 ; Peephole 201   removed redundant sjmp
 180    0088                     180 00142$:
 181    0088                     181 00143$:
 182    0088                     182 00110$:
 183    0088 90s00r00            183         mov     dptr,#_atoi_s_1_1
 184    008B 74 01               184         mov     a,#0x01
 185    008D 2A                  185         add     a,r2
 186    008E F0                  186         movx    @dptr,a
 187                             187 ; Peephole 180   changed mov to clr
 188    008F E4                  188         clr  a
 189    0090 3B                  189         addc    a,r3
 190    0091 A3                  190         inc     dptr
 191    0092 F0                  191         movx    @dptr,a
 192    0093 A3                  192         inc     dptr
 193    0094 EC                  193         mov     a,r4
 194    0095 F0                  194         movx    @dptr,a
 195                             195 ;       _atoi.c 42
 196    0096                     196 00131$:
 197    0096 90s00r00            197         mov     dptr,#_atoi_s_1_1
 198    0099 E0                  198         movx    a,@dptr
 199    009A FA                  199         mov     r2,a
 200    009B A3                  200         inc     dptr
 201    009C E0                  201         movx    a,@dptr
 202    009D FB                  202         mov     r3,a
 203    009E A3                  203         inc     dptr
 204    009F E0                  204         movx    a,@dptr
 205    00A0 FC                  205         mov     r4,a
 206    00A1                     206 00115$:
 207    00A1 8A 82               207         mov     dpl,r2
 208    00A3 8B 83               208         mov     dph,r3
 209    00A5 8C F0               209         mov     b,r4
 210    00A7 12s00r00            210         lcall   __gptrget
 211                             211 ; Peephole 105   removed redundant mov
 212    00AA FD                  212         mov  r5,a
 213    00AB 70 03               213         jnz     00144$
 214    00AD 02s01r22            214         ljmp    00117$
 215    00B0                     215 00144$:
 216    00B0 C3                  216         clr     c
 217    00B1 ED                  217         mov     a,r5
 218    00B2 64 80               218         xrl     a,#0x80
 219    00B4 94 B0               219         subb    a,#0xb0
 220    00B6 50 03               220         jnc     00145$
 221    00B8 02s01r22            221         ljmp    00117$
 222    00BB                     222 00145$:
 223    00BB C3                  223         clr     c
 224                             224 ; Peephole 159   avoided xrl during execution
 225    00BC 74 B9               225         mov  a,#(0x39 ^ 0x80)
 226    00BE 8D F0               226         mov     b,r5
 227    00C0 63 F0 80            227         xrl     b,#0x80
 228    00C3 95 F0               228         subb    a,b
 229    00C5 50 03               229         jnc     00146$
 230    00C7 02s01r22            230         ljmp    00117$
 231    00CA                     231 00146$:
 232                             232 ;       _atoi.c 43
 233    00CA 90s00r03            233         mov     dptr,#_atoi_rv_1_1
 234    00CD E0                  234         movx    a,@dptr
 235    00CE FF                  235         mov     r7,a
 236    00CF A3                  236         inc     dptr
 237    00D0 E0                  237         movx    a,@dptr
 238    00D1 F8                  238         mov     r0,a
 239    00D2 90s00r00            239         mov     dptr,#__mulsint_PARM_2
 240    00D5 E4                  240         clr     a
 241    00D6 A3                  241         inc     dptr
 242    00D7 F0                  242         movx    @dptr,a
 243    00D8 12s00r00            243         lcall   __decdptr
 244    00DB 74 0A               244         mov     a,#0x0a
 245    00DD F0                  245         movx    @dptr,a
 246    00DE C0 02               246         push    ar2
 247    00E0 C0 03               247         push    ar3
 248    00E2 C0 04               248         push    ar4
 249    00E4 C0 05               249         push    ar5
 250    00E6 C0 06               250         push    ar6
 251    00E8 8F 82               251         mov     dpl,r7
 252    00EA 88 83               252         mov     dph,r0
 253    00EC 12s00r00            253         lcall   __mulsint
 254    00EF AF 82               254         mov     r7,dpl
 255    00F1 A8 83               255         mov     r0,dph
 256    00F3 D0 06               256         pop     ar6
 257    00F5 D0 05               257         pop     ar5
 258    00F7 D0 04               258         pop     ar4
 259    00F9 D0 03               259         pop     ar3
 260    00FB D0 02               260         pop     ar2
 261    00FD ED                  261         mov     a,r5
 262    00FE 24 D0               262         add     a,#0xd0
 263    0100 FD                  263         mov     r5,a
 264                             264 ; Peephole 180   changed mov to clr
 265    0101 E4                  265         clr  a
 266    0102 34 FF               266         addc    a,#0xff
 267    0104 F9                  267         mov     r1,a
 268    0105 90s00r03            268         mov     dptr,#_atoi_rv_1_1
 269    0108 ED                  269         mov     a,r5
 270    0109 2F                  270         add     a,r7
 271    010A F0                  271         movx    @dptr,a
 272    010B E9                  272         mov     a,r1
 273    010C 38                  273         addc    a,r0
 274    010D A3                  274         inc     dptr
 275    010E F0                  275         movx    @dptr,a
 276                             276 ;       _atoi.c 44
 277    010F 0A                  277         inc     r2
 278    0110 BA 00 01            278         cjne    r2,#0x00,00147$
 279    0113 0B                  279         inc     r3
 280    0114                     280 00147$:
 281    0114 90s00r00            281         mov     dptr,#_atoi_s_1_1
 282    0117 EA                  282         mov     a,r2
 283    0118 F0                  283         movx    @dptr,a
 284    0119 A3                  284         inc     dptr
 285    011A EB                  285         mov     a,r3
 286    011B F0                  286         movx    @dptr,a
 287    011C A3                  287         inc     dptr
 288    011D EC                  288         mov     a,r4
 289    011E F0                  289         movx    @dptr,a
 290    011F 02s00rA1            290         ljmp    00115$
 291    0122                     291 00117$:
 292                             292 ;       _atoi.c 47
 293    0122 90s00r00            293         mov     dptr,#_atoi_s_1_1
 294    0125 EA                  294         mov     a,r2
 295    0126 F0                  295         movx    @dptr,a
 296    0127 A3                  296         inc     dptr
 297    0128 EB                  297         mov     a,r3
 298    0129 F0                  298         movx    @dptr,a
 299    012A A3                  299         inc     dptr
 300    012B EC                  300         mov     a,r4
 301    012C F0                  301         movx    @dptr,a
 302    012D EE                  302         mov     a,r6
 303                             303 ; Peephole 110   removed ljmp by inverse jump logic
 304    012E 60 11               304         jz  00120$
 305    0130                     305 00148$:
 306    0130 90s00r03            306         mov     dptr,#_atoi_rv_1_1
 307    0133 E0                  307         movx    a,@dptr
 308    0134 FA                  308         mov     r2,a
 309    0135 A3                  309         inc     dptr
 310    0136 E0                  310         movx    a,@dptr
 311    0137 FB                  311         mov     r3,a
 312    0138 C3                  312         clr     c
 313    0139 E4                  313         clr     a
 314    013A 9A                  314         subb    a,r2
 315    013B FA                  315         mov     r2,a
 316    013C E4                  316         clr     a
 317    013D 9B                  317         subb    a,r3
 318    013E FB                  318         mov     r3,a
 319                             319 ; Peephole 132   changed ljmp to sjmp
 320    013F 80 08               320         sjmp 00121$
 321    0141                     321 00120$:
 322    0141 90s00r03            322         mov     dptr,#_atoi_rv_1_1
 323    0144 E0                  323         movx    a,@dptr
 324    0145 FA                  324         mov     r2,a
 325    0146 A3                  325         inc     dptr
 326    0147 E0                  326         movx    a,@dptr
 327    0148 FB                  327         mov     r3,a
 328    0149                     328 00121$:
 329    0149 8A 82               329         mov     dpl,r2
 330    014B 8B 83               330         mov     dph,r3
 331    014D                     331 00118$:
 332                     014D    332         C$_atoi.c$48$1$1 ==.
 333                     014D    333         XG$atoi$0$0 ==.
 334    014D 22                  334         ret
 335                             335         .area   CSEG    (CODE)