/trunk/Examples/test-suite/octave/smart_pointer_extend_runme.m

 1smart_pointer_extend
 2
 3f = Foo();
 4b = Bar(f);
 5
 6if (b.extension() != f.extension())
 7  error
 8endif
 9
10
11b = CBase();
12d = CDerived();
13p = CPtr();
14
15if (b.bar() != p.bar())
16  error
17endif
18
19if (d.foo() != p.foo())
20  error
21endif
22
23if (b.hello() != p.hello())
24  error
25endif
26
27
28
29d = DFoo();
30
31dp = DPtrFoo(d);
32
33if (d.SExt(1) != dp.SExt(1))
34  error
35endif
36
37if (d.Ext(1) != dp.Ext(1))
38  error
39endif
40
41