1*c47c40fbSnia /* $NetBSD: qp.c,v 1.4 2022/10/05 10:28:19 nia Exp $ */
2beb9c6d1Smatt
3beb9c6d1Smatt /*-
4beb9c6d1Smatt * Copyright (c) 2014 The NetBSD Foundation, Inc.
5beb9c6d1Smatt * All rights reserved.
6beb9c6d1Smatt *
7beb9c6d1Smatt * This code is derived from software contributed to The NetBSD Foundation
8beb9c6d1Smatt * by Matt Thomas of 3am Software Foundry.
9beb9c6d1Smatt *
10beb9c6d1Smatt * Redistribution and use in source and binary forms, with or without
11beb9c6d1Smatt * modification, are permitted provided that the following conditions
12beb9c6d1Smatt * are met:
13beb9c6d1Smatt * 1. Redistributions of source code must retain the above copyright
14beb9c6d1Smatt * notice, this list of conditions and the following disclaimer.
15beb9c6d1Smatt * 2. Redistributions in binary form must reproduce the above copyright
16beb9c6d1Smatt * notice, this list of conditions and the following disclaimer in the
17beb9c6d1Smatt * documentation and/or other materials provided with the distribution.
18beb9c6d1Smatt *
19beb9c6d1Smatt * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20beb9c6d1Smatt * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21beb9c6d1Smatt * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22beb9c6d1Smatt * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23beb9c6d1Smatt * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24beb9c6d1Smatt * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25beb9c6d1Smatt * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26beb9c6d1Smatt * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27beb9c6d1Smatt * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28beb9c6d1Smatt * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29beb9c6d1Smatt * POSSIBILITY OF SUCH DAMAGE.
30beb9c6d1Smatt */
31beb9c6d1Smatt #include <sys/cdefs.h>
32beb9c6d1Smatt
33beb9c6d1Smatt #include "milieu.h"
34beb9c6d1Smatt #include "softfloat.h"
35beb9c6d1Smatt
36beb9c6d1Smatt /*
37beb9c6d1Smatt * This file provides wrappers for the softfloat functions. We can't use
38beb9c6d1Smatt * invoke them directly since long double arguments are passed in FP/SIMD
39beb9c6d1Smatt * as well as being returned in them while float128 arguments are passed
40beb9c6d1Smatt * in normal registers.
41*c47c40fbSnia *
42*c47c40fbSnia * XXX: we're using compiler_rt for this now. Only one function remains
43*c47c40fbSnia * that is missing from compiler_rt.
44beb9c6d1Smatt */
45beb9c6d1Smatt
46beb9c6d1Smatt long double __negtf2(long double);
47beb9c6d1Smatt
48beb9c6d1Smatt union sf_ieee_flt_u {
49beb9c6d1Smatt float fltu_f;
50beb9c6d1Smatt float32 fltu_f32;
51beb9c6d1Smatt };
52beb9c6d1Smatt
53beb9c6d1Smatt union sf_ieee_dbl_u {
54beb9c6d1Smatt double dblu_d;
55beb9c6d1Smatt float64 dblu_f64;
56beb9c6d1Smatt };
57beb9c6d1Smatt
58beb9c6d1Smatt union sf_ieee_ldbl_u {
59beb9c6d1Smatt long double ldblu_ld;
60beb9c6d1Smatt float128 ldblu_f128;
61beb9c6d1Smatt };
62beb9c6d1Smatt
63beb9c6d1Smatt long double
__negtf2(long double ld_a)64beb9c6d1Smatt __negtf2(long double ld_a)
65beb9c6d1Smatt {
66beb9c6d1Smatt const union sf_ieee_ldbl_u zero = { .ldblu_ld = 0.0 };
67beb9c6d1Smatt const union sf_ieee_ldbl_u a = { .ldblu_ld = ld_a };
68beb9c6d1Smatt const union sf_ieee_ldbl_u b = {
69beb9c6d1Smatt .ldblu_f128 = float128_div(zero.ldblu_f128, a.ldblu_f128)
70beb9c6d1Smatt };
71beb9c6d1Smatt
72beb9c6d1Smatt return b.ldblu_ld;
73beb9c6d1Smatt }
74