git.gag.com Git - fw/sdcc/blob - device/lib/_char2fs.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 _char2fs
   7                               7 ;--------------------------------------------------------
   8                               8 ; publics variables in this module
   9                               9 ;--------------------------------------------------------
  10                              10         .globl ___char2fs
  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 ___char2fs_sloc0_1_0:
  22    0000                      22         .ds     0x0002
  23    0002                      23 ___char2fs_sloc1_1_0:
  24    0002                      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 ___char2fs_a_1_1:
  42    0000                      42         .ds     0x0001
  43    0001                      43 ___char2fs_sign_1_1:
  44    0001                      44         .ds     0x0004
  45    0005                      45 ___char2fs_fl_1_1:
  46    0005                      46         .ds     0x0004
  47    0009                      47 ___char2fs_a1_1_1:
  48    0009                      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$__char2fs$0$0 ==.
  58                              58 ;       _char2fs.c 80
  59                              59 ;       -----------------------------------------
  60                              60 ;        function __char2fs
  61                              61 ;       -----------------------------------------
  62    0000                      62 ___char2fs:
  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 ;       _char2fs.c 109
  72    0000 C0 82                72         push    dpl
  73    0002 90s00r00             73         mov     dptr,#___char2fs_a_1_1
  74    0005 D0 E0                74         pop     acc
  75    0007 F0                   75         movx    @dptr,a
  76                              76 ;       _char2fs.c 82
  77    0008 90s00r01             77         mov     dptr,#___char2fs_sign_1_1
  78    000B E4                   78         clr     a
  79    000C A3                   79         inc     dptr
  80    000D A3                   80         inc     dptr
  81    000E A3                   81         inc     dptr
  82    000F F0                   82         movx    @dptr,a
  83    0010 12s00r00             83         lcall   __decdptr
  84    0013 F0                   84         movx    @dptr,a
  85    0014 12s00r00             85         lcall   __decdptr
  86    0017 F0                   86         movx    @dptr,a
  87    0018 12s00r00             87         lcall   __decdptr
  88    001B F0                   88         movx    @dptr,a
  89                              89 ;       _char2fs.c 85
  90    001C 90s00r00             90         mov     dptr,#___char2fs_a_1_1
  91    001F E0                   91         movx    a,@dptr
  92                              92 ; Peephole 105   removed redundant mov
  93    0020 FA                   93         mov  r2,a
  94    0021 33                   94         rlc     a
  95    0022 95 E0                95         subb    a,acc
  96    0024 FB                   96         mov     r3,a
  97    0025 FC                   97         mov     r4,a
  98    0026 FD                   98         mov     r5,a
  99    0027 90s00r09             99         mov     dptr,#___char2fs_a1_1_1
 100    002A EA                  100         mov     a,r2
 101    002B F0                  101         movx    @dptr,a
 102    002C A3                  102         inc     dptr
 103    002D EB                  103         mov     a,r3
 104    002E F0                  104         movx    @dptr,a
 105    002F A3                  105         inc     dptr
 106    0030 EC                  106         mov     a,r4
 107    0031 F0                  107         movx    @dptr,a
 108    0032 A3                  108         inc     dptr
 109    0033 ED                  109         mov     a,r5
 110    0034 F0                  110         movx    @dptr,a
 111                             111 ;       _char2fs.c 87
 112    0035 EA                  112         mov     a,r2
 113    0036 4B                  113         orl     a,r3
 114    0037 4C                  114         orl     a,r4
 115    0038 4D                  115         orl     a,r5
 116                             116 ; Peephole 109   removed ljmp by inverse jump logic
 117    0039 70 23               117         jnz  00102$
 118    003B                     118 00114$:
 119                             119 ;       _char2fs.c 89
 120    003B 90s00r05            120         mov     dptr,#(___char2fs_fl_1_1)
 121                             121 ; Peephole 101   removed redundant mov
 122                             122 ; Peephole 180   changed mov to clr
 123    003E E4                  123         clr  a
 124    003F F0                  124         movx @dptr,a
 125    0040 A3                  125         inc  dptr
 126    0041 F0                  126         movx @dptr,a
 127    0042 A3                  127         inc     dptr
 128                             128 ; Peephole 101   removed redundant mov
 129                             129 ; Peephole 180   changed mov to clr
 130    0043 E4                  130         clr  a
 131    0044 F0                  131         movx @dptr,a
 132    0045 A3                  132         inc  dptr
 133    0046 F0                  133         movx @dptr,a
 134                             134 ;       _char2fs.c 90
 135    0047 90s00r05            135         mov     dptr,#(___char2fs_fl_1_1)
 136    004A E0                  136         movx    a,@dptr
 137    004B FE                  137         mov     r6,a
 138    004C A3                  138         inc     dptr
 139    004D E0                  139         movx    a,@dptr
 140    004E FF                  140         mov     r7,a
 141    004F A3                  141         inc     dptr
 142    0050 E0                  142         movx    a,@dptr
 143    0051 F8                  143         mov     r0,a
 144    0052 A3                  144         inc     dptr
 145    0053 E0                  145         movx    a,@dptr
 146                             146 ; Peephole 191   removed redundant mov
 147    0054 F9                  147         mov  r1,a
 148    0055 8E 82               148         mov  dpl,r6
 149    0057 8F 83               149         mov  dph,r7
 150    0059 88 F0               150         mov  b,r0
 151    005B 02s01r3B            151         ljmp    00108$
 152    005E                     152 00102$:
 153                             153 ;       _char2fs.c 93
 154    005E ED                  154         mov     a,r5
 155                             155 ; Peephole 111   removed ljmp by inverse jump logic
 156    005F 30 E7 21            156         jnb  acc.7,00113$
 157    0062                     157 00115$:
 158                             158 ;       _char2fs.c 95
 159    0062 90s00r01            159         mov     dptr,#___char2fs_sign_1_1
 160                             160 ; Peephole 101   removed redundant mov
 161                             161 ; Peephole 180   changed mov to clr
 162    0065 E4                  162         clr  a
 163    0066 F0                  163         movx @dptr,a
 164    0067 A3                  164         inc  dptr
 165    0068 F0                  165         movx @dptr,a
 166    0069 A3                  166         inc     dptr
 167                             167 ; Peephole 180   changed mov to clr
 168    006A E4                  168         clr  a
 169    006B F0                  169         movx    @dptr,a
 170    006C A3                  170         inc     dptr
 171    006D 74 80               171         mov     a,#0x80
 172    006F F0                  172         movx    @dptr,a
 173                             173 ;       _char2fs.c 96
 174    0070 90s00r09            174         mov     dptr,#___char2fs_a1_1_1
 175    0073 C3                  175         clr     c
 176    0074 E4                  176         clr     a
 177    0075 9A                  177         subb    a,r2
 178    0076 F0                  178         movx    @dptr,a
 179    0077 E4                  179         clr     a
 180    0078 9B                  180         subb    a,r3
 181    0079 A3                  181         inc     dptr
 182    007A F0                  182         movx    @dptr,a
 183    007B E4                  183         clr     a
 184    007C 9C                  184         subb    a,r4
 185    007D A3                  185         inc     dptr
 186    007E F0                  186         movx    @dptr,a
 187    007F E4                  187         clr     a
 188    0080 9D                  188         subb    a,r5
 189    0081 A3                  189         inc     dptr
 190    0082 F0                  190         movx    @dptr,a
 191                             191 ;       _char2fs.c 99
 192    0083                     192 00113$:
 193    0083 E4                  193         clr     a
 194    0084 F5*01               194         mov     (___char2fs_sloc0_1_0 + 1),a
 195    0086 75*00 96            195         mov     ___char2fs_sloc0_1_0,#0x96
 196    0089                     196 00105$:
 197    0089 90s00r09            197         mov     dptr,#___char2fs_a1_1_1
 198    008C E0                  198         movx    a,@dptr
 199    008D FC                  199         mov     r4,a
 200    008E A3                  200         inc     dptr
 201    008F E0                  201         movx    a,@dptr
 202    0090 FD                  202         mov     r5,a
 203    0091 A3                  203         inc     dptr
 204    0092 E0                  204         movx    a,@dptr
 205    0093 FE                  205         mov     r6,a
 206    0094 A3                  206         inc     dptr
 207    0095 E0                  207         movx    a,@dptr
 208    0096 FF                  208         mov     r7,a
 209    0097 C3                  209         clr     c
 210    0098 EC                  210         mov     a,r4
 211    0099 94 00               211         subb    a,#0x00
 212    009B ED                  212         mov     a,r5
 213    009C 94 00               213         subb    a,#0x00
 214    009E EE                  214         mov     a,r6
 215    009F 94 80               215         subb    a,#0x80
 216    00A1 EF                  216         mov     a,r7
 217    00A2 94 00               217         subb    a,#0x00
 218                             218 ; Peephole 108   removed ljmp by inverse jump logic
 219    00A4 50 27               219         jnc  00107$
 220    00A6                     220 00116$:
 221                             221 ;       _char2fs.c 101
 222    00A6 EC                  222         mov     a,r4
 223    00A7 25 E0               223         add     a,acc
 224    00A9 F8                  224         mov     r0,a
 225    00AA ED                  225         mov     a,r5
 226    00AB 33                  226         rlc     a
 227    00AC F9                  227         mov     r1,a
 228    00AD EE                  228         mov     a,r6
 229    00AE 33                  229         rlc     a
 230    00AF FA                  230         mov     r2,a
 231    00B0 EF                  231         mov     a,r7
 232    00B1 33                  232         rlc     a
 233    00B2 FB                  233         mov     r3,a
 234    00B3 90s00r09            234         mov     dptr,#___char2fs_a1_1_1
 235    00B6 E8                  235         mov     a,r0
 236    00B7 F0                  236         movx    @dptr,a
 237    00B8 A3                  237         inc     dptr
 238    00B9 E9                  238         mov     a,r1
 239    00BA F0                  239         movx    @dptr,a
 240    00BB A3                  240         inc     dptr
 241    00BC EA                  241         mov     a,r2
 242    00BD F0                  242         movx    @dptr,a
 243    00BE A3                  243         inc     dptr
 244    00BF EB                  244         mov     a,r3
 245    00C0 F0                  245         movx    @dptr,a
 246                             246 ;       _char2fs.c 102
 247    00C1 15*00               247         dec     ___char2fs_sloc0_1_0
 248    00C3 74 FF               248         mov     a,#0xff
 249    00C5 B5*00 02            249         cjne    a,___char2fs_sloc0_1_0,00117$
 250    00C8 15*01               250         dec     (___char2fs_sloc0_1_0 + 1)
 251    00CA                     251 00117$:
 252    00CA 02s00r89            252         ljmp    00105$
 253    00CD                     253 00107$:
 254                             254 ;       _char2fs.c 105
 255    00CD 53 06 7F            255         anl     ar6,#0x7f
 256                             256 ;       _char2fs.c 107
 257    00D0 AA*00               257         mov     r2,___char2fs_sloc0_1_0
 258    00D2 AB*01               258         mov     r3,(___char2fs_sloc0_1_0 + 1)
 259    00D4 78 00               259         mov     r0,#0x00
 260    00D6 79 00               260         mov     r1,#0x00
 261    00D8 8A*04               261         mov     (___char2fs_sloc1_1_0 + 2),r2
 262    00DA EB                  262         mov     a,r3
 263    00DB 54 01               263         anl     a,#0x01
 264    00DD A2 E0               264         mov     c,acc.0
 265    00DF C5*04               265         xch     a,(___char2fs_sloc1_1_0 + 2)
 266    00E1 13                  266         rrc     a
 267    00E2 C5*04               267         xch     a,(___char2fs_sloc1_1_0 + 2)
 268    00E4 13                  268         rrc     a
 269    00E5 C5*04               269         xch     a,(___char2fs_sloc1_1_0 + 2)
 270    00E7 F5*05               270         mov     (___char2fs_sloc1_1_0 + 3),a
 271    00E9 75*03 00            271         mov     (___char2fs_sloc1_1_0 + 1),#0x00
 272    00EC 75*02 00            272         mov     ___char2fs_sloc1_1_0,#0x00
 273    00EF 90s00r01            273         mov     dptr,#___char2fs_sign_1_1
 274    00F2 E0                  274         movx    a,@dptr
 275    00F3 FA                  275         mov     r2,a
 276    00F4 A3                  276         inc     dptr
 277    00F5 E0                  277         movx    a,@dptr
 278    00F6 FB                  278         mov     r3,a
 279    00F7 A3                  279         inc     dptr
 280    00F8 E0                  280         movx    a,@dptr
 281    00F9 F8                  281         mov     r0,a
 282    00FA A3                  282         inc     dptr
 283    00FB E0                  283         movx    a,@dptr
 284    00FC F9                  284         mov     r1,a
 285    00FD E5*02               285         mov     a,___char2fs_sloc1_1_0
 286    00FF 42 02               286         orl     ar2,a
 287    0101 E5*03               287         mov     a,(___char2fs_sloc1_1_0 + 1)
 288    0103 42 03               288         orl     ar3,a
 289    0105 E5*04               289         mov     a,(___char2fs_sloc1_1_0 + 2)
 290    0107 42 00               290         orl     ar0,a
 291    0109 E5*05               291         mov     a,(___char2fs_sloc1_1_0 + 3)
 292    010B 42 01               292         orl     ar1,a
 293    010D EA                  293         mov     a,r2
 294    010E 42 04               294         orl     ar4,a
 295    0110 EB                  295         mov     a,r3
 296    0111 42 05               296         orl     ar5,a
 297    0113 E8                  297         mov     a,r0
 298    0114 42 06               298         orl     ar6,a
 299    0116 E9                  299         mov     a,r1
 300    0117 42 07               300         orl     ar7,a
 301    0119 90s00r05            301         mov     dptr,#(___char2fs_fl_1_1)
 302    011C EC                  302         mov     a,r4
 303    011D F0                  303         movx    @dptr,a
 304    011E A3                  304         inc     dptr
 305    011F ED                  305         mov     a,r5
 306    0120 F0                  306         movx    @dptr,a
 307    0121 A3                  307         inc     dptr
 308    0122 EE                  308         mov     a,r6
 309    0123 F0                  309         movx    @dptr,a
 310    0124 A3                  310         inc     dptr
 311    0125 EF                  311         mov     a,r7
 312    0126 F0                  312         movx    @dptr,a
 313                             313 ;       _char2fs.c 109
 314    0127 90s00r05            314         mov     dptr,#(___char2fs_fl_1_1)
 315    012A E0                  315         movx    a,@dptr
 316    012B FA                  316         mov     r2,a
 317    012C A3                  317         inc     dptr
 318    012D E0                  318         movx    a,@dptr
 319    012E FB                  319         mov     r3,a
 320    012F A3                  320         inc     dptr
 321    0130 E0                  321         movx    a,@dptr
 322    0131 FC                  322         mov     r4,a
 323    0132 A3                  323         inc     dptr
 324    0133 E0                  324         movx    a,@dptr
 325                             325 ; Peephole 191   removed redundant mov
 326    0134 FD                  326         mov  r5,a
 327    0135 8A 82               327         mov  dpl,r2
 328    0137 8B 83               328         mov  dph,r3
 329    0139 8C F0               329         mov  b,r4
 330    013B                     330 00108$:
 331                     013B    331         C$_char2fs.c$110$1$1 ==.
 332                     013B    332         XG$__char2fs$0$0 ==.
 333    013B 22                  333         ret
 334                             334         .area   CSEG    (CODE)