From e9fb005c0e95e642c2e5a65c02d026b4223082e6 Mon Sep 17 00:00:00 2001 From: Jan Kratochvil Date: Sun, 14 Feb 2016 09:10:59 +0100 Subject: [PATCH] testsuite regression: gdb.fortran/vla-value-sub.exp gdb.fortran/vla-value-sub-finish.exp > +static int max_value_size = 65536; /* 64k bytes */ FAIL: gdb.fortran/vla-value-sub.exp: print array2 in foo after it was filled (passed fixed array) FAIL: gdb.fortran/vla-value-sub.exp: print array2 in foo after it was mofified in debugger (passed fixed array) FAIL: gdb.fortran/vla-value-sub-finish.exp: print array2 in foo after it was filled FAIL: gdb.fortran/vla-value-sub-finish.exp: print array2 in foo after it was mofified in debugger print array2 value requires 296352 bytes, which is more than max-value-size (gdb) FAIL: gdb.fortran/vla-value-sub.exp: print array2 in foo after it was filled (passed fixed array) gdb/testsuite/ChangeLog 2016-02-14 Jan Kratochvil * gdb.fortran/vla-value-sub-finish.exp (set max-value-size 1024*1024): New test. * gdb.fortran/vla-value-sub.exp: Likewise. --- gdb/testsuite/ChangeLog | 6 ++++++ gdb/testsuite/gdb.fortran/vla-value-sub-finish.exp | 2 ++ gdb/testsuite/gdb.fortran/vla-value-sub.exp | 2 ++ 3 files changed, 10 insertions(+) diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 6ef8932..247173d 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,9 @@ +2016-02-14 Jan Kratochvil + + * gdb.fortran/vla-value-sub-finish.exp (set max-value-size 1024*1024): + New test. + * gdb.fortran/vla-value-sub.exp: Likewise. + 2016-02-12 Marcin Kościelnicki * gdb.trace/tfile-avx.c (main): Change ymm15 to xmm15. diff --git a/gdb/testsuite/gdb.fortran/vla-value-sub-finish.exp b/gdb/testsuite/gdb.fortran/vla-value-sub-finish.exp index c47ef2c..fde6c9f 100644 --- a/gdb/testsuite/gdb.fortran/vla-value-sub-finish.exp +++ b/gdb/testsuite/gdb.fortran/vla-value-sub-finish.exp @@ -32,6 +32,8 @@ if ![runto_main] { gdb_breakpoint [gdb_get_line_number "array2-almost-filled"] gdb_continue_to_breakpoint "array2-almost-filled" +# array2 size is 296352 bytes. +gdb_test_no_output "set max-value-size 1024*1024" gdb_test "print array2" " = \\( *\\( *\\( *30, *3, *3,\[()3, .\]*\\)" \ "print array2 in foo after it was filled" gdb_test "print array2(2,1,1)=20" " = 20" \ diff --git a/gdb/testsuite/gdb.fortran/vla-value-sub.exp b/gdb/testsuite/gdb.fortran/vla-value-sub.exp index 361d7a9..179683d 100644 --- a/gdb/testsuite/gdb.fortran/vla-value-sub.exp +++ b/gdb/testsuite/gdb.fortran/vla-value-sub.exp @@ -42,6 +42,8 @@ gdb_test "print array1(1, 1)" " = 30" \ gdb_breakpoint [gdb_get_line_number "array2-almost-filled"] gdb_continue_to_breakpoint "array2-almost-filled (1st)" +# array2 size is 296352 bytes. +gdb_test_no_output "set max-value-size 1024*1024" gdb_test "print array2" " = \\( *\\( *\\( *30, *3, *3,\[()3, .\]*\\)" \ "print array2 in foo after it was filled (passed fixed array)" gdb_test "print array2(2,1,1)=20" " = 20" \ -- 2.7.4