git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@7710 626c5289-ae23-0410-ae9c-e8d60b6d4f22
28 lines
894 B
Text
28 lines
894 B
Text
/* ------------------------------------------------------------
|
|
* Enums mapped as integer values
|
|
* ------------------------------------------------------------ */
|
|
|
|
%apply int { enum SWIGTYPE };
|
|
%apply const int& { const enum SWIGTYPE& };
|
|
|
|
%typemap(in,fragment=SWIG_AsVal_frag(int),noblock=1) const enum SWIGTYPE& (int val, int ecode, $basetype temp) {
|
|
ecode = SWIG_AsVal(int)($input, &val);
|
|
if (ecode != SWIG_OK) {
|
|
%argument_fail(ecode, "$type", $argnum);
|
|
} else {
|
|
temp = %static_cast(val,$basetype);
|
|
$1 = &temp;
|
|
}
|
|
}
|
|
|
|
%typemap(varin,fragment=SWIG_AsVal_frag(int),noblock=1) enum SWIGTYPE {
|
|
if (sizeof(int) != sizeof($1)) {
|
|
%variable_fail(SWIG_AttributeError,"$type", "arch, read-only $name");
|
|
} else {
|
|
int ecode = SWIG_AsVal(int)($input, %reinterpret_cast(&$1,int*));
|
|
if (ecode != SWIG_OK) {
|
|
%variable_fail(ecode, "$type", "$name");
|
|
}
|
|
}
|
|
}
|
|
|