GNU bug report logs - #52239
R7RS define-library does not support cond-expand

Please note: This is a static page, with minimal formatting, updated once a day.
Click here to see this page with the latest information and nicer formatting.

Package: guile; Reported by: Amirouche <amirouche@HIDDEN>; dated Thu, 2 Dec 2021 09:16:01 UTC; Maintainer for guile is bug-guile@HIDDEN.

Message received at submit <at> debbugs.gnu.org:


Received: (at submit) by debbugs.gnu.org; 2 Dec 2021 09:15:28 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Thu Dec 02 04:15:28 2021
Received: from localhost ([127.0.0.1]:46566 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1msiBb-0007D4-SF
	for submit <at> debbugs.gnu.org; Thu, 02 Dec 2021 04:15:28 -0500
Received: from lists.gnu.org ([209.51.188.17]:37476)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <amirouche@HIDDEN>) id 1msiBX-00078Z-LF
 for submit <at> debbugs.gnu.org; Thu, 02 Dec 2021 04:15:26 -0500
Received: from eggs.gnu.org ([209.51.188.92]:43074)
 by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256)
 (Exim 4.90_1) (envelope-from <amirouche@HIDDEN>)
 id 1msiBX-0004Dd-G1
 for bug-guile@HIDDEN; Thu, 02 Dec 2021 04:15:23 -0500
Received: from mail-40136.proton.ch ([185.70.40.136]:49457)
 by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256)
 (Exim 4.90_1) (envelope-from <amirouche@HIDDEN>)
 id 1msiBR-0005C6-G7
 for bug-guile@HIDDEN; Thu, 02 Dec 2021 04:15:21 -0500
Date: Thu, 02 Dec 2021 09:15:04 +0000
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=hyper.dev;
 s=protonmail; t=1638436506;
 bh=4z0dHbccjUaacUooZtb3jdnbAh2G9f7p9QDtDRH8EzY=;
 h=Date:To:From:Reply-To:Subject:From;
 b=fslAHg8yi01FugODanwsgMi9ZnaKRfqF5cRK2IbM3AvqOkSRxzaybVAWcioL693gv
 zQg34bIJrlJs1qCWQgQo3ZS3Oie4cLUQ+02zz3yB9rp37Jj/qJs191Pyr5aRvjzEzU
 ULBgcR3+igT8ojWe5HQmrVM58dLqdEJw/I5UcidLL8dhfixN3BOuPWHUTP/hsti2Rv
 zLS3hXbmGGN6BWOHbT1U18S7BYwkh5aQ5IO8o/MXov+bFR5PidO6WrG1QTF6sYXz9l
 koiBiX+ySPeS/IBccBWXpVPCksv8Cz12C7h1K+VKlD+7sFJiuGrOD/qKU86XzjWVua
 2TQCSa3mUiH8Q==
To: "bug-guile@HIDDEN" <bug-guile@HIDDEN>
From: Amirouche <amirouche@HIDDEN>
Subject: R7RS define-library does not support cond-expand
Message-ID: <qoQwN21SACNlstxN17CWY0JaMp6V9WnC055wskL9gz7CY-9q2H1pqqhjEIx7Q7ENhVhAoKc6VLKQULZoJWESN201frP3nG263nOFualSyw8=@hyper.dev>
MIME-Version: 1.0
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: quoted-printable
X-Spam-Status: No, score=-1.2 required=10.0 tests=ALL_TRUSTED,DKIM_SIGNED,
 DKIM_VALID,DKIM_VALID_AU,DKIM_VALID_EF shortcircuit=no
 autolearn=disabled version=3.4.4
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on
 mailout.protonmail.ch
Received-SPF: pass client-ip=185.70.40.136; envelope-from=amirouche@HIDDEN;
 helo=mail-40136.proton.ch
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,
 RCVD_IN_MSPIKE_H4=0.001, RCVD_IN_MSPIKE_WL=0.001, SPF_HELO_NONE=0.001,
 SPF_PASS=-0.001 autolearn=ham autolearn_force=no
X-Spam_action: no action
X-Spam-Score: -1.3 (-)
X-Debbugs-Envelope-To: submit
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>
Reply-To: Amirouche <amirouche@HIDDEN>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -2.3 (--)

workaround:

#;> find live -type f -exec sh -c "echo \";;; cat {}\"; cat {}" \;
;;; cat live/hello/body.scm
(define (hello name)
  (display "Hello schemer ")
  (display name)
  (display "!")
  (newline))
;;; cat live/hello.scm
(define-library (live hello)
  (import (scheme base)
          (scheme write))
  (export hello)

  (include "hello/body.scm"))
;;; cat live/hello.sld
(define-library (live hello)
  (import (scheme base)
          (scheme write))
  (export hello)
  (cond-expand
   ((or mit guile chibi gambit gerbil loko)
    (include "hello/body.scm"))
   ;; That is the rule picked up by chicken
   (else (include "live/hello/body.scm"))))
;;; cat live/hello.rkt
#!r7rs
(define-library (live hello)
  (export hello)

  (import (scheme base)
          (scheme write))

  (include "hello/body.scm"))
;;; cat live/hello.chez.sls
(library (live hello)
  (export hello)
  (import (chezscheme))

  (include "hello/body.scm"))
#;>

The following command

  guile myprogram.scm

will pick `live/hello.scm` as the library `(live hello)`

Unlike:

  guile --r7rs myprogram.scm

that will pick `live/hello.sld` that contains a cond-expand, and that is no=
t supported  by guile.




Acknowledgement sent to Amirouche <amirouche@HIDDEN>:
New bug report received and forwarded. Copy sent to bug-guile@HIDDEN. Full text available.
Report forwarded to bug-guile@HIDDEN:
bug#52239; Package guile. Full text available.
Please note: This is a static page, with minimal formatting, updated once a day.
Click here to see this page with the latest information and nicer formatting.
Last modified: Thu, 2 Dec 2021 09:30:02 UTC

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997 nCipher Corporation Ltd, 1994-97 Ian Jackson.