X-Git-Url: http://git.efficios.com/?a=blobdiff_plain;ds=sidebyside;f=gdb%2Ftestsuite%2Fgdb.fortran%2Fsubarray.exp;h=1ea07732ca412ff09e2da7b6f5b356157adae93d;hb=a037790ec570ae9f9bf535cbce25f238f90e8b4a;hp=045f5e6cd338566813ac04f6e25e623877d7f1e7;hpb=618f726fcb851883a0094aa7fa17003889b7189f;p=deliverable%2Fbinutils-gdb.git

diff --git a/gdb/testsuite/gdb.fortran/subarray.exp b/gdb/testsuite/gdb.fortran/subarray.exp
index 045f5e6cd3..1ea07732ca 100644
--- a/gdb/testsuite/gdb.fortran/subarray.exp
+++ b/gdb/testsuite/gdb.fortran/subarray.exp
@@ -1,4 +1,4 @@
-# Copyright 2005-2016 Free Software Foundation, Inc.
+# Copyright 2005-2018 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
@@ -22,7 +22,7 @@ if { [skip_fortran_tests] } { return -1 }
 
 standard_testfile .f
 
-if {[prepare_for_testing $testfile.exp $testfile $srcfile {debug f90}]} {
+if {[prepare_for_testing "failed to prepare" $testfile $srcfile {debug f90}]} {
     return -1
 }