Initial commit of Octave module.
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@10290 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
parent
50b1578e19
commit
393391965c
275 changed files with 14004 additions and 5 deletions
36
Examples/test-suite/octave/director_detect_runme.m
Normal file
36
Examples/test-suite/octave/director_detect_runme.m
Normal file
|
|
@ -0,0 +1,36 @@
|
|||
director_detect
|
||||
|
||||
global MyBar=@(val=2) \
|
||||
subclass(director_detect.Bar(),'val',val,@get_value,@get_class,@just_do_it,@clone);
|
||||
function val=get_value(self)
|
||||
self.val = self.val + 1;
|
||||
val = self.val;
|
||||
end
|
||||
function ptr=get_class(self)
|
||||
global director_detect;
|
||||
self.val = self.val + 1;
|
||||
ptr=director_detect.A();
|
||||
end
|
||||
function just_do_it(self)
|
||||
self.val = self.val + 1;
|
||||
end
|
||||
function ptr=clone(self)
|
||||
global MyBar;
|
||||
ptr=MyBar(self.val);
|
||||
end
|
||||
|
||||
b = MyBar();
|
||||
|
||||
f = b.baseclass();
|
||||
|
||||
v = f.get_value();
|
||||
a = f.get_class();
|
||||
f.just_do_it();
|
||||
|
||||
c = b.clone();
|
||||
vc = c.get_value();
|
||||
|
||||
if ((v != 3) || (b.val != 5) || (vc != 6))
|
||||
error("Bad virtual detection")
|
||||
endif
|
||||
|
||||
Loading…
Add table
Add a link
Reference in a new issue