diff options
| author | Xavier ASUS <xavi92psx@gmail.com> | 2019-10-23 03:38:32 +0200 |
|---|---|---|
| committer | Xavier ASUS <xavi92psx@gmail.com> | 2019-10-23 03:38:32 +0200 |
| commit | 2cece67cb5af0339e4ab1f18b0bce2f0b4e6ebdd (patch) | |
| tree | b2fbf4e99f194213527304c9189abe65c163ac0b /device/lib/stm8/cotf.asm | |
| parent | ed26eb00026800d1d2ff6289627216c7d1f0d459 (diff) | |
| download | sdcc-gas-2cece67cb5af0339e4ab1f18b0bce2f0b4e6ebdd.tar.gz | |
Removed intermediate files
Diffstat (limited to 'device/lib/stm8/cotf.asm')
| -rw-r--r-- | device/lib/stm8/cotf.asm | 115 |
1 files changed, 0 insertions, 115 deletions
diff --git a/device/lib/stm8/cotf.asm b/device/lib/stm8/cotf.asm deleted file mode 100644 index 18c915d..0000000 --- a/device/lib/stm8/cotf.asm +++ /dev/null @@ -1,115 +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, (0x05, sp) - pushw x - ldw x, (0x05, sp) - pushw x - call _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 - call ___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, (0x09, sp) - pushw x - ldw x, (0x09, sp) - pushw x - call ___fslt - addw sp, #8 - tnz a - jreq 00102$ -; ../cotf.c: 46: return -HUGE_VALF; - clrw x - decw x - ldw y, #0xff7f - ret -00102$: -; ../cotf.c: 48: return +HUGE_VALF; - clrw x - decw x - ldw y, #0x7f7f - ret -00105$: -; ../cotf.c: 50: return tancotf(x, 1); - push #0x01 - ldw x, (0x06, sp) - pushw x - ldw x, (0x06, sp) - pushw x - call _tancotf - addw sp, #5 -; ../cotf.c: 51: } - ret - .area CODE - .area CONST - .area INITIALIZER - .area CABS (ABS) |