Beispiel #1
0
 public override void ExitPropertyLetStmt(VBAParser.PropertyLetStmtContext context)
 {
     if (!string.IsNullOrEmpty(_currentScope.Item1) && _currentScopeAttributes.Any())
     {
         _attributes.Add(_currentScope, _currentScopeAttributes);
     }
 }
Beispiel #2
0
 public ProcedureNode(VBAParser.PropertyLetStmtContext context, string scope, string localScope)
     : this(context, scope, localScope, VBProcedureKind.PropertyLet, context.visibility(), context.ambiguousIdentifier(), null)
 {
     _argsListContext = context.argList();
     _staticNode      = context.STATIC();
     _keyword         = context.PROPERTY_LET();
 }
 public override void ExitPropertyLetStmt(VBAParser.PropertyLetStmtContext context)
 {
     if (_currentScopeAttributes.Any())
     {
         _attributes.Add(_currentScope, _currentScopeAttributes);
     }
 }
Beispiel #4
0
        public override void EnterPropertyLetStmt(VBAParser.PropertyLetStmtContext context)
        {
            var accessibility = GetProcedureAccessibility(context.visibility());
            var name          = context.ambiguousIdentifier().GetText();

            _declarations.Add(CreateDeclaration(name, null, accessibility, DeclarationType.PropertyLet, context, context.ambiguousIdentifier().GetSelection()));
            SetCurrentScope(name);
        }
        public static string Signature(this VBAParser.PropertyLetStmtContext context)
        {
            var visibility     = context.visibility();
            var visibilityText = visibility == null ? string.Empty : visibility.GetText();

            var identifierText = context.ambiguousIdentifier().GetText();
            var argsText       = context.argList().GetText();

            return((visibilityText + ' ' + Tokens.Property + ' ' + Tokens.Let + ' ' + identifierText + argsText).Trim());
        }
Beispiel #6
0
        public override void EnterPropertyLetStmt(VBAParser.PropertyLetStmtContext context)
        {
            var accessibility = GetProcedureAccessibility(context.visibility());
            var identifier    = context.identifier();

            if (identifier == null)
            {
                return;
            }
            var name = identifier.GetText();

            var declaration = CreateDeclaration(name, null, accessibility, DeclarationType.PropertyLet, context, context.identifier().GetSelection());

            OnNewDeclaration(declaration);
            SetCurrentScope(declaration, name);
        }
 public override void ExitPropertyLetStmt(VBAParser.PropertyLetStmtContext context)
 {
     SetCurrentScope();
 }
Beispiel #8
0
 public override void EnterPropertyLetStmt(VBAParser.PropertyLetStmtContext context)
 {
     SetCurrentScope(context.identifier().GetText(), DeclarationType.PropertyLet);
 }
        public static string GetName(VBAParser.PropertyLetStmtContext context, out Interval tokenInterval)
        {
            var nameContext = context.subroutineName();

            return(GetName(nameContext, out tokenInterval));
        }
Beispiel #10
0
 public override void EnterPropertyLetStmt(VBAParser.PropertyLetStmtContext context)
 {
     _currentScopeAttributes = new Attributes();
     _currentScope           = Tuple.Create(context.identifier().GetText(), DeclarationType.PropertyLet);
 }
 public override void EnterPropertyLetStmt(VBAParser.PropertyLetStmtContext context)
 {
     _currentScopeAttributes = new Attributes();
     _currentScope           = Tuple.Create(Identifier.GetName(context.subroutineName()), DeclarationType.PropertyLet);
 }
 public static Selection GetProcedureSelection(this VBAParser.PropertyLetStmtContext context)
 {
     return(GetProcedureContextSelection(context));
 }
Beispiel #13
0
 public override void EnterPropertyLetStmt(VBAParser.PropertyLetStmtContext context)
 {
     CheckContext(context, context.PROPERTY_LET());
     CheckContext(context, context.END_PROPERTY());
     base.EnterPropertyLetStmt(context);
 }
Beispiel #14
0
 public override void ExitPropertyLetStmt([NotNull] VBAParser.PropertyLetStmtContext context)
 {
     ExitMeasurableMember();
 }
Beispiel #15
0
 public override void EnterPropertyLetStmt([NotNull] VBAParser.PropertyLetStmtContext context)
 {
     _results.Add(new CodeMetricsResult(0, 1, 0));
     _currentMember = _finder.UserDeclarations(DeclarationType.PropertyLet).Where(d => d.Context == context).First();
 }
 public override void EnterPropertyLetStmt(VBAParser.PropertyLetStmtContext context)
 {
     SetCurrentScope(Identifier.GetName(context.subroutineName()));
 }
Beispiel #17
0
 public override void ExitPropertyLetStmt([NotNull] VBAParser.PropertyLetStmtContext context)
 => ExitMeasurableMember(_finder.UserDeclarations(DeclarationType.PropertyLet).Where(d => d.Context == context).First());
Beispiel #18
0
 public override void EnterPropertyLetStmt(VBAParser.PropertyLetStmtContext context)
 {
     _currentMember = new QualifiedMemberName(_qualifiedName, context.ambiguousIdentifier().GetText());
 }