diff --git a/.gitattributes b/.gitattributes
index 248fa436bf..2f69f7fac8 100644
--- a/.gitattributes
+++ b/.gitattributes
@@ -5538,6 +5538,7 @@ tests/test/cg/tdivz1.pp svneol=native#text/plain
 tests/test/cg/tdivz2.pp svneol=native#text/plain
 tests/test/cg/texit.pp svneol=native#text/plain
 tests/test/cg/tfor.pp svneol=native#text/plain
+tests/test/cg/tformfnc.pp -text
 tests/test/cg/tfuncret.pp svneol=native#text/plain
 tests/test/cg/tin.pp svneol=native#text/plain
 tests/test/cg/tincexc.pp svneol=native#text/plain
diff --git a/tests/test/cg/tformfnc.pp b/tests/test/cg/tformfnc.pp
new file mode 100644
index 0000000000..497a4670e0
--- /dev/null
+++ b/tests/test/cg/tformfnc.pp
@@ -0,0 +1,13 @@
+function f: longint;
+begin
+  f := 1;
+end;
+
+procedure t(const c);
+begin
+end;
+
+begin
+  t(f);
+end.
+