X-Loop: help-debbugs@HIDDEN
Subject: bug#39997: High CPU load and no return value with 3.0.0
Resent-From: Roel Janssen <roel@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: bug-guile@HIDDEN
Resent-Date: Mon, 09 Mar 2020 12:14:02 +0000
Resent-Message-ID: <handler.39997.B.15837560075909 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: report 39997
X-GNU-PR-Package: guile
X-GNU-PR-Keywords:
To: 39997 <at> debbugs.gnu.org
X-Debbugs-Original-To: bug-guile@HIDDEN
Received: via spool by submit <at> debbugs.gnu.org id=B.15837560075909
(code B ref -1); Mon, 09 Mar 2020 12:14:02 +0000
Received: (at submit) by debbugs.gnu.org; 9 Mar 2020 12:13:27 +0000
Received: from localhost ([127.0.0.1]:49915 helo=debbugs.gnu.org)
by debbugs.gnu.org with esmtp (Exim 4.84_2)
(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
id 1jBHHj-0001XF-Li
for submit <at> debbugs.gnu.org; Mon, 09 Mar 2020 08:13:27 -0400
Received: from lists.gnu.org ([209.51.188.17]:53294)
by debbugs.gnu.org with esmtp (Exim 4.84_2)
(envelope-from <roel@HIDDEN>) id 1jBHHh-0001X6-Pz
for submit <at> debbugs.gnu.org; Mon, 09 Mar 2020 08:13:26 -0400
Received: from eggs.gnu.org ([2001:470:142:3::10]:55843)
by lists.gnu.org with esmtp (Exim 4.90_1)
(envelope-from <roel@HIDDEN>) id 1jBHHg-0006bv-Qr
for bug-guile@HIDDEN; Mon, 09 Mar 2020 08:13:25 -0400
X-Spam-Checker-Version: SpamAssassin 3.3.2 (2011-06-06) on eggs.gnu.org
X-Spam-Level:
X-Spam-Status: No, score=-1.0 required=5.0 tests=ALL_TRUSTED,BAYES_40
autolearn=disabled version=3.3.2
Received: from fencepost.gnu.org ([2001:470:142:3::e]:41249)
by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from <roel@HIDDEN>)
id 1jBHHg-0001CA-MY
for bug-guile@HIDDEN; Mon, 09 Mar 2020 08:13:24 -0400
Received: from ip-80-113-14-101.ip.prioritytelecom.net ([80.113.14.101]:3101
helo=redstone)
by fencepost.gnu.org with esmtpsa (TLS1.2:RSA_AES_256_CBC_SHA1:256)
(Exim 4.82) (envelope-from <roel@HIDDEN>) id 1jBHHg-0005Ya-6w
for bug-guile@HIDDEN; Mon, 09 Mar 2020 08:13:24 -0400
Message-ID: <1dc6670b0cd28fb5a899fdf7afe0624007747c81.camel@HIDDEN>
From: Roel Janssen <roel@HIDDEN>
Date: Mon, 09 Mar 2020 13:13:21 +0100
Content-Type: text/plain; charset="UTF-8"
User-Agent: Evolution 3.34.4 (3.34.4-1.fc31)
MIME-Version: 1.0
Content-Transfer-Encoding: 7bit
X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic]
X-Spam-Score: -0.7 (/)
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 (-)
Dear Guile hackers,
When I use the "md5" module from guile-lib (release 0.2.6.1) together
with the following snippet in Guile 3.0.0, it never returns, while on
Guile 2.2.6, it returns the MD5 sum of the input string:
---
(use-modules (md5))
(define (md5-from-string input)
(call-with-input-string input md5))
(define (random-ascii length)
"Returns a random string of ASCII characters of length LENGTH."
(list->string
(map (lambda _ (integer->char (+ (random 95) 32)))
(iota length))))
(display
(md5-from-string
(random-ascii 32)))
---
Could you point me in the right direction for finding the problem?
This could be completely off-topic:
I also noticed that the function "read-string!/partial" (used by the
md5 module) no longer appears in the manual since the Guile 2.2. Is
the usage of this function considered deprecated?
Kind regards,
Roel Janssen
Content-Disposition: inline Content-Transfer-Encoding: quoted-printable MIME-Version: 1.0 X-Mailer: MIME-tools 5.505 (Entity 5.505) Content-Type: text/plain; charset=utf-8 X-Loop: help-debbugs@HIDDEN From: help-debbugs@HIDDEN (GNU bug Tracking System) To: Roel Janssen <roel@HIDDEN> Subject: bug#39997: Acknowledgement (High CPU load and no return value with 3.0.0) Message-ID: <handler.39997.B.15837560075909.ack <at> debbugs.gnu.org> References: <1dc6670b0cd28fb5a899fdf7afe0624007747c81.camel@HIDDEN> X-Gnu-PR-Message: ack 39997 X-Gnu-PR-Package: guile Reply-To: 39997 <at> debbugs.gnu.org Date: Mon, 09 Mar 2020 12:14:02 +0000 Thank you for filing a new bug report with debbugs.gnu.org. This is an automatically generated reply to let you know your message has been received. Your message is being forwarded to the package maintainers and other interested parties for their attention; they will reply in due course. Your message has been sent to the package maintainer(s): bug-guile@HIDDEN If you wish to submit further information on this problem, please send it to 39997 <at> debbugs.gnu.org. Please do not send mail to help-debbugs@HIDDEN unless you wish to report a problem with the Bug-tracking system. --=20 39997: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=3D39997 GNU Bug Tracking System Contact help-debbugs@HIDDEN with problems
X-Loop: help-debbugs@HIDDEN
Subject: bug#39997: High CPU load and no return value with 3.0.0
Resent-From: Ludovic =?UTF-8?Q?Court=C3=A8s?= <ludo@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: bug-guile@HIDDEN
Resent-Date: Wed, 11 Mar 2020 11:08:02 +0000
Resent-Message-ID: <handler.39997.B39997.158392486429866 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 39997
X-GNU-PR-Package: guile
X-GNU-PR-Keywords:
To: Roel Janssen <roel@HIDDEN>
Cc: 39997 <at> debbugs.gnu.org
Received: via spool by 39997-submit <at> debbugs.gnu.org id=B39997.158392486429866
(code B ref 39997); Wed, 11 Mar 2020 11:08:02 +0000
Received: (at 39997) by debbugs.gnu.org; 11 Mar 2020 11:07:44 +0000
Received: from localhost ([127.0.0.1]:53663 helo=debbugs.gnu.org)
by debbugs.gnu.org with esmtp (Exim 4.84_2)
(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
id 1jBzDD-0007le-RD
for submit <at> debbugs.gnu.org; Wed, 11 Mar 2020 07:07:44 -0400
Received: from eggs.gnu.org ([209.51.188.92]:38071)
by debbugs.gnu.org with esmtp (Exim 4.84_2)
(envelope-from <ludo@HIDDEN>) id 1jBzDC-0007lP-EF
for 39997 <at> debbugs.gnu.org; Wed, 11 Mar 2020 07:07:42 -0400
Received: from fencepost.gnu.org ([2001:470:142:3::e]:58098)
by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from <ludo@HIDDEN>)
id 1jBzD7-000858-CB
for 39997 <at> debbugs.gnu.org; Wed, 11 Mar 2020 07:07:37 -0400
Received: from [2a01:e0a:1d:7270:af76:b9b:ca24:c465] (port=37814 helo=ribbon)
by fencepost.gnu.org with esmtpsa (TLS1.2:RSA_AES_256_CBC_SHA1:256)
(Exim 4.82) (envelope-from <ludo@HIDDEN>)
id 1jBzD5-00084A-Lu; Wed, 11 Mar 2020 07:07:36 -0400
From: Ludovic =?UTF-8?Q?Court=C3=A8s?= <ludo@HIDDEN>
References: <1dc6670b0cd28fb5a899fdf7afe0624007747c81.camel@HIDDEN>
Date: Wed, 11 Mar 2020 12:07:33 +0100
In-Reply-To: <1dc6670b0cd28fb5a899fdf7afe0624007747c81.camel@HIDDEN> (Roel
Janssen's message of "Mon, 09 Mar 2020 13:13:21 +0100")
Message-ID: <87eetzm9oq.fsf@HIDDEN>
User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/26.3 (gnu/linux)
MIME-Version: 1.0
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: quoted-printable
X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic]
X-Spam-Score: -0.7 (/)
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 (-)
Hi,
Roel Janssen <roel@HIDDEN> skribis:
> When I use the "md5" module from guile-lib (release 0.2.6.1) together
> with the following snippet in Guile 3.0.0, it never returns, while on
> Guile 2.2.6, it returns the MD5 sum of the input string:
> ---
> (use-modules (md5))
>
> (define (md5-from-string input)
> (call-with-input-string input md5))
>
> (define (random-ascii length)
> "Returns a random string of ASCII characters of length LENGTH."
> (list->string
> (map (lambda _ (integer->char (+ (random 95) 32)))
> (iota length))))
>
> (display
> (md5-from-string
> (random-ascii 32)))
> ---
>
> Could you point me in the right direction for finding the problem?
The Guix package has this patch:
'(begin
;; Work around miscompilation on Guile 3.0.0 at -O2:
;; <https://bugs.gnu.org/39251>.
(substitute* "src/md5.scm"
(("\\(define f-ash ash\\)")
"(define f-ash (@ (guile) ash))\n")
(("\\(define f-add \\+\\)")
"(define f-add (@ (guile) +))\n"))
#t)
It=E2=80=99s very likely that you=E2=80=99re hitting this problem.
HTH!
Ludo=E2=80=99.
Received: (at control) by debbugs.gnu.org; 11 Mar 2020 11:16:00 +0000 From debbugs-submit-bounces <at> debbugs.gnu.org Wed Mar 11 07:16:00 2020 Received: from localhost ([127.0.0.1]:53679 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>) id 1jBzLE-0007yX-EX for submit <at> debbugs.gnu.org; Wed, 11 Mar 2020 07:16:00 -0400 Received: from eggs.gnu.org ([209.51.188.92]:40052) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from <ludo@HIDDEN>) id 1jBzLB-0007yH-Qz for control <at> debbugs.gnu.org; Wed, 11 Mar 2020 07:15:58 -0400 Received: from fencepost.gnu.org ([2001:470:142:3::e]:58209) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from <ludo@HIDDEN>) id 1jBzL6-0007eM-ON for control <at> debbugs.gnu.org; Wed, 11 Mar 2020 07:15:52 -0400 Received: from [2a01:e0a:1d:7270:af76:b9b:ca24:c465] (port=37846 helo=ribbon) by fencepost.gnu.org with esmtpsa (TLS1.2:RSA_AES_256_CBC_SHA1:256) (Exim 4.82) (envelope-from <ludo@HIDDEN>) id 1jBzL5-0006vB-DD for control <at> debbugs.gnu.org; Wed, 11 Mar 2020 07:15:52 -0400 Date: Wed, 11 Mar 2020 12:15:50 +0100 Message-Id: <87zhcnkuqh.fsf@HIDDEN> To: control <at> debbugs.gnu.org From: =?utf-8?Q?Ludovic_Court=C3=A8s?= <ludo@HIDDEN> Subject: control message for bug #39251 MIME-version: 1.0 Content-type: text/plain; charset=utf-8 Content-Transfer-Encoding: 8bit X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-Spam-Score: -0.7 (/) X-Debbugs-Envelope-To: control 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 (-) merge 39251 39997 quit
X-Loop: help-debbugs@HIDDEN
Subject: bug#39997: High CPU load and no return value with 3.0.0
Resent-From: Roel Janssen <roel@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: bug-guile@HIDDEN
Resent-Date: Wed, 11 Mar 2020 13:04:01 +0000
Resent-Message-ID: <handler.39997.B39997.158393184115742 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 39997
X-GNU-PR-Package: guile
X-GNU-PR-Keywords:
To: Ludovic =?UTF-8?Q?Court=C3=A8s?= <ludo@HIDDEN>
Cc: 39997 <at> debbugs.gnu.org
Received: via spool by 39997-submit <at> debbugs.gnu.org id=B39997.158393184115742
(code B ref 39997); Wed, 11 Mar 2020 13:04:01 +0000
Received: (at 39997) by debbugs.gnu.org; 11 Mar 2020 13:04:01 +0000
Received: from localhost ([127.0.0.1]:53752 helo=debbugs.gnu.org)
by debbugs.gnu.org with esmtp (Exim 4.84_2)
(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
id 1jC11k-00045q-Jv
for submit <at> debbugs.gnu.org; Wed, 11 Mar 2020 09:04:00 -0400
Received: from eggs.gnu.org ([209.51.188.92]:38020)
by debbugs.gnu.org with esmtp (Exim 4.84_2)
(envelope-from <roel@HIDDEN>) id 1jC11f-00045a-P6
for 39997 <at> debbugs.gnu.org; Wed, 11 Mar 2020 09:03:57 -0400
Received: from fencepost.gnu.org ([2001:470:142:3::e]:59683)
by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from <roel@HIDDEN>)
id 1jC11a-0001mQ-5v; Wed, 11 Mar 2020 09:03:50 -0400
Received: from ip-80-113-14-101.ip.prioritytelecom.net ([80.113.14.101]:30955
helo=redstone)
by fencepost.gnu.org with esmtpsa (TLS1.2:RSA_AES_256_CBC_SHA1:256)
(Exim 4.82) (envelope-from <roel@HIDDEN>)
id 1jC11Z-0000lv-Dr; Wed, 11 Mar 2020 09:03:49 -0400
Message-ID: <a42e8bfb36ecf5b3a240f8324af41609f20d34ed.camel@HIDDEN>
From: Roel Janssen <roel@HIDDEN>
Date: Wed, 11 Mar 2020 14:03:47 +0100
In-Reply-To: <87eetzm9oq.fsf@HIDDEN>
References: <1dc6670b0cd28fb5a899fdf7afe0624007747c81.camel@HIDDEN>
<87eetzm9oq.fsf@HIDDEN>
Content-Type: text/plain; charset="UTF-8"
User-Agent: Evolution 3.34.4 (3.34.4-1.fc31)
MIME-Version: 1.0
Content-Transfer-Encoding: 8bit
X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic]
X-Spam-Score: -0.7 (/)
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 (-)
On Wed, 2020-03-11 at 12:07 +0100, Ludovic Courtès wrote:
> Hi,
>
> Roel Janssen <roel@HIDDEN> skribis:
>
> > When I use the "md5" module from guile-lib (release 0.2.6.1)
> > together
> > with the following snippet in Guile 3.0.0, it never returns, while
> > on
> > Guile 2.2.6, it returns the MD5 sum of the input string:
> > ---
> > (use-modules (md5))
> >
> > (define (md5-from-string input)
> > (call-with-input-string input md5))
> >
> > (define (random-ascii length)
> > "Returns a random string of ASCII characters of length LENGTH."
> > (list->string
> > (map (lambda _ (integer->char (+ (random 95) 32)))
> > (iota length))))
> >
> > (display
> > (md5-from-string
> > (random-ascii 32)))
> > ---
> >
> > Could you point me in the right direction for finding the problem?
>
> The Guix package has this patch:
>
> '(begin
> ;; Work around miscompilation on Guile 3.0.0 at -O2:
> ;; <https://bugs.gnu.org/39251>;.
> (substitute* "src/md5.scm"
> (("\\(define f-ash ash\\)")
> "(define f-ash (@ (guile) ash))\n")
> (("\\(define f-add \\+\\)")
> "(define f-add (@ (guile) +))\n"))
> #t)
>
> It’s very likely that you’re hitting this problem.
Yes! Thanks for sharing this fix.
I applied the same changes to my code and now I don't encounter the bug
anymore.
I tested the patched code with both guile-2.2 and guile-3.0. Do you
know whether this will also work with guile-2.0? (I'd like to keep
things compatible with guile-2.0 for a few more years).
Kind regards,
Roel Janssen
X-Loop: help-debbugs@HIDDEN
Subject: bug#39997: High CPU load and no return value with 3.0.0
Resent-From: Ludovic =?UTF-8?Q?Court=C3=A8s?= <ludo@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: bug-guile@HIDDEN
Resent-Date: Wed, 11 Mar 2020 14:06:01 +0000
Resent-Message-ID: <handler.39997.B39997.158393555522699 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 39997
X-GNU-PR-Package: guile
X-GNU-PR-Keywords:
To: Roel Janssen <roel@HIDDEN>
Cc: 39997 <at> debbugs.gnu.org
Received: via spool by 39997-submit <at> debbugs.gnu.org id=B39997.158393555522699
(code B ref 39997); Wed, 11 Mar 2020 14:06:01 +0000
Received: (at 39997) by debbugs.gnu.org; 11 Mar 2020 14:05:55 +0000
Received: from localhost ([127.0.0.1]:55259 helo=debbugs.gnu.org)
by debbugs.gnu.org with esmtp (Exim 4.84_2)
(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
id 1jC1zf-0005u3-Cz
for submit <at> debbugs.gnu.org; Wed, 11 Mar 2020 10:05:55 -0400
Received: from eggs.gnu.org ([209.51.188.92]:53512)
by debbugs.gnu.org with esmtp (Exim 4.84_2)
(envelope-from <ludo@HIDDEN>) id 1jC1zd-0005to-Oi
for 39997 <at> debbugs.gnu.org; Wed, 11 Mar 2020 10:05:54 -0400
Received: from fencepost.gnu.org ([2001:470:142:3::e]:60594)
by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from <ludo@HIDDEN>)
id 1jC1zY-0005FL-MN
for 39997 <at> debbugs.gnu.org; Wed, 11 Mar 2020 10:05:48 -0400
Received: from [2a01:e0a:1d:7270:af76:b9b:ca24:c465] (port=37934 helo=ribbon)
by fencepost.gnu.org with esmtpsa (TLS1.2:RSA_AES_256_CBC_SHA1:256)
(Exim 4.82) (envelope-from <ludo@HIDDEN>)
id 1jC1zU-0004pR-B2; Wed, 11 Mar 2020 10:05:48 -0400
From: Ludovic =?UTF-8?Q?Court=C3=A8s?= <ludo@HIDDEN>
References: <1dc6670b0cd28fb5a899fdf7afe0624007747c81.camel@HIDDEN>
<87eetzm9oq.fsf@HIDDEN>
<a42e8bfb36ecf5b3a240f8324af41609f20d34ed.camel@HIDDEN>
X-URL: http://www.fdn.fr/~lcourtes/
X-Revolutionary-Date: 22 =?UTF-8?Q?Vent=C3=B4se?= an 228 de la =?UTF-8?Q?R=C3=A9volution?=
X-PGP-Key-ID: 0x090B11993D9AEBB5
X-PGP-Key: http://www.fdn.fr/~lcourtes/ludovic.asc
X-PGP-Fingerprint: 3CE4 6455 8A84 FDC6 9DB4 0CFB 090B 1199 3D9A EBB5
X-OS: x86_64-pc-linux-gnu
Date: Wed, 11 Mar 2020 15:05:43 +0100
In-Reply-To: <a42e8bfb36ecf5b3a240f8324af41609f20d34ed.camel@HIDDEN> (Roel
Janssen's message of "Wed, 11 Mar 2020 14:03:47 +0100")
Message-ID: <8736afj8aw.fsf@HIDDEN>
User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/26.3 (gnu/linux)
MIME-Version: 1.0
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: quoted-printable
X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic]
X-Spam-Score: -0.7 (/)
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 (-)
Roel Janssen <roel@HIDDEN> skribis:
> On Wed, 2020-03-11 at 12:07 +0100, Ludovic Court=C3=A8s wrote:
[...]
>> The Guix package has this patch:
>>=20
>> '(begin
>> ;; Work around miscompilation on Guile 3.0.0 at -O2:
>> ;; <https://bugs.gnu.org/39251>;.
>> (substitute* "src/md5.scm"
>> (("\\(define f-ash ash\\)")
>> "(define f-ash (@ (guile) ash))\n")
>> (("\\(define f-add \\+\\)")
>> "(define f-add (@ (guile) +))\n"))
>> #t)
>>=20
>> It=E2=80=99s very likely that you=E2=80=99re hitting this problem.
>
> Yes! Thanks for sharing this fix.
> I applied the same changes to my code and now I don't encounter the bug
> anymore.
>
> I tested the patched code with both guile-2.2 and guile-3.0. Do you
> know whether this will also work with guile-2.0? (I'd like to keep
> things compatible with guile-2.0 for a few more years).
Yes, the change above also works for Guile 2.0.
Ludo=E2=80=99.
Received: (at control) by debbugs.gnu.org; 11 Mar 2020 14:06:39 +0000 From debbugs-submit-bounces <at> debbugs.gnu.org Wed Mar 11 10:06:39 2020 Received: from localhost ([127.0.0.1]:55268 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>) id 1jC20M-0005vY-TY for submit <at> debbugs.gnu.org; Wed, 11 Mar 2020 10:06:39 -0400 Received: from eggs.gnu.org ([209.51.188.92]:53630) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from <ludo@HIDDEN>) id 1jC20M-0005vN-0D for control <at> debbugs.gnu.org; Wed, 11 Mar 2020 10:06:38 -0400 Received: from fencepost.gnu.org ([2001:470:142:3::e]:60617) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from <ludo@HIDDEN>) id 1jC20G-0005Lp-UO for control <at> debbugs.gnu.org; Wed, 11 Mar 2020 10:06:32 -0400 Received: from [2a01:e0a:1d:7270:af76:b9b:ca24:c465] (port=37938 helo=ribbon) by fencepost.gnu.org with esmtpsa (TLS1.2:RSA_AES_256_CBC_SHA1:256) (Exim 4.82) (envelope-from <ludo@HIDDEN>) id 1jC20E-0004tt-OM for control <at> debbugs.gnu.org; Wed, 11 Mar 2020 10:06:32 -0400 Date: Wed, 11 Mar 2020 15:06:29 +0100 Message-Id: <871rpzj89m.fsf@HIDDEN> To: control <at> debbugs.gnu.org From: =?utf-8?Q?Ludovic_Court=C3=A8s?= <ludo@HIDDEN> Subject: control message for bug #39251 MIME-version: 1.0 Content-type: text/plain; charset=utf-8 Content-Transfer-Encoding: 8bit X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-Spam-Score: -0.7 (/) X-Debbugs-Envelope-To: control 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 (-) merge 39251 39997 quit
MIME-Version: 1.0
X-Mailer: MIME-tools 5.505 (Entity 5.505)
X-Loop: help-debbugs@HIDDEN
From: help-debbugs@HIDDEN (GNU bug Tracking System)
To: Roel Janssen <roel@HIDDEN>
Subject: bug#39997: closed (High CPU load and no return value with 3.0.0)
CC: tracker <at> debbugs.gnu.org
Message-ID: <handler.39997.D39997.158393591823267.ackdone <at> debbugs.gnu.org>
References: <50786c56cd6b9632cdfb6e2c2f95e97c1758591d.camel@HIDDEN>
<1dc6670b0cd28fb5a899fdf7afe0624007747c81.camel@HIDDEN>
X-Gnu-PR-Message: closed 39997
X-Gnu-PR-Package: guile
Date: Wed, 11 Mar 2020 14:12:02 +0000
Content-Type: multipart/mixed; boundary="----------=_1583935922-23278-0"
This is a multi-part message in MIME format...
------------=_1583935922-23278-0
Content-Disposition: inline
Content-Transfer-Encoding: quoted-printable
Content-Type: text/plain; charset=utf-8
Your message dated Wed, 11 Mar 2020 15:11:48 +0100
with message-id <50786c56cd6b9632cdfb6e2c2f95e97c1758591d.camel@HIDDEN>
and subject line Re: bug#39997: High CPU load and no return value with 3.0.0
has caused the debbugs.gnu.org bug report #39997,
regarding High CPU load and no return value with 3.0.0
to be marked as done.
(If you believe you have received this mail in error, please contact
help-debbugs@HIDDEN)
--=20
39997: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=3D39997
GNU Bug Tracking System
Contact help-debbugs@HIDDEN with problems
------------=_1583935922-23278-0
Content-Type: message/rfc822
Content-Disposition: inline
Content-Transfer-Encoding: 7bit
Received: (at submit) by debbugs.gnu.org; 9 Mar 2020 12:13:27 +0000
Received: from localhost ([127.0.0.1]:49915 helo=debbugs.gnu.org)
by debbugs.gnu.org with esmtp (Exim 4.84_2)
(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
id 1jBHHj-0001XF-Li
for submit <at> debbugs.gnu.org; Mon, 09 Mar 2020 08:13:27 -0400
Received: from lists.gnu.org ([209.51.188.17]:53294)
by debbugs.gnu.org with esmtp (Exim 4.84_2)
(envelope-from <roel@HIDDEN>) id 1jBHHh-0001X6-Pz
for submit <at> debbugs.gnu.org; Mon, 09 Mar 2020 08:13:26 -0400
Received: from eggs.gnu.org ([2001:470:142:3::10]:55843)
by lists.gnu.org with esmtp (Exim 4.90_1)
(envelope-from <roel@HIDDEN>) id 1jBHHg-0006bv-Qr
for bug-guile@HIDDEN; Mon, 09 Mar 2020 08:13:25 -0400
X-Spam-Checker-Version: SpamAssassin 3.3.2 (2011-06-06) on eggs.gnu.org
X-Spam-Level:
X-Spam-Status: No, score=-1.0 required=5.0 tests=ALL_TRUSTED,BAYES_40
autolearn=disabled version=3.3.2
Received: from fencepost.gnu.org ([2001:470:142:3::e]:41249)
by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from <roel@HIDDEN>)
id 1jBHHg-0001CA-MY
for bug-guile@HIDDEN; Mon, 09 Mar 2020 08:13:24 -0400
Received: from ip-80-113-14-101.ip.prioritytelecom.net ([80.113.14.101]:3101
helo=redstone)
by fencepost.gnu.org with esmtpsa (TLS1.2:RSA_AES_256_CBC_SHA1:256)
(Exim 4.82) (envelope-from <roel@HIDDEN>) id 1jBHHg-0005Ya-6w
for bug-guile@HIDDEN; Mon, 09 Mar 2020 08:13:24 -0400
Message-ID: <1dc6670b0cd28fb5a899fdf7afe0624007747c81.camel@HIDDEN>
Subject: High CPU load and no return value with 3.0.0
From: Roel Janssen <roel@HIDDEN>
To: bug-guile@HIDDEN
Date: Mon, 09 Mar 2020 13:13:21 +0100
Content-Type: text/plain; charset="UTF-8"
User-Agent: Evolution 3.34.4 (3.34.4-1.fc31)
MIME-Version: 1.0
Content-Transfer-Encoding: 7bit
X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic]
X-Spam-Score: -0.7 (/)
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>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.7 (-)
Dear Guile hackers,
When I use the "md5" module from guile-lib (release 0.2.6.1) together
with the following snippet in Guile 3.0.0, it never returns, while on
Guile 2.2.6, it returns the MD5 sum of the input string:
---
(use-modules (md5))
(define (md5-from-string input)
(call-with-input-string input md5))
(define (random-ascii length)
"Returns a random string of ASCII characters of length LENGTH."
(list->string
(map (lambda _ (integer->char (+ (random 95) 32)))
(iota length))))
(display
(md5-from-string
(random-ascii 32)))
---
Could you point me in the right direction for finding the problem?
This could be completely off-topic:
I also noticed that the function "read-string!/partial" (used by the
md5 module) no longer appears in the manual since the Guile 2.2. Is
the usage of this function considered deprecated?
Kind regards,
Roel Janssen
------------=_1583935922-23278-0
Content-Type: message/rfc822
Content-Disposition: inline
Content-Transfer-Encoding: 7bit
Received: (at 39997-close) by debbugs.gnu.org; 11 Mar 2020 14:11:58 +0000
Received: from localhost ([127.0.0.1]:55272 helo=debbugs.gnu.org)
by debbugs.gnu.org with esmtp (Exim 4.84_2)
(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
id 1jC25W-00063C-JG
for submit <at> debbugs.gnu.org; Wed, 11 Mar 2020 10:11:58 -0400
Received: from eggs.gnu.org ([209.51.188.92]:54611)
by debbugs.gnu.org with esmtp (Exim 4.84_2)
(envelope-from <roel@HIDDEN>) id 1jC25V-000631-5L
for 39997-close <at> debbugs.gnu.org; Wed, 11 Mar 2020 10:11:57 -0400
Received: from fencepost.gnu.org ([2001:470:142:3::e]:60680)
by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from <roel@HIDDEN>)
id 1jC25P-0002Em-UB; Wed, 11 Mar 2020 10:11:52 -0400
Received: from ip-80-113-14-101.ip.prioritytelecom.net ([80.113.14.101]:62560
helo=redstone)
by fencepost.gnu.org with esmtpsa (TLS1.2:RSA_AES_256_CBC_SHA1:256)
(Exim 4.82) (envelope-from <roel@HIDDEN>)
id 1jC25O-0005Lx-Nq; Wed, 11 Mar 2020 10:11:51 -0400
Message-ID: <50786c56cd6b9632cdfb6e2c2f95e97c1758591d.camel@HIDDEN>
Subject: Re: bug#39997: High CPU load and no return value with 3.0.0
From: Roel Janssen <roel@HIDDEN>
To: Ludovic =?ISO-8859-1?Q?Court=E8s?= <ludo@HIDDEN>
Date: Wed, 11 Mar 2020 15:11:48 +0100
In-Reply-To: <8736afj8aw.fsf@HIDDEN>
References: <1dc6670b0cd28fb5a899fdf7afe0624007747c81.camel@HIDDEN>
<87eetzm9oq.fsf@HIDDEN>
<a42e8bfb36ecf5b3a240f8324af41609f20d34ed.camel@HIDDEN>
<8736afj8aw.fsf@HIDDEN>
Content-Type: text/plain; charset="UTF-8"
User-Agent: Evolution 3.34.4 (3.34.4-1.fc31)
MIME-Version: 1.0
Content-Transfer-Encoding: 8bit
X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic]
X-Spam-Score: -0.7 (/)
X-Debbugs-Envelope-To: 39997-close
Cc: 39997-close <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 (-)
On Wed, 2020-03-11 at 15:05 +0100, Ludovic Courtès wrote:
> Roel Janssen <roel@HIDDEN> skribis:
>
> > On Wed, 2020-03-11 at 12:07 +0100, Ludovic Courtès wrote:
>
> [...]
>
> > > The Guix package has this patch:
> > >
> > > '(begin
> > > ;; Work around miscompilation on Guile 3.0.0 at -O2:
> > > ;; <https://bugs.gnu.org/39251>;;.
> > > (substitute* "src/md5.scm"
> > > (("\\(define f-ash ash\\)")
> > > "(define f-ash (@ (guile) ash))\n")
> > > (("\\(define f-add \\+\\)")
> > > "(define f-add (@ (guile) +))\n"))
> > > #t)
> > >
> > > It’s very likely that you’re hitting this problem.
> >
> > Yes! Thanks for sharing this fix.
> > I applied the same changes to my code and now I don't encounter the
> > bug
> > anymore.
> >
> > I tested the patched code with both guile-2.2 and guile-3.0. Do
> > you
> > know whether this will also work with guile-2.0? (I'd like to keep
> > things compatible with guile-2.0 for a few more years).
>
> Yes, the change above also works for Guile 2.0.
Thanks for the confirmation. I'm closing this bug, as it is basically
a duplicate of #39251.
Kind regards,
Roel Janssen
------------=_1583935922-23278-0--
MIME-Version: 1.0
X-Mailer: MIME-tools 5.505 (Entity 5.505)
X-Loop: help-debbugs@HIDDEN
From: help-debbugs@HIDDEN (GNU bug Tracking System)
To: Roel Janssen <roel@HIDDEN>
Subject: bug#39997: closed (Re: bug#39997: High CPU load and no return
value with 3.0.0)
Message-ID: <handler.39997.D39997.158393591823267.notifdone <at> debbugs.gnu.org>
References: <50786c56cd6b9632cdfb6e2c2f95e97c1758591d.camel@HIDDEN>
<1dc6670b0cd28fb5a899fdf7afe0624007747c81.camel@HIDDEN>
X-Gnu-PR-Message: they-closed 39997
X-Gnu-PR-Package: guile
Reply-To: 39997 <at> debbugs.gnu.org
Date: Wed, 11 Mar 2020 14:12:02 +0000
Content-Type: multipart/mixed; boundary="----------=_1583935922-23278-1"
This is a multi-part message in MIME format...
------------=_1583935922-23278-1
Content-Disposition: inline
Content-Transfer-Encoding: quoted-printable
Content-Type: text/plain; charset="utf-8"
Your bug report
#39997: High CPU load and no return value with 3.0.0
which was filed against the guile package, has been closed.
The explanation is attached below, along with your original report.
If you require more details, please reply to 39997 <at> debbugs.gnu.org.
--=20
39997: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=3D39997
GNU Bug Tracking System
Contact help-debbugs@HIDDEN with problems
------------=_1583935922-23278-1
Content-Type: message/rfc822
Content-Disposition: inline
Content-Transfer-Encoding: 7bit
Received: (at 39997-close) by debbugs.gnu.org; 11 Mar 2020 14:11:58 +0000
Received: from localhost ([127.0.0.1]:55272 helo=debbugs.gnu.org)
by debbugs.gnu.org with esmtp (Exim 4.84_2)
(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
id 1jC25W-00063C-JG
for submit <at> debbugs.gnu.org; Wed, 11 Mar 2020 10:11:58 -0400
Received: from eggs.gnu.org ([209.51.188.92]:54611)
by debbugs.gnu.org with esmtp (Exim 4.84_2)
(envelope-from <roel@HIDDEN>) id 1jC25V-000631-5L
for 39997-close <at> debbugs.gnu.org; Wed, 11 Mar 2020 10:11:57 -0400
Received: from fencepost.gnu.org ([2001:470:142:3::e]:60680)
by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from <roel@HIDDEN>)
id 1jC25P-0002Em-UB; Wed, 11 Mar 2020 10:11:52 -0400
Received: from ip-80-113-14-101.ip.prioritytelecom.net ([80.113.14.101]:62560
helo=redstone)
by fencepost.gnu.org with esmtpsa (TLS1.2:RSA_AES_256_CBC_SHA1:256)
(Exim 4.82) (envelope-from <roel@HIDDEN>)
id 1jC25O-0005Lx-Nq; Wed, 11 Mar 2020 10:11:51 -0400
Message-ID: <50786c56cd6b9632cdfb6e2c2f95e97c1758591d.camel@HIDDEN>
Subject: Re: bug#39997: High CPU load and no return value with 3.0.0
From: Roel Janssen <roel@HIDDEN>
To: Ludovic =?ISO-8859-1?Q?Court=E8s?= <ludo@HIDDEN>
Date: Wed, 11 Mar 2020 15:11:48 +0100
In-Reply-To: <8736afj8aw.fsf@HIDDEN>
References: <1dc6670b0cd28fb5a899fdf7afe0624007747c81.camel@HIDDEN>
<87eetzm9oq.fsf@HIDDEN>
<a42e8bfb36ecf5b3a240f8324af41609f20d34ed.camel@HIDDEN>
<8736afj8aw.fsf@HIDDEN>
Content-Type: text/plain; charset="UTF-8"
User-Agent: Evolution 3.34.4 (3.34.4-1.fc31)
MIME-Version: 1.0
Content-Transfer-Encoding: 8bit
X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic]
X-Spam-Score: -0.7 (/)
X-Debbugs-Envelope-To: 39997-close
Cc: 39997-close <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 (-)
On Wed, 2020-03-11 at 15:05 +0100, Ludovic Courtès wrote:
> Roel Janssen <roel@HIDDEN> skribis:
>
> > On Wed, 2020-03-11 at 12:07 +0100, Ludovic Courtès wrote:
>
> [...]
>
> > > The Guix package has this patch:
> > >
> > > '(begin
> > > ;; Work around miscompilation on Guile 3.0.0 at -O2:
> > > ;; <https://bugs.gnu.org/39251>;;.
> > > (substitute* "src/md5.scm"
> > > (("\\(define f-ash ash\\)")
> > > "(define f-ash (@ (guile) ash))\n")
> > > (("\\(define f-add \\+\\)")
> > > "(define f-add (@ (guile) +))\n"))
> > > #t)
> > >
> > > It’s very likely that you’re hitting this problem.
> >
> > Yes! Thanks for sharing this fix.
> > I applied the same changes to my code and now I don't encounter the
> > bug
> > anymore.
> >
> > I tested the patched code with both guile-2.2 and guile-3.0. Do
> > you
> > know whether this will also work with guile-2.0? (I'd like to keep
> > things compatible with guile-2.0 for a few more years).
>
> Yes, the change above also works for Guile 2.0.
Thanks for the confirmation. I'm closing this bug, as it is basically
a duplicate of #39251.
Kind regards,
Roel Janssen
------------=_1583935922-23278-1
Content-Type: message/rfc822
Content-Disposition: inline
Content-Transfer-Encoding: 7bit
Received: (at submit) by debbugs.gnu.org; 9 Mar 2020 12:13:27 +0000
Received: from localhost ([127.0.0.1]:49915 helo=debbugs.gnu.org)
by debbugs.gnu.org with esmtp (Exim 4.84_2)
(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
id 1jBHHj-0001XF-Li
for submit <at> debbugs.gnu.org; Mon, 09 Mar 2020 08:13:27 -0400
Received: from lists.gnu.org ([209.51.188.17]:53294)
by debbugs.gnu.org with esmtp (Exim 4.84_2)
(envelope-from <roel@HIDDEN>) id 1jBHHh-0001X6-Pz
for submit <at> debbugs.gnu.org; Mon, 09 Mar 2020 08:13:26 -0400
Received: from eggs.gnu.org ([2001:470:142:3::10]:55843)
by lists.gnu.org with esmtp (Exim 4.90_1)
(envelope-from <roel@HIDDEN>) id 1jBHHg-0006bv-Qr
for bug-guile@HIDDEN; Mon, 09 Mar 2020 08:13:25 -0400
X-Spam-Checker-Version: SpamAssassin 3.3.2 (2011-06-06) on eggs.gnu.org
X-Spam-Level:
X-Spam-Status: No, score=-1.0 required=5.0 tests=ALL_TRUSTED,BAYES_40
autolearn=disabled version=3.3.2
Received: from fencepost.gnu.org ([2001:470:142:3::e]:41249)
by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from <roel@HIDDEN>)
id 1jBHHg-0001CA-MY
for bug-guile@HIDDEN; Mon, 09 Mar 2020 08:13:24 -0400
Received: from ip-80-113-14-101.ip.prioritytelecom.net ([80.113.14.101]:3101
helo=redstone)
by fencepost.gnu.org with esmtpsa (TLS1.2:RSA_AES_256_CBC_SHA1:256)
(Exim 4.82) (envelope-from <roel@HIDDEN>) id 1jBHHg-0005Ya-6w
for bug-guile@HIDDEN; Mon, 09 Mar 2020 08:13:24 -0400
Message-ID: <1dc6670b0cd28fb5a899fdf7afe0624007747c81.camel@HIDDEN>
Subject: High CPU load and no return value with 3.0.0
From: Roel Janssen <roel@HIDDEN>
To: bug-guile@HIDDEN
Date: Mon, 09 Mar 2020 13:13:21 +0100
Content-Type: text/plain; charset="UTF-8"
User-Agent: Evolution 3.34.4 (3.34.4-1.fc31)
MIME-Version: 1.0
Content-Transfer-Encoding: 7bit
X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic]
X-Spam-Score: -0.7 (/)
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>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.7 (-)
Dear Guile hackers,
When I use the "md5" module from guile-lib (release 0.2.6.1) together
with the following snippet in Guile 3.0.0, it never returns, while on
Guile 2.2.6, it returns the MD5 sum of the input string:
---
(use-modules (md5))
(define (md5-from-string input)
(call-with-input-string input md5))
(define (random-ascii length)
"Returns a random string of ASCII characters of length LENGTH."
(list->string
(map (lambda _ (integer->char (+ (random 95) 32)))
(iota length))))
(display
(md5-from-string
(random-ascii 32)))
---
Could you point me in the right direction for finding the problem?
This could be completely off-topic:
I also noticed that the function "read-string!/partial" (used by the
md5 module) no longer appears in the manual since the Guile 2.2. Is
the usage of this function considered deprecated?
Kind regards,
Roel Janssen
------------=_1583935922-23278-1--
MIME-Version: 1.0
X-Mailer: MIME-tools 5.505 (Entity 5.505)
X-Loop: help-debbugs@HIDDEN
From: help-debbugs@HIDDEN (GNU bug Tracking System)
To: Roel Janssen <roel@HIDDEN>
Subject: bug#39251: closed ([3.0.0] At -O2, top-level definitions not
evaluated in order?)
CC: tracker <at> debbugs.gnu.org
Message-ID: <handler.39251.D39997.158393591823267.ackdone <at> debbugs.gnu.org>
References: <50786c56cd6b9632cdfb6e2c2f95e97c1758591d.camel@HIDDEN>
<87ftg6sdpj.fsf@HIDDEN>
X-Gnu-PR-Message: closed 39251
X-Gnu-PR-Package: guile
Date: Wed, 11 Mar 2020 14:12:02 +0000
Content-Type: multipart/mixed; boundary="----------=_1583935922-23278-2"
This is a multi-part message in MIME format...
------------=_1583935922-23278-2
Content-Disposition: inline
Content-Transfer-Encoding: quoted-printable
Content-Type: text/plain; charset=utf-8
Your message dated Wed, 11 Mar 2020 15:11:48 +0100
with message-id <50786c56cd6b9632cdfb6e2c2f95e97c1758591d.camel@HIDDEN>
and subject line Re: bug#39997: High CPU load and no return value with 3.0.0
has caused the debbugs.gnu.org bug report #39997,
regarding [3.0.0] At -O2, top-level definitions not evaluated in order?
to be marked as done.
(If you believe you have received this mail in error, please contact
help-debbugs@HIDDEN)
--=20
39997: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=3D39997
GNU Bug Tracking System
Contact help-debbugs@HIDDEN with problems
------------=_1583935922-23278-2
Content-Type: message/rfc822
Content-Disposition: inline
Content-Transfer-Encoding: 7bit
Received: (at submit) by debbugs.gnu.org; 23 Jan 2020 09:51:29 +0000
Received: from localhost ([127.0.0.1]:51833 helo=debbugs.gnu.org)
by debbugs.gnu.org with esmtp (Exim 4.84_2)
(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
id 1iuZ96-0008Cd-Nm
for submit <at> debbugs.gnu.org; Thu, 23 Jan 2020 04:51:28 -0500
Received: from lists.gnu.org ([209.51.188.17]:41192)
by debbugs.gnu.org with esmtp (Exim 4.84_2)
(envelope-from <ludo@HIDDEN>) id 1iuZ94-0008CV-PH
for submit <at> debbugs.gnu.org; Thu, 23 Jan 2020 04:51:27 -0500
Received: from eggs.gnu.org ([2001:470:142:3::10]:60991)
by lists.gnu.org with esmtp (Exim 4.90_1)
(envelope-from <ludo@HIDDEN>) id 1iuZ93-0000cE-Ld
for bug-Guix@HIDDEN; Thu, 23 Jan 2020 04:51:26 -0500
X-Spam-Checker-Version: SpamAssassin 3.3.2 (2011-06-06) on eggs.gnu.org
X-Spam-Level:
X-Spam-Status: No, score=-2.9 required=5.0 tests=ALL_TRUSTED,BAYES_00
autolearn=disabled version=3.3.2
Received: from fencepost.gnu.org ([2001:470:142:3::e]:56008)
by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from <ludo@HIDDEN>)
id 1iuZ93-0007dy-IJ
for bug-Guix@HIDDEN; Thu, 23 Jan 2020 04:51:25 -0500
Received: from [2001:660:6102:320:e120:2c8f:8909:cdfe] (port=36216 helo=ribbon)
by fencepost.gnu.org with esmtpsa (TLS1.2:RSA_AES_256_CBC_SHA1:256)
(Exim 4.82) (envelope-from <ludo@HIDDEN>) id 1iuZ93-0001Le-5g
for bug-Guix@HIDDEN; Thu, 23 Jan 2020 04:51:25 -0500
From: =?utf-8?Q?Ludovic_Court=C3=A8s?= <ludo@HIDDEN>
To: bug-Guix@HIDDEN
Subject: [3.0.0] At -O2, top-level definitions not evaluated in order?
X-URL: http://www.fdn.fr/~lcourtes/
X-Revolutionary-Date: 4 =?utf-8?Q?Pluvi=C3=B4se?= an 228 de la =?utf-8?Q?R?=
=?utf-8?Q?=C3=A9volution?=
X-PGP-Key-ID: 0x090B11993D9AEBB5
X-PGP-Key: http://www.fdn.fr/~lcourtes/ludovic.asc
X-PGP-Fingerprint: 3CE4 6455 8A84 FDC6 9DB4 0CFB 090B 1199 3D9A EBB5
X-OS: x86_64-pc-linux-gnu
Date: Thu, 23 Jan 2020 10:51:20 +0100
Message-ID: <87ftg6sdpj.fsf@HIDDEN>
User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/26.3 (gnu/linux)
MIME-Version: 1.0
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: quoted-printable
X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic]
X-Spam-Score: -2.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>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -3.3 (---)
Hello!
Guile-Lib=E2=80=99s md5.scm does something like:
--8<---------------cut here---------------start------------->8---
(define f-ash ash)
(define (ash x n)
(modulo (f-ash x n) #x100000000))
--8<---------------cut here---------------end--------------->8---
At -O0 and -O1, this has the desired effect: =E2=80=98f-ash=E2=80=99 is an =
alias for
(@ (guile) ash).
However, at -O2 and above, =E2=80=98f-ash=E2=80=99 is eq? to the =E2=80=98a=
sh=E2=80=99 defined right
below it.
This seems to contradict R5RS (info "(r5rs) Top level definitions").
Thoughts?
Ludo=E2=80=99.
------------=_1583935922-23278-2
Content-Type: message/rfc822
Content-Disposition: inline
Content-Transfer-Encoding: 7bit
Received: (at 39997-close) by debbugs.gnu.org; 11 Mar 2020 14:11:58 +0000
Received: from localhost ([127.0.0.1]:55272 helo=debbugs.gnu.org)
by debbugs.gnu.org with esmtp (Exim 4.84_2)
(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
id 1jC25W-00063C-JG
for submit <at> debbugs.gnu.org; Wed, 11 Mar 2020 10:11:58 -0400
Received: from eggs.gnu.org ([209.51.188.92]:54611)
by debbugs.gnu.org with esmtp (Exim 4.84_2)
(envelope-from <roel@HIDDEN>) id 1jC25V-000631-5L
for 39997-close <at> debbugs.gnu.org; Wed, 11 Mar 2020 10:11:57 -0400
Received: from fencepost.gnu.org ([2001:470:142:3::e]:60680)
by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from <roel@HIDDEN>)
id 1jC25P-0002Em-UB; Wed, 11 Mar 2020 10:11:52 -0400
Received: from ip-80-113-14-101.ip.prioritytelecom.net ([80.113.14.101]:62560
helo=redstone)
by fencepost.gnu.org with esmtpsa (TLS1.2:RSA_AES_256_CBC_SHA1:256)
(Exim 4.82) (envelope-from <roel@HIDDEN>)
id 1jC25O-0005Lx-Nq; Wed, 11 Mar 2020 10:11:51 -0400
Message-ID: <50786c56cd6b9632cdfb6e2c2f95e97c1758591d.camel@HIDDEN>
Subject: Re: bug#39997: High CPU load and no return value with 3.0.0
From: Roel Janssen <roel@HIDDEN>
To: Ludovic =?ISO-8859-1?Q?Court=E8s?= <ludo@HIDDEN>
Date: Wed, 11 Mar 2020 15:11:48 +0100
In-Reply-To: <8736afj8aw.fsf@HIDDEN>
References: <1dc6670b0cd28fb5a899fdf7afe0624007747c81.camel@HIDDEN>
<87eetzm9oq.fsf@HIDDEN>
<a42e8bfb36ecf5b3a240f8324af41609f20d34ed.camel@HIDDEN>
<8736afj8aw.fsf@HIDDEN>
Content-Type: text/plain; charset="UTF-8"
User-Agent: Evolution 3.34.4 (3.34.4-1.fc31)
MIME-Version: 1.0
Content-Transfer-Encoding: 8bit
X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic]
X-Spam-Score: -0.7 (/)
X-Debbugs-Envelope-To: 39997-close
Cc: 39997-close <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 (-)
On Wed, 2020-03-11 at 15:05 +0100, Ludovic Courtès wrote:
> Roel Janssen <roel@HIDDEN> skribis:
>
> > On Wed, 2020-03-11 at 12:07 +0100, Ludovic Courtès wrote:
>
> [...]
>
> > > The Guix package has this patch:
> > >
> > > '(begin
> > > ;; Work around miscompilation on Guile 3.0.0 at -O2:
> > > ;; <https://bugs.gnu.org/39251>;;.
> > > (substitute* "src/md5.scm"
> > > (("\\(define f-ash ash\\)")
> > > "(define f-ash (@ (guile) ash))\n")
> > > (("\\(define f-add \\+\\)")
> > > "(define f-add (@ (guile) +))\n"))
> > > #t)
> > >
> > > It’s very likely that you’re hitting this problem.
> >
> > Yes! Thanks for sharing this fix.
> > I applied the same changes to my code and now I don't encounter the
> > bug
> > anymore.
> >
> > I tested the patched code with both guile-2.2 and guile-3.0. Do
> > you
> > know whether this will also work with guile-2.0? (I'd like to keep
> > things compatible with guile-2.0 for a few more years).
>
> Yes, the change above also works for Guile 2.0.
Thanks for the confirmation. I'm closing this bug, as it is basically
a duplicate of #39251.
Kind regards,
Roel Janssen
------------=_1583935922-23278-2--
MIME-Version: 1.0
X-Mailer: MIME-tools 5.505 (Entity 5.505)
X-Loop: help-debbugs@HIDDEN
From: help-debbugs@HIDDEN (GNU bug Tracking System)
To: Ludovic =?UTF-8?Q?Court=C3=A8s?= <ludo@HIDDEN>
Subject: bug#39251: closed (Re: bug#39997: High CPU load and no return
value with 3.0.0)
Message-ID: <handler.39251.D39997.158393591823267.notifdone <at> debbugs.gnu.org>
References: <50786c56cd6b9632cdfb6e2c2f95e97c1758591d.camel@HIDDEN>
<87ftg6sdpj.fsf@HIDDEN>
X-Gnu-PR-Message: they-closed 39251
X-Gnu-PR-Package: guile
Reply-To: 39251 <at> debbugs.gnu.org
Date: Wed, 11 Mar 2020 14:12:02 +0000
Content-Type: multipart/mixed; boundary="----------=_1583935922-23278-3"
This is a multi-part message in MIME format...
------------=_1583935922-23278-3
Content-Disposition: inline
Content-Transfer-Encoding: quoted-printable
Content-Type: text/plain; charset="utf-8"
Your bug report
#39997: [3.0.0] At -O2, top-level definitions not evaluated in order?
which was filed against the guile package, has been closed.
The explanation is attached below, along with your original report.
If you require more details, please reply to 39251 <at> debbugs.gnu.org.
--=20
39997: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=3D39997
GNU Bug Tracking System
Contact help-debbugs@HIDDEN with problems
------------=_1583935922-23278-3
Content-Type: message/rfc822
Content-Disposition: inline
Content-Transfer-Encoding: 7bit
Received: (at 39997-close) by debbugs.gnu.org; 11 Mar 2020 14:11:58 +0000
Received: from localhost ([127.0.0.1]:55272 helo=debbugs.gnu.org)
by debbugs.gnu.org with esmtp (Exim 4.84_2)
(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
id 1jC25W-00063C-JG
for submit <at> debbugs.gnu.org; Wed, 11 Mar 2020 10:11:58 -0400
Received: from eggs.gnu.org ([209.51.188.92]:54611)
by debbugs.gnu.org with esmtp (Exim 4.84_2)
(envelope-from <roel@HIDDEN>) id 1jC25V-000631-5L
for 39997-close <at> debbugs.gnu.org; Wed, 11 Mar 2020 10:11:57 -0400
Received: from fencepost.gnu.org ([2001:470:142:3::e]:60680)
by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from <roel@HIDDEN>)
id 1jC25P-0002Em-UB; Wed, 11 Mar 2020 10:11:52 -0400
Received: from ip-80-113-14-101.ip.prioritytelecom.net ([80.113.14.101]:62560
helo=redstone)
by fencepost.gnu.org with esmtpsa (TLS1.2:RSA_AES_256_CBC_SHA1:256)
(Exim 4.82) (envelope-from <roel@HIDDEN>)
id 1jC25O-0005Lx-Nq; Wed, 11 Mar 2020 10:11:51 -0400
Message-ID: <50786c56cd6b9632cdfb6e2c2f95e97c1758591d.camel@HIDDEN>
Subject: Re: bug#39997: High CPU load and no return value with 3.0.0
From: Roel Janssen <roel@HIDDEN>
To: Ludovic =?ISO-8859-1?Q?Court=E8s?= <ludo@HIDDEN>
Date: Wed, 11 Mar 2020 15:11:48 +0100
In-Reply-To: <8736afj8aw.fsf@HIDDEN>
References: <1dc6670b0cd28fb5a899fdf7afe0624007747c81.camel@HIDDEN>
<87eetzm9oq.fsf@HIDDEN>
<a42e8bfb36ecf5b3a240f8324af41609f20d34ed.camel@HIDDEN>
<8736afj8aw.fsf@HIDDEN>
Content-Type: text/plain; charset="UTF-8"
User-Agent: Evolution 3.34.4 (3.34.4-1.fc31)
MIME-Version: 1.0
Content-Transfer-Encoding: 8bit
X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic]
X-Spam-Score: -0.7 (/)
X-Debbugs-Envelope-To: 39997-close
Cc: 39997-close <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 (-)
On Wed, 2020-03-11 at 15:05 +0100, Ludovic Courtès wrote:
> Roel Janssen <roel@HIDDEN> skribis:
>
> > On Wed, 2020-03-11 at 12:07 +0100, Ludovic Courtès wrote:
>
> [...]
>
> > > The Guix package has this patch:
> > >
> > > '(begin
> > > ;; Work around miscompilation on Guile 3.0.0 at -O2:
> > > ;; <https://bugs.gnu.org/39251>;;.
> > > (substitute* "src/md5.scm"
> > > (("\\(define f-ash ash\\)")
> > > "(define f-ash (@ (guile) ash))\n")
> > > (("\\(define f-add \\+\\)")
> > > "(define f-add (@ (guile) +))\n"))
> > > #t)
> > >
> > > It’s very likely that you’re hitting this problem.
> >
> > Yes! Thanks for sharing this fix.
> > I applied the same changes to my code and now I don't encounter the
> > bug
> > anymore.
> >
> > I tested the patched code with both guile-2.2 and guile-3.0. Do
> > you
> > know whether this will also work with guile-2.0? (I'd like to keep
> > things compatible with guile-2.0 for a few more years).
>
> Yes, the change above also works for Guile 2.0.
Thanks for the confirmation. I'm closing this bug, as it is basically
a duplicate of #39251.
Kind regards,
Roel Janssen
------------=_1583935922-23278-3
Content-Type: message/rfc822
Content-Disposition: inline
Content-Transfer-Encoding: 7bit
Received: (at submit) by debbugs.gnu.org; 23 Jan 2020 09:51:29 +0000
Received: from localhost ([127.0.0.1]:51833 helo=debbugs.gnu.org)
by debbugs.gnu.org with esmtp (Exim 4.84_2)
(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
id 1iuZ96-0008Cd-Nm
for submit <at> debbugs.gnu.org; Thu, 23 Jan 2020 04:51:28 -0500
Received: from lists.gnu.org ([209.51.188.17]:41192)
by debbugs.gnu.org with esmtp (Exim 4.84_2)
(envelope-from <ludo@HIDDEN>) id 1iuZ94-0008CV-PH
for submit <at> debbugs.gnu.org; Thu, 23 Jan 2020 04:51:27 -0500
Received: from eggs.gnu.org ([2001:470:142:3::10]:60991)
by lists.gnu.org with esmtp (Exim 4.90_1)
(envelope-from <ludo@HIDDEN>) id 1iuZ93-0000cE-Ld
for bug-Guix@HIDDEN; Thu, 23 Jan 2020 04:51:26 -0500
X-Spam-Checker-Version: SpamAssassin 3.3.2 (2011-06-06) on eggs.gnu.org
X-Spam-Level:
X-Spam-Status: No, score=-2.9 required=5.0 tests=ALL_TRUSTED,BAYES_00
autolearn=disabled version=3.3.2
Received: from fencepost.gnu.org ([2001:470:142:3::e]:56008)
by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from <ludo@HIDDEN>)
id 1iuZ93-0007dy-IJ
for bug-Guix@HIDDEN; Thu, 23 Jan 2020 04:51:25 -0500
Received: from [2001:660:6102:320:e120:2c8f:8909:cdfe] (port=36216 helo=ribbon)
by fencepost.gnu.org with esmtpsa (TLS1.2:RSA_AES_256_CBC_SHA1:256)
(Exim 4.82) (envelope-from <ludo@HIDDEN>) id 1iuZ93-0001Le-5g
for bug-Guix@HIDDEN; Thu, 23 Jan 2020 04:51:25 -0500
From: =?utf-8?Q?Ludovic_Court=C3=A8s?= <ludo@HIDDEN>
To: bug-Guix@HIDDEN
Subject: [3.0.0] At -O2, top-level definitions not evaluated in order?
X-URL: http://www.fdn.fr/~lcourtes/
X-Revolutionary-Date: 4 =?utf-8?Q?Pluvi=C3=B4se?= an 228 de la =?utf-8?Q?R?=
=?utf-8?Q?=C3=A9volution?=
X-PGP-Key-ID: 0x090B11993D9AEBB5
X-PGP-Key: http://www.fdn.fr/~lcourtes/ludovic.asc
X-PGP-Fingerprint: 3CE4 6455 8A84 FDC6 9DB4 0CFB 090B 1199 3D9A EBB5
X-OS: x86_64-pc-linux-gnu
Date: Thu, 23 Jan 2020 10:51:20 +0100
Message-ID: <87ftg6sdpj.fsf@HIDDEN>
User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/26.3 (gnu/linux)
MIME-Version: 1.0
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: quoted-printable
X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic]
X-Spam-Score: -2.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>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -3.3 (---)
Hello!
Guile-Lib=E2=80=99s md5.scm does something like:
--8<---------------cut here---------------start------------->8---
(define f-ash ash)
(define (ash x n)
(modulo (f-ash x n) #x100000000))
--8<---------------cut here---------------end--------------->8---
At -O0 and -O1, this has the desired effect: =E2=80=98f-ash=E2=80=99 is an =
alias for
(@ (guile) ash).
However, at -O2 and above, =E2=80=98f-ash=E2=80=99 is eq? to the =E2=80=98a=
sh=E2=80=99 defined right
below it.
This seems to contradict R5RS (info "(r5rs) Top level definitions").
Thoughts?
Ludo=E2=80=99.
------------=_1583935922-23278-3--
Received: (at fakecontrol) by fakecontrolmessage; To: internal_control <at> debbugs.gnu.org From: Debbugs Internal Request <help-debbugs@HIDDEN> Subject: Internal Control Message-Id: Did not alter fixed versions and reopened. Date: Wed, 11 Mar 2020 20:19:01 +0000 User-Agent: Fakemail v42.6.9 # This is a fake control message. # # The action: # Did not alter fixed versions and reopened. thanks # This fakemail brought to you by your local debbugs # administrator
GNU bug tracking system
Copyright (C) 1999 Darren O. Benham,
1997 nCipher Corporation Ltd,
1994-97 Ian Jackson.