From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from us-smtp-delivery-124.mimecast.com (us-smtp-delivery-124.mimecast.com [170.10.129.124]) by sourceware.org (Postfix) with ESMTPS id 2D73B385781E for ; Wed, 14 Sep 2022 13:14:49 +0000 (GMT) DMARC-Filter: OpenDMARC Filter v1.4.1 sourceware.org 2D73B385781E Received: from mimecast-mx02.redhat.com (mimecast-mx02.redhat.com [66.187.233.88]) by relay.mimecast.com with ESMTP with STARTTLS (version=TLSv1.2, cipher=TLS_ECDHE_RSA_WITH_AES_256_GCM_SHA384) id us-mta-663-6IqYSmq3M6KDFOODNTIyGg-1; Wed, 14 Sep 2022 09:14:47 -0400 X-MC-Unique: 6IqYSmq3M6KDFOODNTIyGg-1 Received: from smtp.corp.redhat.com (int-mx03.intmail.prod.int.rdu2.redhat.com [10.11.54.3]) (using TLSv1.2 with cipher AECDH-AES256-SHA (256/256 bits)) (No client certificate requested) by mimecast-mx02.redhat.com (Postfix) with ESMTPS id 6D3E785A583 for ; Wed, 14 Sep 2022 13:14:47 +0000 (UTC) Received: from fedora.redhat.com (unknown [10.40.193.113]) by smtp.corp.redhat.com (Postfix) with ESMTPS id E16821121315; Wed, 14 Sep 2022 13:14:46 +0000 (UTC) From: Bruno Larsen To: gdb-patches@sourceware.org Subject: [PATCH v5 3/7] gdb/testsuite: fix testing gdb.base/skip-inline.exp with clang Date: Wed, 14 Sep 2022 15:14:23 +0200 Message-Id: <20220914131427.269689-4-blarsen@redhat.com> In-Reply-To: <20220914131427.269689-1-blarsen@redhat.com> References: <20220914131427.269689-1-blarsen@redhat.com> MIME-Version: 1.0 X-Scanned-By: MIMEDefang 3.1 on 10.11.54.3 X-Mimecast-Spam-Score: 0 X-Mimecast-Originator: redhat.com Content-Transfer-Encoding: 8bit Content-Type: text/plain; charset="US-ASCII"; x-default=true X-Spam-Status: No, score=-12.4 required=5.0 tests=BAYES_00, DKIMWL_WL_HIGH, DKIM_SIGNED, DKIM_VALID, DKIM_VALID_AU, DKIM_VALID_EF, GIT_PATCH_0, RCVD_IN_DNSWL_LOW, SPF_HELO_NONE, SPF_NONE, TXREP, T_SCC_BODY_TEXT_LINE autolearn=ham autolearn_force=no version=3.4.6 X-Spam-Checker-Version: SpamAssassin 3.4.6 (2021-04-09) on server2.sourceware.org X-BeenThere: gdb-patches@sourceware.org X-Mailman-Version: 2.1.29 Precedence: list List-Id: Gdb-patches mailing list List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , X-List-Received-Date: Wed, 14 Sep 2022 13:14:52 -0000 When testing gdb.base/skip-inline.exp using clang, we get failures when trying to step out of functions, since clang requires one fewer step when compared to gcc. The inferior gets increasingly out of sync as the test continues because of this difference, which generates those failures. This commit fixes this by switching those hardcoded steps to gdb_step_until, to guarantee that the inferior is always synced to what the test expects. This approach does not work for the parts that use step 2 or step 3, so when we identify that clang is being used, those tests are skipped. --- gdb/testsuite/gdb.base/skip-inline.exp | 107 ++++++++++++++----------- 1 file changed, 62 insertions(+), 45 deletions(-) diff --git a/gdb/testsuite/gdb.base/skip-inline.exp b/gdb/testsuite/gdb.base/skip-inline.exp index f6e9926b66c..b7d519e60c1 100644 --- a/gdb/testsuite/gdb.base/skip-inline.exp +++ b/gdb/testsuite/gdb.base/skip-inline.exp @@ -15,6 +15,8 @@ standard_testfile +set epilogue [have_epilogue_line_info] + if { [prepare_for_testing "failed to prepare" "skip-inline" \ {skip-inline.c skip1.c } \ {debug nowarnings}] } { @@ -24,65 +26,80 @@ if { [prepare_for_testing "failed to prepare" "skip-inline" \ set srcfile skip-inline.c set srcfile1 skip1.c -if ![runto_main] { - return -} - -# Create a skiplist entry for a specified file and function. - -gdb_test "skip function foo" "Function foo will be skipped when stepping\." +proc_with_prefix single_step { } { + if ![runto_main] { + return + } -gdb_test "bt" "\\s*\\#0\\s+main.*" "in the main" -gdb_test "step" ".*" "step into baz, since foo will be skipped" -gdb_test "bt" "\\s*\\#0\\s+baz.*" "in the baz, since foo was skipped" -gdb_test "step" ".*" "step in the baz" -gdb_test "bt" "\\s*\\#0\\s+baz.*" "still in the baz" -gdb_test "step" ".*" "step back to main" -gdb_test "bt" "\\s*\\#0\\s+main.*" "again in the main" -gdb_test "step" ".*" "step again into baz, since foo will be skipped" -gdb_test "bt" "\\s*\\#0\\s+baz.*" "again in the baz" -gdb_test "step" ".*" "step in the baz, again" -gdb_test "bt" "\\s*\\#0\\s+baz.*" "still in the baz, again" -gdb_test "step" ".*" "step back to main, again" -gdb_test "bt" "\\s*\\#0\\s+main.*" "again back to main" - -if ![runto_main] { - return -} - -with_test_prefix "double step" { gdb_test "bt" "\\s*\\#0\\s+main.*" "in the main" - gdb_test "step 2" ".*" "step into baz, since foo will be skipped" - gdb_test "bt" "\\s*\\#0\\s+baz.*" "still in the baz" - gdb_test "step" ".*" "step back to main" + gdb_test "step" ".*" "step into baz, since foo will be skipped" + gdb_test "bt" "\\s*\\#0\\s+baz.*" "in the baz, since foo was skipped" + gdb_step_until ".*x = 0; x = baz \\(foo \\(\\)\\).*" gdb_test "bt" "\\s*\\#0\\s+main.*" "again in the main" - gdb_test "step 2" ".*" "step again into baz, since foo will be skipped" + gdb_test "step" ".*" "step again into baz, since foo will be skipped" gdb_test "bt" "\\s*\\#0\\s+baz.*" "again in the baz" - gdb_test "step" ".*" "step back to main, again" - gdb_test "bt" "\\s*\\#0\\s+main.*" "again back to main" + gdb_step_until "main \\(\\) at .*" "step back to main, again" + gdb_test "bt" "\\s*\\#0.*main.*" "again back to main" } -if ![runto_main] { - return -} +proc_with_prefix double_step { } { + if ![runto_main] { + return + } -with_test_prefix "triple step" { - gdb_test "bt" "\\s*\\#0\\s+main.*" "in the main" - gdb_test "step 3" ".*" "step over baz" - gdb_test "bt" "\\s*\\#0\\s+main.*" "again in the main" - gdb_test "step 3" ".*" "step over baz, again" - gdb_test "bt" "\\s*\\#0\\s+main.*" "again back to main" + with_test_prefix "double step" { + gdb_test "bt" "\\s*\\#0\\s+main.*" "in the main" + gdb_test "step 2" ".*" "step into baz, since foo will be skipped" + gdb_test "bt" "\\s*\\#0\\s+baz.*" "still in the baz" + gdb_test "step" ".*" "step back to main" + gdb_test "bt" "\\s*\\#0\\s+main.*" "again in the main" + gdb_test "step 2" ".*" "step again into baz, since foo will be skipped" + gdb_test "bt" "\\s*\\#0\\s+baz.*" "again in the baz" + gdb_test "step" ".*" "step back to main, again" + gdb_test "bt" "\\s*\\#0\\s+main.*" "again back to main" + } } -if ![runto_main] { - return +proc_with_prefix triple_step { } { + if ![runto_main] { + return + } + + with_test_prefix "triple step" { + gdb_test "bt" "\\s*\\#0\\s+main.*" "in the main" + gdb_test "step 3" ".*" "step over baz" + gdb_test "bt" "\\s*\\#0\\s+main.*" "again in the main" + gdb_test "step 3" ".*" "step over baz, again" + gdb_test "bt" "\\s*\\#0\\s+main.*" "again back to main" + } } -gdb_test "skip delete" ".*" "skip delete" +proc_with_prefix skip_current_frame { } { + if ![runto_main] { + return + } + + gdb_test "skip delete" ".*" "skip delete" -with_test_prefix "skip current frame" { gdb_test "bt" "\\s*\\#0\\s+main.*" "in the main" gdb_test "step" ".*" "step into foo" gdb_test "bt" "\\s*\\#0\\s+foo.*" "in the foo" gdb_test "skip" "Function foo will be skipped when stepping\." "skip" } + +# Create a skiplist entry for a specified file and function. + +gdb_test "skip function foo" "Function foo will be skipped when stepping\." + +single_step + +# Some compilers link the epilogue of functions to the line containing the +# closing brace, while others dont. The behavior ends up so out of sync +# with multiple steps at a time, that completely different procs would need +# to be made, and it is frankly unnecessary. +if {$epilogue} { + double_step + triple_step +} + +skip_current_frame -- 2.37.3