git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@4858 626c5289-ae23-0410-ae9c-e8d60b6d4f22
18 lines
403 B
OpenEdge ABL
18 lines
403 B
OpenEdge ABL
/* This interface file tests whether SWIG handles pointer-reference
|
|
(*&) arguments.
|
|
|
|
SWIG 1.3a5 signals a syntax error.
|
|
*/
|
|
|
|
%module pointer_reference
|
|
|
|
#ifdef SWIGGUILE
|
|
/* A silly testing typemap for feeding a doubly indirect integer */
|
|
%typemap(in) int *&XYZZY (int temp1, int *temp2) {
|
|
temp1 = gh_scm2int($input); temp2 = &temp1; $1 = &temp2;
|
|
};
|
|
#endif
|
|
|
|
%inline %{
|
|
void foo(int *&XYZZY) {}
|
|
%}
|