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

 1constructor_copy
 2
 3f1 = Foo1(3);
 4f11 = Foo1(f1);
 5
 6
 7if (f1.x != f11.x)
 8    error
 9endif
10
11
12f8 = Foo8();
13try
14    f81 = Foo8(f8);
15    good = 0;
16catch
17    good = 1;
18end_try_catch
19
20if (!good)
21    error
22endif
23
24
25bi = Bari(5);
26bc = Bari(bi);
27
28if (bi.x != bc.x)
29    error
30endif
31    
32
33bd = Bard(5);
34try
35    bc = Bard(bd);
36    good = 0;
37catch
38    good = 1;
39end_try_catch
40
41if (!good)
42    error
43endif
44