* test for already fixed issue #24434

git-svn-id: trunk@48516 -

.gitattributes

@@ -16563,6 +16563,7 @@ tests/webtbf/tw2414.pp svneol=native#text/plain
 tests/webtbf/tw24184.pp svneol=native#text/plain
 tests/webtbf/tw24428.pp svneol=native#text/plain
 tests/webtbf/tw24428a.pp svneol=native#text/plain
+tests/webtbf/tw24434.pp svneol=native#text/pascal
 tests/webtbf/tw24453.pp svneol=native#text/pascal
 tests/webtbf/tw24495.pp svneol=native#text/pascal
 tests/webtbf/tw24588.pp svneol=native#text/pascal

tests/webtbf/tw24434.pp

@@ -0,0 +1,13 @@
+{ %fail }
+function f(s: string): string;
+begin
+  f := '''' + s + '''';
+end;
+
+function f(s: string): integer;
+begin
+  Val(s,f);
+end;
+
+begin
+end.