diff options
| author | Xavier ASUS <xavi92psx@gmail.com> | 2019-10-23 03:38:57 +0200 |
|---|---|---|
| committer | Xavier ASUS <xavi92psx@gmail.com> | 2019-10-23 03:38:57 +0200 |
| commit | 4df948b3c184864525e7fa7e26ab380a70d644cd (patch) | |
| tree | 1dcb5d0961ebe374b970bed721d39dae5e6eddd6 /device/lib/stm8-large/cotf.asm | |
| parent | 2cece67cb5af0339e4ab1f18b0bce2f0b4e6ebdd (diff) | |
| download | sdcc-gas-4df948b3c184864525e7fa7e26ab380a70d644cd.tar.gz | |
Removed intermediate files
Diffstat (limited to 'device/lib/stm8-large/cotf.asm')
| -rw-r--r-- | device/lib/stm8-large/cotf.asm | 116 |
1 files changed, 0 insertions, 116 deletions
diff --git a/device/lib/stm8-large/cotf.asm b/device/lib/stm8-large/cotf.asm deleted file mode 100644 index f64a1ff..0000000 --- a/device/lib/stm8-large/cotf.asm +++ /dev/null @@ -1,116 +0,0 @@ -;-------------------------------------------------------- -; File Created by SDCC : free open source ANSI-C Compiler -; Version 3.9.3 #11345 (Linux) -;-------------------------------------------------------- - .module cotf - .optsdcc -mstm8 - -;-------------------------------------------------------- -; Public variables in this module -;-------------------------------------------------------- - .globl _tancotf - .globl _fabsf - .globl _cotf -;-------------------------------------------------------- -; ram data -;-------------------------------------------------------- - .area DATA -;-------------------------------------------------------- -; ram data -;-------------------------------------------------------- - .area INITIALIZED -;-------------------------------------------------------- -; absolute external ram data -;-------------------------------------------------------- - .area DABS (ABS) - -; default segment ordering for linker - .area HOME - .area GSINIT - .area GSFINAL - .area CONST - .area INITIALIZER - .area CODE - -;-------------------------------------------------------- -; global & static initialisations -;-------------------------------------------------------- - .area HOME - .area GSINIT - .area GSFINAL - .area GSINIT -;-------------------------------------------------------- -; Home -;-------------------------------------------------------- - .area HOME - .area HOME -;-------------------------------------------------------- -; code -;-------------------------------------------------------- - .area CODE -; ../cotf.c: 37: float cotf(float x) _FLOAT_FUNC_REENTRANT -; ----------------------------------------- -; function cotf -; ----------------------------------------- -_cotf: -; ../cotf.c: 41: y=fabsf(x); - ldw x, (0x06, sp) - pushw x - ldw x, (0x06, sp) - pushw x - callf _fabsf - addw sp, #4 -; ../cotf.c: 42: if (y<1.0E-30) //This one requires more thinking... - push #0x60 - push #0x42 - push #0xa2 - push #0x0d - pushw x - pushw y - callf ___fslt - addw sp, #8 - tnz a - jreq 00105$ -; ../cotf.c: 44: errno = ERANGE; - ldw x, #0x0022 - ldw _errno+0, x -; ../cotf.c: 45: if (x<0.0) - clrw x - pushw x - clrw x - pushw x - ldw x, (0x0a, sp) - pushw x - ldw x, (0x0a, sp) - pushw x - callf ___fslt - addw sp, #8 - tnz a - jreq 00102$ -; ../cotf.c: 46: return -HUGE_VALF; - clrw x - decw x - ldw y, #0xff7f - jra 00106$ -00102$: -; ../cotf.c: 48: return +HUGE_VALF; - clrw x - decw x - ldw y, #0x7f7f - jra 00106$ -00105$: -; ../cotf.c: 50: return tancotf(x, 1); - push #0x01 - ldw x, (0x07, sp) - pushw x - ldw x, (0x07, sp) - pushw x - callf _tancotf - addw sp, #5 -00106$: -; ../cotf.c: 51: } - retf - .area CODE - .area CONST - .area INITIALIZER - .area CABS (ABS) |