|
|
1.1 ! root 1: #ifdef LIBC_SCCS ! 2: .asciz "@(#)subf.s 1.1 (Berkeley/CCI) 7/2/86" ! 3: #endif LIBC_SCCS ! 4: ! 5: #include <tahoemath/fp.h> ! 6: #include "DEFS.h" ! 7: ! 8: XENTRY(subf, R2|R3|R4|R5|R6|R7|R8|R9) ! 9: clrl r1 ! 10: pushl 12(fp) ! 11: callf $8,Xnegf ! 12: pushl r1 ! 13: pushl r0 ! 14: pushl 8(fp) ! 15: pushl 4(fp) ! 16: callf $20,Xaddf ! 17: ret
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.