ffi 1.9.21 → 1.9.22

Sign up to get free protection for your applications and to get access to all the features.

Potentially problematic release.


This version of ffi might be problematic. Click here for more details.

Files changed (151) hide show
  1. checksums.yaml +5 -5
  2. checksums.yaml.gz.sig +3 -0
  3. data.tar.gz.sig +0 -0
  4. data/.gitignore +22 -0
  5. data/.gitmodules +3 -0
  6. data/.travis.yml +52 -0
  7. data/.yardopts +5 -0
  8. data/Gemfile +15 -0
  9. data/{spec/ffi/LICENSE.SPECS → LICENSE.SPECS} +1 -1
  10. data/README.md +1 -1
  11. data/Rakefile +28 -3
  12. data/appveyor.yml +22 -0
  13. data/ext/ffi_c/Call.c +1 -22
  14. data/ext/ffi_c/Call.h +0 -9
  15. data/ext/ffi_c/Closure.c +54 -0
  16. data/ext/ffi_c/{ClosurePool.h → Closure.h} +13 -23
  17. data/ext/ffi_c/Function.c +16 -25
  18. data/ext/ffi_c/Function.h +1 -2
  19. data/ext/ffi_c/FunctionInfo.c +0 -4
  20. data/ext/ffi_c/MethodHandle.c +33 -268
  21. data/ext/ffi_c/extconf.rb +3 -3
  22. data/ext/ffi_c/ffi.c +2 -2
  23. data/ext/ffi_c/libffi.bsd.mk +3 -3
  24. data/ext/ffi_c/libffi.darwin.mk +1 -1
  25. data/ext/ffi_c/libffi.gnu.mk +1 -1
  26. data/ext/ffi_c/libffi.mk +2 -2
  27. data/ext/ffi_c/libffi.vc.mk +1 -1
  28. data/ext/ffi_c/libffi.vc64.mk +1 -1
  29. data/ext/ffi_c/libffi/.appveyor.yml +48 -0
  30. data/ext/ffi_c/libffi/.gitignore +36 -0
  31. data/ext/ffi_c/libffi/.travis.yml +30 -0
  32. data/ext/ffi_c/libffi/.travis/install.sh +14 -0
  33. data/ext/ffi_c/libffi/Makefile.am +5 -3
  34. data/ext/ffi_c/libffi/acinclude.m4 +6 -0
  35. data/ext/ffi_c/libffi/autogen.sh +1 -1
  36. data/ext/ffi_c/libffi/config.guess +1466 -0
  37. data/ext/ffi_c/libffi/config.sub +1836 -0
  38. data/ext/ffi_c/libffi/configure.ac +2 -2
  39. data/ext/ffi_c/libffi/configure.host +15 -3
  40. data/ext/ffi_c/libffi/generate-darwin-source-and-headers.py +11 -15
  41. data/ext/ffi_c/libffi/include/ffi.h.in +6 -1
  42. data/ext/ffi_c/libffi/libffi.xcodeproj/project.pbxproj +465 -59
  43. data/ext/ffi_c/libffi/src/aarch64/ffi.c +33 -10
  44. data/ext/ffi_c/libffi/src/aarch64/sysv.S +2 -2
  45. data/ext/ffi_c/libffi/src/arm/ffi.c +12 -1
  46. data/ext/ffi_c/libffi/src/arm/sysv.S +1 -1
  47. data/ext/ffi_c/libffi/src/closures.c +143 -97
  48. data/ext/ffi_c/libffi/src/ia64/unix.S +2 -0
  49. data/ext/ffi_c/libffi/src/mips/ffi.c +8 -0
  50. data/ext/ffi_c/libffi/src/mips/ffitarget.h +1 -1
  51. data/ext/ffi_c/libffi/src/mips/n32.S +2 -0
  52. data/ext/ffi_c/libffi/src/powerpc/aix.S +239 -1
  53. data/ext/ffi_c/libffi/src/powerpc/aix_closure.S +250 -3
  54. data/ext/ffi_c/libffi/src/powerpc/ffi_darwin.c +86 -5
  55. data/ext/ffi_c/libffi/src/powerpc/ffitarget.h +3 -0
  56. data/ext/ffi_c/libffi/src/x86/ffi.c +3 -1
  57. data/ext/ffi_c/libffi/src/x86/ffi64.c +26 -5
  58. data/ext/ffi_c/libffi/src/x86/sysv.S +2 -2
  59. data/ext/ffi_c/libffi/src/x86/unix64.S +1 -1
  60. data/ext/ffi_c/libffi/src/x86/win64.S +1 -1
  61. data/ext/ffi_c/libffi/testsuite/Makefile.am +2 -1
  62. data/ext/ffi_c/libffi/testsuite/lib/libffi.exp +2 -1
  63. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_3float.c +95 -0
  64. data/ffi.gemspec +14 -1
  65. data/lib/ffi/library.rb +1 -1
  66. data/lib/ffi/version.rb +1 -1
  67. data/samples/getlogin.rb +8 -0
  68. data/samples/getpid.rb +8 -0
  69. data/samples/gettimeofday.rb +18 -0
  70. data/samples/hello.rb +7 -0
  71. data/samples/inotify.rb +60 -0
  72. data/samples/pty.rb +76 -0
  73. data/samples/qsort.rb +21 -0
  74. data/samples/sample_helper.rb +6 -0
  75. metadata +59 -81
  76. metadata.gz.sig +0 -0
  77. data/ext/ffi_c/ClosurePool.c +0 -283
  78. data/gen/Rakefile +0 -30
  79. data/libtest/Benchmark.c +0 -52
  80. data/libtest/BoolTest.c +0 -34
  81. data/libtest/BufferTest.c +0 -31
  82. data/libtest/ClosureTest.c +0 -205
  83. data/libtest/EnumTest.c +0 -51
  84. data/libtest/FunctionTest.c +0 -70
  85. data/libtest/GNUmakefile +0 -149
  86. data/libtest/GlobalVariable.c +0 -62
  87. data/libtest/LastErrorTest.c +0 -21
  88. data/libtest/NumberTest.c +0 -132
  89. data/libtest/PointerTest.c +0 -63
  90. data/libtest/ReferenceTest.c +0 -23
  91. data/libtest/StringTest.c +0 -34
  92. data/libtest/StructTest.c +0 -243
  93. data/libtest/UnionTest.c +0 -43
  94. data/libtest/VariadicTest.c +0 -99
  95. data/spec/ffi/async_callback_spec.rb +0 -35
  96. data/spec/ffi/bitmask_spec.rb +0 -575
  97. data/spec/ffi/bool_spec.rb +0 -32
  98. data/spec/ffi/buffer_spec.rb +0 -279
  99. data/spec/ffi/callback_spec.rb +0 -773
  100. data/spec/ffi/custom_param_type.rb +0 -37
  101. data/spec/ffi/custom_type_spec.rb +0 -74
  102. data/spec/ffi/dup_spec.rb +0 -52
  103. data/spec/ffi/enum_spec.rb +0 -423
  104. data/spec/ffi/errno_spec.rb +0 -20
  105. data/spec/ffi/ffi_spec.rb +0 -28
  106. data/spec/ffi/fixtures/Benchmark.c +0 -52
  107. data/spec/ffi/fixtures/BitmaskTest.c +0 -51
  108. data/spec/ffi/fixtures/BoolTest.c +0 -34
  109. data/spec/ffi/fixtures/BufferTest.c +0 -31
  110. data/spec/ffi/fixtures/ClosureTest.c +0 -205
  111. data/spec/ffi/fixtures/EnumTest.c +0 -51
  112. data/spec/ffi/fixtures/FunctionTest.c +0 -142
  113. data/spec/ffi/fixtures/GNUmakefile +0 -149
  114. data/spec/ffi/fixtures/GlobalVariable.c +0 -62
  115. data/spec/ffi/fixtures/LastErrorTest.c +0 -21
  116. data/spec/ffi/fixtures/NumberTest.c +0 -132
  117. data/spec/ffi/fixtures/PipeHelper.h +0 -21
  118. data/spec/ffi/fixtures/PipeHelperPosix.c +0 -41
  119. data/spec/ffi/fixtures/PipeHelperWindows.c +0 -72
  120. data/spec/ffi/fixtures/PointerTest.c +0 -63
  121. data/spec/ffi/fixtures/ReferenceTest.c +0 -23
  122. data/spec/ffi/fixtures/StringTest.c +0 -34
  123. data/spec/ffi/fixtures/StructTest.c +0 -243
  124. data/spec/ffi/fixtures/UnionTest.c +0 -43
  125. data/spec/ffi/fixtures/VariadicTest.c +0 -99
  126. data/spec/ffi/fixtures/classes.rb +0 -438
  127. data/spec/ffi/function_spec.rb +0 -97
  128. data/spec/ffi/io_spec.rb +0 -16
  129. data/spec/ffi/library_spec.rb +0 -286
  130. data/spec/ffi/long_double.rb +0 -30
  131. data/spec/ffi/managed_struct_spec.rb +0 -68
  132. data/spec/ffi/memorypointer_spec.rb +0 -78
  133. data/spec/ffi/number_spec.rb +0 -247
  134. data/spec/ffi/platform_spec.rb +0 -114
  135. data/spec/ffi/pointer_spec.rb +0 -285
  136. data/spec/ffi/rbx/attach_function_spec.rb +0 -34
  137. data/spec/ffi/rbx/memory_pointer_spec.rb +0 -198
  138. data/spec/ffi/rbx/spec_helper.rb +0 -6
  139. data/spec/ffi/rbx/struct_spec.rb +0 -18
  140. data/spec/ffi/spec_helper.rb +0 -93
  141. data/spec/ffi/string_spec.rb +0 -118
  142. data/spec/ffi/strptr_spec.rb +0 -50
  143. data/spec/ffi/struct_by_ref_spec.rb +0 -43
  144. data/spec/ffi/struct_callback_spec.rb +0 -69
  145. data/spec/ffi/struct_initialize_spec.rb +0 -35
  146. data/spec/ffi/struct_packed_spec.rb +0 -50
  147. data/spec/ffi/struct_spec.rb +0 -882
  148. data/spec/ffi/typedef_spec.rb +0 -91
  149. data/spec/ffi/union_spec.rb +0 -67
  150. data/spec/ffi/variadic_spec.rb +0 -132
  151. data/spec/spec.opts +0 -4
@@ -1,51 +0,0 @@
1
- /*
2
- * Copyright (c) 2007 Wayne Meissner. All rights reserved.
3
- *
4
- * For licensing, see LICENSE.SPECS
5
- */
6
- #include <stdint.h>
7
-
8
- int test_untagged_enum(int val) {
9
- return val;
10
- }
11
-
12
- int test_untagged_typedef_enum(int val) {
13
- return val;
14
- }
15
-
16
- uint8_t test_untagged_nonint_enum(uint8_t val) {
17
- return val;
18
- }
19
-
20
- uint16_t test_tagged_nonint_enum1(uint16_t val) {
21
- return val;
22
- }
23
-
24
- uint32_t test_tagged_nonint_enum2(uint32_t val) {
25
- return val;
26
- }
27
-
28
- uint64_t test_tagged_nonint_enum3(uint64_t val) {
29
- return val;
30
- }
31
-
32
- typedef enum {c1, c2, c3, c4} enum_type1;
33
- enum_type1 test_tagged_typedef_enum1(enum_type1 val) {
34
- return val;
35
- }
36
-
37
- typedef enum {c5 = 42, c6, c7, c8} enum_type2;
38
- enum_type2 test_tagged_typedef_enum2(enum_type2 val) {
39
- return val;
40
- }
41
-
42
- typedef enum {c9 = 42, c10, c11 = 4242, c12} enum_type3;
43
- enum_type3 test_tagged_typedef_enum3(enum_type3 val) {
44
- return val;
45
- }
46
-
47
- typedef enum {c13 = 42, c14 = 4242, c15 = 424242, c16 = 42424242} enum_type4;
48
- enum_type4 test_tagged_typedef_enum4(enum_type4 val) {
49
- return val;
50
- }
51
-
@@ -1,70 +0,0 @@
1
- /*
2
- * Copyright (c) 2007 Wayne Meissner. All rights reserved.
3
- *
4
- * For licensing, see LICENSE.SPECS
5
- */
6
-
7
- #ifdef _WIN32
8
- #include <windows.h>
9
- #define sleep(x) Sleep((x)*1000)
10
- #endif
11
-
12
- #ifndef _WIN32
13
- #include <unistd.h>
14
- #include <pthread.h>
15
- #endif
16
-
17
- int testAdd(int a, int b)
18
- {
19
- return a + b;
20
- };
21
-
22
- int testFunctionAdd(int a, int b, int (*f)(int, int))
23
- {
24
- return f(a, b);
25
- };
26
-
27
- void testBlocking(int seconds) {
28
- sleep(seconds);
29
- };
30
-
31
- struct async_data {
32
- void (*fn)(int);
33
- int value;
34
- };
35
-
36
- static void* asyncThreadCall(void *data)
37
- {
38
- struct async_data* d = (struct async_data *) data;
39
- if (d != NULL && d->fn != NULL) {
40
- (*d->fn)(d->value);
41
- }
42
-
43
- return NULL;
44
- }
45
-
46
- void testAsyncCallback(void (*fn)(int), int value)
47
- {
48
- #ifndef _WIN32
49
- pthread_t t;
50
- struct async_data d;
51
- d.fn = fn;
52
- d.value = value;
53
- pthread_create(&t, NULL, asyncThreadCall, &d);
54
- pthread_join(t, NULL);
55
- #else
56
- (*fn)(value);
57
- #endif
58
- }
59
-
60
- #if defined(_WIN32) && !defined(_WIN64)
61
- struct StructUCDP {
62
- unsigned char a1;
63
- double a2;
64
- void *a3;
65
- };
66
-
67
- void __stdcall testStdcallManyParams(long *a1, char a2, short int a3, int a4, __int64 a5,
68
- struct StructUCDP a6, struct StructUCDP *a7, float a8, double a9) {
69
- }
70
- #endif
@@ -1,149 +0,0 @@
1
- # -*- makefile -*-
2
-
3
- ifeq ($(OS),)
4
- BUILD_OS := $(shell uname -s | tr '[:upper:]' '[:lower:]')
5
- OS := $(BUILD_OS)
6
- endif
7
-
8
- ifeq ($(CPU),)
9
- CPU := $(shell uname -m | sed -e 's/i[345678]86/i386/')
10
- endif
11
-
12
- PLATFORM = $(CPU)-$(OS)
13
-
14
- ifeq ($(OS), sunos)
15
- OS = solaris
16
- endif
17
-
18
- SRC_DIR = libtest
19
- BUILD_DIR ?= build
20
- TEST_BUILD_DIR = $(BUILD_DIR)/libtest
21
- # Set defaults to unix (linux/solaris/bsd)
22
- PREFIX = lib
23
- LIBEXT ?= so
24
- LIBNAME = $(PREFIX)test.$(LIBEXT)
25
-
26
- export MACOSX_DEPLOYMENT_TARGET=10.4
27
-
28
- CCACHE := $(strip $(realpath $(shell which ccache 2> /dev/null)))
29
-
30
- TEST_SRCS = $(wildcard $(SRC_DIR)/*.c)
31
- TEST_OBJS := $(patsubst $(SRC_DIR)/%.c, $(TEST_BUILD_DIR)/%.o, $(TEST_SRCS))
32
-
33
- #
34
- # Compiler/linker flags from:
35
- # http://weblogs.java.net/blog/kellyohair/archive/2006/01/compilation_of_1.html
36
- JFLAGS = -fno-omit-frame-pointer -fno-strict-aliasing
37
- OFLAGS = -O2 $(JFLAGS)
38
- WFLAGS = -W -Wall -Wno-unused -Wno-parentheses
39
- PICFLAGS = -fPIC
40
- SOFLAGS = -shared
41
- LDFLAGS += $(SOFLAGS)
42
-
43
- IFLAGS = -I"$(BUILD_DIR)"
44
- CFLAGS = $(OFLAGS) $(WFLAGS) $(IFLAGS) $(PICFLAGS) -D_REENTRANT
45
-
46
- ifneq ($(strip $(findstring $(OS), win32, mingw, cygwin)),)
47
- # For cygwin => win32-native builds, strip out cygwin deps
48
- ifneq ($(findstring cygwin, $(BUILD_OS)),)
49
- CC += -mno-cygwin -mwin32
50
- LDFLAGS += -mno-cygwin -Wl,--add-stdcall-alias
51
- endif
52
- PICFLAGS=
53
- LIBEXT=dll
54
- CC = gcc
55
- endif
56
-
57
- ifeq ($(OS), darwin)
58
- ifneq ($(findstring $(CPU),ppc),)
59
- ARCHFLAGS += -arch ppc
60
- endif
61
- ifneq ($(findstring $(CPU),i386 x86_64),)
62
- ARCHFLAGS += -arch i386 -arch x86_64
63
- endif
64
- CFLAGS += $(ARCHFLAGS) -DTARGET_RT_MAC_CFM=0
65
- CFLAGS += -fno-common
66
- LDFLAGS = $(ARCHFLAGS) -dynamiclib
67
- # link against the universal libraries on ppc machines
68
- LDFLAGS += -L$(MACSDK)/usr/lib
69
- LIBEXT = dylib
70
- FFI_CFLAGS += -isysroot $(MACSDK)
71
- PICFLAGS =
72
- SOFLAGS =
73
- endif
74
-
75
- ifeq ($(OS), linux)
76
- SOFLAGS += -Wl,-soname,$(LIBNAME)
77
- endif
78
-
79
- ifeq ($(OS), solaris)
80
- CC = /usr/sfw/bin/gcc -std=c99
81
- LD = /usr/ccs/bin/ld
82
- SOFLAGS = -shared -static-libgcc
83
- endif
84
-
85
- ifeq ($(OS), aix)
86
- LIBEXT = a
87
- SOFLAGS = -shared -static-libgcc
88
- PICFLAGS += -pthread
89
- endif
90
-
91
- ifneq ($(findstring bsd, $(OS)),)
92
- SOFLAGS = -shared -static-libgcc
93
- CFLAGS += -pthread
94
- LDFLAGS += -pthread
95
- endif
96
-
97
- ifeq ($(CPU), i386)
98
- MODEL = 32
99
- endif
100
-
101
- ifeq ($(CPU), sparcv9)
102
- MODEL = 64
103
- endif
104
-
105
- ifeq ($(CPU), amd64)
106
- MODEL = 64
107
- endif
108
-
109
- ifeq ($(CPU), x86_64)
110
- MODEL = 64
111
- endif
112
-
113
- ifeq ($(CPU), ppc64)
114
- MODEL = 64
115
- endif
116
-
117
- ifeq ($(CPU), powerpc64)
118
- MODEL = 64
119
- endif
120
-
121
- MODELFLAG =
122
- ifneq ($(MODEL),)
123
- MODELFLAG = -m$(MODEL)
124
- endif
125
-
126
- # On platforms (linux, solaris) that support both 32bit and 64bit, force building for one or the other
127
- ifneq ($(or $(findstring linux, $(OS)), $(findstring solaris, $(OS))),)
128
- # Change the CC/LD instead of CFLAGS/LDFLAGS, incase other things in the flags
129
- # makes the libffi build choke
130
- CC += $(MODELFLAG)
131
- LD += $(MODELFLAG)
132
- endif
133
-
134
- LIBTEST = $(BUILD_DIR)/$(LIBNAME)
135
-
136
- all: $(LIBTEST)
137
-
138
- $(TEST_BUILD_DIR)/%.o : $(SRC_DIR)/%.c
139
- @mkdir -p $(@D)
140
- $(CCACHE) $(CC) $(CFLAGS) -c $< -o $@
141
-
142
- $(LIBTEST): $(TEST_OBJS)
143
- $(CC) -o $@ $(LDFLAGS) $(TEST_OBJS) -lm
144
-
145
- clean::
146
- # nothing to do - ant will delete the build dir
147
-
148
- debug::
149
- @echo "SRCS=$(TEST_SRCS)"
@@ -1,62 +0,0 @@
1
- /*
2
- * Copyright (c) 2007 Wayne Meissner. All rights reserved.
3
- *
4
- * For licensing, see LICENSE.SPECS
5
- */
6
-
7
- #include <sys/types.h>
8
- #include <stdint.h>
9
-
10
- typedef int8_t s8;
11
- typedef uint8_t u8;
12
- typedef int16_t s16;
13
- typedef uint16_t u16;
14
- typedef int32_t s32;
15
- typedef uint32_t u32;
16
- typedef int64_t s64;
17
- typedef uint64_t u64;
18
- typedef signed long sL;
19
- typedef unsigned long uL;
20
- typedef float f32;
21
- typedef double f64;
22
- #if !defined(__OpenBSD__)
23
- typedef unsigned long ulong;
24
- #endif
25
- typedef void* pointer;
26
- typedef void* P;
27
-
28
- #define GVAR(T) \
29
- extern T gvar_##T; \
30
- T gvar_##T = (T) -1; \
31
- T gvar_##T##_get() { return gvar_##T; }; \
32
- void gvar_##T##_set(T v) { gvar_##T = v; }
33
-
34
- GVAR(s8);
35
- GVAR(u8);
36
- GVAR(s16);
37
- GVAR(u16);
38
- GVAR(s32);
39
- GVAR(u32);
40
- GVAR(s64);
41
- GVAR(u64);
42
- GVAR(long);
43
- GVAR(ulong);
44
- GVAR(pointer);
45
-
46
- struct gstruct {
47
- long data;
48
- };
49
-
50
- struct gstruct gvar_gstruct = { -1 };
51
-
52
- struct gstruct*
53
- gvar_gstruct_get(void)
54
- {
55
- return &gvar_gstruct;
56
- }
57
-
58
- void
59
- gvar_gstruct_set(const struct gstruct* val)
60
- {
61
- gvar_gstruct = *val;
62
- }
@@ -1,21 +0,0 @@
1
- /*
2
- * Copyright (c) 2007 Wayne Meissner. All rights reserved.
3
- *
4
- * For licensing, see LICENSE.SPECS
5
- */
6
-
7
- #if defined(_WIN32) || defined(__WIN32__)
8
- # include <windows.h>
9
- #else
10
- # include <errno.h>
11
- #endif
12
-
13
- int setLastError(int error) {
14
- #if defined(_WIN32) || defined(__WIN32__)
15
- SetLastError(error);
16
- #else
17
- errno = error;
18
- #endif
19
- return -1;
20
- }
21
-
@@ -1,132 +0,0 @@
1
- /*
2
- * Copyright (c) 2007 Wayne Meissner. All rights reserved.
3
- *
4
- * For licensing, see LICENSE.SPECS
5
- */
6
-
7
- #include <sys/types.h>
8
- #include <stdio.h>
9
- #include <string.h>
10
- #include <stdint.h>
11
-
12
- #if defined(__sparc) && defined(__sun__)
13
- #define fix_mem_access __asm("ta 6")
14
- #else
15
- #define fix_mem_access
16
- #endif
17
-
18
- typedef int8_t s8;
19
- typedef uint8_t u8;
20
- typedef int16_t s16;
21
- typedef uint16_t u16;
22
- typedef int32_t s32;
23
- typedef uint32_t u32;
24
- typedef int64_t s64;
25
- typedef uint64_t u64;
26
- typedef signed long sL;
27
- typedef unsigned long uL;
28
- typedef float f32;
29
- typedef double f64;
30
- typedef long double f128;
31
- #if !defined(__OpenBSD__)
32
- typedef unsigned long ulong;
33
- #endif
34
-
35
- #define ADD(T) T add_##T(T arg1, T arg2) { return arg1 + arg2; }
36
- #define SUB(T) T sub_##T(T arg1, T arg2) { return arg1 - arg2; }
37
- #define MUL(T) T mul_##T(T arg1, T arg2) { return arg1 * arg2; }
38
- #define DIV(T) T div_##T(T arg1, T arg2) { return arg1 / arg2; }
39
- #define RET(T) T ret_##T(T arg1) { return arg1; }
40
- #define SET(T) static T T##_;void set_##T(T arg1) { T##_ = arg1; }
41
- #define GET(T) T get_##T() { return T##_; }
42
- typedef char* ptr;
43
- #define TEST(T) ADD(T) SUB(T) MUL(T) DIV(T) RET(T) SET(T) GET(T)
44
- TEST(s8);
45
- TEST(u8);
46
- TEST(s16);
47
- TEST(u16);
48
- TEST(s32);
49
- TEST(u32);
50
- TEST(s64);
51
- TEST(u64);
52
- TEST(float);
53
- TEST(double);
54
- TEST(long);
55
- TEST(ulong);
56
- TEST(f128);
57
-
58
- #define ADD2(R, T1, T2) R add_##T1##T2##_##R(T1 arg1, T2 arg2) { return arg1 + arg2; }
59
- #define SUB2(R, T1, T2) R sub_##T1##T2##_##R(T1 arg1, T2 arg2) { return arg1 - arg2; }
60
- #define MUL2(R, T1, T2) R mul_##T1##T2##_##R(T1 arg1, T2 arg2) { return arg1 * arg2; }
61
- #define DIV2(R, T1, T2) R div_##T1##T2##_##R(T1 arg1, T2 arg2) { return arg1 / arg2; }
62
-
63
- #define T2__(R, T1, T2) ADD2(R, T1, T2) SUB2(R, T1, T2) MUL2(R, T1, T2) DIV2(R, T1, T2)
64
- #define T2_(R, T1) \
65
- T2__(R, T1, s8) T2__(R, T1, u8) \
66
- T2__(R, T1, s16) T2__(R, T1, u16) \
67
- T2__(R, T1, s32) T2__(R, T1, u32) \
68
- T2__(R, T1, sL) T2__(R, T1, uL) \
69
- T2__(R, T1, s64) T2__(R, T1, u64) \
70
-
71
- #define TEST2(R) \
72
- T2_(R, s8) T2_(R, u8) T2_(R, s16) T2_(R, u16) T2_(R, s32) T2_(R, u32) \
73
- T2_(R, sL) T2_(R, uL) T2_(R, s64) T2_(R, u64)
74
-
75
- #ifdef notyet
76
- TEST2(s32)
77
- TEST2(u32)
78
- TEST2(s64)
79
- TEST2(u64)
80
- #endif
81
-
82
- #define ADD3(R, T1, T2, T3) R add_##T1##T2##T3##_##R(T1 arg1, T2 arg2, T3 arg3) { return arg1 + arg2 + arg3; }
83
- #define pack_f32(buf, v) do { float f = v; memcpy((buf), &f, sizeof(f)); } while(0)
84
- #define pack_f64(buf, v) do { double f = v; memcpy((buf), &f, sizeof(f)); } while(0)
85
- #define pack_int(buf, v) do { *(buf) = v; } while(0)
86
- #define pack_s8 pack_int
87
- #define pack_u8 pack_int
88
- #define pack_s16 pack_int
89
- #define pack_u16 pack_int
90
- #define pack_s32 pack_int
91
- #define pack_u32 pack_int
92
- #define pack_s64 pack_int
93
- #define pack_u64 pack_int
94
- #define pack_sL pack_int
95
- #define pack_uL pack_int
96
-
97
- #define PACK3(R, T1, T2, T3) void pack_##T1##T2##T3##_##R(T1 arg1, T2 arg2, T3 arg3, R* r) { \
98
- fix_mem_access; \
99
- pack_##T1(&r[0], arg1); \
100
- pack_##T2(&r[1], arg2); \
101
- pack_##T3(&r[2], arg3); \
102
- }
103
-
104
- #define T3___(R, T1, T2, T3) PACK3(R, T1, T2, T3) /* SUB2(R, T1, T2) MUL2(R, T1, T2) DIV2(R, T1, T2) */
105
- #define T3__(R, T1, T2) \
106
- T3___(R, T1, T2, s8) T3___(R, T1, T2, u8) \
107
- T3___(R, T1, T2, s16) T3___(R, T1, T2, u16) \
108
- T3___(R, T1, T2, s32) T3___(R, T1, T2, u32) \
109
- T3___(R, T1, T2, sL) T3___(R, T1, T2, uL) \
110
- T3___(R, T1, T2, s64) T3___(R, T1, T2, u64) \
111
- T3___(R, T1, T2, f32) T3___(R, T1, T2, f64) \
112
-
113
- #define T3_(R, T1) \
114
- T3__(R, T1, s8) T3__(R, T1, u8) \
115
- T3__(R, T1, s16) T3__(R, T1, u16) \
116
- T3__(R, T1, s32) T3__(R, T1, u32) \
117
- T3__(R, T1, sL) T3__(R, T1, uL) \
118
- T3__(R, T1, s64) T3__(R, T1, u64) \
119
- T3__(R, T1, f32) T3__(R, T1, f64) \
120
-
121
- #define TEST3(R) \
122
- T3_(R, s8) T3_(R, u8) T3_(R, s16) T3_(R, u16) T3_(R, s32) T3_(R, u32) \
123
- T3_(R, sL) T3_(R, uL) T3_(R, s64) T3_(R, u64) T3_(R, f32) T3_(R, f64)
124
-
125
- TEST3(s64)
126
-
127
- void
128
- foo6(intptr_t i1, intptr_t i2, intptr_t i3, intptr_t i4, intptr_t i5, intptr_t i6) { }
129
-
130
- void
131
- foo5(intptr_t i1, intptr_t i2, intptr_t i3, intptr_t i4, intptr_t i5) { }
132
-