From patchwork Sat Feb 13 21:40:46 2016 Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit X-Patchwork-Submitter: Jan Kratochvil X-Patchwork-Id: 10851 Received: (qmail 37674 invoked by alias); 13 Feb 2016 21:40:54 -0000 Mailing-List: contact gdb-patches-help@sourceware.org; run by ezmlm Precedence: bulk List-Id: List-Unsubscribe: List-Subscribe: List-Archive: List-Post: List-Help: , Sender: gdb-patches-owner@sourceware.org Delivered-To: mailing list gdb-patches@sourceware.org Received: (qmail 37659 invoked by uid 89); 13 Feb 2016 21:40:53 -0000 Authentication-Results: sourceware.org; auth=none X-Virus-Found: No X-Spam-SWARE-Status: No, score=-0.0 required=5.0 tests=BAYES_40, RP_MATCHES_RCVD, SPF_HELO_PASS autolearn=ham version=3.3.2 spammy=sk:vlaval, sk:vla-val, UD:vla-value-sub-finish.exp, mofified X-HELO: mx1.redhat.com Received: from mx1.redhat.com (HELO mx1.redhat.com) (209.132.183.28) by sourceware.org (qpsmtpd/0.93/v0.84-503-g423c35a) with (AES256-GCM-SHA384 encrypted) ESMTPS; Sat, 13 Feb 2016 21:40:52 +0000 Received: from int-mx09.intmail.prod.int.phx2.redhat.com (int-mx09.intmail.prod.int.phx2.redhat.com [10.5.11.22]) by mx1.redhat.com (Postfix) with ESMTPS id 33AAB80508; Sat, 13 Feb 2016 21:40:51 +0000 (UTC) Received: from host1.jankratochvil.net (ovpn-204-18.brq.redhat.com [10.40.204.18]) by int-mx09.intmail.prod.int.phx2.redhat.com (8.14.4/8.14.4) with ESMTP id u1DLekBs005889 (version=TLSv1/SSLv3 cipher=DHE-RSA-AES256-GCM-SHA384 bits=256 verify=NO); Sat, 13 Feb 2016 16:40:49 -0500 Date: Sat, 13 Feb 2016 22:40:46 +0100 From: Jan Kratochvil To: Andrew Burgess Cc: Eli Zaretskii , brobecker@adacore.com, gdb-patches@sourceware.org, Pedro Alves Subject: [testsuite patch] testsuite regression: gdb.fortran/vla-value-sub.exp gdb.fortran/vla-value-sub-finish.exp [Re: [PATCH 1/3] gdb: New set/show max-value-size command.] Message-ID: <20160213214046.GA17145@host1.jankratochvil.net> References: <57e2731e179d11c584e8cde994ab1e822a9893b0.1449869722.git.andrew.burgess@embecosm.com> <20160101094309.GC12416@adacore.com> <20160105141241.GG4242@embecosm.com> <83a8ok570f.fsf@gnu.org> <20160106114049.GJ4242@embecosm.com> MIME-Version: 1.0 Content-Disposition: inline In-Reply-To: <20160106114049.GJ4242@embecosm.com> User-Agent: Mutt/1.5.24 (2015-08-30) X-IsSubscribed: yes On Wed, 06 Jan 2016 12:40:50 +0100, Andrew Burgess wrote: > +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) OK for check-in? Tested on x86_64-fedora23-linux-gnu. Jan gdb/testsuite/ChangeLog 2016-02-13 Jan Kratochvil * gdb.fortran/vla-value-sub-finish.exp (set max-value-size 1024*1024): New test. * gdb.fortran/vla-value-sub.exp: Likewise. 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" \