long long typemap rewrite for compilers that don't understand long long

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@4505 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
William S Fulton 2003-03-10 22:41:28 +00:00
commit 7904892b45

View file

@ -66,9 +66,9 @@ or you can use the %apply directive :
*/ */
%define INPUT_TYPEMAP(type, converter) %define INPUT_TYPEMAP(type, converter)
%typemap(in) type *INPUT(type temp), type &INPUT(type temp) %typemap(in) type *INPUT($*1_ltype temp), type &INPUT($*1_ltype temp)
{ {
temp = (type) converter($input); temp = ($*1_ltype) converter($input);
$1 = &temp; $1 = &temp;
} }
%typemap(typecheck) type *INPUT = type; %typemap(typecheck) type *INPUT = type;
@ -138,7 +138,7 @@ output values.
%include "fragments.i" %include "fragments.i"
%define OUTPUT_TYPEMAP(type, converter, convtype) %define OUTPUT_TYPEMAP(type, converter, convtype)
%typemap(in,numinputs=0) type *OUTPUT(type temp), type &OUTPUT(type temp) "$1 = &temp;"; %typemap(in,numinputs=0) type *OUTPUT($*1_ltype temp), type &OUTPUT($*1_ltype temp) "$1 = &temp;";
%typemap(argout, fragment="output_helper") type *OUTPUT, type &OUTPUT { %typemap(argout, fragment="output_helper") type *OUTPUT, type &OUTPUT {
VALUE o = converter(convtype (*$1)); VALUE o = converter(convtype (*$1));
$result = output_helper($result, o); $result = output_helper($result, o);