ffi 1.9.18 → 1.9.21

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 (366) hide show
  1. checksums.yaml +4 -4
  2. data/README.md +3 -2
  3. data/Rakefile +14 -3
  4. data/ext/ffi_c/AbstractMemory.c +6 -1
  5. data/ext/ffi_c/Platform.c +10 -2
  6. data/ext/ffi_c/extconf.rb +7 -2
  7. data/ext/ffi_c/libffi.bsd.mk +9 -3
  8. data/ext/ffi_c/libffi.darwin.mk +14 -4
  9. data/ext/ffi_c/libffi.gnu.mk +2 -1
  10. data/ext/ffi_c/libffi.mk +9 -4
  11. data/ext/ffi_c/libffi/ChangeLog.libffi +2 -2
  12. data/ext/ffi_c/libffi/{ChangeLog → ChangeLog.libffi-3.1} +1402 -2
  13. data/ext/ffi_c/libffi/ChangeLog.v1 +1 -1
  14. data/ext/ffi_c/libffi/LICENSE +1 -1
  15. data/ext/ffi_c/libffi/Makefile.am +166 -157
  16. data/ext/ffi_c/libffi/README +164 -52
  17. data/ext/ffi_c/libffi/acinclude.m4 +381 -0
  18. data/ext/ffi_c/libffi/autogen.sh +2 -0
  19. data/ext/ffi_c/libffi/configure.ac +148 -256
  20. data/ext/ffi_c/libffi/configure.host +265 -4
  21. data/ext/ffi_c/libffi/doc/Makefile.am +3 -0
  22. data/ext/ffi_c/libffi/doc/libffi.texi +430 -45
  23. data/ext/ffi_c/libffi/doc/version.texi +4 -4
  24. data/ext/ffi_c/libffi/generate-darwin-source-and-headers.py +207 -0
  25. data/ext/ffi_c/libffi/include/Makefile.am +3 -3
  26. data/ext/ffi_c/libffi/include/ffi.h.in +107 -50
  27. data/ext/ffi_c/libffi/include/ffi_cfi.h +55 -0
  28. data/ext/ffi_c/libffi/include/ffi_common.h +32 -11
  29. data/ext/ffi_c/libffi/libffi.map.in +80 -0
  30. data/ext/ffi_c/libffi/libffi.pc.in +3 -2
  31. data/ext/ffi_c/libffi/libffi.xcodeproj/project.pbxproj +637 -0
  32. data/ext/ffi_c/libffi/libtool-ldflags +106 -0
  33. data/ext/ffi_c/libffi/libtool-version +1 -1
  34. data/ext/ffi_c/libffi/m4/asmcfi.m4 +13 -0
  35. data/ext/ffi_c/libffi/m4/ax_append_flag.m4 +69 -0
  36. data/ext/ffi_c/libffi/m4/ax_cc_maxopt.m4 +13 -8
  37. data/ext/ffi_c/libffi/m4/ax_cflags_warn_all.m4 +31 -104
  38. data/ext/ffi_c/libffi/m4/{ax_check_compiler_flags.m4 → ax_check_compile_flag.m4} +30 -34
  39. data/ext/ffi_c/libffi/m4/ax_compiler_vendor.m4 +32 -11
  40. data/ext/ffi_c/libffi/m4/ax_enable_builddir.m4 +6 -5
  41. data/ext/ffi_c/libffi/m4/ax_gcc_archflag.m4 +31 -21
  42. data/ext/ffi_c/libffi/man/Makefile.am +2 -2
  43. data/ext/ffi_c/libffi/man/ffi.3 +10 -0
  44. data/ext/ffi_c/libffi/man/ffi_prep_cif.3 +6 -4
  45. data/ext/ffi_c/libffi/man/ffi_prep_cif_var.3 +73 -0
  46. data/ext/ffi_c/libffi/msvcc.sh +72 -9
  47. data/ext/ffi_c/libffi/src/aarch64/ffi.c +941 -0
  48. data/ext/ffi_c/libffi/src/aarch64/ffitarget.h +81 -0
  49. data/ext/ffi_c/libffi/src/aarch64/internal.h +67 -0
  50. data/ext/ffi_c/libffi/src/aarch64/sysv.S +438 -0
  51. data/ext/ffi_c/libffi/src/alpha/ffi.c +335 -98
  52. data/ext/ffi_c/libffi/src/alpha/ffitarget.h +10 -1
  53. data/ext/ffi_c/libffi/src/alpha/internal.h +23 -0
  54. data/ext/ffi_c/libffi/src/alpha/osf.S +161 -266
  55. data/ext/ffi_c/libffi/src/arc/arcompact.S +135 -0
  56. data/ext/ffi_c/libffi/src/arc/ffi.c +266 -0
  57. data/ext/ffi_c/libffi/src/arc/ffitarget.h +53 -0
  58. data/ext/ffi_c/libffi/src/arm/ffi.c +597 -517
  59. data/ext/ffi_c/libffi/src/arm/ffitarget.h +24 -7
  60. data/ext/ffi_c/libffi/src/arm/internal.h +7 -0
  61. data/ext/ffi_c/libffi/src/arm/sysv.S +303 -417
  62. data/ext/ffi_c/libffi/src/avr32/ffitarget.h +6 -1
  63. data/ext/ffi_c/libffi/src/bfin/ffi.c +196 -0
  64. data/ext/ffi_c/libffi/src/bfin/ffitarget.h +43 -0
  65. data/ext/ffi_c/libffi/src/bfin/sysv.S +179 -0
  66. data/ext/ffi_c/libffi/src/closures.c +319 -44
  67. data/ext/ffi_c/libffi/src/cris/ffi.c +10 -7
  68. data/ext/ffi_c/libffi/src/cris/ffitarget.h +6 -1
  69. data/ext/ffi_c/libffi/src/debug.c +6 -1
  70. data/ext/ffi_c/libffi/src/dlmalloc.c +16 -11
  71. data/ext/ffi_c/libffi/src/frv/ffi.c +1 -1
  72. data/ext/ffi_c/libffi/src/frv/ffitarget.h +6 -1
  73. data/ext/ffi_c/libffi/src/ia64/ffi.c +11 -7
  74. data/ext/ffi_c/libffi/src/ia64/ffitarget.h +6 -1
  75. data/ext/ffi_c/libffi/src/java_raw_api.c +23 -5
  76. data/ext/ffi_c/libffi/src/m32r/ffi.c +1 -1
  77. data/ext/ffi_c/libffi/src/m32r/ffitarget.h +6 -1
  78. data/ext/ffi_c/libffi/src/m68k/ffi.c +87 -13
  79. data/ext/ffi_c/libffi/src/m68k/ffitarget.h +6 -1
  80. data/ext/ffi_c/libffi/src/m68k/sysv.S +119 -32
  81. data/ext/ffi_c/libffi/src/m88k/ffi.c +400 -0
  82. data/ext/ffi_c/libffi/src/m88k/ffitarget.h +49 -0
  83. data/ext/ffi_c/libffi/src/m88k/obsd.S +209 -0
  84. data/ext/ffi_c/libffi/src/metag/ffi.c +330 -0
  85. data/ext/ffi_c/libffi/{fficonfig.hw → src/metag/ffitarget.h} +22 -26
  86. data/ext/ffi_c/libffi/src/metag/sysv.S +311 -0
  87. data/ext/ffi_c/libffi/src/microblaze/ffi.c +321 -0
  88. data/ext/ffi_c/libffi/src/microblaze/ffitarget.h +53 -0
  89. data/ext/ffi_c/libffi/src/microblaze/sysv.S +302 -0
  90. data/ext/ffi_c/libffi/src/mips/ffi.c +95 -28
  91. data/ext/ffi_c/libffi/src/mips/ffitarget.h +9 -2
  92. data/ext/ffi_c/libffi/src/mips/n32.S +126 -56
  93. data/ext/ffi_c/libffi/src/mips/o32.S +148 -27
  94. data/ext/ffi_c/libffi/src/moxie/eabi.S +55 -82
  95. data/ext/ffi_c/libffi/src/moxie/ffi.c +40 -44
  96. data/ext/ffi_c/libffi/src/moxie/ffitarget.h +52 -0
  97. data/ext/ffi_c/libffi/src/nios2/ffi.c +304 -0
  98. data/ext/ffi_c/libffi/src/nios2/ffitarget.h +52 -0
  99. data/ext/ffi_c/libffi/src/nios2/sysv.S +136 -0
  100. data/ext/ffi_c/libffi/src/or1k/ffi.c +328 -0
  101. data/ext/ffi_c/libffi/src/or1k/ffitarget.h +58 -0
  102. data/ext/ffi_c/libffi/src/or1k/sysv.S +107 -0
  103. data/ext/ffi_c/libffi/src/pa/ffitarget.h +8 -1
  104. data/ext/ffi_c/libffi/src/powerpc/aix.S +6 -6
  105. data/ext/ffi_c/libffi/src/powerpc/aix_closure.S +3 -1
  106. data/ext/ffi_c/libffi/src/powerpc/asm.h +2 -2
  107. data/ext/ffi_c/libffi/src/powerpc/darwin.S +2 -7
  108. data/ext/ffi_c/libffi/src/powerpc/darwin_closure.S +22 -26
  109. data/ext/ffi_c/libffi/src/powerpc/ffi.c +103 -1378
  110. data/ext/ffi_c/libffi/src/powerpc/ffi_darwin.c +25 -25
  111. data/ext/ffi_c/libffi/src/powerpc/ffi_linux64.c +945 -0
  112. data/ext/ffi_c/libffi/src/powerpc/ffi_powerpc.h +94 -0
  113. data/ext/ffi_c/libffi/src/powerpc/ffi_sysv.c +923 -0
  114. data/ext/ffi_c/libffi/src/powerpc/ffitarget.h +100 -44
  115. data/ext/ffi_c/libffi/src/powerpc/linux64.S +100 -59
  116. data/ext/ffi_c/libffi/src/powerpc/linux64_closure.S +360 -108
  117. data/ext/ffi_c/libffi/src/powerpc/ppc_closure.S +138 -68
  118. data/ext/ffi_c/libffi/src/powerpc/sysv.S +68 -112
  119. data/ext/ffi_c/libffi/src/prep_cif.c +108 -24
  120. data/ext/ffi_c/libffi/src/raw_api.c +18 -5
  121. data/ext/ffi_c/libffi/src/s390/ffi.c +294 -318
  122. data/ext/ffi_c/libffi/src/s390/ffitarget.h +9 -1
  123. data/ext/ffi_c/libffi/src/s390/internal.h +11 -0
  124. data/ext/ffi_c/libffi/src/s390/sysv.S +257 -366
  125. data/ext/ffi_c/libffi/src/sh/ffi.c +4 -3
  126. data/ext/ffi_c/libffi/src/sh/ffitarget.h +6 -1
  127. data/ext/ffi_c/libffi/src/sh64/ffi.c +3 -2
  128. data/ext/ffi_c/libffi/src/sh64/ffitarget.h +6 -1
  129. data/ext/ffi_c/libffi/src/sparc/ffi.c +326 -527
  130. data/ext/ffi_c/libffi/src/sparc/ffi64.c +608 -0
  131. data/ext/ffi_c/libffi/src/sparc/ffitarget.h +20 -7
  132. data/ext/ffi_c/libffi/src/sparc/internal.h +26 -0
  133. data/ext/ffi_c/libffi/src/sparc/v8.S +364 -234
  134. data/ext/ffi_c/libffi/src/sparc/v9.S +340 -207
  135. data/ext/ffi_c/libffi/src/tile/ffi.c +355 -0
  136. data/ext/ffi_c/libffi/src/tile/ffitarget.h +65 -0
  137. data/ext/ffi_c/libffi/src/tile/tile.S +360 -0
  138. data/ext/ffi_c/libffi/src/types.c +43 -14
  139. data/ext/ffi_c/libffi/src/vax/elfbsd.S +195 -0
  140. data/ext/ffi_c/libffi/src/vax/ffi.c +276 -0
  141. data/ext/ffi_c/libffi/src/vax/ffitarget.h +49 -0
  142. data/ext/ffi_c/libffi/src/x86/asmnames.h +30 -0
  143. data/ext/ffi_c/libffi/src/x86/ffi.c +589 -500
  144. data/ext/ffi_c/libffi/src/x86/ffi64.c +338 -116
  145. data/ext/ffi_c/libffi/src/x86/ffitarget.h +55 -35
  146. data/ext/ffi_c/libffi/src/x86/ffiw64.c +287 -0
  147. data/ext/ffi_c/libffi/src/x86/internal.h +29 -0
  148. data/ext/ffi_c/libffi/src/x86/internal64.h +22 -0
  149. data/ext/ffi_c/libffi/src/x86/sysv.S +975 -400
  150. data/ext/ffi_c/libffi/src/x86/unix64.S +398 -299
  151. data/ext/ffi_c/libffi/src/x86/win64.S +222 -458
  152. data/ext/ffi_c/libffi/src/x86/win64_intel.S +237 -0
  153. data/ext/ffi_c/libffi/src/xtensa/ffi.c +298 -0
  154. data/ext/ffi_c/libffi/src/xtensa/ffitarget.h +53 -0
  155. data/ext/ffi_c/libffi/src/xtensa/sysv.S +253 -0
  156. data/ext/ffi_c/libffi/stamp-h.in +1 -0
  157. data/ext/ffi_c/libffi/testsuite/Makefile.am +78 -73
  158. data/ext/ffi_c/libffi/testsuite/lib/libffi.exp +120 -25
  159. data/ext/ffi_c/libffi/testsuite/lib/target-libpath.exp +21 -1
  160. data/ext/ffi_c/libffi/testsuite/libffi.call/align_mixed.c +46 -0
  161. data/ext/ffi_c/libffi/testsuite/libffi.call/call.exp +4 -6
  162. data/ext/ffi_c/libffi/testsuite/libffi.call/{closure_stdcall.c → closure_simple.c} +7 -16
  163. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_12byte.c +4 -4
  164. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_16byte.c +4 -4
  165. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_18byte.c +4 -4
  166. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_19byte.c +4 -4
  167. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_1_1byte.c +4 -4
  168. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_20byte.c +4 -4
  169. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_20byte1.c +4 -4
  170. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_24byte.c +5 -5
  171. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_2byte.c +4 -4
  172. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_3_1byte.c +4 -4
  173. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_3byte1.c +4 -4
  174. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_3byte2.c +4 -4
  175. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_4_1byte.c +4 -4
  176. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_4byte.c +4 -4
  177. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_5_1_byte.c +4 -4
  178. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_5byte.c +4 -4
  179. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_64byte.c +5 -5
  180. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_6_1_byte.c +4 -4
  181. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_6byte.c +4 -4
  182. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_7_1_byte.c +4 -4
  183. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_7byte.c +4 -4
  184. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_8byte.c +4 -4
  185. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_9byte1.c +4 -4
  186. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_9byte2.c +4 -4
  187. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_double.c +4 -4
  188. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_float.c +4 -4
  189. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_longdouble.c +4 -4
  190. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_longdouble_split.c +4 -6
  191. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_longdouble_split2.c +4 -6
  192. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_pointer.c +4 -4
  193. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_sint16.c +4 -4
  194. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_sint32.c +4 -4
  195. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_sint64.c +4 -4
  196. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_uint16.c +4 -4
  197. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_uint32.c +4 -4
  198. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_align_uint64.c +4 -4
  199. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_dbls_struct.c +4 -4
  200. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_double_va.c +10 -9
  201. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_longdouble.c +3 -3
  202. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_longdouble_va.c +10 -9
  203. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_many_mixed_args.c +70 -0
  204. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_many_mixed_float_double.c +55 -0
  205. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_pointer.c +1 -1
  206. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_pointer_stack.c +11 -9
  207. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_struct_va1.c +114 -0
  208. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_uchar_va.c +44 -0
  209. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_uint_va.c +45 -0
  210. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_ulong_va.c +45 -0
  211. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_ulonglong.c +5 -5
  212. data/ext/ffi_c/libffi/testsuite/libffi.call/cls_ushort_va.c +44 -0
  213. data/ext/ffi_c/libffi/testsuite/libffi.call/err_bad_typedef.c +2 -2
  214. data/ext/ffi_c/libffi/testsuite/libffi.call/ffitest.h +23 -40
  215. data/ext/ffi_c/libffi/testsuite/libffi.call/float1.c +3 -1
  216. data/ext/ffi_c/libffi/testsuite/libffi.call/float2.c +6 -4
  217. data/ext/ffi_c/libffi/testsuite/libffi.call/float3.c +4 -2
  218. data/ext/ffi_c/libffi/testsuite/libffi.call/float_va.c +107 -0
  219. data/ext/ffi_c/libffi/testsuite/libffi.call/huge_struct.c +18 -19
  220. data/ext/ffi_c/libffi/testsuite/libffi.call/many.c +6 -16
  221. data/ext/ffi_c/libffi/testsuite/libffi.call/many2.c +57 -0
  222. data/ext/ffi_c/libffi/testsuite/libffi.call/many_double.c +70 -0
  223. data/ext/ffi_c/libffi/testsuite/libffi.call/many_mixed.c +78 -0
  224. data/ext/ffi_c/libffi/testsuite/libffi.call/negint.c +0 -1
  225. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct.c +6 -6
  226. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct1.c +8 -8
  227. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct10.c +6 -6
  228. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct11.c +121 -0
  229. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct2.c +5 -5
  230. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct3.c +5 -5
  231. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct4.c +5 -5
  232. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct5.c +5 -5
  233. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct6.c +6 -6
  234. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct7.c +5 -5
  235. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct8.c +6 -6
  236. data/ext/ffi_c/libffi/testsuite/libffi.call/nested_struct9.c +6 -6
  237. data/ext/ffi_c/libffi/testsuite/libffi.call/offsets.c +46 -0
  238. data/ext/ffi_c/libffi/testsuite/libffi.call/pr1172638.c +127 -0
  239. data/ext/ffi_c/libffi/testsuite/libffi.call/return_dbl.c +1 -0
  240. data/ext/ffi_c/libffi/testsuite/libffi.call/return_ldl.c +1 -1
  241. data/ext/ffi_c/libffi/testsuite/libffi.call/return_sc.c +1 -1
  242. data/ext/ffi_c/libffi/testsuite/libffi.call/return_uc.c +1 -1
  243. data/ext/ffi_c/libffi/testsuite/libffi.call/stret_large.c +7 -7
  244. data/ext/ffi_c/libffi/testsuite/libffi.call/stret_large2.c +7 -7
  245. data/ext/ffi_c/libffi/testsuite/libffi.call/stret_medium.c +5 -5
  246. data/ext/ffi_c/libffi/testsuite/libffi.call/stret_medium2.c +5 -5
  247. data/ext/ffi_c/libffi/testsuite/libffi.call/strlen.c +2 -2
  248. data/ext/ffi_c/libffi/testsuite/libffi.call/strlen2.c +49 -0
  249. data/ext/ffi_c/libffi/testsuite/libffi.call/strlen3.c +49 -0
  250. data/ext/ffi_c/libffi/testsuite/libffi.call/strlen4.c +55 -0
  251. data/ext/ffi_c/libffi/testsuite/libffi.call/struct1.c +9 -7
  252. data/ext/ffi_c/libffi/testsuite/libffi.call/struct2.c +7 -7
  253. data/ext/ffi_c/libffi/testsuite/libffi.call/struct3.c +7 -6
  254. data/ext/ffi_c/libffi/testsuite/libffi.call/struct4.c +9 -8
  255. data/ext/ffi_c/libffi/testsuite/libffi.call/struct5.c +9 -8
  256. data/ext/ffi_c/libffi/testsuite/libffi.call/struct6.c +9 -9
  257. data/ext/ffi_c/libffi/testsuite/libffi.call/struct7.c +9 -9
  258. data/ext/ffi_c/libffi/testsuite/libffi.call/struct8.c +9 -8
  259. data/ext/ffi_c/libffi/testsuite/libffi.call/struct9.c +9 -8
  260. data/ext/ffi_c/libffi/testsuite/libffi.call/testclosure.c +2 -2
  261. data/ext/ffi_c/libffi/testsuite/libffi.call/uninitialized.c +61 -0
  262. data/ext/ffi_c/libffi/testsuite/{libffi.special → libffi.call}/unwindtest.cc +3 -10
  263. data/ext/ffi_c/libffi/testsuite/{libffi.special → libffi.call}/unwindtest_ffi_call.cc +2 -1
  264. data/ext/ffi_c/libffi/testsuite/libffi.call/va_1.c +196 -0
  265. data/ext/ffi_c/libffi/testsuite/libffi.call/va_struct1.c +121 -0
  266. data/ext/ffi_c/libffi/testsuite/libffi.call/va_struct2.c +123 -0
  267. data/ext/ffi_c/libffi/testsuite/libffi.call/va_struct3.c +125 -0
  268. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_align_complex.inc +91 -0
  269. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_align_complex_double.c +10 -0
  270. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_align_complex_float.c +10 -0
  271. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_align_complex_longdouble.c +10 -0
  272. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex.inc +42 -0
  273. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_double.c +10 -0
  274. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_float.c +10 -0
  275. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_longdouble.c +10 -0
  276. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_struct.inc +71 -0
  277. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_struct_double.c +10 -0
  278. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_struct_float.c +10 -0
  279. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_struct_longdouble.c +10 -0
  280. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_va.inc +80 -0
  281. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_va_double.c +10 -0
  282. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_va_float.c +16 -0
  283. data/ext/ffi_c/libffi/testsuite/libffi.complex/cls_complex_va_longdouble.c +10 -0
  284. data/ext/ffi_c/libffi/testsuite/{libffi.special/special.exp → libffi.complex/complex.exp} +9 -8
  285. data/ext/ffi_c/libffi/testsuite/libffi.complex/complex.inc +51 -0
  286. data/ext/ffi_c/libffi/testsuite/libffi.complex/complex_defs_double.inc +7 -0
  287. data/ext/ffi_c/libffi/testsuite/libffi.complex/complex_defs_float.inc +7 -0
  288. data/ext/ffi_c/libffi/testsuite/libffi.complex/complex_defs_longdouble.inc +7 -0
  289. data/ext/ffi_c/libffi/testsuite/libffi.complex/complex_double.c +10 -0
  290. data/ext/ffi_c/libffi/testsuite/libffi.complex/complex_float.c +10 -0
  291. data/ext/ffi_c/libffi/testsuite/libffi.complex/complex_int.c +86 -0
  292. data/ext/ffi_c/libffi/testsuite/libffi.complex/complex_longdouble.c +10 -0
  293. data/ext/ffi_c/libffi/testsuite/libffi.complex/ffitest.h +1 -0
  294. data/ext/ffi_c/libffi/testsuite/libffi.complex/many_complex.inc +78 -0
  295. data/ext/ffi_c/libffi/testsuite/libffi.complex/many_complex_double.c +10 -0
  296. data/ext/ffi_c/libffi/testsuite/libffi.complex/many_complex_float.c +10 -0
  297. data/ext/ffi_c/libffi/testsuite/libffi.complex/many_complex_longdouble.c +10 -0
  298. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex.inc +37 -0
  299. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex1.inc +41 -0
  300. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex1_double.c +10 -0
  301. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex1_float.c +10 -0
  302. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex1_longdouble.c +10 -0
  303. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex2.inc +44 -0
  304. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex2_double.c +10 -0
  305. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex2_float.c +10 -0
  306. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex2_longdouble.c +10 -0
  307. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex_double.c +10 -0
  308. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex_float.c +10 -0
  309. data/ext/ffi_c/libffi/testsuite/libffi.complex/return_complex_longdouble.c +10 -0
  310. data/ext/ffi_c/libffi/testsuite/libffi.go/aa-direct.c +34 -0
  311. data/ext/ffi_c/libffi/testsuite/libffi.go/closure1.c +28 -0
  312. data/ext/ffi_c/libffi/testsuite/libffi.go/ffitest.h +1 -0
  313. data/ext/ffi_c/libffi/testsuite/libffi.go/go.exp +36 -0
  314. data/ext/ffi_c/libffi/testsuite/libffi.go/static-chain.h +19 -0
  315. data/ffi.gemspec +2 -2
  316. data/lib/ffi/enum.rb +124 -0
  317. data/lib/ffi/library.rb +65 -13
  318. data/lib/ffi/platform.rb +7 -2
  319. data/lib/ffi/platform/sparc64-linux/types.conf +102 -0
  320. data/lib/ffi/platform/x86_64-windows/types.conf +113 -20
  321. data/lib/ffi/pointer.rb +1 -0
  322. data/lib/ffi/struct.rb +0 -2
  323. data/lib/ffi/version.rb +1 -1
  324. data/spec/ffi/bitmask_spec.rb +575 -0
  325. data/spec/ffi/fixtures/BitmaskTest.c +51 -0
  326. data/spec/ffi/rbx/memory_pointer_spec.rb +4 -0
  327. data/spec/ffi/struct_spec.rb +0 -4
  328. metadata +143 -51
  329. data/ext/ffi_c/libffi/Makefile.in +0 -1820
  330. data/ext/ffi_c/libffi/Makefile.vc +0 -141
  331. data/ext/ffi_c/libffi/Makefile.vc64 +0 -141
  332. data/ext/ffi_c/libffi/aclocal.m4 +0 -1873
  333. data/ext/ffi_c/libffi/build-ios.sh +0 -67
  334. data/ext/ffi_c/libffi/compile +0 -143
  335. data/ext/ffi_c/libffi/config.guess +0 -1501
  336. data/ext/ffi_c/libffi/config.sub +0 -1705
  337. data/ext/ffi_c/libffi/configure +0 -17191
  338. data/ext/ffi_c/libffi/depcomp +0 -630
  339. data/ext/ffi_c/libffi/doc/libffi.info +0 -593
  340. data/ext/ffi_c/libffi/doc/stamp-vti +0 -4
  341. data/ext/ffi_c/libffi/fficonfig.h.in +0 -199
  342. data/ext/ffi_c/libffi/include/Makefile.in +0 -487
  343. data/ext/ffi_c/libffi/include/ffi.h.vc +0 -427
  344. data/ext/ffi_c/libffi/include/ffi.h.vc64 +0 -427
  345. data/ext/ffi_c/libffi/install-sh +0 -520
  346. data/ext/ffi_c/libffi/ltmain.sh +0 -9636
  347. data/ext/ffi_c/libffi/m4/libtool.m4 +0 -7831
  348. data/ext/ffi_c/libffi/m4/ltoptions.m4 +0 -369
  349. data/ext/ffi_c/libffi/m4/ltsugar.m4 +0 -123
  350. data/ext/ffi_c/libffi/m4/ltversion.m4 +0 -23
  351. data/ext/ffi_c/libffi/m4/lt~obsolete.m4 +0 -98
  352. data/ext/ffi_c/libffi/man/Makefile.in +0 -466
  353. data/ext/ffi_c/libffi/mdate-sh +0 -201
  354. data/ext/ffi_c/libffi/missing +0 -376
  355. data/ext/ffi_c/libffi/src/arm/gentramp.sh +0 -118
  356. data/ext/ffi_c/libffi/src/arm/trampoline.S +0 -4450
  357. data/ext/ffi_c/libffi/src/x86/darwin.S +0 -444
  358. data/ext/ffi_c/libffi/src/x86/darwin64.S +0 -416
  359. data/ext/ffi_c/libffi/src/x86/freebsd.S +0 -458
  360. data/ext/ffi_c/libffi/src/x86/win32.S +0 -1065
  361. data/ext/ffi_c/libffi/testsuite/Makefile.in +0 -500
  362. data/ext/ffi_c/libffi/testsuite/lib/libffi-dg.exp +0 -300
  363. data/ext/ffi_c/libffi/testsuite/libffi.call/many_win32.c +0 -63
  364. data/ext/ffi_c/libffi/testsuite/libffi.call/strlen_win32.c +0 -44
  365. data/ext/ffi_c/libffi/testsuite/libffi.special/ffitestcxx.h +0 -96
  366. data/ext/ffi_c/libffi/texinfo.tex +0 -7210
@@ -13,7 +13,7 @@ typedef struct
13
13
  int i;
14
14
  } test_structure_9;
15
15
 
16
- static test_structure_9 struct9 (test_structure_9 ts)
16
+ static test_structure_9 ABI_ATTR struct9 (test_structure_9 ts)
17
17
  {
18
18
  ts.f += 1;
19
19
  ts.i += 1;
@@ -28,6 +28,13 @@ int main (void)
28
28
  void *values[MAX_ARGS];
29
29
  ffi_type ts9_type;
30
30
  ffi_type *ts9_type_elements[3];
31
+
32
+ test_structure_9 ts9_arg;
33
+
34
+ /* This is a hack to get a properly aligned result buffer */
35
+ test_structure_9 *ts9_result =
36
+ (test_structure_9 *) malloc (sizeof(test_structure_9));
37
+
31
38
  ts9_type.size = 0;
32
39
  ts9_type.alignment = 0;
33
40
  ts9_type.type = FFI_TYPE_STRUCT;
@@ -36,17 +43,11 @@ int main (void)
36
43
  ts9_type_elements[1] = &ffi_type_sint;
37
44
  ts9_type_elements[2] = NULL;
38
45
 
39
- test_structure_9 ts9_arg;
40
-
41
- /* This is a hack to get a properly aligned result buffer */
42
- test_structure_9 *ts9_result =
43
- (test_structure_9 *) malloc (sizeof(test_structure_9));
44
-
45
46
  args[0] = &ts9_type;
46
47
  values[0] = &ts9_arg;
47
48
 
48
49
  /* Initialize the cif */
49
- CHECK(ffi_prep_cif(&cif, FFI_DEFAULT_ABI, 1, &ts9_type, args) == FFI_OK);
50
+ CHECK(ffi_prep_cif(&cif, ABI_NUM, 1, &ts9_type, args) == FFI_OK);
50
51
 
51
52
  ts9_arg.f = 5.55f;
52
53
  ts9_arg.i = 5;
@@ -43,13 +43,13 @@ int main (void)
43
43
  ffi_type cls_struct_type0;
44
44
  ffi_type* dbl_arg_types[5];
45
45
 
46
+ struct cls_struct_combined g_dbl = {4.0, 5.0, 1.0, 8.0};
47
+
46
48
  cls_struct_type0.size = 0;
47
49
  cls_struct_type0.alignment = 0;
48
50
  cls_struct_type0.type = FFI_TYPE_STRUCT;
49
51
  cls_struct_type0.elements = cls_struct_fields0;
50
52
 
51
- struct cls_struct_combined g_dbl = {4.0, 5.0, 1.0, 8.0};
52
-
53
53
  cls_struct_fields0[0] = &ffi_type_float;
54
54
  cls_struct_fields0[1] = &ffi_type_float;
55
55
  cls_struct_fields0[2] = &ffi_type_float;
@@ -0,0 +1,61 @@
1
+ /* { dg-do run } */
2
+ #include "ffitest.h"
3
+
4
+ typedef struct
5
+ {
6
+ unsigned char uc;
7
+ double d;
8
+ unsigned int ui;
9
+ } test_structure_1;
10
+
11
+ static test_structure_1 struct1(test_structure_1 ts)
12
+ {
13
+ ts.uc++;
14
+ ts.d--;
15
+ ts.ui++;
16
+
17
+ return ts;
18
+ }
19
+
20
+ int main (void)
21
+ {
22
+ ffi_cif cif;
23
+ ffi_type *args[MAX_ARGS];
24
+ void *values[MAX_ARGS];
25
+ ffi_type ts1_type;
26
+ ffi_type *ts1_type_elements[4];
27
+
28
+ memset(&cif, 1, sizeof(cif));
29
+ ts1_type.size = 0;
30
+ ts1_type.alignment = 0;
31
+ ts1_type.type = FFI_TYPE_STRUCT;
32
+ ts1_type.elements = ts1_type_elements;
33
+ ts1_type_elements[0] = &ffi_type_uchar;
34
+ ts1_type_elements[1] = &ffi_type_double;
35
+ ts1_type_elements[2] = &ffi_type_uint;
36
+ ts1_type_elements[3] = NULL;
37
+
38
+ test_structure_1 ts1_arg;
39
+ /* This is a hack to get a properly aligned result buffer */
40
+ test_structure_1 *ts1_result =
41
+ (test_structure_1 *) malloc (sizeof(test_structure_1));
42
+
43
+ args[0] = &ts1_type;
44
+ values[0] = &ts1_arg;
45
+
46
+ /* Initialize the cif */
47
+ CHECK(ffi_prep_cif(&cif, FFI_DEFAULT_ABI, 1,
48
+ &ts1_type, args) == FFI_OK);
49
+
50
+ ts1_arg.uc = '\x01';
51
+ ts1_arg.d = 3.14159;
52
+ ts1_arg.ui = 555;
53
+
54
+ ffi_call(&cif, FFI_FN(struct1), ts1_result, values);
55
+
56
+ CHECK(ts1_result->ui == 556);
57
+ CHECK(ts1_result->d == 3.14159 - 1);
58
+
59
+ free (ts1_result);
60
+ exit(0);
61
+ }
@@ -4,18 +4,11 @@
4
4
  PR: none.
5
5
  Originator: Jeff Sturm <jsturm@one-point.com> */
6
6
 
7
- /* { dg-do run } */
8
- #include "ffitestcxx.h"
7
+ /* { dg-do run { xfail x86_64-apple-darwin* } } */
9
8
 
10
- #if defined HAVE_STDINT_H
11
- #include <stdint.h>
12
- #endif
9
+ #include "ffitest.h"
13
10
 
14
- #if defined HAVE_INTTYPES_H
15
- #include <inttypes.h>
16
- #endif
17
-
18
- void
11
+ void ABI_ATTR
19
12
  closure_test_fn(ffi_cif* cif __UNUSED__, void* resp __UNUSED__,
20
13
  void** args __UNUSED__, void* userdata __UNUSED__)
21
14
  {
@@ -5,7 +5,8 @@
5
5
  Originator: Andreas Tobler <andreast@gcc.gnu.org> 20061213 */
6
6
 
7
7
  /* { dg-do run } */
8
- #include "ffitestcxx.h"
8
+
9
+ #include "ffitest.h"
9
10
 
10
11
  static int checking(int a __UNUSED__, short b __UNUSED__,
11
12
  signed char c __UNUSED__)
@@ -0,0 +1,196 @@
1
+ /* Area: ffi_call
2
+ Purpose: Test passing struct in variable argument lists.
3
+ Limitations: none.
4
+ PR: none.
5
+ Originator: ARM Ltd. */
6
+
7
+ /* { dg-do run } */
8
+ /* { dg-output "" { xfail avr32*-*-* } } */
9
+
10
+ #include "ffitest.h"
11
+ #include <stdarg.h>
12
+
13
+ struct small_tag
14
+ {
15
+ unsigned char a;
16
+ unsigned char b;
17
+ };
18
+
19
+ struct large_tag
20
+ {
21
+ unsigned a;
22
+ unsigned b;
23
+ unsigned c;
24
+ unsigned d;
25
+ unsigned e;
26
+ };
27
+
28
+ static int
29
+ test_fn (int n, ...)
30
+ {
31
+ va_list ap;
32
+ struct small_tag s1;
33
+ struct small_tag s2;
34
+ struct large_tag l;
35
+ unsigned char uc;
36
+ signed char sc;
37
+ unsigned short us;
38
+ signed short ss;
39
+ unsigned int ui;
40
+ signed int si;
41
+ unsigned long ul;
42
+ signed long sl;
43
+ float f;
44
+ double d;
45
+
46
+ va_start (ap, n);
47
+ s1 = va_arg (ap, struct small_tag);
48
+ l = va_arg (ap, struct large_tag);
49
+ s2 = va_arg (ap, struct small_tag);
50
+
51
+ uc = va_arg (ap, unsigned);
52
+ sc = va_arg (ap, signed);
53
+
54
+ us = va_arg (ap, unsigned);
55
+ ss = va_arg (ap, signed);
56
+
57
+ ui = va_arg (ap, unsigned int);
58
+ si = va_arg (ap, signed int);
59
+
60
+ ul = va_arg (ap, unsigned long);
61
+ sl = va_arg (ap, signed long);
62
+
63
+ f = va_arg (ap, double); /* C standard promotes float->double
64
+ when anonymous */
65
+ d = va_arg (ap, double);
66
+
67
+ printf ("%u %u %u %u %u %u %u %u %u uc=%u sc=%d %u %d %u %d %lu %ld %f %f\n",
68
+ s1.a, s1.b, l.a, l.b, l.c, l.d, l.e,
69
+ s2.a, s2.b,
70
+ uc, sc,
71
+ us, ss,
72
+ ui, si,
73
+ ul, sl,
74
+ f, d);
75
+ va_end (ap);
76
+ return n + 1;
77
+ }
78
+
79
+ int
80
+ main (void)
81
+ {
82
+ ffi_cif cif;
83
+ void* args[15];
84
+ ffi_type* arg_types[15];
85
+
86
+ ffi_type s_type;
87
+ ffi_type *s_type_elements[3];
88
+
89
+ ffi_type l_type;
90
+ ffi_type *l_type_elements[6];
91
+
92
+ struct small_tag s1;
93
+ struct small_tag s2;
94
+ struct large_tag l1;
95
+
96
+ int n;
97
+ ffi_arg res;
98
+
99
+ unsigned char uc;
100
+ signed char sc;
101
+ unsigned short us;
102
+ signed short ss;
103
+ unsigned int ui;
104
+ signed int si;
105
+ unsigned long ul;
106
+ signed long sl;
107
+ double d1;
108
+ double f1;
109
+
110
+ s_type.size = 0;
111
+ s_type.alignment = 0;
112
+ s_type.type = FFI_TYPE_STRUCT;
113
+ s_type.elements = s_type_elements;
114
+
115
+ s_type_elements[0] = &ffi_type_uchar;
116
+ s_type_elements[1] = &ffi_type_uchar;
117
+ s_type_elements[2] = NULL;
118
+
119
+ l_type.size = 0;
120
+ l_type.alignment = 0;
121
+ l_type.type = FFI_TYPE_STRUCT;
122
+ l_type.elements = l_type_elements;
123
+
124
+ l_type_elements[0] = &ffi_type_uint;
125
+ l_type_elements[1] = &ffi_type_uint;
126
+ l_type_elements[2] = &ffi_type_uint;
127
+ l_type_elements[3] = &ffi_type_uint;
128
+ l_type_elements[4] = &ffi_type_uint;
129
+ l_type_elements[5] = NULL;
130
+
131
+ arg_types[0] = &ffi_type_sint;
132
+ arg_types[1] = &s_type;
133
+ arg_types[2] = &l_type;
134
+ arg_types[3] = &s_type;
135
+ arg_types[4] = &ffi_type_uchar;
136
+ arg_types[5] = &ffi_type_schar;
137
+ arg_types[6] = &ffi_type_ushort;
138
+ arg_types[7] = &ffi_type_sshort;
139
+ arg_types[8] = &ffi_type_uint;
140
+ arg_types[9] = &ffi_type_sint;
141
+ arg_types[10] = &ffi_type_ulong;
142
+ arg_types[11] = &ffi_type_slong;
143
+ arg_types[12] = &ffi_type_double;
144
+ arg_types[13] = &ffi_type_double;
145
+ arg_types[14] = NULL;
146
+
147
+ CHECK(ffi_prep_cif_var(&cif, FFI_DEFAULT_ABI, 1, 14, &ffi_type_sint, arg_types) == FFI_OK);
148
+
149
+ s1.a = 5;
150
+ s1.b = 6;
151
+
152
+ l1.a = 10;
153
+ l1.b = 11;
154
+ l1.c = 12;
155
+ l1.d = 13;
156
+ l1.e = 14;
157
+
158
+ s2.a = 7;
159
+ s2.b = 8;
160
+
161
+ n = 41;
162
+
163
+ uc = 9;
164
+ sc = 10;
165
+ us = 11;
166
+ ss = 12;
167
+ ui = 13;
168
+ si = 14;
169
+ ul = 15;
170
+ sl = 16;
171
+ f1 = 2.12;
172
+ d1 = 3.13;
173
+
174
+ args[0] = &n;
175
+ args[1] = &s1;
176
+ args[2] = &l1;
177
+ args[3] = &s2;
178
+ args[4] = &uc;
179
+ args[5] = &sc;
180
+ args[6] = &us;
181
+ args[7] = &ss;
182
+ args[8] = &ui;
183
+ args[9] = &si;
184
+ args[10] = &ul;
185
+ args[11] = &sl;
186
+ args[12] = &f1;
187
+ args[13] = &d1;
188
+ args[14] = NULL;
189
+
190
+ ffi_call(&cif, FFI_FN(test_fn), &res, args);
191
+ /* { dg-output "5 6 10 11 12 13 14 7 8 uc=9 sc=10 11 12 13 14 15 16 2.120000 3.130000" } */
192
+ printf("res: %d\n", (int) res);
193
+ /* { dg-output "\nres: 42" } */
194
+
195
+ return 0;
196
+ }
@@ -0,0 +1,121 @@
1
+ /* Area: ffi_call
2
+ Purpose: Test passing struct in variable argument lists.
3
+ Limitations: none.
4
+ PR: none.
5
+ Originator: ARM Ltd. */
6
+
7
+ /* { dg-do run } */
8
+ /* { dg-output "" { xfail avr32*-*-* } } */
9
+
10
+ #include "ffitest.h"
11
+ #include <stdarg.h>
12
+
13
+ struct small_tag
14
+ {
15
+ unsigned char a;
16
+ unsigned char b;
17
+ };
18
+
19
+ struct large_tag
20
+ {
21
+ unsigned a;
22
+ unsigned b;
23
+ unsigned c;
24
+ unsigned d;
25
+ unsigned e;
26
+ };
27
+
28
+ static int
29
+ test_fn (int n, ...)
30
+ {
31
+ va_list ap;
32
+ struct small_tag s1;
33
+ struct small_tag s2;
34
+ struct large_tag l;
35
+
36
+ va_start (ap, n);
37
+ s1 = va_arg (ap, struct small_tag);
38
+ l = va_arg (ap, struct large_tag);
39
+ s2 = va_arg (ap, struct small_tag);
40
+ printf ("%u %u %u %u %u %u %u %u %u\n", s1.a, s1.b, l.a, l.b, l.c, l.d, l.e,
41
+ s2.a, s2.b);
42
+ va_end (ap);
43
+ return n + 1;
44
+ }
45
+
46
+ int
47
+ main (void)
48
+ {
49
+ ffi_cif cif;
50
+ void* args[5];
51
+ ffi_type* arg_types[5];
52
+
53
+ ffi_type s_type;
54
+ ffi_type *s_type_elements[3];
55
+
56
+ ffi_type l_type;
57
+ ffi_type *l_type_elements[6];
58
+
59
+ struct small_tag s1;
60
+ struct small_tag s2;
61
+ struct large_tag l1;
62
+
63
+ int n;
64
+ ffi_arg res;
65
+
66
+ s_type.size = 0;
67
+ s_type.alignment = 0;
68
+ s_type.type = FFI_TYPE_STRUCT;
69
+ s_type.elements = s_type_elements;
70
+
71
+ s_type_elements[0] = &ffi_type_uchar;
72
+ s_type_elements[1] = &ffi_type_uchar;
73
+ s_type_elements[2] = NULL;
74
+
75
+ l_type.size = 0;
76
+ l_type.alignment = 0;
77
+ l_type.type = FFI_TYPE_STRUCT;
78
+ l_type.elements = l_type_elements;
79
+
80
+ l_type_elements[0] = &ffi_type_uint;
81
+ l_type_elements[1] = &ffi_type_uint;
82
+ l_type_elements[2] = &ffi_type_uint;
83
+ l_type_elements[3] = &ffi_type_uint;
84
+ l_type_elements[4] = &ffi_type_uint;
85
+ l_type_elements[5] = NULL;
86
+
87
+ arg_types[0] = &ffi_type_sint;
88
+ arg_types[1] = &s_type;
89
+ arg_types[2] = &l_type;
90
+ arg_types[3] = &s_type;
91
+ arg_types[4] = NULL;
92
+
93
+ CHECK(ffi_prep_cif_var(&cif, FFI_DEFAULT_ABI, 1, 4, &ffi_type_sint, arg_types) == FFI_OK);
94
+
95
+ s1.a = 5;
96
+ s1.b = 6;
97
+
98
+ l1.a = 10;
99
+ l1.b = 11;
100
+ l1.c = 12;
101
+ l1.d = 13;
102
+ l1.e = 14;
103
+
104
+ s2.a = 7;
105
+ s2.b = 8;
106
+
107
+ n = 41;
108
+
109
+ args[0] = &n;
110
+ args[1] = &s1;
111
+ args[2] = &l1;
112
+ args[3] = &s2;
113
+ args[4] = NULL;
114
+
115
+ ffi_call(&cif, FFI_FN(test_fn), &res, args);
116
+ /* { dg-output "5 6 10 11 12 13 14 7 8" } */
117
+ printf("res: %d\n", (int) res);
118
+ /* { dg-output "\nres: 42" } */
119
+
120
+ return 0;
121
+ }