pascalabcnet/TestSuite/typeof.pas
Бондарев Иван 3e4f84f3b3 #1125
2018-09-23 18:29:00 +02:00

7 lines
493 B
ObjectPascal

begin
assert(typeof(System.Collections.Generic.Dictionary<,>).FullName = 'System.Collections.Generic.Dictionary`2');
assert(typeof(List<>).FullName = 'System.Collections.Generic.List`1');
assert(typeof(System.Collections.Generic.Dictionary<,{}>).FullName = 'System.Collections.Generic.Dictionary`2');
assert(typeof(List<{}>).FullName = 'System.Collections.Generic.List`1');
assert(typeof(List<integer>).FullName.StartsWith('System.Collections.Generic.List`1[[System.Int32'));
end.