mirror of https://github.com/swig/swig
38 lines
742 B
OpenEdge ABL
38 lines
742 B
OpenEdge ABL
/* File : example.i */
|
|
%module example
|
|
|
|
/* A few preprocessor macros */
|
|
|
|
#define ICONST 42
|
|
#define FCONST 2.1828
|
|
#define CCONST 'x'
|
|
#define CCONST2 '\n'
|
|
#define SCONST "Hello World"
|
|
#define SCONST2 "\"Hello World\""
|
|
|
|
/* This should work just fine */
|
|
#define EXPR ICONST + 3*(FCONST)
|
|
|
|
/* This shouldn't do anything */
|
|
#define EXTERN extern
|
|
|
|
/* Neither should this (BAR isn't defined) */
|
|
#define FOO (ICONST + BAR)
|
|
|
|
/* The following statements also produce constants */
|
|
const int iconst = 37;
|
|
const double fconst = 3.14;
|
|
|
|
%constant(double) PI = 3.14159;
|
|
|
|
/* Test address of operator */
|
|
|
|
%{
|
|
static double blah = 1.2345;
|
|
%}
|
|
|
|
%constant(double *) blahptr = &blah;
|
|
|
|
|
|
|