From patchwork Fri May 22 15:55:05 2026 Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit X-Patchwork-Submitter: Tom Tromey X-Patchwork-Id: 135468 Return-Path: X-Original-To: patchwork@sourceware.org Delivered-To: patchwork@sourceware.org Received: from vm01.sourceware.org (localhost [IPv6:::1]) by sourceware.org (Postfix) with ESMTP id E13D148F5253 for ; Fri, 22 May 2026 15:55:39 +0000 (GMT) DKIM-Filter: OpenDKIM Filter v2.11.0 sourceware.org E13D148F5253 Authentication-Results: sourceware.org; dkim=pass (2048-bit key, secure) header.d=adacore.com header.i=@adacore.com header.a=rsa-sha256 header.s=google header.b=BtFzcnBY X-Original-To: gdb-patches@sourceware.org Delivered-To: gdb-patches@sourceware.org Received: from mail-ot1-x32d.google.com (mail-ot1-x32d.google.com [IPv6:2607:f8b0:4864:20::32d]) by sourceware.org (Postfix) with ESMTPS id ACB4948F52ED for ; Fri, 22 May 2026 15:55:08 +0000 (GMT) DMARC-Filter: OpenDMARC Filter v1.4.2 sourceware.org ACB4948F52ED Authentication-Results: sourceware.org; dmarc=pass (p=quarantine dis=none) header.from=adacore.com Authentication-Results: sourceware.org; spf=pass smtp.mailfrom=adacore.com ARC-Filter: OpenARC Filter v1.0.0 sourceware.org ACB4948F52ED Authentication-Results: sourceware.org; arc=none smtp.remote-ip=2607:f8b0:4864:20::32d ARC-Seal: i=1; a=rsa-sha256; d=sourceware.org; s=key; t=1779465308; cv=none; b=gFj0jsqICgB/HucXBMmvnSjZncT4IQzKWM55Ai6k2u3hnM+o4REI1lPaHWiuAdJTp/j3Baj/0u6lnPCU+k2EsSIQtOcgTKE0Ea9rYs2Z5iK4Ftxz7dbYX4TKaVF5CHYJn1x/q983w3HWJYIiJ9bX3DSbIfA985eWd1TbGGl/R4A= ARC-Message-Signature: i=1; a=rsa-sha256; d=sourceware.org; s=key; t=1779465308; c=relaxed/simple; bh=+ftwog0tl8wKhbBWINee6WIl2w+wg8Qb9s/KfWRkH6g=; h=DKIM-Signature:From:To:Subject:Date:Message-ID:MIME-Version; b=pGPomU80WOm12poRycVrs5aLY52QS9YjyN0XNGc4wQyKJQIizthPmywLyDJSpVMvCf81iSIWs7YOGIYmUcGyW//Zf3ARJmwjjZuj8EBzqc2uf4J/ylN7AXb84epubL8UB8+cYVyAg/gSAd4RFZN21dLRYz7oqQvd6Y1d0KGMSuo= ARC-Authentication-Results: i=1; sourceware.org; dkim=pass (2048-bit key, secure) header.d=adacore.com header.i=@adacore.com header.a=rsa-sha256 header.s=google header.b=BtFzcnBY DKIM-Filter: OpenDKIM Filter v2.11.0 sourceware.org ACB4948F52ED Received: by mail-ot1-x32d.google.com with SMTP id 46e09a7af769-7e6128bd9b3so180986a34.1 for ; Fri, 22 May 2026 08:55:08 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=adacore.com; s=google; t=1779465308; x=1780070108; darn=sourceware.org; h=content-transfer-encoding:mime-version:message-id:date:subject:cc :to:from:from:to:cc:subject:date:message-id:reply-to; bh=wMFtkUWvj2OYauoZ2KZl1X68k4BVWkvc4t79kVbKHZM=; b=BtFzcnBYTasSxVbUVNEyzbeRxhLGiwglyCXvx6wDhAKyOHIK0TlOr/XkfKGGrDCtmV foG8GzpOosTNV4TDR0UI1wIi8qBsGW07el2shD6XMJAV9LOkyZGcA1ghdoUrXC0byFpi SlKBa03zG/AaSM+Dr8yz/TGtNbHb5IuAnQ1kvC5McBipHuE0FbwKHTbqT4cRfwwQrw+m feq7aDp5lpwcdUB+ycfbV64lW1MCNs4N1NZxJOFy43W3EHvf10AgWz3miWhX6+FSRG3b o4vSSH/2eYEzokJsLdr2yoBqCaNr44GrwgeHShaJz7OvGE3k010kB61jAloGREYmNSgj HqAQ== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20251104; t=1779465308; x=1780070108; h=content-transfer-encoding:mime-version:message-id:date:subject:cc :to:from:x-gm-gg:x-gm-message-state:from:to:cc:subject:date :message-id:reply-to; bh=wMFtkUWvj2OYauoZ2KZl1X68k4BVWkvc4t79kVbKHZM=; b=HVRrgqlDDp6qat+1PiYOqL3RQtCwGQ39JBsi8P7t1YIT48d6Uaa/mM6Nl7vjVLhXij yPSqnO3ssVkGS78y52zYXNH9pHTeZ/SSdRU9EBRM6Md+S+V0JMw1cqwjOdZFCi6mx8Gz t6EtD+xRiAILuwLXhD16JTMuQDdJ6948IbyEnC1KTpxCxiUeAnTRoxzEqt0BM5rUrFH8 U5x0wSG7d3cN9mtUHvXdOMu9+WHyLo3J+hJaBZXB9tp+9DmP1fblDb6pZcpTCyVpsoz1 DZU/eULce8ivtCvivl/B6UASiRehb9iy2zE9smgyjkfINWK3gEuQT00h0BpLfYR/mJjL w8ew== X-Gm-Message-State: AOJu0YxtXDsPf8EU8RSEqGf7drVKr6gHQsffHy8gHDWc04O99qE/W3lI KVGJfdCO0z3G4hAEGzyVTqsAdpjK/LR+G3+KUVhxc6A2kKPBoxNzASjwLfO0TAwSQm7bfdaS9U0 cNMo= X-Gm-Gg: Acq92OE4YPyWaVcgjML3qdgQMxUgKzCAyjkjxBNacWMEZRSAMSLIrjXHKXtr2yFdrAz YxqZsOiXMp0fvk7OMWDcb2l3x4BNDkrcStEGJ/k2ysYEDovyQhgKjSnMu5xkY/rb/P+umK76uCw 6jmxXzfLgpuiRSTpgzjmKqCxVyjncVlRgb8RD63f51OpHfG4Boa3SOL8ux2JAk70xIkYa5vKO+w h1zTbv1hNG2yV5uc1KPDuRTcqLtWNTRlzRy3mXwQZTrGhsjkzSwqtXXs2+mZOKJqtzkzBuyp2QF ys7mPoSPxviQmyjLCf7nEjfG/Bn/Bc9dik1XUKGAos8wUZRAHTCqaWoG/GaAJEKYzQv0zJ2DqFa +YQmuqdrZjQqKqaxdRC5HuXGzEgf2gnJtkAaOnae8asFDyE+VoFZ3QFSTK+RHRrVQeClXXRa004 tZO9Ax79VtEod3uzA9i/WrzfafQ8gk8vNGyhr3Rjt+ysc= X-Received: by 2002:a05:6830:61c9:b0:7dc:c7aa:22d4 with SMTP id 46e09a7af769-7e5fec66ef9mr2430346a34.1.1779465307963; Fri, 22 May 2026 08:55:07 -0700 (PDT) Received: from bapiya (75-166-225-82.hlrn.qwest.net. [75.166.225.82]) by smtp.gmail.com with ESMTPSA id 46e09a7af769-7e60663a2cbsm1343454a34.19.2026.05.22.08.55.06 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256); Fri, 22 May 2026 08:55:07 -0700 (PDT) From: Tom Tromey To: gdb-patches@sourceware.org Cc: Tom Tromey Subject: [PATCH] Convert dw2-const.exp to use the DWARF assembler Date: Fri, 22 May 2026 09:55:05 -0600 Message-ID: <20260522155505.3363510-1-tromey@adacore.com> X-Mailer: git-send-email 2.54.0 MIME-Version: 1.0 X-Spam-Status: No, score=-11.3 required=5.0 tests=BAYES_00, DKIM_SIGNED, DKIM_VALID, DKIM_VALID_AU, DKIM_VALID_EF, GIT_PATCH_0, KAM_SHORT, RCVD_IN_DNSWL_NONE, SPF_HELO_NONE, SPF_PASS, TXREP shortcircuit=no autolearn=ham autolearn_force=no version=3.4.6 X-Spam-Checker-Version: SpamAssassin 3.4.6 (2021-04-09) on sourceware.org X-BeenThere: gdb-patches@sourceware.org X-Mailman-Version: 2.1.30 Precedence: list List-Id: Gdb-patches mailing list List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: gdb-patches-bounces~patchwork=sourceware.org@sourceware.org This patch converts dw2-const.exp to use the DWARF assembler rather than a .S file. The conversion was largely done using the script from contrib. --- gdb/testsuite/gdb.dwarf2/dw2-const.S | 256 ------------------------- gdb/testsuite/gdb.dwarf2/dw2-const.exp | 52 ++++- 2 files changed, 49 insertions(+), 259 deletions(-) delete mode 100644 gdb/testsuite/gdb.dwarf2/dw2-const.S base-commit: 1678d7d3d2e4cf83cda5a96334a0326573ad0f7c diff --git a/gdb/testsuite/gdb.dwarf2/dw2-const.S b/gdb/testsuite/gdb.dwarf2/dw2-const.S deleted file mode 100644 index 94cf1acbed6..00000000000 --- a/gdb/testsuite/gdb.dwarf2/dw2-const.S +++ /dev/null @@ -1,256 +0,0 @@ -/* This testcase is part of GDB, the GNU debugger. - - Copyright 2010-2026 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 - the Free Software Foundation; either version 3 of the License, or - (at your option) any later version. - - This program is distributed in the hope that it will be useful, - but WITHOUT ANY WARRANTY; without even the implied warranty of - MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the - GNU General Public License for more details. - - You should have received a copy of the GNU General Public License - along with this program. If not, see . */ - -/* Dummy function to provide debug information for. */ - - .text -.Lbegin_text1: - .globl func_cu1 - .type func_cu1, %function -func_cu1: -.Lbegin_func_cu1: - .int 0 -.Lend_func_cu1: - .size func_cu1, .-func_cu1 -.Lend_text1: - -/* Debug information */ - - .section .debug_info -.Lcu1_begin: - /* CU header */ - .4byte .Lcu1_end - .Lcu1_start /* Length of Compilation Unit */ -.Lcu1_start: - .2byte 2 /* DWARF Version */ - .4byte .Labbrev1_begin /* Offset into abbrev section */ - .byte 8 /* Pointer size */ - - /* CU die */ - .uleb128 1 /* Abbrev: DW_TAG_compile_unit */ - .4byte .Lline1_begin /* DW_AT_stmt_list */ - .ascii "file1.txt\0" /* DW_AT_name */ - .ascii "GNU C 3.3.3\0" /* DW_AT_producer */ - .byte 1 /* DW_AT_language (C) */ - - .uleb128 0x8 /* Abbrev: DW_TAG_constant */ - .ascii "twelve\0" /* DW_AT_name */ - .4byte .Ltype_const-.Lcu1_begin /* DW_AT_type */ - .byte 0xc /* DW_AT_const_value */ - -.Ltype_const: - .uleb128 0x9 /* Abbrev: DW_TAG_const_type */ - .4byte .Ltype_int-.Lcu1_begin /* DW_AT_type */ - - .uleb128 0xa /* Abbrev: DW_TAG_variable */ - .ascii "val8\0" /* DW_AT_name */ - .4byte .Ltype_const8-.Lcu1_begin /* DW_AT_type */ - .byte 2f - 1f /* DW_AT_location */ -1: .byte 0x11 /* DW_OP_consts */ -#if 0 /* gas encodes it explicitly. */ - .slab128 0xffffffff00000000 -#endif -#if 0 /* gas encoded it correctly - formed GDB FAILed. */ - .sleb128 -4294967296 -#endif -#if 1 /* Rather encode sleb128 by hand. */ - .byte 0x80, 0x80, 0x80, 0x80, 0x70 -#endif - .byte 0x9f /* DW_OP_stack_value */ -2: - -.Ltype_const8: - .uleb128 0x9 /* Abbrev: DW_TAG_const_type */ - .4byte .Ltype_int8-.Lcu1_begin /* DW_AT_type */ - - /* func_cu1 */ - .uleb128 2 /* Abbrev: DW_TAG_subprogram */ - .byte 1 /* DW_AT_external */ - .byte 1 /* DW_AT_decl_file */ - .byte 2 /* DW_AT_decl_line */ - .ascii "func_cu1\0" /* DW_AT_name */ - .4byte .Ltype_int-.Lcu1_begin /* DW_AT_type */ - .byte 1 /* DW_AT_frame_base: length */ - .byte 0x55 /* DW_AT_frame_base: DW_OP_reg5 */ - -.Ltype_int: - .uleb128 3 /* Abbrev: DW_TAG_base_type */ - .ascii "int\0" /* DW_AT_name */ - .byte 4 /* DW_AT_byte_size */ - .byte 5 /* DW_AT_encoding */ - -.Ltype_int8: - .uleb128 3 /* Abbrev: DW_TAG_base_type */ - .ascii "int8\0" /* DW_AT_name */ - .byte 8 /* DW_AT_byte_size */ - .byte 5 /* DW_AT_encoding */ - - .byte 0 /* End of children of CU */ - -.Lcu1_end: - -/* Abbrev table */ - .section .debug_abbrev -.Labbrev1_begin: - .uleb128 1 /* Abbrev code */ - .uleb128 0x11 /* DW_TAG_compile_unit */ - .byte 1 /* has_children */ - .uleb128 0x10 /* DW_AT_stmt_list */ - .uleb128 0x6 /* DW_FORM_data4 */ - .uleb128 0x3 /* DW_AT_name */ - .uleb128 0x8 /* DW_FORM_string */ - .uleb128 0x25 /* DW_AT_producer */ - .uleb128 0x8 /* DW_FORM_string */ - .uleb128 0x13 /* DW_AT_language */ - .uleb128 0xb /* DW_FORM_data1 */ - .byte 0x0 /* Terminator */ - .byte 0x0 /* Terminator */ - - .uleb128 2 /* Abbrev code */ - .uleb128 0x2e /* DW_TAG_subprogram */ - .byte 0 /* has_children */ - .uleb128 0x3f /* DW_AT_external */ - .uleb128 0xc /* DW_FORM_flag */ - .uleb128 0x3a /* DW_AT_decl_file */ - .uleb128 0xb /* DW_FORM_data1 */ - .uleb128 0x3b /* DW_AT_decl_line */ - .uleb128 0xb /* DW_FORM_data1 */ - .uleb128 0x3 /* DW_AT_name */ - .uleb128 0x8 /* DW_FORM_string */ - .uleb128 0x49 /* DW_AT_type */ - .uleb128 0x13 /* DW_FORM_ref4 */ - .uleb128 0x40 /* DW_AT_frame_base */ - .uleb128 0xa /* DW_FORM_block1 */ - .byte 0x0 /* Terminator */ - .byte 0x0 /* Terminator */ - - .uleb128 3 /* Abbrev code */ - .uleb128 0x24 /* DW_TAG_base_type */ - .byte 0 /* has_children */ - .uleb128 0x3 /* DW_AT_name */ - .uleb128 0x8 /* DW_FORM_string */ - .uleb128 0xb /* DW_AT_byte_size */ - .uleb128 0xb /* DW_FORM_data1 */ - .uleb128 0x3e /* DW_AT_encoding */ - .uleb128 0xb /* DW_FORM_data1 */ - .byte 0x0 /* Terminator */ - .byte 0x0 /* Terminator */ - - .uleb128 0x8 /* abbrev code */ - .uleb128 0x27 /* TAG: DW_TAG_constant */ - .byte 0x0 /* DW_children_no */ - .uleb128 0x3 /* DW_AT_name */ - .uleb128 0x8 /* DW_FORM_string */ - .uleb128 0x49 /* DW_AT_type */ - .uleb128 0x13 /* DW_FORM_ref4 */ - .uleb128 0x1c /* DW_AT_const_value */ - .uleb128 0xb /* DW_FORM_data1 */ - .byte 0x0 /* Terminator */ - .byte 0x0 /* Terminator */ - - .uleb128 0x9 /* abbrev code */ - .uleb128 0x26 /* TAG: DW_TAG_const_type */ - .byte 0x0 /* DW_children_no */ - .uleb128 0x49 /* DW_AT_type */ - .uleb128 0x13 /* DW_FORM_ref4 */ - .byte 0x0 /* Terminator */ - .byte 0x0 /* Terminator */ - - .uleb128 0xa /* abbrev code */ - .uleb128 0x34 /* TAG: DW_TAG_variable */ - .byte 0x0 /* DW_children_no */ - .uleb128 0x3 /* DW_AT_name */ - .uleb128 0x8 /* DW_FORM_string */ - .uleb128 0x49 /* DW_AT_type */ - .uleb128 0x13 /* DW_FORM_ref4 */ - .uleb128 0x02 /* DW_AT_location */ - .uleb128 0xa /* DW_FORM_block1 */ - .byte 0x0 /* Terminator */ - .byte 0x0 /* Terminator */ - - .byte 0x0 /* Terminator */ - .byte 0x0 /* Terminator */ - -/* Line table */ - .section .debug_line -.Lline1_begin: - .4byte .Lline1_end - .Lline1_start /* Initial length */ -.Lline1_start: - .2byte 2 /* Version */ - .4byte .Lline1_lines - .Lline1_hdr /* header_length */ -.Lline1_hdr: - .byte 1 /* Minimum insn length */ - .byte 1 /* default_is_stmt */ - .byte 1 /* line_base */ - .byte 1 /* line_range */ - .byte 0x10 /* opcode_base */ - - /* Standard lengths */ - .byte 0 - .byte 1 - .byte 1 - .byte 1 - .byte 1 - .byte 0 - .byte 0 - .byte 0 - .byte 1 - .byte 0 - .byte 0 - .byte 1 - .byte 0 - .byte 0 - .byte 0 - - /* Include directories */ - .byte 0 - - /* File names */ - .ascii "file1.txt\0" - .uleb128 0 - .uleb128 0 - .uleb128 0 - - .byte 0 - -.Lline1_lines: - .byte 0 /* DW_LNE_set_address */ - .uleb128 5 - .byte 2 - .4byte .Lbegin_func_cu1 - - .byte 3 /* DW_LNS_advance_line */ - .sleb128 3 /* ... to 4 */ - - .byte 1 /* DW_LNS_copy */ - - .byte 1 /* DW_LNS_copy (second time as an end-of-prologue marker) */ - - .byte 0 /* DW_LNE_set_address */ - .uleb128 5 - .byte 2 - .4byte .Lend_func_cu1 - - .byte 0 /* DW_LNE_end_of_sequence */ - .uleb128 1 - .byte 1 - -.Lline1_end: -#ifdef __arm__ - .section .note.GNU-stack,"",%progbits -#else - .section .note.GNU-stack,"",@progbits -#endif diff --git a/gdb/testsuite/gdb.dwarf2/dw2-const.exp b/gdb/testsuite/gdb.dwarf2/dw2-const.exp index 93ddfaa0f2f..1492b09c93b 100644 --- a/gdb/testsuite/gdb.dwarf2/dw2-const.exp +++ b/gdb/testsuite/gdb.dwarf2/dw2-const.exp @@ -17,10 +17,56 @@ load_lib dwarf.exp # This test can only be run on targets which support DWARF-2 and use gas. require dwarf2_support -standard_testfile .S +standard_testfile main.c -debug.S -if {[prepare_for_testing_full "failed to prepare" \ - [list $testfile debug main.c debug $srcfile nodebug]]} { +# Set up the DWARF for the test. + +set asm_file [standard_output_file $srcfile2] +Dwarf::assemble $asm_file { + global srcdir subdir srcfile + declare_labels int int8 const_type const_type_2 + + cu {version 2} { + DW_TAG_compile_unit { + DW_AT_name file1.txt DW_FORM_string + DW_AT_producer {GNU C 3.3.3} DW_FORM_string + DW_AT_language @DW_LANG_C89 + } { + DW_TAG_constant { + DW_AT_name twelve DW_FORM_string + DW_AT_type :$const_type_2 + DW_AT_const_value 12 DW_FORM_data1 + } + const_type_2: DW_TAG_const_type { + DW_AT_type :$int + } + DW_TAG_variable { + DW_AT_name val8 DW_FORM_string + DW_AT_type :$const_type + DW_AT_location { + DW_OP_consts -4294967296 + DW_OP_stack_value + } SPECIAL_expr + } + const_type: DW_TAG_const_type { + DW_AT_type :$int8 + } + int: DW_TAG_base_type { + DW_AT_name int DW_FORM_string + DW_AT_byte_size 4 DW_FORM_data1 + DW_AT_encoding @DW_ATE_signed + } + int8: DW_TAG_base_type { + DW_AT_name int8 DW_FORM_string + DW_AT_byte_size 8 DW_FORM_data1 + DW_AT_encoding @DW_ATE_signed + } + } + } +} + +if {[prepare_for_testing "failed to prepare" ${testfile} \ + [list $srcfile $asm_file] nodebug]} { return }