18 lines
295 B
OpenEdge ABL
18 lines
295 B
OpenEdge ABL
|
|
// Tests SWIG's handling of pass-by-value for complex datatypes
|
||
|
|
%module example
|
||
|
|
|
||
|
|
%{
|
||
|
|
#include "example.h"
|
||
|
|
%}
|
||
|
|
|
||
|
|
%include "example.h"
|
||
|
|
|
||
|
|
/* Some helper functions for our interface */
|
||
|
|
%inline %{
|
||
|
|
|
||
|
|
void vector_print(Vector *v) {
|
||
|
|
printf("Vector %p = (%g, %g, %g)\n", (void *)v, v->x, v->y, v->z);
|
||
|
|
}
|
||
|
|
%}
|
||
|
|
|