198eef555d
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@8625 626c5289-ae23-0410-ae9c-e8d60b6d4f22
9 lines
119 B
Perl
9 lines
119 B
Perl
use inherit;
|
|
|
|
$der = new inherit::CDerived();
|
|
$str = $der->Foo();
|
|
|
|
if ($str ne "CBase::Foo") {
|
|
die "test failed";
|
|
}
|
|
|