public override void ExitOptionCompareStmt(VBAParser.OptionCompareStmtContext context)
{
// BINARY is the default, and DATABASE is specified by default + only valid in Access.
if (context.TEXT() == null && context.DATABASE() == null)
{
_contexts.Add(new QualifiedContext <ParserRuleContext>(CurrentModuleName, context));
}
}
public override void ExitOptionCompareStmt(VBAParser.OptionCompareStmtContext context)
{
// BINARY is the default, and DATABASE is specified by default + only valid in Access.
if (context.TEXT() == null && context.DATABASE() == null)
{
SaveContext(context);
}
}
public override void EnterOptionCompareStmt(VBAParser.OptionCompareStmtContext context)
{
AddDeclaration(CreateDeclaration(
context.GetText(),
string.Empty,
Accessibility.Implicit,
DeclarationType.ModuleOption,
context,
context.GetSelection(),
false,
null,
null));
}
public override void EnterOptionCompareStmt(VBAParser.OptionCompareStmtContext context)
{
CheckContext(context, context.OPTION_COMPARE());
base.EnterOptionCompareStmt(context);
}