/* * Note on Option: * - Option Base 1: Not supported in VB.Net, raise warning for manual handling. * - Option Explicit: Already set as default in VB.Net, no need to copy. * - Option Compare: Defaults to Binary in VB.Net. Only copy if it is set as Text. * - Option Private Module: Similar to "Friend" scope, but apply to the entire standard module. Not for class module. */ public override object VisitOptionBaseStmt([NotNull] VisualBasic6Parser.OptionBaseStmtContext context) { if (context.INTEGERLITERAL() != null) { if (context.INTEGERLITERAL().GetText() != "0") { _rootModule.AddConversionMessage(new UnSupportedNonZeroOptionBase(context.Start.Line, context.Start.Column)); } } return(null); }
public override object VisitOptionBaseStmt([NotNull] VisualBasic6Parser.OptionBaseStmtContext context) { return(base.VisitOptionBaseStmt(context)); }
public override void EnterOptionBaseStmt([NotNull] VisualBasic6Parser.OptionBaseStmtContext context) { }