Files
Digital-Research-Source-Code/CPM OPERATING SYSTEMS/CPM 68K/1.0X SOURCES/v102a/libf/fpadd.s
Sepp J Morris 31738079c4 Upload
Digital Research
2020-11-06 18:50:37 +01:00

28 lines
383 B
ArmAsm

*
* Floating Point Addition :
* Front End to FFP Floating Point Package.
*
* double
* fpadd(addend,adder)
* double addend, adder;
*
* Returns : Sum of two floating point numbers
*
.globl fpadd
.globl _fpadd
.globl ffpadd
.text
fpadd:
_fpadd:
~~fpadd:
link r14,#-4
movem.l d3-d7,-(sp)
move.l 8(r14),r7
move.l 12(r14),r6
jsr ffpadd
move.l r7,r0
movem.l (sp)+,d3-d7
unlk r14
rts