From 433f07c407ae63042733d51ea4ca3348fb3e97d3 Mon Sep 17 00:00:00 2001
From: svenbarth <pascaldragon@googlemail.com>
Date: Fri, 5 Jul 2019 15:30:53 +0000
Subject: [PATCH] * forgot to commit tests in r42329

git-svn-id: trunk@42330 -
---
 .gitattributes           |  2 ++
 tests/webtbs/tw35670a.pp | 17 +++++++++++++++++
 tests/webtbs/tw35670b.pp | 17 +++++++++++++++++
 3 files changed, 36 insertions(+)
 create mode 100644 tests/webtbs/tw35670a.pp
 create mode 100644 tests/webtbs/tw35670b.pp

diff --git a/.gitattributes b/.gitattributes
index 8ba241bebe..714117a368 100644
--- a/.gitattributes
+++ b/.gitattributes
@@ -16666,6 +16666,8 @@ tests/webtbs/tw35533.pp svneol=native#text/pascal
 tests/webtbs/tw3554.pp svneol=native#text/plain
 tests/webtbs/tw3564.pp svneol=native#text/plain
 tests/webtbs/tw3567.pp svneol=native#text/plain
+tests/webtbs/tw35670a.pp svneol=native#text/pascal
+tests/webtbs/tw35670b.pp svneol=native#text/pascal
 tests/webtbs/tw3572.pp svneol=native#text/plain
 tests/webtbs/tw3573.pp svneol=native#text/plain
 tests/webtbs/tw35735.pp svneol=native#text/pascal
diff --git a/tests/webtbs/tw35670a.pp b/tests/webtbs/tw35670a.pp
new file mode 100644
index 0000000000..14251140ac
--- /dev/null
+++ b/tests/webtbs/tw35670a.pp
@@ -0,0 +1,17 @@
+{ %NORUN }
+
+program tw35670a;
+
+{$mode objfpc}
+
+generic procedure DoThis<T>(msg: T);
+begin
+end;
+
+procedure DoThis(msg: TObject);
+begin
+end;
+
+begin
+
+end.
diff --git a/tests/webtbs/tw35670b.pp b/tests/webtbs/tw35670b.pp
new file mode 100644
index 0000000000..ca4be480dc
--- /dev/null
+++ b/tests/webtbs/tw35670b.pp
@@ -0,0 +1,17 @@
+{ %NORUN }
+
+program tw35670b;
+
+{$mode delphi}
+
+procedure DoThis<T>(msg: T);
+begin
+end;
+
+procedure DoThis(msg: TObject);
+begin
+end;
+
+begin
+
+end.