jyapayne/swig
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Initial commit of Octave module.

Browse source 
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@10290 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
Xavier Delacour 2008-03-01 23:35:44 +00:00
commit 393391965c
275 changed files with 14004 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

39
Examples/test-suite/octave/director_nested_runme.m Normal file
View file

@ -0,0 +1,39 @@
director_nested
A=@() subclass(FooBar_int(),
'do_step',@(self) "A::do_step;",
'get_value',@(self) "A::get_value");
a = A();
if (!strcmp(a.step(),"Bar::step;Foo::advance;Bar::do_advance;A::do_step;"))
error("Bad A virtual resolution")
endif
B=@() subclass(FooBar_int(),
'do_advance',@(self) strcat("B::do_advance;",self.do_step()),
'do_step',@(self) "B::do_step;",
'get_value',@(self) 1);
b = B();
if (!strcmp(b.step(),"Bar::step;Foo::advance;B::do_advance;B::do_step;"))
error("Bad B virtual resolution")
endif
C=@() subclass(FooBar_int(),
'do_advance',@(self) strcat("C::do_advance;",self.FooBar_int.do_advance()),
'do_step',@(self) "C::do_step;",
'get_value',@(self) 2,
'get_name',@(self) strcat(self.FooBar_int.get_name()," hello"));
cc = C();
c = FooBar_int_get_self(cc);
c.advance();
if (!strcmp(c.get_name(),"FooBar::get_name hello"))
error
endif
if (!strcmp(c.name(),"FooBar::get_name hello"))
error
endif