[gdb/testsuite] Require c++11 where necessary

[deliverable/binutils-gdb.git] / gdb / testsuite / gdb.fortran / vla.f90

diff --git a/gdb/testsuite/gdb.fortran/vla.f90 b/gdb/testsuite/gdb.fortran/vla.f90
index 6a966354ecc45178ddc022a678e935bb6bfc2bf4..5bc608744b3ccc2d2c157f042c36a890f0fb6714 100644 (file)
--- a/gdb/testsuite/gdb.fortran/vla.f90
+++ b/gdb/testsuite/gdb.fortran/vla.f90
@@ -1,4 +1,4 @@
-! Copyright 2015-2016 Free Software Foundation, Inc.
+! Copyright 2015-2019 Free Software Foundation, Inc.
 !
 ! This program is free software; you can redistribute it and/or modify
 ! it under the terms of the GNU General Public License as published by
@@ -19,6 +19,7 @@ program vla
   real, target, allocatable :: vla3 (:, :)
   real, pointer :: pvla (:, :, :)
   logical :: l
+  nullify(pvla)
 
   allocate (vla1 (10,10,10))          ! vla1-init
   l = allocated(vla1)