#91 Delegate outside Class problem

[Fernando P. Nájera Cano]

Hi,

I've found another problem. You can have this:

file.vb

Public Delegate Sub ADelegate(ByVal sender As
Object, ByVal e As EventArgs)

Nothing more. It will compile but VB.DOC refuses to
accept it. It says "Stack Empty". Also you can include
it into a Namespace:

Namespace myname

Public Delegate Sub ADelegate(ByVal sender As
Object, ByVal e As EventArgs)

End Namespace

It doesn't work either.

I've tracked it down to CommentVisitor.cs line 67:

Location getLocation\(\)
\{
    return new Location\(imports,

aliasImports, (string)baseTypes.Peek(), getParentType
(), currentNamespace);
}

My workaround should be:

Location getLocation\(\)
\{
    if \(baseTypes.Count>0\) 
    \{
        return new Location

(imports, aliasImports, (string)baseTypes.Peek(),
getParentType(), currentNamespace);
}
else
{
return new Location
(imports, aliasImports, "", getParentType(),
currentNamespace);
}
}

I'm doing quite of blind work here -- I don't know if it will
break anything else. At least, it continues parsing.

[Joe Kaplan]

Logged In: YES
user_id=1269428

I have a similar problem in one of my projects and this fix
seems to take care of it. This is the only bug I currently have
with vb-doc affecting my work that isn't fixed in CVS yet.