From: John L. <wu...@us...> - 2005-01-24 03:01:22
|
Update of /cvsroot/swig/SWIG/Lib/guile In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv415 Modified Files: typemaps.i Log Message: Cast guile enum in typemap corretly Index: typemaps.i =================================================================== RCS file: /cvsroot/swig/SWIG/Lib/guile/typemaps.i,v retrieving revision 1.24 retrieving revision 1.25 diff -C2 -d -r1.24 -r1.25 *** typemaps.i 1 Nov 2004 21:11:58 -0000 1.24 --- typemaps.i 24 Jan 2005 03:01:09 -0000 1.25 *************** *** 120,124 **** /* Enums */ ! %typemap(in) enum SWIGTYPE { $1 = gh_scm2int($input); } %typemap(varin) enum SWIGTYPE { $1 = ($1_type) gh_scm2int($input); } %typemap(out) enum SWIGTYPE { $result = gh_int2scm($1); } --- 120,124 ---- /* Enums */ ! %typemap(in) enum SWIGTYPE { $1 = ($1_type) gh_scm2int($input); } %typemap(varin) enum SWIGTYPE { $1 = ($1_type) gh_scm2int($input); } %typemap(out) enum SWIGTYPE { $result = gh_int2scm($1); } |