From 041847f552e327b0cdc1a0ebbde6c60354b05a61 Mon Sep 17 00:00:00 2001
From: Ivan Bondarev <ibond84@googlemail.com>
Date: Tue, 5 Oct 2021 21:31:09 +0200
Subject: [PATCH] test for #2426

---
 TestSuite/partial_generics5.pas | 22 ++++++++++++++++++++++
 1 file changed, 22 insertions(+)
 create mode 100644 TestSuite/partial_generics5.pas

diff --git a/TestSuite/partial_generics5.pas b/TestSuite/partial_generics5.pas
new file mode 100644
index 000000000..ee3d1670e
--- /dev/null
+++ b/TestSuite/partial_generics5.pas
@@ -0,0 +1,22 @@
+type
+  // Обязательно предыдущее определение всех 3 классов
+  t1<T> = partial class end;
+  t2<T> = partial class(t1<T>) end;
+  t3<T> = partial class(t2<T>) end;
+  
+  t1<T> = partial class
+    // Обязательно возвращать или T из шаблона, или тип содержащий T, как array of T
+    function f1: T; virtual; begin end;
+  end;
+  t2<T> = partial class(t1<T>)
+    
+  end;
+  t3<T> = partial class(t2<T>)
+    //Ошибка: Нет метода для переопределения
+    function f1: T; override := default(T);
+  end;
+  
+begin 
+  var o := new t3<integer>;
+  assert(o.f1 = 0);
+end.
\ No newline at end of file