mirror of
https://github.com/SEPPDROID/Digital-Research-Source-Code.git
synced 2025-10-24 17:04:19 +00:00
Upload
Digital Research
This commit is contained in:
@@ -0,0 +1,26 @@
|
||||
*
|
||||
* 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
|
||||
Reference in New Issue
Block a user