File: runme.m

package info (click to toggle)
renderdoc 1.2%2Bdfsg-2
  • links: PTS, VCS
  • area: main
  • in suites: buster
  • size: 79,584 kB
  • sloc: cpp: 491,671; ansic: 285,823; python: 12,617; java: 11,345; cs: 7,181; makefile: 6,703; yacc: 5,682; ruby: 4,648; perl: 3,461; php: 2,119; sh: 2,068; lisp: 1,835; tcl: 1,068; ml: 747; xml: 137
file content (65 lines) | stat: -rw-r--r-- 1,368 bytes parent folder | download | duplicates (8)
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
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
# do not dump Octave core
if exist("crash_dumps_octave_core", "builtin")
  crash_dumps_octave_core(0);
endif

# This file illustrates the manipulation of C++ references in Octave

swigexample

# ----- Object creation -----

printf("Creating some objects:\n");
a = swigexample.Vector(3,4,5)
b = swigexample.Vector(10,11,12)

printf("    Created %s\n",a.cprint());
printf("    Created %s\n",b.cprint());

# ----- Call an overloaded operator -----

# This calls the wrapper we placed around
#
#      operator+(const Vector &a, const Vector &)
#
# It returns a new allocated object.

printf("Adding a+b\n");
c = swigexample.addv(a,b);
printf("    a+b = %s\n", c.cprint());

clear c

# ----- Create a vector array -----

# Note: Using the high-level interface here
printf("Creating an array of vectors\n");
va = swigexample.VectorArray(10)

# ----- Set some values in the array -----

# These operators copy the value of $a and $b to the vector array
va.set(0,a);
va.set(1,b);

va.set(2,swigexample.addv(a,b))

# Get some values from the array

printf("Getting some array values\n");
for i=0:4,
    printf("    va(%d) = %s\n",i,va.get(i).cprint());
end;

# Watch under resource meter to check on this
printf("Making sure we don't leak memory.\n");
for i=0:1000000-1,
    c = va.get(mod(i,10));
end

# ----- Clean up -----
printf("Cleaning up\n");

clear va
clear a
clear b