fixed semantic intellisense

CodeCompletion/DomSyntaxTreeVisitor.cs

@@ -316,6 +316,7 @@ namespace CodeCompletion
                 compiler = new Compiler();
             compiler.CompilerOptions = co;
             compiler.ClearAfterCompilation = false;
+            compiler.ParsersController.LastParser = compiler.ParsersController.SelectParser(Path.GetExtension(cu.source_context.FileName).ToLower());
             compiler.Compile();
             foreach (var lv in compiler.CompiledVariables)
                 CorrectVariableType(lv);

CodeCompletion/ExpressionVisitor.cs

@@ -961,7 +961,7 @@ namespace CodeCompletion
                         {
                             returned_scopes[i] = null;
                         }
-                        else if (left_scope is TypeScope && returned_scopes[i] is ProcScope && !(returned_scopes[i] as ProcScope).IsStatic && !(returned_scopes[i] as ProcScope).IsConstructor())
+                        else if (left_scope is TypeScope && returned_scopes[i] is ProcScope && !(returned_scopes[i] as ProcScope).IsStatic && !(returned_scopes[i] as ProcScope).IsConstructor() && !(returned_scope is TypeScope && (returned_scopes[i] as ProcScope).is_extension))
                         {
                             returned_scopes[i] = null;
                         }

TestSuite/intellisense_tests/autoclass4.pas

@@ -2,5 +2,4 @@
 var a{@var a: sequence of class;@} := (1..18).Sel(i->new class(f := i, g := i.ToS));
 var x{@var x: string;@} := a.First.g;
 var y{@var y: class;@} := a.First;
-writeln(a.First.g{@property class.g: string;@});
-
+writeln(a.First.g{@property class.g: string;@});

TestSuite/intellisense_tests/extensionmethods13.pas

@@ -0,0 +1,3 @@
+begin
+  System.Linq.Enumerable.Any{@(расширение sequence of T) function Any<>(): boolean;@};
+end.

TestSuite/intellisense_tests/foreach1.pas

@@ -1,4 +1,4 @@
-begin
+begin
   var d := new Dictionary<real,byte>;
   foreach var b{@var b: real;@} in d.Keys do;
   var l := new List<integer>;