Skip to content

Commit 675c07c

Browse files
committed
Give declarations for consts have annotations
1 parent 40d777a commit 675c07c

File tree

2 files changed

+13
-9
lines changed

2 files changed

+13
-9
lines changed

Rubberduck.Parsing/Symbols/ConstantDeclaration.cs

Lines changed: 7 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,4 +1,6 @@
1+
using System.Collections.Generic;
12
using Antlr4.Runtime;
3+
using Rubberduck.Parsing.Annotations;
24
using Rubberduck.Parsing.Grammar;
35
using Rubberduck.VBEditor;
46

@@ -13,6 +15,7 @@ public ConstantDeclaration(
1315
string asTypeName,
1416
VBAParser.AsTypeClauseContext asTypeContext,
1517
string typeHint,
18+
IEnumerable<IAnnotation> annotations,
1619
Accessibility accessibility,
1720
DeclarationType declarationType,
1821
string value)
@@ -23,6 +26,7 @@ public ConstantDeclaration(
2326
asTypeName,
2427
asTypeContext,
2528
typeHint,
29+
annotations,
2630
accessibility,
2731
declarationType,
2832
value,
@@ -39,6 +43,7 @@ public ConstantDeclaration(
3943
string asTypeName,
4044
VBAParser.AsTypeClauseContext asTypeContext,
4145
string typeHint,
46+
IEnumerable<IAnnotation> annotations,
4247
Accessibility accessibility,
4348
DeclarationType declarationType,
4449
string value,
@@ -59,7 +64,8 @@ public ConstantDeclaration(
5964
selection,
6065
false,
6166
asTypeContext,
62-
isBuiltIn)
67+
isBuiltIn,
68+
annotations)
6369
{
6470
_expression = value;
6571
}

Rubberduck.Parsing/Symbols/DeclarationSymbolsListener.cs

Lines changed: 6 additions & 8 deletions
Original file line numberDiff line numberDiff line change
@@ -14,10 +14,8 @@ namespace Rubberduck.Parsing.Symbols
1414
{
1515
public class DeclarationSymbolsListener : VBAParserBaseListener
1616
{
17-
private readonly RubberduckParserState _state;
1817
private readonly QualifiedModuleName _qualifiedName;
1918
private readonly Declaration _moduleDeclaration;
20-
private readonly Declaration _projectDeclaration;
2119

2220
private string _currentScope;
2321
private Declaration _currentScopeDeclaration;
@@ -37,7 +35,6 @@ public DeclarationSymbolsListener(
3735
IDictionary<Tuple<string, DeclarationType>, Attributes> attributes,
3836
Declaration projectDeclaration)
3937
{
40-
_state = state;
4138
_qualifiedName = qualifiedName;
4239
_annotations = annotations;
4340
_attributes = attributes;
@@ -46,8 +43,6 @@ public DeclarationSymbolsListener(
4643
? DeclarationType.ProceduralModule
4744
: DeclarationType.ClassModule;
4845

49-
_projectDeclaration = projectDeclaration;
50-
5146
var key = Tuple.Create(_qualifiedName.ComponentName, declarationType);
5247
var moduleAttributes = attributes.ContainsKey(key)
5348
? attributes[key]
@@ -57,7 +52,7 @@ public DeclarationSymbolsListener(
5752
{
5853
_moduleDeclaration = new ProceduralModuleDeclaration(
5954
_qualifiedName.QualifyMemberName(_qualifiedName.Component.Name),
60-
_projectDeclaration,
55+
projectDeclaration,
6156
_qualifiedName.Component.Name,
6257
false,
6358
FindAnnotations(),
@@ -70,7 +65,7 @@ public DeclarationSymbolsListener(
7065
Declaration superType = null;
7166
if (type == vbext_ComponentType.vbext_ct_Document)
7267
{
73-
foreach (var coclass in _state.CoClasses)
68+
foreach (var coclass in state.CoClasses)
7469
{
7570
try
7671
{
@@ -103,7 +98,7 @@ public DeclarationSymbolsListener(
10398

10499
_moduleDeclaration = new ClassModuleDeclaration(
105100
_qualifiedName.QualifyMemberName(_qualifiedName.Component.Name),
106-
_projectDeclaration,
101+
projectDeclaration,
107102
_qualifiedName.Component.Name,
108103
false,
109104
FindAnnotations(),
@@ -765,13 +760,16 @@ public override void EnterConstSubStmt(VBAParser.ConstSubStmtContext context)
765760
var typeHint = Identifier.GetTypeHintValue(identifier);
766761
var name = Identifier.GetName(identifier);
767762
var value = context.expression().GetText();
763+
var constStmt = (VBAParser.ConstStmtContext) context.Parent;
764+
768765
var declaration = new ConstantDeclaration(
769766
new QualifiedMemberName(_qualifiedName, name),
770767
_parentDeclaration,
771768
_currentScope,
772769
asTypeName,
773770
asTypeClause,
774771
typeHint,
772+
FindAnnotations(constStmt.Start.Line),
775773
accessibility,
776774
DeclarationType.Constant,
777775
value,

0 commit comments

Comments
 (0)