From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.blaine.gmane.org!not-for-mail From: Martin Becze Newsgroups: gmane.lisp.guile.bugs Subject: bug#40371: [R7RS] Guile does not accept library name parts that are non-negative exact integers Date: Wed, 19 Aug 2020 05:16:57 -0500 Message-ID: <06d43ea8-e13a-6116-a715-04c2d69c12c4@riseup.net> References: Mime-Version: 1.0 Content-Type: multipart/signed; micalg=pgp-sha256; protocol="application/pgp-signature"; boundary="38BOzsB7tj9WPCpqPAg9ALbIcClvwhFZl" Injection-Info: ciao.gmane.io; posting-host="blaine.gmane.org:116.202.254.214"; logging-data="14077"; mail-complaints-to="usenet@ciao.gmane.io" To: marc.nieper@gmail.com, 40371@debbugs.gnu.org Original-X-From: bug-guile-bounces+guile-bugs=m.gmane-mx.org@gnu.org Wed Aug 19 12:18:14 2020 Return-path: Envelope-to: guile-bugs@m.gmane-mx.org Original-Received: from lists.gnu.org ([209.51.188.17]) by ciao.gmane.io with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.92) (envelope-from ) id 1k8LAb-0003Yv-Jl for guile-bugs@m.gmane-mx.org; Wed, 19 Aug 2020 12:18:14 +0200 Original-Received: from localhost ([::1]:35820 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1k8LAa-0001aB-Kq for guile-bugs@m.gmane-mx.org; Wed, 19 Aug 2020 06:18:12 -0400 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]:58194) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1k8LAQ-0001VU-Mh for bug-guile@gnu.org; Wed, 19 Aug 2020 06:18:02 -0400 Original-Received: from debbugs.gnu.org ([209.51.188.43]:54641) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1k8LAQ-0007kc-Au for bug-guile@gnu.org; Wed, 19 Aug 2020 06:18:02 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1k8LAQ-0005oz-4t for bug-guile@gnu.org; Wed, 19 Aug 2020 06:18:02 -0400 X-Loop: help-debbugs@gnu.org Resent-From: Martin Becze Original-Sender: "Debbugs-submit" Resent-CC: bug-guile@gnu.org Resent-Date: Wed, 19 Aug 2020 10:18:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 40371 X-GNU-PR-Package: guile X-Debbugs-Original-To: Marc =?UTF-8?Q?Nieper-Wi=C3=9Fkirchen?= , bug-guile@gnu.org Original-Received: via spool by submit@debbugs.gnu.org id=B.159783223722315 (code B ref -1); Wed, 19 Aug 2020 10:18:02 +0000 Original-Received: (at submit) by debbugs.gnu.org; 19 Aug 2020 10:17:17 +0000 Original-Received: from localhost ([127.0.0.1]:37954 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1k8L9g-0005nr-Vh for submit@debbugs.gnu.org; Wed, 19 Aug 2020 06:17:17 -0400 Original-Received: from lists.gnu.org ([209.51.188.17]:40154) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1k8L9e-0005nj-Pw for submit@debbugs.gnu.org; Wed, 19 Aug 2020 06:17:15 -0400 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]:58008) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1k8L9e-000065-D4 for bug-guile@gnu.org; Wed, 19 Aug 2020 06:17:14 -0400 Original-Received: from mx1.riseup.net ([198.252.153.129]:59638) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1k8L9c-0007gl-6K for bug-guile@gnu.org; Wed, 19 Aug 2020 06:17:13 -0400 Original-Received: from bell.riseup.net (bell-pn.riseup.net [10.0.1.178]) (using TLSv1 with cipher ECDHE-RSA-AES256-SHA (256/256 bits)) (Client CN "*.riseup.net", Issuer "Sectigo RSA Domain Validation Secure Server CA" (not verified)) by mx1.riseup.net (Postfix) with ESMTPS id 4BWkGt0GFvzFmNb; Wed, 19 Aug 2020 03:17:10 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=riseup.net; s=squak; t=1597832230; bh=L/oX5eq+fCBFW6OWymLUiJ7RTS4k4bJ8//vyQ25sktU=; h=To:References:From:Subject:Date:In-Reply-To:From; b=l7WXhOow1iKufmn9fXwmzZp6s2THsgBMn9Jrm6qtmldA40T9anJCQia7wWMrux2U6 WzeGx+MVJY+jygGveRLw9fgV5IZsPxOv9TvPEEu7+6i5JYTK8v3D6yjpIxRm55PLyd UajL0MIY4nxjpH7kuYindqj4dfLsYDjPgQj7HCTU= X-Riseup-User-ID: F44FC037E6060E73B9AFA1855FCB8961BE4968ECAC9BC43AB1183F43687B4E34 Original-Received: from [127.0.0.1] (localhost [127.0.0.1]) by bell.riseup.net (Postfix) with ESMTPSA id 4BWkGr6d9LzJqPt; Wed, 19 Aug 2020 03:17:08 -0700 (PDT) Autocrypt: addr=mjbecze@riseup.net; keydata= mQENBE9w5AMBCADgJkbsy1TAb9x2MHupHGu+Rb7utyvsx/tdv2amgkm80PdzDWOAVJGvRX8g UQfnUUIUwXhicdd0mG5Xmf1S6YreV2qM2rYqO8rFk6cWyLK6901NpD+gXJgjKLipvjk+8370 l7yUJmoSDdNDK7kIhWOs6HYkMK5No/Bs4SbtY5PjF1tVmNbk5KzlyKUDmMclQB1gI0cmrJ2s doTuLz4IC90UZYhV9pq/MIGjlh4eY8aQR5Uj6/jXtrwneS9V3ouhB+R9uHtKqqyok5nNdPlC UvfA/bo/2er9UAmSkewLQOTKOfwj0Ei5IQ2eRLtO5LZLZi3K4m6FOB9s37gZ5K8tp/KtABEB AAG0G21hcnRpbiA8bWpiZWN6ZUByaXNldXAubmV0PokBTwQTAQIAOQIbIwYLCQgHAwIGFQgC CQoLBBYCAwECHgECF4AWIQTz7/81Or0tjbvA2rEyGpsLNjs9lwUCWQWzWQAKCRAyGpsLNjs9 l0SRB/9GFqbQeOADWJe9ke5RAAvD5HVGQCPCAsp+h+krgdsaOUySVAoVjo29fRQVoqmF1KY2 iCw9WQGiiwD8aMCEH1W+o9QPxMYeWFFyhqErEsv/BQRWNbvS9xb5YUXcB9QY68WDP83v5he2 pL7DI7fWwAx6xAAw9rgEduABewULNCsTUJzd9UG6HILEY7DLl/addQjvtTaITfKPYrrLnHND fQlGtxgzsfbkxezO8gYLARQBxAWETjOYxpt8d9J36FNnQN8OcsuXjEgYWh7dsPtp+w3P8Yj9 5YrEu/9+eehSy9ath6vhRF9N+/gvmR5WAb5EB8w/ In-Reply-To: Received-SPF: pass client-ip=198.252.153.129; envelope-from=mjbecze@riseup.net; helo=mx1.riseup.net X-detected-operating-system: by eggs.gnu.org: First seen = 2020/08/19 06:17:10 X-ACL-Warn: Detected OS = Linux 3.11 and newer X-Spam_score_int: -27 X-Spam_score: -2.8 X-Spam_bar: -- X-Spam_report: (-2.8 / 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, RCVD_IN_DNSWL_LOW=-0.7, RCVD_IN_MSPIKE_H3=-0.01, RCVD_IN_MSPIKE_WL=-0.01, SPF_HELO_PASS=-0.001, SPF_PASS=-0.001, URIBL_BLOCKED=0.001 autolearn=ham autolearn_force=no X-Spam_action: no action X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-BeenThere: bug-guile@gnu.org List-Id: "Bug reports for GUILE, GNU's Ubiquitous Extension Language" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-guile-bounces+guile-bugs=m.gmane-mx.org@gnu.org Original-Sender: "bug-guile" Xref: news.gmane.io gmane.lisp.guile.bugs:9863 Archived-At: This is an OpenPGP/MIME signed message (RFC 4880 and 3156) --38BOzsB7tj9WPCpqPAg9ALbIcClvwhFZl Content-Type: multipart/mixed; boundary="LxVJoUY08C7oZloEUtCrHEGCpB6EXhHdn"; protected-headers="v1" From: Martin Becze To: =?UTF-8?Q?Marc_Nieper-Wi=c3=9fkirchen?= , bug-guile@gnu.org Message-ID: <06d43ea8-e13a-6116-a715-04c2d69c12c4@riseup.net> Subject: Re: [R7RS] Guile does not accept library name parts that are non-negative exact integers References: In-Reply-To: --LxVJoUY08C7oZloEUtCrHEGCpB6EXhHdn Content-Type: multipart/mixed; boundary="------------33D11E734586FA622E54F8E4" Content-Language: en-US This is a multi-part message in MIME format. --------------33D11E734586FA622E54F8E4 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable Here is a patch that makes things usable for srfi's. (import (srfi NNNN)) will work. It just remove the guard condition that was catching the Integers. Does anyone know why the guard was there and if it is really needed? Martin On 8/3/20 3:24 PM, Marc Nieper-Wi=C3=9Fkirchen wrote: > *bump* >=20 > Am Mi., 1. Apr. 2020 um 12:47 Uhr schrieb Marc Nieper-Wi=C3=9Fkirchen > : >> >> An R7RS library name consists of parts, where each part is either a sy= mbol or a non-negative exact integer. Guile doesn't support the latter on= es. >> >> This is unfortunate as the implementation of a SRFI NNN is usually del= ivered in form of a library named (srfi NNN). >> >> When this is corrected, for interoperability, it would be great if Gui= le offers the included SRFIs not only under the name (srfi srfi-NNN) but = also under (srfi NNN). >> >> Thanks, >> >> Marc >> >=20 >=20 >=20 >=20 --------------33D11E734586FA622E54F8E4 Content-Type: text/x-patch; charset=UTF-8; name="0001-Allow-loading-of-libraries-with-the-form-srfi-NNN.patch" Content-Transfer-Encoding: quoted-printable Content-Disposition: attachment; filename*0="0001-Allow-loading-of-libraries-with-the-form-srfi-NNN.patch" =46rom d5518a32d4ed05fccd1e81c1596a77ae74d0136c Mon Sep 17 00:00:00 2001 From: Martin Becze Date: Wed, 19 Aug 2020 05:00:54 -0500 Subject: [PATCH] Allow loading of libraries with the form (srfi NNN). * module/ice-9/r6rs-libraries.scm: Removed guard condition that was filtering out intergers. --- module/ice-9/r6rs-libraries.scm | 2 -- 1 file changed, 2 deletions(-) diff --git a/module/ice-9/r6rs-libraries.scm b/module/ice-9/r6rs-librarie= s.scm index c6ba6a496..0eee5fb7e 100644 --- a/module/ice-9/r6rs-libraries.scm +++ b/module/ice-9/r6rs-libraries.scm @@ -152,11 +152,9 @@ (lp (cdr in) (cons (vector to replace? var) out)))))))) =20 ((name name* ... (version ...)) - (and-map sym? #'(name name* ...)) (resolve-r6rs-interface #'(library (name name* ... (version ...))))= ) =20 ((name name* ...)=20 - (and-map sym? #'(name name* ...)) (resolve-r6rs-interface #'(library (name name* ... ())))))) =20 (define-syntax library --=20 2.28.0 --------------33D11E734586FA622E54F8E4-- --LxVJoUY08C7oZloEUtCrHEGCpB6EXhHdn-- --38BOzsB7tj9WPCpqPAg9ALbIcClvwhFZl Content-Type: application/pgp-signature; name="signature.asc" Content-Description: OpenPGP digital signature Content-Disposition: attachment; filename="signature.asc" -----BEGIN PGP SIGNATURE----- iQEzBAEBCAAdFiEE8+//NTq9LY27wNqxMhqbCzY7PZcFAl88/CIACgkQMhqbCzY7 PZcwrggAuqQP624g/xvyvvFbD6srRg++PVSZ6hooLNd0/FURaq8bnp71MbPauqzk zrS9PQHcfUIQilO5t0gBk9t3FAoMToU/lI5bCFuYgYS4gff8KwiVgTmvACqCa51h AOaiFdTB+RteHIkawZemCUVkiEoOmgjt4PrVZjMC6ioXuWtYzK6yZPcv+nZ5CozV zLCFlmjer2FVEAeEYDzqIgd7Dr474efx9dDKcsnLJEWUPVXQHK3p2YTV1wAnr0aW sbH1D8uEcaIVPgAqMtCkQo4r6O+8iGtYoCCIKwnUhFFMv4kB7SeNiaDidXsoFpsn gRl1Cr4raj4cf9WtbaZwYfFuQCh3wQ== =By9H -----END PGP SIGNATURE----- --38BOzsB7tj9WPCpqPAg9ALbIcClvwhFZl--