gdb/testsuite: Add missing expected results

The tests in this script are driven from two lists of expected
results, one of the lists is missing some data so DejaGNU ends up
passing the empty string to gdb_test, which means the test always
passes.

This commit adds the missing expected results into the script.  The
tests still pass so there's no change in the results, but we are now
actually checking GDB's behaviour.

gdb/testsuite/ChangeLog:

	* gdb.fortran/array-slices.exp: Add missing message data.

diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 4034c734c65bfece009482404ae1d7007902ed80..574c63af962180877205927ec6995ba92fb54f6e 100644 (file)
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,3 +1,7 @@
+2020-09-18  Andrew Burgess  <andrew.burgess@embecosm.com>
+
+       * gdb.fortran/array-slices.exp: Add missing message data.
+
 2020-09-17  Pedro Alves  <pedro@palves.net>
 
        * gdb.cp/call-c-1.c (foo) [__cplusplus]: Add extern "C".

diff --git a/gdb/testsuite/gdb.fortran/array-slices.exp b/gdb/testsuite/gdb.fortran/array-slices.exp
index 4ca1db90f7fc9176cc256b9747d958d24b535b99..b1c7209f8247fd1364753612f152ac6b1ecce9ab 100644 (file)
--- a/gdb/testsuite/gdb.fortran/array-slices.exp
+++ b/gdb/testsuite/gdb.fortran/array-slices.exp
@@ -53,7 +53,10 @@ set message_strings \
         " = 'array \\(1:5,1:5\\)'" \
         " = 'array \\(1:10:2,1:10:2\\)'" \
         " = 'array \\(1:10:3,1:10:2\\)'" \
-        " = 'array \\(1:10:5,1:10:3\\)'" ]
+        " = 'array \\(1:10:5,1:10:3\\)'" \
+        " = 'other'" \
+        " = 'other \\(-5:0, -2:0\\)'" \
+        " = 'other \\(-5:4:2, -2:7:3\\)'" ]
 
 set i 0
 foreach result $array_contents msg $message_strings {