blob: 528ed3c6651ef3a11767a268ba592c74a6986810 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
|
#include<simdconfig.h>
#include<simdfuncs.h>
#include<stdint.h>
#ifdef _MSC_VER
#include<intrin.h>
int mmx_available() {
return 1;
}
/* Contrary to MSDN documentation, MMX intrinsics
* just plain don't work.
*/
void increment_mmx(float arr[4]) {
arr[0]++;
arr[1]++;
arr[2]++;
arr[3]++;
}
#elif defined(__MINGW32__)
int mmx_available() {
return 1;
}
/* MinGW does not seem to ship with MMX or it is broken.
*/
void increment_mmx(float arr[4]) {
arr[0]++;
arr[1]++;
arr[2]++;
arr[3]++;
}
#else
#include<mmintrin.h>
#include<cpuid.h>
#if defined(__APPLE__)
int mmx_available() { return 1; }
#else
int mmx_available() {
return __builtin_cpu_supports("mmx");
}
#endif
void increment_mmx(float arr[4]) {
/* Super ugly but we know that values in arr are always small
* enough to fit in int16;
*/
int i;
__m64 packed = _mm_set_pi16(arr[3], arr[2], arr[1], arr[0]);
__m64 incr = _mm_set1_pi16(1);
__m64 result = _mm_add_pi16(packed, incr);
/* Should be
* int64_t unpacker = _m_to_int64(result);
* but it does not exist on 32 bit platforms for some reason.
*/
int64_t unpacker = (int64_t)(result);
_mm_empty();
for(i=0; i<4; i++) {
/* This fails on GCC 8 when optimizations are enabled.
* Disable it. Patches welcome to fix this.
arr[i] = (float)(unpacker & ((1<<16)-1));
unpacker >>= 16;
*/
arr[i] += 1.0f;
}
}
#endif
|