|  | /* e_gammaf_r.c -- float version of e_gamma_r.c. | 
|  | * Conversion to float by Ian Lance Taylor, Cygnus Support, ian@cygnus.com. | 
|  | */ | 
|  |  | 
|  | /* | 
|  | * ==================================================== | 
|  | * Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved. | 
|  | * | 
|  | * Developed at SunPro, a Sun Microsystems, Inc. business. | 
|  | * Permission to use, copy, modify, and distribute this | 
|  | * software is freely granted, provided that this notice | 
|  | * is preserved. | 
|  | * ==================================================== | 
|  | */ | 
|  |  | 
|  | #ifndef lint | 
|  | static char rcsid[] = "$FreeBSD: src/lib/msun/src/e_gammaf_r.c,v 1.7 2002/05/28 18:15:03 alfred Exp $"; | 
|  | #endif | 
|  |  | 
|  | /* __ieee754_gammaf_r(x, signgamp) | 
|  | * Reentrant version of the logarithm of the Gamma function | 
|  | * with user provide pointer for the sign of Gamma(x). | 
|  | * | 
|  | * Method: See __ieee754_lgammaf_r | 
|  | */ | 
|  |  | 
|  | #include "math.h" | 
|  | #include "math_private.h" | 
|  |  | 
|  | float | 
|  | __ieee754_gammaf_r(float x, int *signgamp) | 
|  | { | 
|  | return __ieee754_lgammaf_r(x,signgamp); | 
|  | } |