25 lines
655 B
OpenEdge ABL
25 lines
655 B
OpenEdge ABL
/* -----------------------------------------------------------------------------
|
|
* See the LICENSE file for information on copyright, usage and redistribution
|
|
* of SWIG, and the README file for authors - http://www.swig.org/release.html.
|
|
*
|
|
* 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>
|