diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 2257edc786453dc1fda5430cb7c9eff5ebe8001b..a0c2723d6cf9f5a4a6a2f4565ac192d4dfa53d09 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 530872be4d507b47e0583c8d288f30914bdf8b70..cfe9818706f4542c2e918b38246b697e25229102 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
 !