Fix more issues with bang notation and its fix

Author: MDoerner

Rubberduck.Parsing/Grammar/VBAParser.g4

@@ -579,7 +579,8 @@ subscript : (expression whiteSpace TO whiteSpace)? expression;
 
 unrestrictedIdentifier : identifier | statementKeyword | markerKeyword;
 legalLabelIdentifier : { !(new[]{DOEVENTS,END,CLOSE,ELSE,LOOP,NEXT,RANDOMIZE,REM,RESUME,RETURN,STOP,WEND}).Contains(_input.La(1))}? identifier | markerKeyword;
-identifier : {_input.La(3) != IDENTIFIER}? typedIdentifier | untypedIdentifier;
+identifier : {_input.La(3) != IDENTIFIER && _input.La(3) != L_SQUARE_BRACKET || _input.La(1) == L_SQUARE_BRACKET}? typedIdentifier 
+             | untypedIdentifier;
 untypedIdentifier : identifierValue;
 typedIdentifier : untypedIdentifier typeHint;
 identifierValue : IDENTIFIER | keyword | foreignName;

RubberduckTests/Grammar/VBAParserTests.cs

@@ -2953,6 +2953,35 @@ End Sub
             var parseResult = Parse(code);
         }
 
+        [Category("Parser")]
+        [Test]
+        public void ParserDoesNotFailDoubleBracketForgeignIdentifierWithTypeHint()
+        {
+            const string code = @"
+Sub Test()  
+Dim x
+x = [[bar]]!
+End Sub
+";
+            var parseResult = Parse(code);
+            AssertTree(parseResult.Item1, parseResult.Item2, "//typeHint", matches => matches.Count == 1);
+        }
+
+        [Category("Parser")]
+        [Test]
+        public void ParserDoesNotFailOnBangOperatorFollowedByForeignIdentifier()
+        {
+            const string code = @"
+Sub Test()   
+Dim dict As Scripting.Dictionary
+
+Dim x
+x = dict![a]
+End Sub
+";
+            var parseResult = Parse(code);
+        }
+
         [Category("Parser")]
         [Test]
         public void ParserDoesNotFailOnBangOperator()