From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from simark.ca by simark.ca with LMTP id 0eudHogutWr7AT0AWB0awg (envelope-from ) for ; Thu, 24 Sep 2026 10:07:04 -0400 Authentication-Results: simark.ca; dkim=pass (1024-bit key; unprotected) header.d=suse.de header.i=@suse.de header.a=rsa-sha256 header.s=susede2_rsa header.b=AT/j3FXN; dkim=pass header.d=suse.de header.i=@suse.de header.a=ed25519-sha256 header.s=susede2_ed25519 header.b=/msNSyOa; dkim=pass (1024-bit key) header.d=suse.de header.i=@suse.de header.a=rsa-sha256 header.s=susede2_rsa header.b=vsXFGv+J; dkim=neutral header.d=suse.de header.i=@suse.de header.a=ed25519-sha256 header.s=susede2_ed25519 header.b=80Db9cGh; dkim-atps=neutral Received: by simark.ca (Postfix, from userid 112) id 758EA1E06B; Thu, 24 Sep 2026 10:07:04 -0400 (EDT) X-Spam-Checker-Version: SpamAssassin 4.0.1 (2024-03-25) on simark.ca X-Spam-Level: X-Spam-Status: No, score=-5.4 required=5.0 tests=ARC_SIGNED,ARC_VALID,BAYES_00, DKIM_SIGNED,DKIM_VALID,DKIM_VALID_AU,MAILING_LIST_MULTI, RCVD_IN_DNSWL_MED autolearn=ham autolearn_force=no version=4.0.1 Received: from vm01.sourceware.org (vm01.sourceware.org [IPv6:2620:52:6:3111::32]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits) key-exchange x25519 server-signature ECDSA (prime256v1) server-digest SHA256) (No client certificate requested) by simark.ca (Postfix) with ESMTPS id 8ED241E01F for ; Thu, 24 Sep 2026 10:07:03 -0400 (EDT) Received: from vm01.sourceware.org (localhost [IPv6:::1]) by sourceware.org (Postfix) with ESMTP id 49B754BB589F for ; Thu, 24 Sep 2026 14:07:02 +0000 (GMT) DKIM-Filter: OpenDKIM Filter v2.11.0 sourceware.org 49B754BB589F Authentication-Results: sourceware.org; dkim=pass (1024-bit key, unprotected) header.d=suse.de header.i=@suse.de header.a=rsa-sha256 header.s=susede2_rsa header.b=AT/j3FXN; dkim=pass header.d=suse.de header.i=@suse.de header.a=ed25519-sha256 header.s=susede2_ed25519 header.b=/msNSyOa; dkim=pass (1024-bit key) header.d=suse.de header.i=@suse.de header.a=rsa-sha256 header.s=susede2_rsa header.b=vsXFGv+J; dkim=neutral header.d=suse.de header.i=@suse.de header.a=ed25519-sha256 header.s=susede2_ed25519 header.b=80Db9cGh Received: from smtp-out1.suse.de (smtp-out1.suse.de [IPv6:2a07:de40:b251:101:10:150:64:1]) by sourceware.org (Postfix) with ESMTPS id 74C024BB3BEB for ; Thu, 24 Sep 2026 14:06:15 +0000 (GMT) DMARC-Filter: OpenDMARC Filter v1.4.2 sourceware.org 74C024BB3BEB Authentication-Results: sourceware.org; dmarc=pass (p=none dis=none) header.from=suse.de Authentication-Results: sourceware.org; spf=pass smtp.mailfrom=suse.de ARC-Filter: OpenARC Filter v1.0.0 sourceware.org 74C024BB3BEB Authentication-Results: sourceware.org; arc=none smtp.remote-ip=2a07:de40:b251:101:10:150:64:1 ARC-Seal: i=1; a=rsa-sha256; d=sourceware.org; s=key; t=1790258775; cv=none; b=VGqm6VSnvwN+p5EyUuoj0Jt+2qFFsRHOdsyAcSevjXFjLQYiuOntjsPwt2SikC5fdDscAUufGXtwN7QdBz7kUVom/Cpdg03KYKpB0RcFmPzIImQXxLumZj8tgVe/bLT3QwrbmAFVdNnwOntnoiXhfmSbhl5bxPNLzS/PdWmoqGk= ARC-Message-Signature: i=1; a=rsa-sha256; d=sourceware.org; s=key; t=1790258775; c=relaxed/simple; bh=NY/fng+abg7BnS8hkwrZYqcwxOfUdIK6iC1cLtkkiGA=; h=DKIM-Signature:DKIM-Signature:DKIM-Signature:DKIM-Signature:From: To:Subject:Date:Message-ID:MIME-Version; b=q1QTq23ean/p6D56pWsbJwjaYKE9zL8HW8blOwE/LTHGflMz8d4HgDiJ9rm3Dc7BEixHpws0JVFseM5n4ueADJ8y2bANmjA10aAXHL/Ad487FTNG7cLr+DpArCS8XO7i3+yhkDnxMuKFkoORJqdJS7AGNr4uOCt1HUTLOgo8m9A= ARC-Authentication-Results: i=1; sourceware.org; dkim=pass (1024-bit key, unprotected) header.d=suse.de header.i=@suse.de header.a=rsa-sha256 header.s=susede2_rsa header.b=AT/j3FXN; dkim=pass header.d=suse.de header.i=@suse.de header.a=ed25519-sha256 header.s=susede2_ed25519 header.b=/msNSyOa; dkim=pass (1024-bit key) header.d=suse.de header.i=@suse.de header.a=rsa-sha256 header.s=susede2_rsa header.b=vsXFGv+J; dkim=neutral header.d=suse.de header.i=@suse.de header.a=ed25519-sha256 header.s=susede2_ed25519 header.b=80Db9cGh DKIM-Filter: OpenDKIM Filter v2.11.0 sourceware.org 74C024BB3BEB Received: from imap1.dmz-prg2.suse.org (unknown [10.150.64.97]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits) key-exchange X25519 server-signature RSA-PSS (4096 bits) server-digest SHA256) (No client certificate requested) by smtp-out1.suse.de (Postfix) with ESMTPS id 2F2CC21F18 for ; Thu, 24 Sep 2026 14:06:06 +0000 (UTC) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=suse.de; s=susede2_rsa; t=1790258770; h=from:from:reply-to:date:date:message-id:message-id:to:to:cc: mime-version:mime-version: content-transfer-encoding:content-transfer-encoding: in-reply-to:in-reply-to:references:references; bh=ZVJqPlhWV6zN8eTrsxPe4VCKOshr5tPBzXm8CDdKDLQ=; b=AT/j3FXN61lgZpj1hAPRtFNe4KyslM3TsgDFydNc0mSDOx4npuW3peyqEVlkuFKb+JldOh vVijDEMu9BmKV5Gi/KswnUDTd49O3lzhHwwDrRxe3UZ6F4ViHlkhXxnveG0OKvlBhmtY/3 FEVMvZ+gUH3MVExatQvqtEt3jWkrRH4= DKIM-Signature: v=1; a=ed25519-sha256; c=relaxed/relaxed; d=suse.de; s=susede2_ed25519; t=1790258770; h=from:from:reply-to:date:date:message-id:message-id:to:to:cc: mime-version:mime-version: content-transfer-encoding:content-transfer-encoding: in-reply-to:in-reply-to:references:references; bh=ZVJqPlhWV6zN8eTrsxPe4VCKOshr5tPBzXm8CDdKDLQ=; b=/msNSyOaZ83L9fjaSeNgMQAB9X4Cl2FCRk2oizoDn5440FBFtsq1zA9Z9s6KdGLLTXIuZx Ma1mUGHKyDIYIrDQ== Authentication-Results: smtp-out1.suse.de; none DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=suse.de; s=susede2_rsa; t=1790258766; h=from:from:reply-to:date:date:message-id:message-id:to:to:cc: mime-version:mime-version: content-transfer-encoding:content-transfer-encoding: in-reply-to:in-reply-to:references:references; bh=ZVJqPlhWV6zN8eTrsxPe4VCKOshr5tPBzXm8CDdKDLQ=; b=vsXFGv+J8uu+FZ+lSsSHBqQeqKqNQaiV2OZ5yn1G0dSL8W63gEZ8wRl3Tj5Qqw+nMhVqJ4 LfFqamnr6dvVWFH//kQztKoMY97cChdtlu0ZSfD3R1KIMDlacLIDFgk/D009ZhI2FTLRk0 el0/9AhQukL1JN27mDQf3gWJsLc0ieM= DKIM-Signature: v=1; a=ed25519-sha256; c=relaxed/relaxed; d=suse.de; s=susede2_ed25519; t=1790258766; h=from:from:reply-to:date:date:message-id:message-id:to:to:cc: mime-version:mime-version: content-transfer-encoding:content-transfer-encoding: in-reply-to:in-reply-to:references:references; bh=ZVJqPlhWV6zN8eTrsxPe4VCKOshr5tPBzXm8CDdKDLQ=; b=80Db9cGhgTwr7QQe66KpX7/3R/cC5ow9QI5n4Ex1QhrHuvQ+i/mFVm/KSmI6CxDUtwM4Sx twsd1gMUFRvlL4Cg== Received: from imap1.dmz-prg2.suse.org (localhost [127.0.0.1]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits) key-exchange X25519 server-signature RSA-PSS (4096 bits) server-digest SHA256) (No client certificate requested) by imap1.dmz-prg2.suse.org (Postfix) with ESMTPS id EC68913668 for ; Thu, 24 Sep 2026 14:06:05 +0000 (UTC) Received: from dovecot-director2.suse.de ([2a07:de40:b281:106:10:150:64:167]) by imap1.dmz-prg2.suse.org with ESMTPSA id JodsG00utWpjVQAAD6G6ig:T2 (envelope-from ) for ; Thu, 24 Sep 2026 14:06:05 +0000 From: Tom de Vries To: gdb-patches@sourceware.org Subject: [pushed 2/3] [gdb/testsuite] Add gdb.testsuite/foreach_with_prefix-2.exp Date: Thu, 24 Sep 2026 16:06:03 +0200 Message-ID: <20260924140605.1009056-2-tdevries@suse.de> X-Mailer: git-send-email 2.51.0 In-Reply-To: <20260924140605.1009056-1-tdevries@suse.de> References: <20260924140605.1009056-1-tdevries@suse.de> MIME-Version: 1.0 Content-Transfer-Encoding: 8bit X-Spamd-Result: default: False [-2.80 / 50.00]; BAYES_HAM(-3.00)[100.00%]; MID_CONTAINS_FROM(1.00)[]; NEURAL_HAM_LONG(-1.00)[-1.000]; R_MISSING_CHARSET(0.50)[]; NEURAL_HAM_SHORT(-0.20)[-0.993]; MIME_GOOD(-0.10)[text/plain]; ARC_NA(0.00)[]; RCPT_COUNT_ONE(0.00)[1]; RCVD_VIA_SMTP_AUTH(0.00)[]; MIME_TRACE(0.00)[0:+]; DKIM_SIGNED(0.00)[suse.de:s=susede2_rsa,suse.de:s=susede2_ed25519]; PREVIOUSLY_DELIVERED(0.00)[gdb-patches@sourceware.org]; FROM_EQ_ENVFROM(0.00)[]; FROM_HAS_DN(0.00)[]; DBL_BLOCKED_OPENRESOLVER(0.00)[suse.de:mid,gnu.org:url,imap1.dmz-prg2.suse.org:helo]; RCVD_COUNT_TWO(0.00)[2]; TO_MATCH_ENVRCPT_ALL(0.00)[]; TO_DN_NONE(0.00)[]; RCVD_TLS_ALL(0.00)[] 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~public-inbox=simark.ca@sourceware.org Add test-case gdb.testsuite/foreach_with_prefix-2.exp. It tests the foreach_with_prefix construct, similar to how test-case gdb.testsuite/transparent-uplevel.exp does. --- .../gdb.testsuite/foreach_with_prefix-2.exp | 102 ++++++++++++++++++ 1 file changed, 102 insertions(+) create mode 100644 gdb/testsuite/gdb.testsuite/foreach_with_prefix-2.exp diff --git a/gdb/testsuite/gdb.testsuite/foreach_with_prefix-2.exp b/gdb/testsuite/gdb.testsuite/foreach_with_prefix-2.exp new file mode 100644 index 00000000000..861aa2e50f7 --- /dev/null +++ b/gdb/testsuite/gdb.testsuite/foreach_with_prefix-2.exp @@ -0,0 +1,102 @@ +# Copyright 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 . + +set stmts \ + [list \ + {} \ + "error foo" \ + return \ + break \ + continue \ + "return -code ok" \ + "return -code error" \ + "return -code return" \ + "return -code break" \ + "return -code continue" \ + "return -code ok -level 0" \ + "return -code ok -level 1" \ + "return -code ok -level 2" \ + "return -code error -level 0" \ + "return -code error -level 1" \ + "return -code error -level 2" \ + "return -code return -level 0" \ + "return -code return -level 1" \ + "return -code return -level 2" \ + "return -code break -level 0" \ + "return -code break -level 1" \ + "return -code break -level 2" \ + "return -code continue -level 0" \ + "return -code continue -level 1" \ + "return -code continue -level 2"] + +foreach stmt $stmts { + verbose -log "STMT: $stmt" + + set counter 0 + set res1 [catch { + incr counter 1 + foreach i {1 2 3} { + incr counter 10 + if {$i == 2} { + {*}$stmt + } + incr counter 100 + } + incr counter 1000 + } script_res1 opts1] + set counter1 $counter + + set counter 0 + set res2 [catch { + incr counter 1 + foreach_with_prefix i {1 2 3} { + incr counter 10 + if {$i == 2} { + {*}$stmt + } + incr counter 100 + } + incr counter 1000 + } script_res2 opts2] + set counter2 $counter + + verbose -log "COUNTER1: $counter1" + verbose -log "COUNTER2: $counter2" + gdb_assert {$counter1 == $counter2} "$stmt: counter" + + verbose -log "RES1: $res1" + verbose -log "RES2: $res2" + gdb_assert {$res1 == $res2} "$stmt: res" + + verbose -log "SCRIPT_RES1: '$script_res1'" + verbose -log "SCRIPT_RES2: '$script_res2'" + gdb_assert {$script_res1 == $script_res2} "$stmt: script_res" + + # Note: we skip -errorinfo and -errorstack here. These differ for + # something like "error foo", and they should. When it comes to errors, + # we're not trying to hide the indirection. + foreach key {-code -level -errorcode} { + set v1 {} + set v2 {} + if {[dict exists $opts1 $key]} { + set v1 [dict get $opts1 $key] + } + if {[dict exists $opts2 $key]} { + set v2 [dict get $opts2 $key] + } + verbose -log "KEY: $key, V1: $v1" + verbose -log "KEY: $key, V2: $v2" + gdb_assert {$v1 == $v2} "$stmt: opts: $key" + } +} -- 2.51.0