Fixes #65

Author: SSlinky

server/src/antlr/vba.g4

@@ -427,7 +427,7 @@ constantName
 //     ;
 
 constDeclaration
-    : variableModifier? CONST wsc constItemList
+    : (variableModifier wsc)? CONST wsc constItemList
     ;
 
 constItemList

test/fixtures/ScopeDiagnostics.bas

@@ -0,0 +1,16 @@
+Attribute VB_Name = "ScopeDiagnostics"
+
+Option Explicit
+
+Private Const ABC As Long = 0
+
+Public Enum XfaskofeaFoo
+    Enum1 = 2 ^ 1
+    Bar = 2 ^ 2
+    Bar = 2 ^ 3
+End Enum
+
+Public Sub XfaskofeaFoo()
+Attribute XfaskofeaFoo.VB_Description = "docstring."
+
+End Sub