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

   1                               1 ;--------------------------------------------------------
   2                               2 ; File Created by SDCC : FreeWare ANSI-C Compiler
   3                               3 ; Version 2.1.9Ga Sun Jan 16 17:31:31 2000
   4                               4
   5                               5 ;--------------------------------------------------------
   6                               6         .module _modulong
   7                               7 ;--------------------------------------------------------
   8                               8 ; publics variables in this module
   9                               9 ;--------------------------------------------------------
  10                              10         .globl __modulong_PARM_2
  11                              11         .globl __modulong
  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 ;--------------------------------------------------------
  21                              21         .area   DSEG    (DATA)
  22    0000                      22 __modulong_sloc0_1_0:
  23    0000                      23         .ds     0x0004
  24                              24 ;--------------------------------------------------------
  25                              25 ; overlayable items in internal ram
  26                              26 ;--------------------------------------------------------
  27                              27         .area   OSEG    (OVR,DATA)
  28                              28 ;--------------------------------------------------------
  29                              29 ; indirectly addressable internal ram data
  30                              30 ;--------------------------------------------------------
  31                              31         .area   ISEG    (DATA)
  32                              32 ;--------------------------------------------------------
  33                              33 ; bit data
  34                              34 ;--------------------------------------------------------
  35                              35         .area   BSEG    (BIT)
  36                              36 ;--------------------------------------------------------
  37                              37 ; external ram data
  38                              38 ;--------------------------------------------------------
  39                              39         .area   XSEG    (XDATA)
  40    0000                      40 __modulong_PARM_2:
  41    0000                      41         .ds     0x0004
  42    0004                      42 __modulong_a_1_1:
  43    0004                      43         .ds     0x0004
  44    0008                      44 __modulong_count_1_1:
  45    0008                      45         .ds     0x0001
  46                              46 ;--------------------------------------------------------
  47                              47 ; global & static initialisations
  48                              48 ;--------------------------------------------------------
  49                              49         .area GSINIT (CODE)
  50                              50 ;--------------------------------------------------------
  51                              51 ; code
  52                              52 ;--------------------------------------------------------
  53                              53         .area CSEG (CODE)
  54                     0000     54         G$_modulong$0$0 ==.
  55                              55 ;       _modulong.c 29
  56                              56 ;       -----------------------------------------
  57                              57 ;        function _modulong
  58                              58 ;       -----------------------------------------
  59    0000                      59 __modulong:
  60                     0002     60         ar2 = 0x02
  61                     0003     61         ar3 = 0x03
  62                     0004     62         ar4 = 0x04
  63                     0005     63         ar5 = 0x05
  64                     0006     64         ar6 = 0x06
  65                     0007     65         ar7 = 0x07
  66                     0000     66         ar0 = 0x00
  67                     0001     67         ar1 = 0x01
  68                              68 ;       _modulong.c 51
  69    0000 C0 E0                69         push    acc
  70    0002 C0 F0                70         push    b
  71    0004 C0 83                71         push    dph
  72    0006 C0 82                72         push    dpl
  73    0008 90s00r04             73         mov     dptr,#__modulong_a_1_1
  74    000B D0 E0                74         pop     acc
  75    000D F0                   75         movx    @dptr,a
  76    000E D0 E0                76         pop     acc
  77    0010 A3                   77         inc     dptr
  78    0011 F0                   78         movx    @dptr,a
  79    0012 D0 E0                79         pop     acc
  80    0014 A3                   80         inc     dptr
  81    0015 F0                   81         movx    @dptr,a
  82    0016 D0 E0                82         pop     acc
  83    0018 A3                   83         inc     dptr
  84    0019 F0                   84         movx    @dptr,a
  85                              85 ;       _modulong.c 31
  86    001A 90s00r08             86         mov     dptr,#__modulong_count_1_1
  87                              87 ; Peephole 180   changed mov to clr
  88    001D E4                   88         clr  a
  89    001E F0                   89         movx    @dptr,a
  90                              90 ;       _modulong.c 34
  91    001F 90s00r04             91         mov     dptr,#__modulong_a_1_1
  92    0022 E0                   92         movx    a,@dptr
  93    0023 F5*00                93         mov     __modulong_sloc0_1_0,a
  94    0025 A3                   94         inc     dptr
  95    0026 E0                   95         movx    a,@dptr
  96    0027 F5*01                96         mov     (__modulong_sloc0_1_0 + 1),a
  97    0029 A3                   97         inc     dptr
  98    002A E0                   98         movx    a,@dptr
  99    002B F5*02                99         mov     (__modulong_sloc0_1_0 + 2),a
 100    002D A3                  100         inc     dptr
 101    002E E0                  101         movx    a,@dptr
 102    002F F5*03               102         mov     (__modulong_sloc0_1_0 + 3),a
 103    0031 7E 00               103         mov     r6,#0x00
 104    0033                     104 00103$:
 105    0033 90s00r00            105         mov     dptr,#__modulong_PARM_2
 106    0036 E0                  106         movx    a,@dptr
 107    0037 FF                  107         mov     r7,a
 108    0038 A3                  108         inc     dptr
 109    0039 E0                  109         movx    a,@dptr
 110    003A F8                  110         mov     r0,a
 111    003B A3                  111         inc     dptr
 112    003C E0                  112         movx    a,@dptr
 113    003D F9                  113         mov     r1,a
 114    003E A3                  114         inc     dptr
 115    003F E0                  115         movx    a,@dptr
 116                             116 ; Peephole 105   removed redundant mov
 117    0040 FA                  117         mov  r2,a
 118    0041 23                  118         rl      a
 119    0042 54 01               119         anl     a,#0x01
 120                             120 ; Peephole 105   removed redundant mov
 121    0044 FB                  121         mov  r3,a
 122    0045 60 03               122         jz      00119$
 123    0047 02s00r99            123         ljmp    00117$
 124    004A                     124 00119$:
 125                             125 ;       _modulong.c 35
 126    004A EF                  126         mov     a,r7
 127    004B 25 E0               127         add     a,acc
 128    004D FD                  128         mov     r5,a
 129    004E E8                  129         mov     a,r0
 130    004F 33                  130         rlc     a
 131    0050 FB                  131         mov     r3,a
 132    0051 E9                  132         mov     a,r1
 133    0052 33                  133         rlc     a
 134    0053 FC                  134         mov     r4,a
 135    0054 EA                  135         mov     a,r2
 136    0055 33                  136         rlc     a
 137    0056 FA                  137         mov     r2,a
 138    0057 90s00r00            138         mov     dptr,#__modulong_PARM_2
 139    005A ED                  139         mov     a,r5
 140    005B F0                  140         movx    @dptr,a
 141    005C A3                  141         inc     dptr
 142    005D EB                  142         mov     a,r3
 143    005E F0                  143         movx    @dptr,a
 144    005F A3                  144         inc     dptr
 145    0060 EC                  145         mov     a,r4
 146    0061 F0                  146         movx    @dptr,a
 147    0062 A3                  147         inc     dptr
 148    0063 EA                  148         mov     a,r2
 149    0064 F0                  149         movx    @dptr,a
 150                             150 ;       _modulong.c 36
 151    0065 C3                  151         clr     c
 152    0066 E5*00               152         mov     a,__modulong_sloc0_1_0
 153    0068 9D                  153         subb    a,r5
 154    0069 E5*01               154         mov     a,(__modulong_sloc0_1_0 + 1)
 155    006B 9B                  155         subb    a,r3
 156    006C E5*02               156         mov     a,(__modulong_sloc0_1_0 + 2)
 157    006E 9C                  157         subb    a,r4
 158    006F E5*03               158         mov     a,(__modulong_sloc0_1_0 + 3)
 159    0071 9A                  159         subb    a,r2
 160                             160 ; Peephole 108   removed ljmp by inverse jump logic
 161    0072 50 1C               161         jnc  00102$
 162    0074                     162 00120$:
 163                             163 ;       _modulong.c 38
 164    0074 C3                  164         clr     c
 165    0075 EA                  165         mov     a,r2
 166    0076 13                  166         rrc     a
 167    0077 FA                  167         mov     r2,a
 168    0078 EC                  168         mov     a,r4
 169    0079 13                  169         rrc     a
 170    007A FC                  170         mov     r4,a
 171    007B EB                  171         mov     a,r3
 172    007C 13                  172         rrc     a
 173    007D FB                  173         mov     r3,a
 174    007E ED                  174         mov     a,r5
 175    007F 13                  175         rrc     a
 176                             176 ; Peephole 100   removed redundant mov
 177    0080 FD                  177         mov  r5,a
 178    0081 90s00r00            178         mov  dptr,#__modulong_PARM_2
 179    0084 F0                  179         movx @dptr,a
 180    0085 A3                  180         inc     dptr
 181    0086 EB                  181         mov     a,r3
 182    0087 F0                  182         movx    @dptr,a
 183    0088 A3                  183         inc     dptr
 184    0089 EC                  184         mov     a,r4
 185    008A F0                  185         movx    @dptr,a
 186    008B A3                  186         inc     dptr
 187    008C EA                  187         mov     a,r2
 188    008D F0                  188         movx    @dptr,a
 189                             189 ;       _modulong.c 39
 190                             190 ; Peephole 132   changed ljmp to sjmp
 191    008E 80 09               191         sjmp 00117$
 192    0090                     192 00102$:
 193                             193 ;       _modulong.c 41
 194    0090 0E                  194         inc     r6
 195    0091 90s00r08            195         mov     dptr,#__modulong_count_1_1
 196    0094 EE                  196         mov     a,r6
 197    0095 F0                  197         movx    @dptr,a
 198    0096 02s00r33            198         ljmp    00103$
 199                             199 ;       _modulong.c 44
 200    0099                     200 00117$:
 201    0099 90s00r08            201         mov     dptr,#__modulong_count_1_1
 202    009C E0                  202         movx    a,@dptr
 203    009D F5*00               203         mov     __modulong_sloc0_1_0,a
 204    009F                     204 00108$:
 205                             205 ;       _modulong.c 45
 206    009F 90s00r04            206         mov     dptr,#__modulong_a_1_1
 207    00A2 E0                  207         movx    a,@dptr
 208    00A3 FB                  208         mov     r3,a
 209    00A4 A3                  209         inc     dptr
 210    00A5 E0                  210         movx    a,@dptr
 211    00A6 FC                  211         mov     r4,a
 212    00A7 A3                  212         inc     dptr
 213    00A8 E0                  213         movx    a,@dptr
 214    00A9 FD                  214         mov     r5,a
 215    00AA A3                  215         inc     dptr
 216    00AB E0                  216         movx    a,@dptr
 217    00AC FE                  217         mov     r6,a
 218    00AD 90s00r00            218         mov     dptr,#__modulong_PARM_2
 219    00B0 E0                  219         movx    a,@dptr
 220    00B1 FF                  220         mov     r7,a
 221    00B2 A3                  221         inc     dptr
 222    00B3 E0                  222         movx    a,@dptr
 223    00B4 F8                  223         mov     r0,a
 224    00B5 A3                  224         inc     dptr
 225    00B6 E0                  225         movx    a,@dptr
 226    00B7 F9                  226         mov     r1,a
 227    00B8 A3                  227         inc     dptr
 228    00B9 E0                  228         movx    a,@dptr
 229    00BA FA                  229         mov     r2,a
 230    00BB C3                  230         clr     c
 231    00BC EB                  231         mov     a,r3
 232    00BD 9F                  232         subb    a,r7
 233    00BE EC                  233         mov     a,r4
 234    00BF 98                  234         subb    a,r0
 235    00C0 ED                  235         mov     a,r5
 236    00C1 99                  236         subb    a,r1
 237    00C2 EE                  237         mov     a,r6
 238    00C3 9A                  238         subb    a,r2
 239                             239 ; Peephole 132   changed ljmp to sjmp
 240                             240 ; Peephole 160   removed sjmp by inverse jump logic
 241    00C4 40 13               241         jc   00107$
 242    00C6                     242 00121$:
 243                             243 ;       _modulong.c 46
 244    00C6 90s00r04            244         mov     dptr,#__modulong_a_1_1
 245    00C9 C3                  245         clr     c
 246    00CA EB                  246         mov     a,r3
 247    00CB 9F                  247         subb    a,r7
 248    00CC F0                  248         movx    @dptr,a
 249    00CD EC                  249         mov     a,r4
 250    00CE 98                  250         subb    a,r0
 251    00CF A3                  251         inc     dptr
 252    00D0 F0                  252         movx    @dptr,a
 253    00D1 ED                  253         mov     a,r5
 254    00D2 99                  254         subb    a,r1
 255    00D3 A3                  255         inc     dptr
 256    00D4 F0                  256         movx    @dptr,a
 257    00D5 EE                  257         mov     a,r6
 258    00D6 9A                  258         subb    a,r2
 259    00D7 A3                  259         inc     dptr
 260    00D8 F0                  260         movx    @dptr,a
 261    00D9                     261 00107$:
 262                             262 ;       _modulong.c 48
 263    00D9 90s00r00            263         mov     dptr,#__modulong_PARM_2
 264    00DC E0                  264         movx    a,@dptr
 265    00DD FA                  265         mov     r2,a
 266    00DE A3                  266         inc     dptr
 267    00DF E0                  267         movx    a,@dptr
 268    00E0 FB                  268         mov     r3,a
 269    00E1 A3                  269         inc     dptr
 270    00E2 E0                  270         movx    a,@dptr
 271    00E3 FC                  271         mov     r4,a
 272    00E4 A3                  272         inc     dptr
 273    00E5 E0                  273         movx    a,@dptr
 274                             274 ; Peephole 106   removed redundant mov
 275    00E6 FD                  275         mov  r5,a
 276    00E7 C3                  276         clr  c
 277    00E8 13                  277         rrc     a
 278    00E9 FD                  278         mov     r5,a
 279    00EA EC                  279         mov     a,r4
 280    00EB 13                  280         rrc     a
 281    00EC FC                  281         mov     r4,a
 282    00ED EB                  282         mov     a,r3
 283    00EE 13                  283         rrc     a
 284    00EF FB                  284         mov     r3,a
 285    00F0 EA                  285         mov     a,r2
 286    00F1 13                  286         rrc     a
 287                             287 ; Peephole 100   removed redundant mov
 288    00F2 FA                  288         mov  r2,a
 289    00F3 90s00r00            289         mov  dptr,#__modulong_PARM_2
 290    00F6 F0                  290         movx @dptr,a
 291    00F7 A3                  291         inc     dptr
 292    00F8 EB                  292         mov     a,r3
 293    00F9 F0                  293         movx    @dptr,a
 294    00FA A3                  294         inc     dptr
 295    00FB EC                  295         mov     a,r4
 296    00FC F0                  296         movx    @dptr,a
 297    00FD A3                  297         inc     dptr
 298    00FE ED                  298         mov     a,r5
 299    00FF F0                  299         movx    @dptr,a
 300                             300 ;       _modulong.c 49
 301    0100 AA*00               301         mov     r2,__modulong_sloc0_1_0
 302    0102 15*00               302         dec     __modulong_sloc0_1_0
 303    0104 EA                  303         mov     a,r2
 304    0105 60 03               304         jz      00122$
 305    0107 02s00r9F            305         ljmp    00108$
 306    010A                     306 00122$:
 307                             307 ;       _modulong.c 51
 308    010A 90s00r04            308         mov     dptr,#__modulong_a_1_1
 309    010D E0                  309         movx    a,@dptr
 310    010E FA                  310         mov     r2,a
 311    010F A3                  311         inc     dptr
 312    0110 E0                  312         movx    a,@dptr
 313    0111 FB                  313         mov     r3,a
 314    0112 A3                  314         inc     dptr
 315    0113 E0                  315         movx    a,@dptr
 316    0114 FC                  316         mov     r4,a
 317    0115 A3                  317         inc     dptr
 318    0116 E0                  318         movx    a,@dptr
 319                             319 ; Peephole 191   removed redundant mov
 320    0117 FD                  320         mov  r5,a
 321    0118 8A 82               321         mov  dpl,r2
 322    011A 8B 83               322         mov  dph,r3
 323    011C 8C F0               323         mov  b,r4
 324    011E                     324 00111$:
 325                     011E    325         C$_modulong.c$52$1$1 ==.
 326                     011E    326         XG$_modulong$0$0 ==.
 327    011E 22                  327         ret
 328                             328         .area   CSEG    (CODE)