tests for bug List<T> IndexOf

Configuration/GlobalAssemblyInfo.cs

@@ -15,7 +15,7 @@ internal static class RevisionClass
 	public const string Major = "3";
 	public const string Minor = "3";
 	public const string Build = "5";
-	public const string Revision = "1662";
+	public const string Revision = "1663";
 
         public const string MainVersion = Major + "." + Minor;
 	public const string FullVersion = Major + "." + Minor + "." + Build + "." + Revision;

Configuration/Version.defs

@@ -1,4 +1,4 @@
-%MINOR%=3
-%REVISION%=1662
 %COREVERSION%=5
+%REVISION%=1663
+%MINOR%=3
 %MAJOR%=3

ReleaseGenerators/PascalABCNET_version.nsh

@@ -1 +1 @@
-!define VERSION '3.3.5.1662'
+!define VERSION '3.3.5.1663'

TestSuite/inheritanceFromListInt.pas

@@ -0,0 +1,12 @@
+type
+  MyList<T> = class(List<T>)
+  public
+  end;
+
+begin
+  var l := new MyList<integer>;
+  l.Add(3);
+  l.Add(3);
+  l.Add(7);
+  Assert(l.IndexOf(7)=2);
+end.

TestSuite/inheritanceFromListStudent.pas

@@ -0,0 +1,13 @@
+type
+  Student = class
+    name: string;
+  end;
+  MyList<T> = class(List<T>)
+  public
+  end;
+
+begin
+  var l := new MyList<Student>;
+  l.Add(new Student);
+  Assert(l.IndexOf(l[0])=0);
+end.

TreeConverter/TreeRealization/generics.cs

@@ -1684,11 +1684,13 @@ namespace PascalABCCompiler.TreeRealization
 
                             MethodInfo mi = instmeths[num];*/
 
+                            // SSM 2018.05.05 bug fix #664 
                             var mdtok = cfn.method_info.MetadataToken;
                             MethodInfo[] instmeths = ((compiled_type_node)inst_type)._compiled_type.GetMethods(BindingFlags.Public | BindingFlags.NonPublic |
                                 BindingFlags.Static | BindingFlags.Instance);
 
                             MethodInfo mi = System.Array.Find(instmeths, m => m.MetadataToken == mdtok);
+                            // SSM 2018.05.05 end bug fix #664 
 
                             return compiled_function_node.get_compiled_method(mi);
                         }

TreeConverter/TreeRealization/types.cs

@@ -1943,8 +1943,8 @@ namespace PascalABCCompiler.TreeRealization
         {
             List<SymbolInfo> sil = Scope.FindOnlyInType(name, CurrentScope);//:=,create,x
 
-            // SSM test!!!
-            if (base_type is compiled_generic_instance_type_node /*&& name == "IndexOf"*/)
+            // SSM 2018.04.05 
+            if (base_type is compiled_generic_instance_type_node)
             {
                 //sil = (base_type as compiled_generic_instance_type_node).original_generic.find_in_type(name, CurrentScope);
                 return sil;