7f53260203
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/branches/gsoc2009-matevz@11905 626c5289-ae23-0410-ae9c-e8d60b6d4f22
21 lines
493 B
OpenEdge ABL
21 lines
493 B
OpenEdge ABL
/* -----------------------------------------------------------------------------
|
|
* attribute.i
|
|
*
|
|
* SWIG library file for implementing attributes.
|
|
* ----------------------------------------------------------------------------- */
|
|
|
|
/* we use a simple exception warning here */
|
|
%{
|
|
#include <stdio.h>
|
|
%}
|
|
#define %attribute_exception(code,msg) printf("%s\n",msg)
|
|
|
|
#ifndef %arg
|
|
#define %arg(x) x
|
|
#endif
|
|
|
|
#ifndef %mangle
|
|
#define %mangle(Type...) #@Type
|
|
#endif
|
|
|
|
%include <typemaps/attribute.swg>
|