added concrete implementations of putc(), getc(), getchar() and gets()
[tangerine.git] / arch / .unmaintained / m68k-native / clib / __mulsi3.s
blobf09edf214aa3499dbec6139b3f5f699b620b3492
1 | $Id$
3 | Code taken from libnix
6 .globl ___mulsi3
8 | D0 = D0 * D1
10 ___mulsi3: moveml sp@(4),d0/d1
11 movel d3,sp@-
12 movel d2,sp@-
13 movew d1,d2
14 mulu d0,d2
15 movel d1,d3
16 swap d3
17 mulu d0,d3
18 swap d3
19 clrw d3
20 addl d3,d2
21 swap d0
22 mulu d1,d0
23 swap d0
24 clrw d0
25 addl d2,d0
26 movel sp@+,d2
27 movel sp@+,d3
28 rts