class foo {
    public proc length() {
        "foo.length()\n";
        return 0;
    }
}

proc main()
{
    var bar = new foo();
    "bar.length() = ", bar.length(), '\n';
    "oadl::length(bar) = ", oadl::length(bar), '\n';

    forall (bar.(pub)) {
        "", pub, '\n';
    }
}