home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
back2roots/padua
/
padua.7z
/
padua
/
ftp.vapor.com
/
microdot-1
/
md1_src_02.lzx
/
sasum.a
< prev
next >
Wrap
Text File
|
1989-08-24
|
380b
|
37 lines
;
; 68020++ replacement for SAS/C __CX??? integer math functions
;
section "text",code
xdef __UCXD22
xdef __CXD22
__CXD22:
__UCXD22:
divu.l d0,d1:d0
rts
xdef __UCXD33
xdef __CXD33
__CXD33:
__UCXD33:
divs.l d0,d1:d0
rts
xdef __UCXM22
xdef __CXM22
__CXM22:
__UCXM22:
mulu.l d0,d1:d0
rts
xdef __UCXM33
xdef __CXM33
__CXM33:
__UCXM33:
muls.l d0,d1:d0
rts
END