diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 73d2ca6fbf2..bed4a4ca846 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,7 @@
+1998-11-26  Alexandre Oliva  <oliva@dcc.unicamp.br>
+
+	* g++.old-deja/g++.pt/friend37.C: New test.
+
 1998-11-25  Dave Love  <d.love@dl.ac.uk>
 
 	* g77.f-torture/execute/u77-test.f (main): Avoid testing [f]statb
diff --git a/gcc/testsuite/g++.old-deja/g++.pt/friend37.C b/gcc/testsuite/g++.old-deja/g++.pt/friend37.C
new file mode 100644
index 00000000000..c61239c86ac
--- /dev/null
+++ b/gcc/testsuite/g++.old-deja/g++.pt/friend37.C
@@ -0,0 +1,6 @@
+// Build don't link:
+// Simplified from report by Volker Dobler <volker@hugo.physik.uni-konstanz.de>
+
+template <class T> class A {
+  friend int ice<>( int k=0 ); // gets bogus error - ICE - XFAIL *-*-*
+};