003 File Manager
Current Path:
/usr/src/lib/msun/ld80
usr
/
src
/
lib
/
msun
/
ld80
/
📁
..
📄
e_lgammal_r.c
(11.57 KB)
📄
e_powl.c
(13.02 KB)
📄
e_rem_pio2l.h
(4.33 KB)
📄
invtrig.c
(2.74 KB)
📄
invtrig.h
(3.19 KB)
📄
k_cosl.c
(2.78 KB)
📄
k_expl.h
(11.63 KB)
📄
k_sinl.c
(1.9 KB)
📄
k_tanl.c
(4.01 KB)
📄
s_erfl.c
(11.39 KB)
📄
s_exp2l.c
(10.58 KB)
📄
s_expl.c
(8.14 KB)
📄
s_logl.c
(26.7 KB)
📄
s_nanl.c
(1.68 KB)
Editing: s_nanl.c
/*- * SPDX-License-Identifier: BSD-2-Clause-FreeBSD * * Copyright (c) 2007 David Schultz * All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * * THIS SOFTWARE IS PROVIDED BY AUTHOR AND CONTRIBUTORS ``AS IS'' AND * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE * ARE DISCLAIMED. IN NO EVENT SHALL AUTHOR OR CONTRIBUTORS BE LIABLE * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF * SUCH DAMAGE. * * $FreeBSD$ */ #include <math.h> #include "fpmath.h" #include "../src/math_private.h" long double nanl(const char *s) { union { union IEEEl2bits ieee; uint32_t bits[3]; } u; _scan_nan(u.bits, 3, s); u.ieee.bits.exp = 0x7fff; u.ieee.bits.manh |= 0xc0000000; /* make it a quiet NaN */ return (u.ieee.e); }
Upload File
Create Folder