From: Bernhard Heckel <bernhard.heckel@intel.com>
Date: Wed, 2 Mar 2016 15:36:37 +0000 (+0100)
Subject: testsuite: Nullify pointers before first usage.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=178073690aec73fdb5f4452b49f108407edde700;p=binutils-gdb.git

testsuite: Nullify pointers before first usage.

Nullify pointers to avoid an undefined association status.

2016-03-02  Bernhard Heckel  <bernhard.heckel@intel.com>

gdb/testsuite/Changelog:

     * gdb.mi/vla.f90: Nullify pointer after declaration.
---

diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index aeb28376aac..e14b6540a4f 100644
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,3 +1,7 @@
+2016-03-02  Bernhard Heckel  <bernhard.heckel@intel.com>
+
+	* gdb.mi/vla.f90: Nullify pointer after declaration.
+
 2016-03-01  Pedro Alves  <palves@redhat.com>
 
 	* gdb.trace/ftrace-lock.c: Include <unistd.h>.
diff --git a/gdb/testsuite/gdb.mi/vla.f90 b/gdb/testsuite/gdb.mi/vla.f90
index 10c3dcce94d..c3e48dcd0b6 100644
--- a/gdb/testsuite/gdb.mi/vla.f90
+++ b/gdb/testsuite/gdb.mi/vla.f90
@@ -18,6 +18,7 @@ program vla
   real, target, allocatable :: vla2(:, :)
   real, pointer :: pvla2 (:, :)
   logical :: l
+  nullify (pvla2)
 
   allocate (vla1 (5))         ! vla1-not-allocated
   l = allocated(vla1)         ! vla1-allocated