Aquila-Consortium/libsharp2
0
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

cleanup

Browse source
This commit is contained in:
Martin Reinecke 2019-01-21 11:30:05 +01:00
parent e231a0e184
commit 7ef585e3bb
8 changed files with 20 additions and 55 deletions
Download patch file Download diff file Expand all files Collapse all files

6
libsharp/sharp_core.c
View file

@ -1,9 +1,7 @@
#define XCONCATX(a,b) a##_##b
#define XCONCATX2(a,b) XCONCATX(a,b)
#define XARCH(a) XCONCATX2(a,ARCH)
#define ARCH default
#define GENERIC_ARCH
#include "sharp_core_inc.c"
#undef GENERIC_ARCH
#undef ARCH
typedef void (*t_inner_loop) (sharp_job *job, const int *ispair,

8
libsharp/sharp_core_avx.c
View file

@ -1,8 +0,0 @@
#ifdef MULTIARCH
#define XCONCATX(a,b) a##_##b
#define XCONCATX2(a,b) XCONCATX(a,b)
#define XARCH(a) XCONCATX2(a,ARCH)
#define ARCH avx
#include "sharp_core_inc.c"
#endif

8
libsharp/sharp_core_avx2.c
View file

@ -1,8 +0,0 @@
#ifdef MULTIARCH
#define XCONCATX(a,b) a##_##b
#define XCONCATX2(a,b) XCONCATX(a,b)
#define XARCH(a) XCONCATX2(a,ARCH)
#define ARCH avx2
#include "sharp_core_inc.c"
#endif

8
libsharp/sharp_core_avx512f.c
View file

@ -1,8 +0,0 @@
#ifdef MULTIARCH
#define XCONCATX(a,b) a##_##b
#define XCONCATX2(a,b) XCONCATX(a,b)
#define XARCH(a) XCONCATX2(a,ARCH)
#define ARCH avx512f
#include "sharp_core_inc.c"
#endif

8
libsharp/sharp_core_fma.c
View file

@ -1,8 +0,0 @@
#ifdef MULTIARCH
#define XCONCATX(a,b) a##_##b
#define XCONCATX2(a,b) XCONCATX(a,b)
#define XARCH(a) XCONCATX2(a,ARCH)
#define ARCH fma
#include "sharp_core_inc.c"
#endif

8
libsharp/sharp_core_fma4.c
View file

@ -1,8 +0,0 @@
#ifdef MULTIARCH
#define XCONCATX(a,b) a##_##b
#define XCONCATX2(a,b) XCONCATX(a,b)
#define XARCH(a) XCONCATX2(a,ARCH)
#define ARCH fma4
#include "sharp_core_inc.c"
#endif

8
libsharp/sharp_core_inc.c
View file

@ -29,6 +29,12 @@
* \author Martin Reinecke
*/
#if (defined(MULTIARCH) || defined(GENERIC_ARCH))
#define XCONCATX(a,b) a##_##b
#define XCONCATX2(a,b) XCONCATX(a,b)
#define XARCH(a) XCONCATX2(a,ARCH)
#include <complex.h>
#include <math.h>
#include <string.h>
@ -1179,3 +1185,5 @@ const char *XARCH(sharp_architecture)(void)
{
return xstr(ARCH);
}
#endif