diff --git a/ParserTools/ParserTools/DefaultLanguageInformation.cs b/ParserTools/ParserTools/DefaultLanguageInformation.cs index 1b045f434..3d87ef5d6 100644 --- a/ParserTools/ParserTools/DefaultLanguageInformation.cs +++ b/ParserTools/ParserTools/DefaultLanguageInformation.cs @@ -1928,7 +1928,7 @@ namespace PascalABCCompiler.Parsers protected virtual string GetDescriptionForShortString(IShortStringScope scope) { - return "string "+"["+scope.Length+"]"; + return "string"+"["+scope.Length+"]"; } public string GetSynonimDescription(ITypeScope scope) diff --git a/TestSuite/extensionmethods2.pas b/TestSuite/extensionmethods2.pas index 2a4d9ca1b..76fa5946b 100644 --- a/TestSuite/extensionmethods2.pas +++ b/TestSuite/extensionmethods2.pas @@ -1,5 +1,3 @@ -{$reference System.Core.dll} - uses System, System.Collections.Generic; type TArr = array of integer; diff --git a/TestSuite/intellisense_tests/class1.pas b/TestSuite/intellisense_tests/class1.pas index ed95b6f0c..45015ae48 100644 --- a/TestSuite/intellisense_tests/class1.pas +++ b/TestSuite/intellisense_tests/class1.pas @@ -1,6 +1,18 @@ type TClass = class end; +type + TArr = array of integer; + TSet = set of byte; + TArr2 = array[,] of TArr; + TArr3 = array[1..10] of string; + TStr = string[5]; + begin var t: TClass{@class TClass@}; + var t1: TArr{@type TArr = array of integer@}; + var t2: TSet{@type TSet = set of byte@}; + var t3: TArr2{@type TArr2 = array[,] of TArr@}; + var t4: TArr3{@type TArr3 = array[1..10] of string@}; + var t5: TStr{@type TStr = string[5]@}; end. \ No newline at end of file diff --git a/TestSuite/intellisense_tests/function1.pas b/TestSuite/intellisense_tests/function1.pas new file mode 100644 index 000000000..a9d5aef5e --- /dev/null +++ b/TestSuite/intellisense_tests/function1.pas @@ -0,0 +1,32 @@ +function Test(a: integer): integer; +begin + +end; + +function Test(a: real): integer; +begin + +end; + +function Test(a: string): integer; +begin + +end; + +function Test(a: boolean): integer; +begin + +end; + +function Test(a: List): integer; +begin + +end; + +begin + Test{@function Test(a: integer): integer;@}(23); + Test{@function Test(a: real): integer;@}(2.3); + Test{@function Test(a: string): integer;@}('333'); + Test{@function Test(a: boolean): integer;@}(true); + Test{@function Test(a: List): integer;@}(Lst(2,3,4)); +end. \ No newline at end of file diff --git a/TestSuite/intellisense_tests/variable.pas b/TestSuite/intellisense_tests/variable.pas index 99d0a5f58..d18a454de 100644 --- a/TestSuite/intellisense_tests/variable.pas +++ b/TestSuite/intellisense_tests/variable.pas @@ -5,7 +5,7 @@ begin var a4{@var a4: real;@} := 2.3; var a5{@var a5: boolean;@} := true; var a6{@var a6: byte;@}: byte; - var a7{@var a7: string [5];@}: string[5]; + var a7{@var a7: string[5];@}: string[5]; var a8{@var a8: List;@} := new List; var a9{@var a9: real;@} := 2+3.4; var a10{@var a10: List;@} := a8+2;