public override void ExitLetStmt(VBAParser.LetStmtContext context)
{
if (context.LET() != null)
{
_contexts.Add(new QualifiedContext <ParserRuleContext>(CurrentModuleName, context));
}
}
public override bool VisitLetStmt(VBAParser.LetStmtContext context)
{
var leftmost = context.lExpression().GetChild(0).GetText();
_result = _result || leftmost == _name;
return(_result);
}
public override void ExitLetStmt(VBAParser.LetStmtContext context)
{
if (context.LET() != null)
{
_contexts.Add(context);
}
}
public void Resolve(VBAParser.LetStmtContext context)
{
var leftSide = context.implicitCallStmt_InStmt();
var letStatement = context.LET();
ResolveInternal(leftSide, _currentScope, ContextAccessorType.AssignValue, letStatement != null, true);
}
private static bool HasProcedureCall(VBAParser.LetStmtContext context, out string argList)
{
if (context == null)
{
argList = null;
return(false);
}
return(HasProcedureCall(context.expression(), out argList));
}
public void Resolve(VBAParser.LetStmtContext context)
{
var letStatement = context.LET();
ResolveDefault(
context.lExpression(),
StatementResolutionContext.LetStatement,
true,
letStatement != null);
ResolveDefault(context.expression());
}
public override void EnterLetStmt(VBAParser.LetStmtContext context)
{
var leftSide = context.implicitCallStmt_InStmt();
var letStatement = context.LET();
var target = FindAssignmentTarget(leftSide, DeclarationType.PropertyLet);
if (target != null)
{
EnterIdentifier(target, target.GetSelection(), true, letStatement != null);
}
}
public override void EnterLetStmt(VBAParser.LetStmtContext context)
{
_resolver.Resolve(context);
}
private static bool RHSIsObjectLiteral(VBAParser.LetStmtContext letStmtContext)
{
var rhsAsLiteralExpr = letStmtContext.expression() as VBAParser.LiteralExprContext;
return(rhsAsLiteralExpr?.literalExpression()?.literalIdentifier()?.objectLiteralIdentifier() != null);
}
private static bool RHSIsLiteral(VBAParser.LetStmtContext letStmtContext)
{
return(letStmtContext.expression() is VBAParser.LiteralExprContext);
}
private static bool RHSUsesNew(VBAParser.LetStmtContext letStmtContext)
{
var expression = letStmtContext.expression();
return(expression is VBAParser.NewExprContext);
}
private static string GetRHSIdentifierExpressionText(VBAParser.LetStmtContext letStmtContext)
{
var expression = letStmtContext.expression();
return(expression != null && expression is VBAParser.LExprContext ? expression.GetText() : string.Empty);
}
