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

   1                               1 ;--------------------------------------------------------
   2                               2 ; File Created by SDCC : FreeWare ANSI-C Compiler
   3                               3 ; Version 2.1.9Ga Sun Jan 16 17:31:28 2000
   4                               4
   5                               5 ;--------------------------------------------------------
   6                               6         .module _fssub
   7                               7 ;--------------------------------------------------------
   8                               8 ; publics variables in this module
   9                               9 ;--------------------------------------------------------
  10                              10         .globl ___fssub_PARM_2
  11                              11         .globl ___fssub
  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                              22 ;--------------------------------------------------------
  23                              23 ; overlayable items in internal ram
  24                              24 ;--------------------------------------------------------
  25                              25         .area   OSEG    (OVR,DATA)
  26                              26 ;--------------------------------------------------------
  27                              27 ; indirectly addressable internal ram data
  28                              28 ;--------------------------------------------------------
  29                              29         .area   ISEG    (DATA)
  30                              30 ;--------------------------------------------------------
  31                              31 ; bit data
  32                              32 ;--------------------------------------------------------
  33                              33         .area   BSEG    (BIT)
  34                              34 ;--------------------------------------------------------
  35                              35 ; external ram data
  36                              36 ;--------------------------------------------------------
  37                              37         .area   XSEG    (XDATA)
  38    0000                      38 ___fssub_PARM_2:
  39    0000                      39         .ds     0x0004
  40    0004                      40 ___fssub_a1_1_1:
  41    0004                      41         .ds     0x0004
  42    0008                      42 ___fssub_fl1_1_1:
  43    0008                      43         .ds     0x0004
  44    000C                      44 ___fssub_fl2_1_1:
  45    000C                      45         .ds     0x0004
  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$__fssub$0$0 ==.
  55                              55 ;       _fssub.c 81
  56                              56 ;       -----------------------------------------
  57                              57 ;        function __fssub
  58                              58 ;       -----------------------------------------
  59    0000                      59 ___fssub:
  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 ;       _fssub.c 96
  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,#___fssub_a1_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 ;       _fssub.c 85
  86    001A 90s00r04             86         mov     dptr,#___fssub_a1_1_1
  87    001D E0                   87         movx    a,@dptr
  88    001E FA                   88         mov     r2,a
  89    001F A3                   89         inc     dptr
  90    0020 E0                   90         movx    a,@dptr
  91    0021 FB                   91         mov     r3,a
  92    0022 A3                   92         inc     dptr
  93    0023 E0                   93         movx    a,@dptr
  94    0024 FC                   94         mov     r4,a
  95    0025 A3                   95         inc     dptr
  96    0026 E0                   96         movx    a,@dptr
  97    0027 FD                   97         mov     r5,a
  98    0028 90s00r08             98         mov     dptr,#(___fssub_fl1_1_1)
  99    002B EA                   99         mov     a,r2
 100    002C F0                  100         movx    @dptr,a
 101    002D A3                  101         inc     dptr
 102    002E EB                  102         mov     a,r3
 103    002F F0                  103         movx    @dptr,a
 104    0030 A3                  104         inc     dptr
 105    0031 EC                  105         mov     a,r4
 106    0032 F0                  106         movx    @dptr,a
 107    0033 A3                  107         inc     dptr
 108    0034 ED                  108         mov     a,r5
 109    0035 F0                  109         movx    @dptr,a
 110                             110 ;       _fssub.c 86
 111    0036 90s00r00            111         mov     dptr,#___fssub_PARM_2
 112    0039 E0                  112         movx    a,@dptr
 113    003A FA                  113         mov     r2,a
 114    003B A3                  114         inc     dptr
 115    003C E0                  115         movx    a,@dptr
 116    003D FB                  116         mov     r3,a
 117    003E A3                  117         inc     dptr
 118    003F E0                  118         movx    a,@dptr
 119    0040 FC                  119         mov     r4,a
 120    0041 A3                  120         inc     dptr
 121    0042 E0                  121         movx    a,@dptr
 122    0043 FD                  122         mov     r5,a
 123    0044 90s00r0C            123         mov     dptr,#(___fssub_fl2_1_1)
 124    0047 EA                  124         mov     a,r2
 125    0048 F0                  125         movx    @dptr,a
 126    0049 A3                  126         inc     dptr
 127    004A EB                  127         mov     a,r3
 128    004B F0                  128         movx    @dptr,a
 129    004C A3                  129         inc     dptr
 130    004D EC                  130         mov     a,r4
 131    004E F0                  131         movx    @dptr,a
 132    004F A3                  132         inc     dptr
 133    0050 ED                  133         mov     a,r5
 134    0051 F0                  134         movx    @dptr,a
 135                             135 ;       _fssub.c 89
 136    0052 90s00r0C            136         mov     dptr,#(___fssub_fl2_1_1)
 137    0055 E0                  137         movx    a,@dptr
 138    0056 FA                  138         mov     r2,a
 139    0057 A3                  139         inc     dptr
 140    0058 E0                  140         movx    a,@dptr
 141    0059 FB                  141         mov     r3,a
 142    005A A3                  142         inc     dptr
 143    005B E0                  143         movx    a,@dptr
 144    005C FC                  144         mov     r4,a
 145    005D A3                  145         inc     dptr
 146    005E E0                  146         movx    a,@dptr
 147    005F FD                  147         mov     r5,a
 148    0060 EA                  148         mov     a,r2
 149    0061 4B                  149         orl     a,r3
 150    0062 4C                  150         orl     a,r4
 151    0063 4D                  151         orl     a,r5
 152                             152 ; Peephole 109   removed ljmp by inverse jump logic
 153    0064 70 17               153         jnz  00102$
 154    0066                     154 00109$:
 155                             155 ;       _fssub.c 90
 156    0066 90s00r08            156         mov     dptr,#(___fssub_fl1_1_1)
 157    0069 E0                  157         movx    a,@dptr
 158    006A FA                  158         mov     r2,a
 159    006B A3                  159         inc     dptr
 160    006C E0                  160         movx    a,@dptr
 161    006D FB                  161         mov     r3,a
 162    006E A3                  162         inc     dptr
 163    006F E0                  163         movx    a,@dptr
 164    0070 FC                  164         mov     r4,a
 165    0071 A3                  165         inc     dptr
 166    0072 E0                  166         movx    a,@dptr
 167                             167 ; Peephole 191   removed redundant mov
 168    0073 FD                  168         mov  r5,a
 169    0074 8A 82               169         mov  dpl,r2
 170    0076 8B 83               170         mov  dph,r3
 171    0078 8C F0               171         mov  b,r4
 172    007A 02s00rFE            172         ljmp    00105$
 173    007D                     173 00102$:
 174                             174 ;       _fssub.c 91
 175    007D 90s00r08            175         mov     dptr,#(___fssub_fl1_1_1)
 176    0080 E0                  176         movx    a,@dptr
 177    0081 FA                  177         mov     r2,a
 178    0082 A3                  178         inc     dptr
 179    0083 E0                  179         movx    a,@dptr
 180    0084 FB                  180         mov     r3,a
 181    0085 A3                  181         inc     dptr
 182    0086 E0                  182         movx    a,@dptr
 183    0087 FC                  183         mov     r4,a
 184    0088 A3                  184         inc     dptr
 185    0089 E0                  185         movx    a,@dptr
 186    008A FD                  186         mov     r5,a
 187    008B EA                  187         mov     a,r2
 188    008C 4B                  188         orl     a,r3
 189    008D 4C                  189         orl     a,r4
 190    008E 4D                  190         orl     a,r5
 191                             191 ; Peephole 109   removed ljmp by inverse jump logic
 192    008F 70 1A               192         jnz  00104$
 193    0091                     193 00110$:
 194                             194 ;       _fssub.c 92
 195    0091 90s00r0C            195         mov     dptr,#(___fssub_fl2_1_1)
 196    0094 E0                  196         movx    a,@dptr
 197    0095 FA                  197         mov     r2,a
 198    0096 A3                  198         inc     dptr
 199    0097 E0                  199         movx    a,@dptr
 200    0098 FB                  200         mov     r3,a
 201    0099 A3                  201         inc     dptr
 202    009A E0                  202         movx    a,@dptr
 203    009B FC                  203         mov     r4,a
 204    009C A3                  204         inc     dptr
 205    009D E0                  205         movx    a,@dptr
 206                             206 ; Peephole 105   removed redundant mov
 207    009E FD                  207         mov  r5,a
 208    009F B2 E7               208         cpl     acc.7
 209                             209 ; Peephole 191   removed redundant mov
 210    00A1 FD                  210         mov  r5,a
 211    00A2 8A 82               211         mov  dpl,r2
 212    00A4 8B 83               212         mov  dph,r3
 213    00A6 8C F0               213         mov  b,r4
 214    00A8 02s00rFE            214         ljmp    00105$
 215    00AB                     215 00104$:
 216                             216 ;       _fssub.c 95
 217    00AB 90s00r0C            217         mov     dptr,#(___fssub_fl2_1_1)
 218    00AE E0                  218         movx    a,@dptr
 219    00AF FA                  219         mov     r2,a
 220    00B0 A3                  220         inc     dptr
 221    00B1 E0                  221         movx    a,@dptr
 222    00B2 FB                  222         mov     r3,a
 223    00B3 A3                  223         inc     dptr
 224    00B4 E0                  224         movx    a,@dptr
 225    00B5 FC                  225         mov     r4,a
 226    00B6 A3                  226         inc     dptr
 227    00B7 E0                  227         movx    a,@dptr
 228    00B8 FD                  228         mov     r5,a
 229    00B9 63 05 80            229         xrl     ar5,#0x80
 230    00BC 90s00r0C            230         mov     dptr,#(___fssub_fl2_1_1)
 231    00BF EA                  231         mov     a,r2
 232    00C0 F0                  232         movx    @dptr,a
 233    00C1 A3                  233         inc     dptr
 234    00C2 EB                  234         mov     a,r3
 235    00C3 F0                  235         movx    @dptr,a
 236    00C4 A3                  236         inc     dptr
 237    00C5 EC                  237         mov     a,r4
 238    00C6 F0                  238         movx    @dptr,a
 239    00C7 A3                  239         inc     dptr
 240    00C8 ED                  240         mov     a,r5
 241    00C9 F0                  241         movx    @dptr,a
 242                             242 ;       _fssub.c 96
 243    00CA 90s00r08            243         mov     dptr,#(___fssub_fl1_1_1)
 244    00CD E0                  244         movx    a,@dptr
 245    00CE FA                  245         mov     r2,a
 246    00CF A3                  246         inc     dptr
 247    00D0 E0                  247         movx    a,@dptr
 248    00D1 FB                  248         mov     r3,a
 249    00D2 A3                  249         inc     dptr
 250    00D3 E0                  250         movx    a,@dptr
 251    00D4 FC                  251         mov     r4,a
 252    00D5 A3                  252         inc     dptr
 253    00D6 E0                  253         movx    a,@dptr
 254    00D7 FD                  254         mov     r5,a
 255    00D8 90s00r0C            255         mov     dptr,#(___fssub_fl2_1_1)
 256    00DB E0                  256         movx    a,@dptr
 257    00DC FE                  257         mov     r6,a
 258    00DD A3                  258         inc     dptr
 259    00DE E0                  259         movx    a,@dptr
 260    00DF FF                  260         mov     r7,a
 261    00E0 A3                  261         inc     dptr
 262    00E1 E0                  262         movx    a,@dptr
 263    00E2 F8                  263         mov     r0,a
 264    00E3 A3                  264         inc     dptr
 265    00E4 E0                  265         movx    a,@dptr
 266    00E5 F9                  266         mov     r1,a
 267    00E6 90s00r00            267         mov     dptr,#___fsadd_PARM_2
 268    00E9 EE                  268         mov     a,r6
 269    00EA F0                  269         movx    @dptr,a
 270    00EB A3                  270         inc     dptr
 271    00EC EF                  271         mov     a,r7
 272    00ED F0                  272         movx    @dptr,a
 273    00EE A3                  273         inc     dptr
 274    00EF E8                  274         mov     a,r0
 275    00F0 F0                  275         movx    @dptr,a
 276    00F1 A3                  276         inc     dptr
 277    00F2 E9                  277         mov     a,r1
 278    00F3 F0                  278         movx    @dptr,a
 279    00F4 8A 82               279         mov     dpl,r2
 280    00F6 8B 83               280         mov     dph,r3
 281    00F8 8C F0               281         mov     b,r4
 282    00FA ED                  282         mov     a,r5
 283    00FB 12s00r00            283         lcall   ___fsadd
 284                     00FE    284         C$_fssub.c$97$1$1 ==.
 285                     00FE    285         XG$__fssub$0$0 ==.
 286                             286 ; Peephole 156   removed misc moves via dph, dpl, b, a before return
 287    00FE                     287 00105$:
 288    00FE 22                  288         ret
 289                             289         .area   CSEG    (CODE)