mirror of https://github.com/swig/swig
51 lines
1.0 KiB
OpenEdge ABL
51 lines
1.0 KiB
OpenEdge ABL
/* File : example.i */
|
|
%module example
|
|
%{
|
|
#include "example.h"
|
|
%}
|
|
#pragma SWIG nowarn=SWIGWARN_TYPEMAP_SWIGTYPELEAK
|
|
|
|
/* Some global variable declarations */
|
|
%inline %{
|
|
extern int ivar;
|
|
extern short svar;
|
|
extern long lvar;
|
|
extern unsigned int uivar;
|
|
extern unsigned short usvar;
|
|
extern unsigned long ulvar;
|
|
extern signed char scvar;
|
|
extern unsigned char ucvar;
|
|
extern char cvar;
|
|
extern float fvar;
|
|
extern double dvar;
|
|
extern char *strvar;
|
|
extern const char cstrvar[];
|
|
extern int *iptrvar;
|
|
extern char name[256];
|
|
|
|
extern Point *ptptr;
|
|
extern Point pt;
|
|
%}
|
|
|
|
|
|
/* Some read-only variables */
|
|
|
|
%immutable;
|
|
|
|
%inline %{
|
|
extern int status;
|
|
extern char path[256];
|
|
%}
|
|
|
|
%mutable;
|
|
|
|
/* Some helper functions to make it easier to test */
|
|
%inline %{
|
|
extern void print_vars();
|
|
extern int *new_int(int value);
|
|
extern Point *new_Point(int x, int y);
|
|
extern char *Point_print(Point *p);
|
|
extern void pt_print();
|
|
%}
|
|
|