1 /* 2 * CDDL HEADER START 3 * 4 * The contents of this file are subject to the terms of the 5 * Common Development and Distribution License (the "License"). 6 * You may not use this file except in compliance with the License. 7 * 8 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE 9 * or http://www.opensolaris.org/os/licensing. 10 * See the License for the specific language governing permissions 11 * and limitations under the License. 12 * 13 * When distributing Covered Code, include this CDDL HEADER in each 14 * file and include the License file at usr/src/OPENSOLARIS.LICENSE. 15 * If applicable, add the following below this CDDL HEADER, with the 16 * fields enclosed by brackets "[]" replaced with your own identifying 17 * information: Portions Copyright [yyyy] [name of copyright owner] 18 * 19 * CDDL HEADER END 20 */ 21 22 /* 23 * Copyright 2011 Nexenta Systems, Inc. All rights reserved. 24 */ 25 /* 26 * Copyright 2006 Sun Microsystems, Inc. All rights reserved. 27 * Use is subject to license terms. 28 */ 29 30 #if defined(ELFOBJ) 31 #pragma weak fminf = __fminf 32 #endif 33 34 #include "libm.h" /* for islessequal macro */ 35 36 float 37 __fminf(float x, float y) { 38 /* 39 * On SPARC v8plus/v9, this could be implemented as follows 40 * (assuming %f0 = x, %f1 = y, return value left in %f0): 41 * 42 * fcmps %fcc0,%f1,%f1 43 * fmovsu %fcc0,%f0,%f1 44 * fcmps %fcc0,%f0,%f1 45 * fmovsug %fcc0,%f1,%f0 46 * st %f0,[x] 47 * st %f1,[y] 48 * ld [x],%l0 49 * ld [y],%l1 50 * or %l0,%l1,%l2 51 * sethi %hi(0x80000000),%l3 52 * and %l3,%l2,%l2 53 * or %l0,%l2,%l0 54 * st %l0,[x] 55 * ld [x],%f0 56 * 57 * If VIS instructions are available, use this code instead: 58 * 59 * fcmps %fcc0,%f1,%f1 60 * fmovsu %fcc0,%f0,%f1 61 * fcmps %fcc0,%f0,%f1 62 * fmovsug %fcc0,%f1,%f0 63 * fors %f0,%f1,%f2 64 * fzeros %f3 65 * fnegs %f3,%f3 66 * fands %f3,%f2,%f2 67 * fors %f0,%f2,%f0 68 * 69 * If VIS 3.0 instructions are available, use this: 70 * 71 * flcmps %fcc0,%f0,%f1 72 * fmovsge %fcc0,%f1,%f0 ! move if %fcc0 is 0 or 2 73 */ 74 75 union { 76 unsigned i; 77 float f; 78 } xx, yy; 79 unsigned s; 80 81 /* if y is nan, replace it by x */ 82 if (y != y) 83 y = x; 84 85 /* if x is nan, replace it by y */ 86 if (x != x) 87 x = y; 88 89 /* At this point, x and y are either both numeric, or both NaN */ 90 if (!isnan(x) && !islessequal(x, y)) 91 x = y; 92 93 /* 94 * set the sign of the result if either x or y has its sign set 95 */ 96 xx.f = x; 97 yy.f = y; 98 s = (xx.i | yy.i) & 0x80000000; 99 xx.i |= s; 100 101 return (xx.f); 102 } 103