Perl added to the Unified typemap library, cleaner way to use the library, and 'normalized' macro names
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@7707 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
parent
f2324be428
commit
f2f1b9889f
112 changed files with 3262 additions and 3375 deletions
38
SWIG/Examples/test-suite/langobj.i
Normal file
38
SWIG/Examples/test-suite/langobj.i
Normal file
|
|
@ -0,0 +1,38 @@
|
|||
%module langobj
|
||||
|
||||
|
||||
#ifndef SWIG_Object
|
||||
#define SWIG_Object void *
|
||||
#endif
|
||||
|
||||
|
||||
%inline %{
|
||||
|
||||
#ifdef SWIGTCL
|
||||
#define SWIG_Object Tcl_Obj *
|
||||
#endif
|
||||
|
||||
#ifdef SWIGPYTHON
|
||||
#define SWIG_Object PyObject *
|
||||
#endif
|
||||
|
||||
#ifdef SWIGRUBY
|
||||
#define SWIG_Object VALUE
|
||||
#endif
|
||||
|
||||
#ifndef SWIG_Object
|
||||
#define SWIG_Object void *
|
||||
#endif
|
||||
|
||||
%}
|
||||
|
||||
|
||||
%inline %{
|
||||
|
||||
SWIG_Object identity(SWIG_Object x) {
|
||||
return x;
|
||||
}
|
||||
|
||||
%}
|
||||
|
||||
|
||||
Loading…
Add table
Add a link
Reference in a new issue