"Dr. Arne Babenhauserheide" <arne_bab@HIDDEN>
to control <at> debbugs.gnu.org.
Full text available.Received: (at 71304) by debbugs.gnu.org; 1 Jul 2024 21:53:07 +0000 From debbugs-submit-bounces <at> debbugs.gnu.org Mon Jul 01 17:53:07 2024 Received: from localhost ([127.0.0.1]:34957 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>) id 1sOOxP-0004DE-Jr for submit <at> debbugs.gnu.org; Mon, 01 Jul 2024 17:53:07 -0400 Received: from mout.web.de ([212.227.15.3]:46167) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from <arne_bab@HIDDEN>) id 1sOOxN-0004Cg-0Z for 71304 <at> debbugs.gnu.org; Mon, 01 Jul 2024 17:53:06 -0400 DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=web.de; s=s29768273; t=1719870777; x=1720475577; i=arne_bab@HIDDEN; bh=NPhSZDcc049XlP8FADnZVIBruD6CBK+u7d7N8u4YhWY=; h=X-UI-Sender-Class:From:To:Cc:Subject:In-Reply-To:References:Date: Message-ID:MIME-Version:Content-Type:cc:content-transfer-encoding: content-type:date:from:message-id:mime-version:reply-to:subject: to; b=araWxz47lx65sAENvB4YHfl4Csz6El6PIlS3oT9UOV7oC+TY1WI9Q9ARIIOhV4tb T6CpGaTt01CS8LqV++scB8cyrif0gnbke4v7BkiFM58HZrGCZRaJRnxVdbtvGWnvU YrcvdxcYykLz+AJxvb+dCIZ8Cy8eRBefZx44/VKut1fF1rPWWZjNlUB2TtI3H3w+n 5c7C05R+dw2NW8MANzW2ghpzsTaZykPO2g2bUVK07gdGR6OncddsTcMTxlYN8E5FD pdqI2s5ysvecokclGXMzmEkptPdjnWfF/XNLWy+PENSP0jXIIHJAeAi0E2zzqMQcL aj6e6uehWhsqWXh3+Q== X-UI-Sender-Class: 814a7b36-bfc1-4dae-8640-3722d8ec6cd6 Received: from fluss ([84.165.21.10]) by smtp.web.de (mrweb005 [213.165.67.108]) with ESMTPSA (Nemesis) id 1MfKxj-1rv8wE0ZbP-00mcxI; Mon, 01 Jul 2024 23:52:57 +0200 From: "Dr. Arne Babenhauserheide" <arne_bab@HIDDEN> To: Maxim Cournoyer <maxim.cournoyer@HIDDEN> Subject: Re: bug#71304: [PATCH] Add support for 'else' clause in R7RS cond-expand. In-Reply-To: <20240601035904.7992-1-maxim.cournoyer@HIDDEN> (Maxim Cournoyer's message of "Fri, 31 May 2024 23:59:04 -0400") References: <20240601035904.7992-1-maxim.cournoyer@HIDDEN> Date: Mon, 01 Jul 2024 23:52:53 +0200 Message-ID: <878qykok3u.fsf@HIDDEN> MIME-Version: 1.0 Content-Type: multipart/signed; boundary="=-=-="; micalg=pgp-sha256; protocol="application/pgp-signature" X-Provags-ID: V03:K1:1pd9qAxHAzNpMyisFQoVF/hXgjMgl31cDzdwxI+7u0uQYOH4NFU yy7SZsqlh+7K9ALcXe4zyh1h1p89ZXvJFcBHvsKPl93+e6iHgB5L93uGyCd7oNOnqTaFqCZ PYeBnmRycCX+MBGCV3WxTUxYNn1GiCBdWIxTJVAcUi0piCZG0mDu/nsRvhLiVcadIh9cb61 FMNuDyZNPf/vPOEz0nelg== X-Spam-Flag: NO UI-OutboundReport: notjunk:1;M01:P0:YujqdEhHEow=;MvlvuPF09Aajq3g6MQpIz0cbhs2 lG2dNVN3couskJmQ9YRZFVujPxJK5X64GBmRiYtXEhBV9fJBk0V+va0Z5ab6ETLQ3YJ32fjhw RPIoecgj0nh2gypzRM1Ja/5u0N/LCSCaaJJiz+Y1G1S/a9230dXL2UyO8dp2Odqz7dEOgrT3w vKecw//I25e2PLcpjfcTLFjHYK3Jx5/pCLvWC9v05jz/yQH66krnuW+wmOxdkZHm/f591ZZjd Kp1ichwHPxOXzW6Let5phKI/ZqNjP+20yFXYLAH1Gk7dEal4S/qXrxNMTmutpu/HBEzYF7fu/ gmHYJJ0AyZXV4U+XVDMCRi56Owgv/vRQH56SBGirkv0jQbLrN48uc8bx5lCh5u6B62QRvnu37 mWVbnRtix3NJgtYfaZ5TOOnQJCIDGV38Vjb3y21fnKBfPoxuDchqf+yYtH8esRz0BbNcOR9I8 fih04FU44B1Y7lsWCgvZQf0u70k5hd+Q19ku4ATUJEgeHKZSp0JNVqOpwvOchtcqUGbonaAwa qoPVMCrR9toi10pcaEqT6N387JNSUNsmncryWLK5lGsqBEJZHfWTE1DmgcyE6buAjJ87DuB+B PDTNIr4zwR010CXQ3CDeA3VUzPoWlhg6aOQEr7JCpzCIWdt6pebClp5zLd7lZ+x9z082AlEJ9 oaT0bYmmXMzBvw+sU0cFPCGKSoPOr8xHsB19Y6ztF/6xPc0feNffX904BzYRO+SmS6gq7mwiW PjlkLI6EZBeszS0CuDRHh9S3k8C1dJEadOi2gv9e3+3ApdRkWO3eWu9R3y/TzSfjwP+aoR7vj 8PhCz74S6LGep4V8LlJOXkXnp9X4uvgQX44WmJXE7VxaE= X-Spam-Score: -0.7 (/) X-Debbugs-Envelope-To: 71304 Cc: 71304 <at> debbugs.gnu.org X-BeenThere: debbugs-submit <at> debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: <debbugs-submit.debbugs.gnu.org> List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe> List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/> List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org> List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help> List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe> Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org> X-Spam-Score: -1.7 (-) --=-=-= Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable Maxim Cournoyer <maxim.cournoyer@HIDDEN> writes: > * module/ice-9/r7rs-libraries.scm (define-library) > <handle-cond-expand>: Add a pattern to match an 'else' clause. This looks good to me. I applied and pushed it. Best wishes, Arne =2D-=20 Unpolitisch sein hei=C3=9Ft politisch sein, ohne es zu merken. draketo.de --=-=-= Content-Type: application/pgp-signature; name="signature.asc" -----BEGIN PGP SIGNATURE----- iQJEBAEBCAAuFiEE801qEjXQSQPNItXAE++NRSQDw+sFAmaDJTYQHGFybmVfYmFi QHdlYi5kZQAKCRAT741FJAPD696VEACfI9zMIua+rRN1cuBxHVO/v7h+TJLKayJi m9LIwaVObil4Q5AxRWT3TJ7e6wDk/Xw61/9+8PyEgSnWhbU+ykYUJDGpTspTqw4k 4VGiP5N1q/9WQ6Yqo1svXi9xd3EU7NeSMbC2P++gsjb8OxfvvUh9s4BWlsFdNtAg hnsX8HX7aHyJl29981xJJWF/t1KZGD/OE+jQppO9eeRjVuYxyJOLChp12BcswEmh w5VDv5WOL4Dae4qv8q8+DDAWzRBt2pKS7O8amN4K4QQrqgPSb6TXsvDUH6wx7dhv c6c4EYjZeIB6qk2pCKCckpU4NB0z4uOCc0/YFvTeGNauXU808AVivty0qA50dIv2 INzb23LYZY4U9owhcCBDGpxdzo5vW++Qi1QY5JB/Gfzg12/1VqFdk+pl5tuXnkX3 +7LOBoseOeIuhgCWjnkFD5MlfBCo3MG2N6y97sQysUPEqQnRnO/h9B660sDf0sNq 8nzSwySoh5OWg48RaRcPPaUy3AiGfa9GaMbSafvKD6ZOroe61n8Alg71NbsrrKsA i+Ik3IKimVgW/vzAWlUY3pypwPn2gvot18IE+FBqg6uEABlu+jNbiourYtQfokru EPji7ZsBu5X8e22kWC+SB2TtSKdHV979Tk/QnGhw4Zz93PP1NH0TX2rZCLPhrLsZ Ch+OEGZBX4jEBAEBCAAuFiEE3Si95tmHXKvOSosd3M8NswvBBUgFAmaDJTYQHGFy bmVfYmFiQHdlYi5kZQAKCRDczw2zC8EFSOkwA/wPCfcOBVltK9xTB+6Ppc7raQ+4 jcCafW/U1zmTgWLUsav+cQM+uLNqzWeXDdvCjjdtmwwQtpdML5nYY3+Yfucc6Zjo iOi7qc3LeEJiOaAG9xw5+k03a9SThmfZ/xocoe/im3KcbFupqA1178PGPM3HETv0 mop4Bh37YlL476PYHQ== =W98z -----END PGP SIGNATURE----- --=-=-=--
bug-guile@HIDDEN:bug#71304; Package guile.
Full text available.
Received: (at submit) by debbugs.gnu.org; 1 Jun 2024 03:59:33 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Fri May 31 23:59:33 2024
Received: from localhost ([127.0.0.1]:55622 helo=debbugs.gnu.org)
by debbugs.gnu.org with esmtp (Exim 4.84_2)
(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
id 1sDFu1-0002gm-0e
for submit <at> debbugs.gnu.org; Fri, 31 May 2024 23:59:33 -0400
Received: from lists.gnu.org ([209.51.188.17]:41150)
by debbugs.gnu.org with esmtp (Exim 4.84_2)
(envelope-from <maxim.cournoyer@HIDDEN>) id 1sDFtw-0002gc-OH
for submit <at> debbugs.gnu.org; Fri, 31 May 2024 23:59:31 -0400
Received: from eggs.gnu.org ([2001:470:142:3::10])
by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256)
(Exim 4.90_1) (envelope-from <maxim.cournoyer@HIDDEN>)
id 1sDFtk-0001tR-Td
for bug-guile@HIDDEN; Fri, 31 May 2024 23:59:16 -0400
Received: from mail-qk1-x733.google.com ([2607:f8b0:4864:20::733])
by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128)
(Exim 4.90_1) (envelope-from <maxim.cournoyer@HIDDEN>)
id 1sDFtj-00047D-H4
for bug-guile@HIDDEN; Fri, 31 May 2024 23:59:16 -0400
Received: by mail-qk1-x733.google.com with SMTP id
af79cd13be357-794db1ee9f1so196991685a.0
for <bug-guile@HIDDEN>; Fri, 31 May 2024 20:59:15 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
d=gmail.com; s=20230601; t=1717214354; x=1717819154; darn=gnu.org;
h=content-transfer-encoding:mime-version:message-id:date:subject:cc
:to:from:from:to:cc:subject:date:message-id:reply-to;
bh=a5X0Tbh45HUb7pkTF34riuo5guEidyJ614cRXPDva0A=;
b=TT/u/5M3q8nJeHARyOXKuWDSX8gvDVqkirAUbVr4bAK7LzDC7yPlhqAhyblJQA5PHy
KuD5i3d2rQiV7gTMHjqMaKCsJsazY7v7hEfTfwMZ0rVYPdt2onOKPhFohMTfiZbhbR6x
UIMwDTGEJ/m9blNT4cqgW5OppPErrMNTUdI6eVActmLiJwGdtrHAmUI4fggAVGc7JPFo
d+OWOt+po32t5vyve5UpcOcFLFUQo7dVchYb5hfA/4TXpjr2Mcg8zHMTVGC8unjNfiV+
FerF5w5aa2DfP9u/teCZwEHeoQvrQCVMVhzbjFDJudcdUS72fYIDo55fckW/mEUjpRGc
GlKw==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
d=1e100.net; s=20230601; t=1717214354; x=1717819154;
h=content-transfer-encoding:mime-version:message-id:date:subject:cc
:to:from:x-gm-message-state:from:to:cc:subject:date:message-id
:reply-to;
bh=a5X0Tbh45HUb7pkTF34riuo5guEidyJ614cRXPDva0A=;
b=egm4yMryBBnfOc2UIzoz+7zinWrR/yh5nOKG+F9m2L83HETPM7+BFNtR4rey+0MqWR
eXOBti/22osu5us/enYIGzs59xFGpy8LGjxhPRWd3ZBNbMR6gnVs4OZ0MPGdO9yhF1Rd
YiM3eGwaTZ7O4X0cCUHFUoYx6xdR8irFxZKrWdf1JI5poxBq5IsO4NrijyXEPk7GDBml
6bJF7iT9KBFtcUTMSCs/G6ZvicZj1SC/Myjf6diROIvH2h1u+5JDkIfYR4Yk3Mw3xiAw
TRqTIm+KBWF7MvV7s83O2TgRNJfWBxAnOifBdA3bX3jgr+En9FlT3RV8xYaAjXBlvfRC
3ObQ==
X-Gm-Message-State: AOJu0Yx9oBe4D9+69/h7Qc5adOheWDKpL4RN9VMPqWwTIsVg1+ItvSy/
HTUtjZlc1Mq/NeBkLtXfG7ZmhcMJ829COsGLQngGUyhsDftb1kl5qbYwjw==
X-Google-Smtp-Source: AGHT+IGE2/tCMHVR637pWVOg8J2zNVEhSIiVW93M553+DLNa8jzmwdwXUeSyJA1aVd2Ps8Gf+BSLRg==
X-Received: by 2002:a05:6214:4882:b0:6af:2676:1a67 with SMTP id
6a1803df08f44-6af26762e9cmr17989936d6.28.1717214353742;
Fri, 31 May 2024 20:59:13 -0700 (PDT)
Received: from localhost.localdomain (dsl-205-233-124-92.b2b2c.ca.
[205.233.124.92]) by smtp.gmail.com with ESMTPSA id
6a1803df08f44-6af31bbca9esm1998746d6.97.2024.05.31.20.59.12
(version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
Fri, 31 May 2024 20:59:13 -0700 (PDT)
From: Maxim Cournoyer <maxim.cournoyer@HIDDEN>
To: bug-guile@HIDDEN
Subject: [PATCH] Add support for 'else' clause in R7RS cond-expand.
Date: Fri, 31 May 2024 23:59:04 -0400
Message-ID: <20240601035904.7992-1-maxim.cournoyer@HIDDEN>
X-Mailer: git-send-email 2.41.0
MIME-Version: 1.0
Content-Transfer-Encoding: 8bit
Received-SPF: pass client-ip=2607:f8b0:4864:20::733;
envelope-from=maxim.cournoyer@HIDDEN; helo=mail-qk1-x733.google.com
X-Spam_score_int: -20
X-Spam_score: -2.1
X-Spam_bar: --
X-Spam_report: (-2.1 / 5.0 requ) BAYES_00=-1.9, DKIM_SIGNED=0.1,
DKIM_VALID=-0.1, DKIM_VALID_AU=-0.1, DKIM_VALID_EF=-0.1, FREEMAIL_FROM=0.001,
RCVD_IN_DNSWL_NONE=-0.0001, SPF_HELO_NONE=0.001, SPF_PASS=-0.001,
T_SCC_BODY_TEXT_LINE=-0.01 autolearn=ham autolearn_force=no
X-Spam_action: no action
X-Spam-Score: -1.3 (-)
X-Debbugs-Envelope-To: submit
Cc: Maxim Cournoyer <maxim.cournoyer@HIDDEN>
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>,
<mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>,
<mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -2.3 (--)
* module/ice-9/r7rs-libraries.scm (define-library)
<handle-cond-expand>: Add a pattern to match an 'else' clause.
Series-to: bug-guile@HIDDEN
---
module/ice-9/r7rs-libraries.scm | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/module/ice-9/r7rs-libraries.scm b/module/ice-9/r7rs-libraries.scm
index 63a300a26..86b3dee24 100644
--- a/module/ice-9/r7rs-libraries.scm
+++ b/module/ice-9/r7rs-libraries.scm
@@ -64,8 +64,10 @@
;; FIXME: R7RS (features) isn't quite the same as
;; %cond-expand-features; see scheme/base.scm.
(memq (syntax->datum #'id) %cond-expand-features))))
- (syntax-case clauses ()
+ (syntax-case clauses (else)
(() #'()) ; R7RS says this is not specified :-/
+ (((else decl ...))
+ #'(decl ...))
(((test decl ...) . clauses)
(if (has-req? #'test)
#'(decl ...)
base-commit: 779a83d9c682345802f9a605cb8e2b4892129316
--
2.41.0
Maxim Cournoyer <maxim.cournoyer@HIDDEN>:bug-guile@HIDDEN.
Full text available.bug-guile@HIDDEN:bug#71304; Package guile.
Full text available.
GNU bug tracking system
Copyright (C) 1999 Darren O. Benham,
1997 nCipher Corporation Ltd,
1994-97 Ian Jackson.