From patchwork Fri May 1 17:49:31 2026 Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit X-Patchwork-Submitter: Tom Tromey X-Patchwork-Id: 134343 Return-Path: X-Original-To: patchwork@sourceware.org Delivered-To: patchwork@sourceware.org Received: from vm01.sourceware.org (localhost [127.0.0.1]) by sourceware.org (Postfix) with ESMTP id 4CDAB437422C for ; Fri, 1 May 2026 17:50:05 +0000 (GMT) DKIM-Filter: OpenDKIM Filter v2.11.0 sourceware.org 4CDAB437422C 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=e27j7Cho X-Original-To: gdb-patches@sourceware.org Delivered-To: gdb-patches@sourceware.org Received: from mail-oo1-xc29.google.com (mail-oo1-xc29.google.com [IPv6:2607:f8b0:4864:20::c29]) by sourceware.org (Postfix) with ESMTPS id 02DA14BB58D8 for ; Fri, 1 May 2026 17:49:34 +0000 (GMT) DMARC-Filter: OpenDMARC Filter v1.4.2 sourceware.org 02DA14BB58D8 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 02DA14BB58D8 Authentication-Results: server2.sourceware.org; arc=none smtp.remote-ip=2607:f8b0:4864:20::c29 ARC-Seal: i=1; a=rsa-sha256; d=sourceware.org; s=key; t=1777657775; cv=none; b=w2Xw/B0TKUdXdlaYiBpt2KsbrfrhNKS1i7+GZ5Dc5gx00ViGIkms3TnzZ+rO3Enx+9CcqgTwAPipt9lFi994x9/Zyz2s6+iJ7DKvqT2BInz2358VycFICxMPqiJfwZ/CvtOAx1KEd1pKXVdMqxv+MoQiQTKa/kGoEjwjllZwhjM= ARC-Message-Signature: i=1; a=rsa-sha256; d=sourceware.org; s=key; t=1777657775; c=relaxed/simple; bh=P8QKhDjTcGOxm1y/4jx1/euw2eM1tycZcf6V4DYsR5M=; h=DKIM-Signature:From:To:Subject:Date:Message-ID:MIME-Version; b=D9Ck5yI432KHbI4eub7FSWS3QXW2M/+H/i6KSAJwfFz4cvBl+Fybpn7taDI/9vNRbaTX6MA65icSVhblMz18PxHdvj/nVWBmlnNINqEd0x0tcf8Da0etf1NIjJGKL4AyeNFN8fTBH9GKm9LRxbBIEA4Em9M6/GHEIRfntjckPFo= ARC-Authentication-Results: i=1; server2.sourceware.org DKIM-Filter: OpenDKIM Filter v2.11.0 sourceware.org 02DA14BB58D8 Received: by mail-oo1-xc29.google.com with SMTP id 006d021491bc7-68244d317e5so1340612eaf.0 for ; Fri, 01 May 2026 10:49:34 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=adacore.com; s=google; t=1777657774; x=1778262574; 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=SQ3e696KaooXjF+Yq9OPFwDPKyLwUNZoanAS0SIyk0A=; b=e27j7ChodT4TfI0zBfPD4WopNweJDVUiwIhMVtxMecYW9yzEAAppYbjmkzul6bgr73 Bn3OlrvC82I8nKZiB9eChStNuRkIA0g+xoagbST2BoKkXWR22QKWM0SwhykoA+GNNcjC +jdMGFRyO1QkoLdDAkJm8g2WkShV0HUH+QUK1Q8IQZreWkPr6Kpdl/ooWOOdSwB/Dm9G WKmCMH0Y+K4ogTtR0R7vyb4hOnD6BpJ3sVHoKBH0LK7Y0DH7quu6tgqTQGuKjk3KU/Va 60qGrLCY7hv263OU3w8MKgCA3XuuuIb1CctRoPbRVqEfKoE53uKiS6F7ac82TCwVKsac s2Pg== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20251104; t=1777657774; x=1778262574; 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=SQ3e696KaooXjF+Yq9OPFwDPKyLwUNZoanAS0SIyk0A=; b=V5JcKb9ktVqXNWID0UMPTPCVLeMggVa/QW6Ca1jKCy72iHDK49N2d/iTzRbsKwZE7D P/Of4SlBSI3Mdk0Udc/kn87FGhPibd0V1NSdmo7eCxvfNW2uND/YyDW+3lpkXOvB+YJX vwPW7Qzzx10NCEn4oK3scCZFMZNClewF5hCCCSDobWfI7ABpiZiXIEVrZ2MiJt69WQfM BKK3QtfXXjvGRyUo0sEyJFhRsrjH4+/uL5pSt1xLnq/4nbGjZMjjtmn/20JYYgYNpOv+ 9e0Nin9/77MxT023caQgUNbiJD8HGv+0p9p3mokcqRppKmnIphTC6j4z6+ybxEZcRuf/ tHEw== X-Gm-Message-State: AOJu0Yy+v5F8Lo/EuxWGlmudqt3RjF2SLKjR2SRc/MZUe3cA2i5bZD8j DyYiPLcP4CWkbEAPOHYLDqj2XNgAs60Z5Mvu66C6TSrF7J3iKsabaj/YJHfqNgBXadQwJ/FC1Lz Ld6U= X-Gm-Gg: AeBDies7xSdL8u5H5PqbxvRLbD8d+d8dOLMQBBEpbIb50L1G7KMwRkRbmzi42N+X5ag NuSGIotKnLsK2IZrzATARu03qbtu8ZRE9GTnnxNP5XD+/INYepNnyei2nP598NC9nG9Sxv2fkfv HXH9zQE/PtXjvqHBuFrOOwJlnepIacio4J8akF96dLvIYUoEYOk4Hkeh/vtssAhj+Cwz9IPbraC zc+6Cx3QQ8WYt5x6HxyygdJpz36GE0vPVq9rJF3eYdnHDfwvPj8mqM+3sU3OHLsAD9oAxINKkMe CSxr5fvLEY2KEly1H1GuYXzEfoc1Vp0ZGJgPUR/bmoPX3fM3HfQMWDLz/pFlMyvHL2i4vxTJNcw dOODwxcZBPgRxV3BnhTTzeBCSRER4dxIv5Z7F+6xGfyvAEiPCXvD/2STOmcm3qA1vSg/LdOBUca zOXJSPepxln6aFs9jo4MX2lG+Dlj/Akv9KgKCtzlhVKXY2sTyFbuzJJg== X-Received: by 2002:a05:6820:99b:b0:694:8683:3867 with SMTP id 006d021491bc7-69697db848emr58337eaf.46.1777657774144; Fri, 01 May 2026 10:49:34 -0700 (PDT) Received: from bapiya (75-166-225-82.hlrn.qwest.net. [75.166.225.82]) by smtp.gmail.com with ESMTPSA id 586e51a60fabf-43454d35e5bsm3173765fac.15.2026.05.01.10.49.33 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256); Fri, 01 May 2026 10:49:33 -0700 (PDT) From: Tom Tromey To: gdb-patches@sourceware.org Cc: Tom Tromey Subject: [pushed] Update more tests for gnat-llvm Date: Fri, 1 May 2026 11:49:31 -0600 Message-ID: <20260501174931.1883614-1-tromey@adacore.com> X-Mailer: git-send-email 2.53.0 MIME-Version: 1.0 X-Spam-Status: No, score=-11.4 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 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 I found a few more tests where a simple change would preserve the behavior of the test while also making it pass with gnat-llvm. As this is Ada and gnat-llvm-specific, I am checking it in. --- gdb/testsuite/gdb.ada/aliased_array/foo.adb | 4 ++++ gdb/testsuite/gdb.ada/str_chars/foo.adb | 10 ++-------- .../tick_length_array_enum_idx/foo_n207_004.adb | 6 ++++++ 3 files changed, 12 insertions(+), 8 deletions(-) base-commit: 0586465daf276a2313f9eb0d2812f171a9ea28fb diff --git a/gdb/testsuite/gdb.ada/aliased_array/foo.adb b/gdb/testsuite/gdb.ada/aliased_array/foo.adb index 11a84c32f0a..759533fd561 100644 --- a/gdb/testsuite/gdb.ada/aliased_array/foo.adb +++ b/gdb/testsuite/gdb.ada/aliased_array/foo.adb @@ -16,6 +16,10 @@ with Pck; use Pck; procedure Foo is BT : aliased Bounded := New_Bounded (Low => 1, High => 3); + BT_First : Integer := BT'First; + BT_Last : Integer := BT'Last; begin Do_Nothing (BT'Address); -- STOP + Do_Nothing (BT_First'Address); + Do_Nothing (BT_Last'Address); end Foo; diff --git a/gdb/testsuite/gdb.ada/str_chars/foo.adb b/gdb/testsuite/gdb.ada/str_chars/foo.adb index 019e782d6ce..81cd6f50339 100644 --- a/gdb/testsuite/gdb.ada/str_chars/foo.adb +++ b/gdb/testsuite/gdb.ada/str_chars/foo.adb @@ -14,13 +14,7 @@ -- along with this program. If not, see . procedure Foo is - - procedure Blah (Arg : String) is - begin - null; -- STOP - end; - + Arg : String := "abcdefghijklmnopqrstuvwxyz"; begin - - Blah ("abcdefghijklmnopqrstuvwxyz"); + null; -- STOP end Foo; diff --git a/gdb/testsuite/gdb.ada/tick_length_array_enum_idx/foo_n207_004.adb b/gdb/testsuite/gdb.ada/tick_length_array_enum_idx/foo_n207_004.adb index 14375a5a7c2..120dc3d3d4d 100644 --- a/gdb/testsuite/gdb.ada/tick_length_array_enum_idx/foo_n207_004.adb +++ b/gdb/testsuite/gdb.ada/tick_length_array_enum_idx/foo_n207_004.adb @@ -21,10 +21,16 @@ procedure Foo_n207_004 is Cold : Variable_Table := (Green => False, Blue => True, White => True); Vars : Variable_Table := New_Variable_Table (Low => Red, High => Green); PT_Full : Full_PT := (False, True, False, True, False); + + Vars_First : Color := Vars'First; + Vars_Last : Color := Vars'Last; + begin Do_Nothing (Full'Address); -- STOP Do_Nothing (Prim'Address); Do_Nothing (Cold'Address); Do_Nothing (Vars'Address); + Do_Nothing (Vars_First'Address); + Do_Nothing (Vars_Last'Address); Do_Nothing (PT_Full'Address); end Foo_n207_004;