14f82cb46SDavid Schultz /*-
2*4d846d26SWarner Losh * SPDX-License-Identifier: BSD-2-Clause
35e53a4f9SPedro F. Giffuni *
44f82cb46SDavid Schultz * Copyright (c) 2004 David Schultz <das@FreeBSD.ORG>
54f82cb46SDavid Schultz * All rights reserved.
64f82cb46SDavid Schultz *
74f82cb46SDavid Schultz * Redistribution and use in source and binary forms, with or without
84f82cb46SDavid Schultz * modification, are permitted provided that the following conditions
94f82cb46SDavid Schultz * are met:
104f82cb46SDavid Schultz * 1. Redistributions of source code must retain the above copyright
114f82cb46SDavid Schultz * notice, this list of conditions and the following disclaimer.
124f82cb46SDavid Schultz * 2. Redistributions in binary form must reproduce the above copyright
134f82cb46SDavid Schultz * notice, this list of conditions and the following disclaimer in the
144f82cb46SDavid Schultz * documentation and/or other materials provided with the distribution.
154f82cb46SDavid Schultz *
164f82cb46SDavid Schultz * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
174f82cb46SDavid Schultz * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
184f82cb46SDavid Schultz * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
194f82cb46SDavid Schultz * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
204f82cb46SDavid Schultz * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
214f82cb46SDavid Schultz * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
224f82cb46SDavid Schultz * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
234f82cb46SDavid Schultz * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
244f82cb46SDavid Schultz * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
254f82cb46SDavid Schultz * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
264f82cb46SDavid Schultz * SUCH DAMAGE.
274f82cb46SDavid Schultz */
284f82cb46SDavid Schultz
294f82cb46SDavid Schultz #include <math.h>
304f82cb46SDavid Schultz
314f82cb46SDavid Schultz #include "fpmath.h"
324f82cb46SDavid Schultz
334f82cb46SDavid Schultz long double
fminl(long double x,long double y)344f82cb46SDavid Schultz fminl(long double x, long double y)
354f82cb46SDavid Schultz {
364f82cb46SDavid Schultz union IEEEl2bits u[2];
374f82cb46SDavid Schultz
384f82cb46SDavid Schultz u[0].e = x;
394f82cb46SDavid Schultz mask_nbit_l(u[0]);
404f82cb46SDavid Schultz u[1].e = y;
414f82cb46SDavid Schultz mask_nbit_l(u[1]);
424f82cb46SDavid Schultz
434f82cb46SDavid Schultz /* Check for NaNs to avoid raising spurious exceptions. */
444f82cb46SDavid Schultz if (u[0].bits.exp == 32767 && (u[0].bits.manh | u[0].bits.manl) != 0)
454f82cb46SDavid Schultz return (y);
464f82cb46SDavid Schultz if (u[1].bits.exp == 32767 && (u[1].bits.manh | u[1].bits.manl) != 0)
474f82cb46SDavid Schultz return (x);
484f82cb46SDavid Schultz
494f82cb46SDavid Schultz /* Handle comparisons of signed zeroes. */
504f82cb46SDavid Schultz if (u[0].bits.sign != u[1].bits.sign)
514f82cb46SDavid Schultz return (u[1].bits.sign ? y : x);
524f82cb46SDavid Schultz
534f82cb46SDavid Schultz return (x < y ? x : y);
544f82cb46SDavid Schultz }
55