add multiple_inheritance example from Salvaire. It's working
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@6577 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
parent
3fc7b773d9
commit
63812c22ee
5 changed files with 77 additions and 0 deletions
16
Examples/perl5/multiple_inheritance/runme.pl
Normal file
16
Examples/perl5/multiple_inheritance/runme.pl
Normal file
|
|
@ -0,0 +1,16 @@
|
|||
# file: runme.pl
|
||||
|
||||
# This file test multiple inheritance
|
||||
|
||||
use example;
|
||||
|
||||
$foo_Bar = new example::Foo_Bar();
|
||||
|
||||
print "must be foo: ";
|
||||
$foo_Bar->foo();
|
||||
|
||||
print "must be bar: ";
|
||||
$foo_Bar->bar();
|
||||
|
||||
print "must be foobar: ";
|
||||
$foo_Bar->fooBar();
|
||||
Loading…
Add table
Add a link
Reference in a new issue