public override object VisitAttributeStmt([NotNull] VisualBasic6Parser.AttributeStmtContext context)
{
object result = null;
var attName = context.implicitCallStmt_InStmt().GetText();
var attValue = context.literal()[0].GetText(); // For this few attributes, there is only one value, no comma. Array should always have at least one item.
switch (true)
{
case bool b when attName.Equals("VB_Name", StringComparison.InvariantCultureIgnoreCase):
_rootModule.ModuleName = context.literal()[0].GetText().Replace("\"", string.Empty);
break;
case bool b when attName.Equals("VB_GlobalNameSpace", StringComparison.InvariantCultureIgnoreCase):
_isClassGlobalNameSpace = bool.Parse(attValue);
break;
case bool b when attName.Equals("VB_Creatable", StringComparison.InvariantCultureIgnoreCase):
_isClassCreatable = bool.Parse(attValue);
break;
case bool b when attName.Equals("VB_Exposed", StringComparison.InvariantCultureIgnoreCase):
_isClassExposed = bool.Parse(attValue);
break;
default:
result = base.VisitAttributeStmt(context);
break;
}
return(result);
}
public override object VisitAttributeStmt([NotNull] VisualBasic6Parser.AttributeStmtContext context)
{
return(base.VisitAttributeStmt(context));
}
public override void ExitAttributeStmt([NotNull] VisualBasic6Parser.AttributeStmtContext context)
{
}
