summaryrefslogtreecommitdiff
path: root/Examples/test-suite/varargs_typemap.i
blob: 54c0526f8a30e08b7f443dcbf976ef4bb1914250 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
%module varargs_typemap

 /* The typemap and action are taken from the "Variable length arguments"
  * chapter of the SWIG manual.
  */

%typemap(in) (...)(char *args[10]) {
    int i;
    int argc;
    for (i = 0; i < 10; i++) args[i] = 0;
    argc = PyTuple_Size(varargs);
    if (argc > 10) {
       PyErr_SetString(PyExc_ValueError,"Too many arguments");
       return NULL;
    }
    for (i = 0; i < argc; i++) {
       PyObject *o = PyTuple_GetItem(varargs,i);
       if (!PyString_Check(o)) {
           PyErr_SetString(PyExc_ValueError,"Expected a string");
           return NULL;
       }
       args[i] = PyString_AsString(o);
    }
    $1 = (void *) args;
}

%feature("action") testfunc {
   char **args = (char **) arg3;
   result = testfunc(arg1, arg2, args[0], args[1], args[2], args[3], args[4],
                   args[5],args[6],args[7],args[8],args[9], NULL);
}

%inline {
char* testfunc (int arg1, double arg2, ...)
{
    va_list ap;
    char *c;
    va_start(ap, arg2);
    c = va_arg(ap, char*);
    va_end(ap);
    return c;
}
}