1
0
mirror of https://github.com/cahirwpz/libnix.git synced 2025-12-08 14:58:56 +00:00
Files
amiga-libnix2/sources/nix13/math/__mulsi3.c
2014-01-05 20:02:29 +01:00

26 lines
362 B
C

asm(
" .globl ___mulsi3;"
/* D0 = D0 * D1 */
"___mulsi3: moveml sp@(4),d0/d1;"
" movel d3,sp@-;"
" movel d2,sp@-;"
" movew d1,d2;"
" mulu d0,d2;"
" movel d1,d3;"
" swap d3;"
" mulu d0,d3;"
" swap d3;"
" clrw d3;"
" addl d3,d2;"
" swap d0;"
" mulu d1,d0;"
" swap d0;"
" clrw d0;"
" addl d2,d0;"
" movel sp@+,d2;"
" movel sp@+,d3;"
" rts;"
);