increase from 100 to 1024 LexResourceManager.string dictionary capacity to reduce resizing (#5089)

Author: vasily-kirichenko

src/fsharp/lexhelp.fs

@@ -43,7 +43,7 @@ type LightSyntaxStatus(initial:bool,warn:bool) =
 /// Manage lexer resources (string interning)
 [<Sealed>]
 type LexResourceManager() =
-    let strings = new System.Collections.Generic.Dictionary<string, Parser.token>(100)
+    let strings = new System.Collections.Generic.Dictionary<string, Parser.token>(1024)
     member x.InternIdentifierToken(s) = 
         let mutable res = Unchecked.defaultof<_> 
         let ok = strings.TryGetValue(s, &res)