maxjhandsome
/
llvm-project
forked from OSchip/llvm-project
1
0
Fork 0
Code Issues Pull Requests Packages Releases Wiki Activity

math: Implement lgamma 

Just use lgamma_r and ignore the value returned in the second argument

Signed-off-by: Aaron Watry <awatry@gmail.com>
Reviewed-by: Tom Stellard <thomas.stellard@amd.com>
llvm-svn: 281565
This commit is contained in:
Aaron Watry 2016-09-15 00:17:31 +00:00
parent 0ab07e1bde
commit e9009cdd21
5 changed files with 49 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
libclc/generic/include/clc/clc.h
View File

@ -69,6 +69,7 @@
#include <clc/math/hypot.h>
#include <clc/math/ilogb.h>
#include <clc/math/ldexp.h>
#include <clc/math/lgamma.h>
#include <clc/math/lgamma_r.h>
#include <clc/math/log.h>
#include <clc/math/log10.h>

2
libclc/generic/include/clc/math/lgamma.h Normal file
View File

@ -0,0 +1,2 @@
#define __CLC_BODY <clc/math/lgamma.inc>
#include <clc/math/gentype.inc>

1
libclc/generic/include/clc/math/lgamma.inc Normal file
View File

@ -0,0 +1 @@
_CLC_OVERLOAD _CLC_DECL __CLC_GENTYPE lgamma(__CLC_GENTYPE a);

1
libclc/generic/lib/SOURCES
View File

@ -97,6 +97,7 @@ math/hypot.cl
math/ilogb.cl
math/clc_ldexp.cl
math/ldexp.cl
math/lgamma.cl
math/lgamma_r.cl
math/log.cl
math/log10.cl

44
libclc/generic/lib/math/lgamma.cl Normal file
View File

@ -0,0 +1,44 @@
/*
* Copyright (c) 2016 Aaron Watry <awatry@gmail.com>
* Copyright (c) 2014 Advanced Micro Devices, Inc.
*
* Permission is hereby granted, free of charge, to any person obtaining a copy
* of this software and associated documentation files (the "Software"), to deal
* in the Software without restriction, including without limitation the rights
* to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
* copies of the Software, and to permit persons to whom the Software is
* furnished to do so, subject to the following conditions:
*
* The above copyright notice and this permission notice shall be included in
* all copies or substantial portions of the Software.
*
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
* IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
* AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
* LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
* OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
* THE SOFTWARE.
*/
#include <clc/clc.h>
#include "../clcmacro.h"
_CLC_OVERLOAD _CLC_DEF float lgamma(float x) {
int s;
return lgamma_r(x, &s);
}
_CLC_UNARY_VECTORIZE(_CLC_OVERLOAD _CLC_DEF, float, lgamma, float)
#ifdef cl_khr_fp64
#pragma OPENCL EXTENSION cl_khr_fp64 : enable
_CLC_OVERLOAD _CLC_DEF double lgamma(double x) {
int s;
return lgamma_r(x, &s);
}
_CLC_UNARY_VECTORIZE(_CLC_OVERLOAD _CLC_DEF, double, lgamma, double)
#endif