diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 2257edc7864..a0c2723d6cf 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+2017-06-16  Janus Weil  <janus@gcc.gnu.org>
+
+	PR fortran/80983
+	* gfortran.dg/proc_ptr_comp_51.f90: Repair test case.
+
 2017-06-16  Jakub Jelinek  <jakub@redhat.com>
 
 	PR sanitizer/81094
diff --git a/gcc/testsuite/gfortran.dg/proc_ptr_comp_51.f90 b/gcc/testsuite/gfortran.dg/proc_ptr_comp_51.f90
index 530872be4d5..cfe9818706f 100644
--- a/gcc/testsuite/gfortran.dg/proc_ptr_comp_51.f90
+++ b/gcc/testsuite/gfortran.dg/proc_ptr_comp_51.f90
@@ -1,4 +1,5 @@
 ! { dg-do compile }
+! { dg-options "-fdump-tree-original" }
 !
 ! PR 80983: [F03] memory leak when calling procedure-pointer component with allocatable result
 !