c28d0c6c80
- rename example modules from "example" to "swigexample", to avoid a warning from shadowing the Octave built-in function "example" - remove deprecated "static" Makefile targets: there is no longer an option to build static Octave modules in the Examples Makefile - emacs whitespace cleanup run on all files
44 lines
738 B
OpenEdge ABL
44 lines
738 B
OpenEdge ABL
/* File : example.i */
|
|
|
|
/* This file has a few "typical" uses of C++ references. */
|
|
|
|
%module swigexample
|
|
|
|
%{
|
|
#include "example.h"
|
|
%}
|
|
|
|
%rename(cprint) print;
|
|
|
|
class Vector {
|
|
public:
|
|
Vector(double x, double y, double z);
|
|
~Vector();
|
|
char *print();
|
|
};
|
|
|
|
/* This helper function calls an overloaded operator */
|
|
%inline %{
|
|
Vector addv(Vector &a, Vector &b) {
|
|
return a+b;
|
|
}
|
|
%}
|
|
|
|
/* Wrapper around an array of vectors class */
|
|
|
|
class VectorArray {
|
|
public:
|
|
VectorArray(int maxsize);
|
|
~VectorArray();
|
|
int size();
|
|
|
|
/* This wrapper provides an alternative to the [] operator */
|
|
%extend {
|
|
Vector &get(int index) {
|
|
return (*$self)[index];
|
|
}
|
|
void set(int index, Vector &a) {
|
|
(*$self)[index] = a;
|
|
}
|
|
}
|
|
};
|