jyapayne/swig
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

const enum SWIGTYPE & typemaps added

Browse source 
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@6783 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
William S Fulton 2004-11-28 19:16:24 +00:00
commit b8d5ea651d
11 changed files with 239 additions and 28 deletions
Download patch file Download diff file Expand all files Collapse all files

22
Lib/tcl/tcl8.swg
View file

@ -80,14 +80,15 @@
/* Constant references. Passed by value */
/* Const primitive references. Passed by value */
%typemap(in) const int & ($basetype temp),
const short & ($basetype temp),
const long & ($basetype temp),
const unsigned int & ($basetype temp),
const unsigned short & ($basetype temp),
const unsigned long & ($basetype temp),
const signed char & ($basetype temp),
const unsigned char & ($basetype temp)
%typemap(in) const int & ($*1_ltype temp),
const short & ($*1_ltype temp),
const long & ($*1_ltype temp),
const unsigned int & ($*1_ltype temp),
const unsigned short & ($*1_ltype temp),
const unsigned long & ($*1_ltype temp),
const signed char & ($*1_ltype temp),
const unsigned char & ($*1_ltype temp),
const enum SWIGTYPE & ($*1_ltype temp)
{
long ltemp;
if (Tcl_GetLongFromObj(interp, $input, &ltemp) != TCL_OK) {
@ -229,7 +230,8 @@
const short &, const unsigned short &,
const long &, const unsigned long &,
const signed char &, const unsigned char &,
const bool &
const bool &,
const enum SWIGTYPE &
"Tcl_SetObjResult(interp,Tcl_NewIntObj((long) *($1)));";
%typemap(out) const float &, const double &
@ -484,7 +486,7 @@
const int &, const short &, const long &,
const unsigned int &, const unsigned short &, const unsigned long &,
const long long &, const unsigned long long &,
enum SWIGTYPE,
enum SWIGTYPE, const enum SWIGTYPE &,
bool, const bool &
{
long tmp;