muldi3.s revision 1.7 1 1.7 martin /* $NetBSD: muldi3.s,v 1.7 2008/04/28 20:23:13 martin Exp $ */
2 1.2 is
3 1.2 is /*-
4 1.3 is * Copyright (c) 1996 The NetBSD Foundation, Inc.
5 1.2 is * All rights reserved.
6 1.1 is *
7 1.2 is * This code is derived from software contributed to The NetBSD Foundation
8 1.2 is * by Ignatios Souvatzis.
9 1.1 is *
10 1.1 is * Redistribution and use in source and binary forms, with or without
11 1.1 is * modification, are permitted provided that the following conditions
12 1.1 is * are met:
13 1.1 is * 1. Redistributions of source code must retain the above copyright
14 1.1 is * notice, this list of conditions and the following disclaimer.
15 1.1 is * 2. Redistributions in binary form must reproduce the above copyright
16 1.1 is * notice, this list of conditions and the following disclaimer in the
17 1.1 is * documentation and/or other materials provided with the distribution.
18 1.1 is *
19 1.2 is * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20 1.2 is * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21 1.2 is * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22 1.2 is * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23 1.2 is * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24 1.2 is * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25 1.2 is * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26 1.2 is * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27 1.2 is * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28 1.2 is * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29 1.2 is * POSSIBILITY OF SUCH DAMAGE.
30 1.1 is */
31 1.4 is #include <machine/asm.h>
32 1.1 is
33 1.4 is ENTRY_NOPROFILE(__muldi3)
34 1.6 mhitch movml %d2/%d3/%d4/%d5/%d6,%sp@- | 0..4 regs, 5 %pc, 6..9 parameters
35 1.6 mhitch movml %sp@(24),%d2-%d5
36 1.5 is | movl %sp@(24),%d2
37 1.5 is | movl %sp@(28),%d3
38 1.5 is | movl %sp@(32),%d4
39 1.5 is | movl %sp@(36),%d5
40 1.5 is movq #0,%d0
41 1.5 is movq #0,%d1
42 1.5 is movq #63,%d6
43 1.1 is L4:
44 1.5 is asrl #1,%d2
45 1.5 is roxrl #1,%d3
46 1.1 is jcc L5
47 1.6 mhitch addl %d5,%d1
48 1.6 mhitch addxl %d4,%d0
49 1.1 is L5:
50 1.6 mhitch addl %d5,%d5
51 1.6 mhitch addxl %d4,%d4
52 1.1 is L7:
53 1.5 is dbra %d6,L4
54 1.6 mhitch movml %sp@+,%d2/%d3/%d4/%d5/%d6
55 1.1 is rts
56