|
| 1 | +#ifndef __CLC_CLC_CONVERT_H__ |
| 2 | +#define __CLC_CLC_CONVERT_H__ |
| 3 | + |
| 4 | +#define _CLC_CONVERT_DECL(FROM_TYPE, TO_TYPE, SUFFIX) \ |
| 5 | + _CLC_OVERLOAD _CLC_DECL TO_TYPE __clc_convert_##TO_TYPE##SUFFIX(FROM_TYPE x); |
| 6 | + |
| 7 | +#define _CLC_VECTOR_CONVERT_DECL(FROM_TYPE, TO_TYPE, SUFFIX) \ |
| 8 | + _CLC_CONVERT_DECL(FROM_TYPE, TO_TYPE, SUFFIX) \ |
| 9 | + _CLC_CONVERT_DECL(FROM_TYPE##2, TO_TYPE##2, SUFFIX) \ |
| 10 | + _CLC_CONVERT_DECL(FROM_TYPE##3, TO_TYPE##3, SUFFIX) \ |
| 11 | + _CLC_CONVERT_DECL(FROM_TYPE##4, TO_TYPE##4, SUFFIX) \ |
| 12 | + _CLC_CONVERT_DECL(FROM_TYPE##8, TO_TYPE##8, SUFFIX) \ |
| 13 | + _CLC_CONVERT_DECL(FROM_TYPE##16, TO_TYPE##16, SUFFIX) |
| 14 | + |
| 15 | +#define _CLC_VECTOR_CONVERT_FROM1(FROM_TYPE, SUFFIX) \ |
| 16 | + _CLC_VECTOR_CONVERT_DECL(FROM_TYPE, char, SUFFIX) \ |
| 17 | + _CLC_VECTOR_CONVERT_DECL(FROM_TYPE, uchar, SUFFIX) \ |
| 18 | + _CLC_VECTOR_CONVERT_DECL(FROM_TYPE, int, SUFFIX) \ |
| 19 | + _CLC_VECTOR_CONVERT_DECL(FROM_TYPE, uint, SUFFIX) \ |
| 20 | + _CLC_VECTOR_CONVERT_DECL(FROM_TYPE, short, SUFFIX) \ |
| 21 | + _CLC_VECTOR_CONVERT_DECL(FROM_TYPE, ushort, SUFFIX) \ |
| 22 | + _CLC_VECTOR_CONVERT_DECL(FROM_TYPE, long, SUFFIX) \ |
| 23 | + _CLC_VECTOR_CONVERT_DECL(FROM_TYPE, ulong, SUFFIX) \ |
| 24 | + _CLC_VECTOR_CONVERT_DECL(FROM_TYPE, float, SUFFIX) |
| 25 | + |
| 26 | +#if defined(cl_khr_fp64) && defined(cl_khr_fp16) |
| 27 | +#pragma OPENCL EXTENSION cl_khr_fp16 : enable |
| 28 | +#pragma OPENCL EXTENSION cl_khr_fp64 : enable |
| 29 | +#define _CLC_VECTOR_CONVERT_FROM(FROM_TYPE, SUFFIX) \ |
| 30 | + _CLC_VECTOR_CONVERT_FROM1(FROM_TYPE, SUFFIX) \ |
| 31 | + _CLC_VECTOR_CONVERT_DECL(FROM_TYPE, double, SUFFIX) \ |
| 32 | + _CLC_VECTOR_CONVERT_DECL(FROM_TYPE, half, SUFFIX) |
| 33 | +#elif defined(cl_khr_fp64) |
| 34 | +#pragma OPENCL EXTENSION cl_khr_fp64 : enable |
| 35 | +#define _CLC_VECTOR_CONVERT_FROM(FROM_TYPE, SUFFIX) \ |
| 36 | + _CLC_VECTOR_CONVERT_FROM1(FROM_TYPE, SUFFIX) \ |
| 37 | + _CLC_VECTOR_CONVERT_DECL(FROM_TYPE, double, SUFFIX) |
| 38 | +#elif defined(cl_khr_fp16) |
| 39 | +#pragma OPENCL EXTENSION cl_khr_fp16 : enable |
| 40 | +#define _CLC_VECTOR_CONVERT_FROM(FROM_TYPE, SUFFIX) \ |
| 41 | + _CLC_VECTOR_CONVERT_FROM1(FROM_TYPE, SUFFIX) \ |
| 42 | + _CLC_VECTOR_CONVERT_DECL(FROM_TYPE, half, SUFFIX) |
| 43 | +#else |
| 44 | +#define _CLC_VECTOR_CONVERT_FROM(FROM_TYPE, SUFFIX) \ |
| 45 | + _CLC_VECTOR_CONVERT_FROM1(FROM_TYPE, SUFFIX) |
| 46 | +#endif |
| 47 | + |
| 48 | +#define _CLC_VECTOR_CONVERT_TO1(SUFFIX) \ |
| 49 | + _CLC_VECTOR_CONVERT_FROM(char, SUFFIX) \ |
| 50 | + _CLC_VECTOR_CONVERT_FROM(uchar, SUFFIX) \ |
| 51 | + _CLC_VECTOR_CONVERT_FROM(int, SUFFIX) \ |
| 52 | + _CLC_VECTOR_CONVERT_FROM(uint, SUFFIX) \ |
| 53 | + _CLC_VECTOR_CONVERT_FROM(short, SUFFIX) \ |
| 54 | + _CLC_VECTOR_CONVERT_FROM(ushort, SUFFIX) \ |
| 55 | + _CLC_VECTOR_CONVERT_FROM(long, SUFFIX) \ |
| 56 | + _CLC_VECTOR_CONVERT_FROM(ulong, SUFFIX) \ |
| 57 | + _CLC_VECTOR_CONVERT_FROM(float, SUFFIX) |
| 58 | + |
| 59 | +#if defined(cl_khr_fp64) && defined(cl_khr_fp16) |
| 60 | +#pragma OPENCL EXTENSION cl_khr_fp16 : enable |
| 61 | +#pragma OPENCL EXTENSION cl_khr_fp64 : enable |
| 62 | +#define _CLC_VECTOR_CONVERT_TO(SUFFIX) \ |
| 63 | + _CLC_VECTOR_CONVERT_TO1(SUFFIX) \ |
| 64 | + _CLC_VECTOR_CONVERT_FROM(double, SUFFIX) \ |
| 65 | + _CLC_VECTOR_CONVERT_FROM(half, SUFFIX) |
| 66 | +#elif defined(cl_khr_fp64) |
| 67 | +#pragma OPENCL EXTENSION cl_khr_fp64 : enable |
| 68 | +#define _CLC_VECTOR_CONVERT_TO(SUFFIX) \ |
| 69 | + _CLC_VECTOR_CONVERT_TO1(SUFFIX) \ |
| 70 | + _CLC_VECTOR_CONVERT_FROM(double, SUFFIX) |
| 71 | +#elif defined(cl_khr_fp16) |
| 72 | +#pragma OPENCL EXTENSION cl_khr_fp16 : enable |
| 73 | +#define _CLC_VECTOR_CONVERT_TO(SUFFIX) \ |
| 74 | + _CLC_VECTOR_CONVERT_TO1(SUFFIX) \ |
| 75 | + _CLC_VECTOR_CONVERT_FROM(half, SUFFIX) |
| 76 | +#else |
| 77 | +#define _CLC_VECTOR_CONVERT_TO(SUFFIX) _CLC_VECTOR_CONVERT_TO1(SUFFIX) |
| 78 | +#endif |
| 79 | + |
| 80 | +#define _CLC_VECTOR_CONVERT_TO_SUFFIX(ROUND) \ |
| 81 | + _CLC_VECTOR_CONVERT_TO(_sat##ROUND) \ |
| 82 | + _CLC_VECTOR_CONVERT_TO(ROUND) |
| 83 | + |
| 84 | +_CLC_VECTOR_CONVERT_TO_SUFFIX(_rtn) |
| 85 | +_CLC_VECTOR_CONVERT_TO_SUFFIX(_rte) |
| 86 | +_CLC_VECTOR_CONVERT_TO_SUFFIX(_rtz) |
| 87 | +_CLC_VECTOR_CONVERT_TO_SUFFIX(_rtp) |
| 88 | +_CLC_VECTOR_CONVERT_TO_SUFFIX() |
| 89 | + |
| 90 | +#undef _CLC_VECTOR_CONVERT_TO_SUFFIX |
| 91 | +#undef _CLC_VECTOR_CONVERT_TO |
| 92 | +#undef _CLC_VECTOR_CONVERT_TO1 |
| 93 | +#undef _CLC_VECTOR_CONVERT_FROM |
| 94 | +#undef _CLC_VECTOR_CONVERT_FROM1 |
| 95 | +#undef _CLC_VECTOR_CONVERT_DECL |
| 96 | +#undef _CLC_CONVERT_DECL |
| 97 | + |
| 98 | +#endif // __CLC_CLC_CONVERT_H__ |
0 commit comments