| Index: swig/Lib/carrays.i
|
| ===================================================================
|
| --- swig/Lib/carrays.i (revision 0)
|
| +++ swig/Lib/carrays.i (revision 0)
|
| @@ -0,0 +1,120 @@
|
| +/* -----------------------------------------------------------------------------
|
| + * 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.
|
| + *
|
| + * carrays.i
|
| + *
|
| + * SWIG library file containing macros that can be used to manipulate simple
|
| + * pointers as arrays.
|
| + * ----------------------------------------------------------------------------- */
|
| +
|
| +/* -----------------------------------------------------------------------------
|
| + * %array_functions(TYPE,NAME)
|
| + *
|
| + * Generates functions for creating and accessing elements of a C array
|
| + * (as pointers). Creates the following functions:
|
| + *
|
| + * TYPE *new_NAME(int nelements)
|
| + * void delete_NAME(TYPE *);
|
| + * TYPE NAME_getitem(TYPE *, int index);
|
| + * void NAME_setitem(TYPE *, int index, TYPE value);
|
| + *
|
| + * ----------------------------------------------------------------------------- */
|
| +
|
| +%define %array_functions(TYPE,NAME)
|
| +%{
|
| +static TYPE *new_##NAME(int nelements) { %}
|
| +#ifdef __cplusplus
|
| +%{ return new TYPE[nelements]; %}
|
| +#else
|
| +%{ return (TYPE *) calloc(nelements,sizeof(TYPE)); %}
|
| +#endif
|
| +%{}
|
| +
|
| +static void delete_##NAME(TYPE *ary) { %}
|
| +#ifdef __cplusplus
|
| +%{ delete [] ary; %}
|
| +#else
|
| +%{ free(ary); %}
|
| +#endif
|
| +%{}
|
| +
|
| +static TYPE NAME##_getitem(TYPE *ary, int index) {
|
| + return ary[index];
|
| +}
|
| +static void NAME##_setitem(TYPE *ary, int index, TYPE value) {
|
| + ary[index] = value;
|
| +}
|
| +%}
|
| +
|
| +TYPE *new_##NAME(int nelements);
|
| +void delete_##NAME(TYPE *ary);
|
| +TYPE NAME##_getitem(TYPE *ary, int index);
|
| +void NAME##_setitem(TYPE *ary, int index, TYPE value);
|
| +
|
| +%enddef
|
| +
|
| +
|
| +/* -----------------------------------------------------------------------------
|
| + * %array_class(TYPE,NAME)
|
| + *
|
| + * Generates a class wrapper around a C array. The class has the following
|
| + * interface:
|
| + *
|
| + * struct NAME {
|
| + * NAME(int nelements);
|
| + * ~NAME();
|
| + * TYPE getitem(int index);
|
| + * void setitem(int index, TYPE value);
|
| + * TYPE * cast();
|
| + * static NAME *frompointer(TYPE *t);
|
| + * }
|
| + *
|
| + * ----------------------------------------------------------------------------- */
|
| +
|
| +%define %array_class(TYPE,NAME)
|
| +%{
|
| +typedef TYPE NAME;
|
| +%}
|
| +typedef struct NAME {
|
| + /* Put language specific enhancements here */
|
| +
|
| +} NAME;
|
| +
|
| +%extend NAME {
|
| +
|
| +#ifdef __cplusplus
|
| +NAME(int nelements) {
|
| + return new TYPE[nelements];
|
| +}
|
| +~NAME() {
|
| + delete [] self;
|
| +}
|
| +#else
|
| +NAME(int nelements) {
|
| + return (TYPE *) calloc(nelements,sizeof(TYPE));
|
| +}
|
| +~NAME() {
|
| + free(self);
|
| +}
|
| +#endif
|
| +
|
| +TYPE getitem(int index) {
|
| + return self[index];
|
| +}
|
| +void setitem(int index, TYPE value) {
|
| + self[index] = value;
|
| +}
|
| +TYPE * cast() {
|
| + return self;
|
| +}
|
| +static NAME *frompointer(TYPE *t) {
|
| + return (NAME *) t;
|
| +}
|
| +
|
| +};
|
| +
|
| +%types(NAME = TYPE);
|
| +
|
| +%enddef
|
| +
|
|
|