// Test pubname / findpub
using namespace oadl;
class fooClass {
public proc create()
{
"My name is ", objname(self), "\n";
"Create's name is ", pubname(public::create), "\n";
"Nostril's name is ", pubname(public::nostril), "\n";
if (findobj("fooClass") == fooClass) "findobj works!\n";
if (findpub("create") == public::create) "findpub works!\n";
}
}
fooClass bar();