File: typemap_arrays.i

package info (click to toggle)
swig 4.3.0-1
  • links: PTS, VCS
  • area: main
  • in suites: trixie
  • size: 46,232 kB
  • sloc: cpp: 54,631; ansic: 29,122; java: 17,530; python: 12,505; cs: 10,369; ruby: 7,232; yacc: 6,477; makefile: 5,965; javascript: 5,520; sh: 5,415; perl: 4,187; php: 3,693; ml: 2,187; lisp: 2,056; tcl: 1,991; xml: 115
file content (30 lines) | stat: -rw-r--r-- 664 bytes parent folder | download | duplicates (14)
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
%module typemap_arrays

// Test that previously non-working array typemaps special variables are working

%typemap(in) SWIGTYPE[ANY] {
  _should_not_be_used_and_will_not_compile_
}

// Check $basemangle expands to _p_int and $basetype expands to int *
%typemap(in) int *nums[3] (int *temp[3]) {
  $basetype var1$basemangle = new int(10);
  $basetype var2$basemangle = new int(20);
  $basetype var3$basemangle = new int(30);
  temp[0] = var1_p_int;
  temp[1] = var2_p_int;
  temp[2] = var3_p_int;
  $1 = temp;
}

%inline %{
int sumA(int *nums[3]) {
  int sum = 0;
  for (int i=0; i<3; ++i) {
    int *p = nums[i];
    if (p)
      sum += *p;
  }
  return sum;
}
%}