+ tests for previous commit

git-svn-id: trunk@13373 -

.gitattributes

@@ -8610,6 +8610,9 @@ tests/webtbf/tw1395.pp svneol=native#text/plain
 tests/webtbf/tw13956.pp svneol=native#text/plain
 tests/webtbf/tw13992.pp svneol=native#text/plain
 tests/webtbf/tw1407.pp svneol=native#text/plain
+tests/webtbf/tw14104a.pp svneol=native#text/plain
+tests/webtbf/tw14104b.pp svneol=native#text/plain
+tests/webtbf/tw14104c.pp svneol=native#text/plain
 tests/webtbf/tw1432.pp svneol=native#text/plain
 tests/webtbf/tw1467.pp svneol=native#text/plain
 tests/webtbf/tw1483.pp svneol=native#text/plain

tests/webtbf/tw14104a.pp

@@ -0,0 +1,8 @@
+{ %fail }
+
+procedure test(var f: file of extended);
+begin
+end;
+
+begin
+end.

tests/webtbf/tw14104b.pp

@@ -0,0 +1,9 @@
+{ %fail }
+
+procedure test(f: string[50]);
+begin
+end;
+
+begin
+end.
+

tests/webtbf/tw14104c.pp

@@ -0,0 +1,8 @@
+{ %fail }
+
+function test: string[30];
+begin
+end;
+
+begin
+end.