GNU Linux-libre 4.9.296-gnu1
[releases.git] / arch / sparc / lib / muldi3.S
1 /* Copyright (C) 1989, 1992, 1993, 1994, 1995 Free Software Foundation, Inc.
2
3 This file is part of GNU CC.
4
5 GNU CC is free software; you can redistribute it and/or modify
6 it under the terms of the GNU General Public License as published by
7 the Free Software Foundation; either version 2, or (at your option)
8 any later version.
9
10 GNU CC is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13 GNU General Public License for more details.
14
15 You should have received a copy of the GNU General Public License
16 along with GNU CC; see the file COPYING.  If not, write to
17 the Free Software Foundation, 59 Temple Place - Suite 330,
18 Boston, MA 02111-1307, USA.  */
19
20 #include <asm/export.h>
21         .text
22         .align 4
23         .globl __muldi3
24 __muldi3:
25         save  %sp, -104, %sp
26         wr  %g0, %i1, %y
27         sra  %i3, 0x1f, %g2
28         and  %i1, %g2, %g2
29         andcc  %g0, 0, %g1
30         mulscc  %g1, %i3, %g1
31         mulscc  %g1, %i3, %g1
32         mulscc  %g1, %i3, %g1
33         mulscc  %g1, %i3, %g1
34         mulscc  %g1, %i3, %g1
35         mulscc  %g1, %i3, %g1
36         mulscc  %g1, %i3, %g1
37         mulscc  %g1, %i3, %g1
38         mulscc  %g1, %i3, %g1
39         mulscc  %g1, %i3, %g1
40         mulscc  %g1, %i3, %g1
41         mulscc  %g1, %i3, %g1
42         mulscc  %g1, %i3, %g1
43         mulscc  %g1, %i3, %g1
44         mulscc  %g1, %i3, %g1
45         mulscc  %g1, %i3, %g1
46         mulscc  %g1, %i3, %g1
47         mulscc  %g1, %i3, %g1
48         mulscc  %g1, %i3, %g1
49         mulscc  %g1, %i3, %g1
50         mulscc  %g1, %i3, %g1
51         mulscc  %g1, %i3, %g1
52         mulscc  %g1, %i3, %g1
53         mulscc  %g1, %i3, %g1
54         mulscc  %g1, %i3, %g1
55         mulscc  %g1, %i3, %g1
56         mulscc  %g1, %i3, %g1
57         mulscc  %g1, %i3, %g1
58         mulscc  %g1, %i3, %g1
59         mulscc  %g1, %i3, %g1
60         mulscc  %g1, %i3, %g1
61         mulscc  %g1, %i3, %g1
62         mulscc  %g1, 0, %g1
63         add  %g1, %g2, %l2
64         rd  %y, %o1
65         mov  %o1, %l3
66         mov  %i1, %o0
67         mov  %i2, %o1
68         umul %o0, %o1, %o0
69         mov  %o0, %l0
70         mov  %i0, %o0
71         mov  %i3, %o1
72         umul %o0, %o1, %o0
73         add  %l0, %o0, %l0
74         mov  %l2, %i0
75         add  %l2, %l0, %i0
76         ret 
77         restore  %g0, %l3, %o1
78 EXPORT_SYMBOL(__muldi3)