]> git.ipfire.org Git - thirdparty/glibc.git/blame - ports/sysdeps/alpha/divl.S
Update copyright notices with scripts/update-copyrights
[thirdparty/glibc.git] / ports / sysdeps / alpha / divl.S
CommitLineData
d4697bc9 1/* Copyright (C) 2004-2014 Free Software Foundation, Inc.
08e3c578 2 This file is part of the GNU C Library.
a424e418 3
08e3c578
RH
4 The GNU C Library is free software; you can redistribute it and/or
5 modify it under the terms of the GNU Lesser General Public
6 License as published by the Free Software Foundation; either
7 version 2.1 of the License, or (at your option) any later version.
8
9 The GNU C Library is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 Lesser General Public License for more details.
13
14 You should have received a copy of the GNU Lesser General Public
ab84e3ff
PE
15 License along with the GNU C Library. If not, see
16 <http://www.gnu.org/licenses/>. */
08e3c578
RH
17
18#include "div_libc.h"
19
20/* 32-bit signed int divide. This is not a normal C function. Argument
21 registers are t10 and t11, the result goes in t12. Only t12 and AT may
22 be clobbered.
23
a61c91b0
RH
24 The FPU can handle all input values except zero. Whee!
25
26 The FPCR save/restore is due to the fact that the EV6 _will_ set FPCR_INE
27 for cvttq/c even without /sui being set. It will not, however, properly
28 raise the exception, so we don't have to worry about FPCR_INED being clear
29 and so dying by SIGFPE. */
08e3c578
RH
30
31#ifndef EXTEND
32#define EXTEND(S,D) sextl S, D
33#endif
34
35 .text
36 .align 4
37 .globl __divl
685896ef 38 .type __divl, @funcnoplt
08e3c578
RH
39 .usepv __divl, no
40
41 cfi_startproc
42 cfi_return_column (RA)
43__divl:
44 lda sp, -FRAME(sp)
45 cfi_def_cfa_offset (FRAME)
46 CALL_MCOUNT
47 stt $f0, 0(sp)
a61c91b0 48 excb
08e3c578 49 beq Y, DIVBYZERO
a61c91b0
RH
50
51 stt $f1, 8(sp)
52 stt $f2, 16(sp)
08e3c578
RH
53 cfi_rel_offset ($f0, 0)
54 cfi_rel_offset ($f1, 8)
a61c91b0
RH
55 cfi_rel_offset ($f2, 16)
56 mf_fpcr $f2
08e3c578
RH
57
58 EXTEND (X, RV)
59 EXTEND (Y, AT)
a61c91b0 60 _ITOFT2 RV, $f0, 24, AT, $f1, 32
08e3c578
RH
61 cvtqt $f0, $f0
62 cvtqt $f1, $f1
08e3c578
RH
63 divt/c $f0, $f1, $f0
64 cvttq/c $f0, $f0
a61c91b0
RH
65 excb
66 mt_fpcr $f2
67 _FTOIT $f0, RV, 24
08e3c578 68
de47cb70 69 ldt $f0, 0(sp)
08e3c578 70 ldt $f1, 8(sp)
a61c91b0 71 ldt $f2, 16(sp)
08e3c578
RH
72 lda sp, FRAME(sp)
73 cfi_restore ($f0)
74 cfi_restore ($f1)
a61c91b0 75 cfi_restore ($f2)
08e3c578 76 cfi_def_cfa_offset (0)
de47cb70 77 sextl RV, RV
08e3c578
RH
78 ret $31, (RA), 1
79
80 cfi_endproc
81 .size __divl, .-__divl
82
83 DO_DIVBYZERO