mirror of
https://github.com/vivier/EMILE.git
synced 2024-11-14 22:04:43 +00:00
27 lines
535 B
ArmAsm
27 lines
535 B
ArmAsm
|
/*
|
||
|
|
*
|
||
|
|
* (c) 2004,2005 Laurent Vivier <LaurentVivier@wanadoo.fr>
|
||
|
|
*
|
||
|
|
* Some parts from libgcc routines for 68000 w/o floating-point hardware.
|
||
|
|
* Copyright (C) 1994, 1996, 1997, 1998 Free Software Foundation, Inc.
|
||
|
|
*
|
||
|
|
*/
|
||
|
|
|
||
|
|
.chip 68000
|
||
|
|
|
||
|
|
.align 2
|
||
|
|
|
||
|
|
.globl __mulsi3
|
||
|
|
__mulsi3:
|
||
|
|
movew %sp@(4), %d0 /* x0 -> %d0 */
|
||
|
|
muluw %sp@(10), %d0 /* x0*y1 */
|
||
|
|
movew %sp@(6), %d1 /* x1 -> %d1 */
|
||
|
|
muluw %sp@(8), %d1 /* x1*y0 */
|
||
|
|
addl %d1, %d0
|
||
|
|
swap %d0
|
||
|
|
clrw %d0
|
||
|
|
movew %sp@(6), %d1 /* x1 -> %d1 */
|
||
|
|
muluw %sp@(10), %d1 /* x1*y1 */
|
||
|
|
addl %d1, %d0
|
||
|
|
rts
|