ag/cpython-source-deps
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fix issue #421 (#422)

Browse Source 
Fantastic - thanks for digging into this.
This commit is contained in:
Andreas Krebbel
2018-04-05 14:27:32 +02:00
committed by Anthony Green
parent 8660e69359
commit 801c1bd712
1 changed files with 13 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

19
testsuite/libffi.bhaible/test-call.c
View File

@@ -123,6 +123,7 @@ void
int_tests (void)
{
int ir;
ffi_arg retvalue;
#if (!defined(DGTEST)) || DGTEST == 2
ir = i_v();
fprintf(out,"->%d\n",ir);
@@ -132,7 +133,8 @@ void
ffi_cif cif;
FFI_PREP_CIF_NOARGS(cif,ffi_type_sint);
{
FFI_CALL(cif,i_v,NULL,&ir);
FFI_CALL(cif,i_v,NULL,&retvalue);
ir = retvalue;
}
}
fprintf(out,"->%d\n",ir);
@@ -150,7 +152,8 @@ void
FFI_PREP_CIF(cif,argtypes,ffi_type_sint);
{
/*const*/ void* args[] = { &i1 };
FFI_CALL(cif,i_i,args,&ir);
FFI_CALL(cif,i_i,args,&retvalue);
ir = retvalue;
}
}
fprintf(out,"->%d\n",ir);
@@ -168,7 +171,8 @@ void
FFI_PREP_CIF(cif,argtypes,ffi_type_sint);
{
/*const*/ void* args[] = { &i1, &i2 };
FFI_CALL(cif,i_i2,args,&ir);
FFI_CALL(cif,i_i2,args,&retvalue);
ir = retvalue;
}
}
fprintf(out,"->%d\n",ir);
@@ -186,7 +190,8 @@ void
FFI_PREP_CIF(cif,argtypes,ffi_type_sint);
{
/*const*/ void* args[] = { &i1, &i2, &i3, &i4 };
FFI_CALL(cif,i_i4,args,&ir);
FFI_CALL(cif,i_i4,args,&retvalue);
ir = retvalue;
}
}
fprintf(out,"->%d\n",ir);
@@ -204,7 +209,8 @@ void
FFI_PREP_CIF(cif,argtypes,ffi_type_sint);
{
/*const*/ void* args[] = { &i1, &i2, &i3, &i4, &i5, &i6, &i7, &i8 };
FFI_CALL(cif,i_i8,args,&ir);
FFI_CALL(cif,i_i8,args,&retvalue);
ir = retvalue;
}
}
fprintf(out,"->%d\n",ir);
@@ -222,7 +228,8 @@ void
FFI_PREP_CIF(cif,argtypes,ffi_type_sint);
{
/*const*/ void* args[] = { &i1, &i2, &i3, &i4, &i5, &i6, &i7, &i8, &i9, &i10, &i11, &i12, &i13, &i14, &i15, &i16 };
FFI_CALL(cif,i_i16,args,&ir);
FFI_CALL(cif,i_i16,args,&retvalue);
ir = retvalue;
}
}
fprintf(out,"->%d\n",ir);