From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!.POSTED!not-for-mail From: Matt Wette Newsgroups: gmane.lisp.guile.devel Subject: Re: GNU Guile 2.1.7 released (beta) Date: Sat, 18 Feb 2017 09:48:35 -0800 Message-ID: <7B6A6AA7-00AC-4960-A9D2-E3E3E11DCA8C@gmail.com> References: <87y3x3zt6v.fsf@pobox.com> NNTP-Posting-Host: blaine.gmane.org Mime-Version: 1.0 (Mac OS X Mail 10.2 \(3259\)) Content-Type: multipart/alternative; boundary="Apple-Mail=_4DEDE67D-F63B-48A7-AE9D-D38DD4839CF5" X-Trace: blaine.gmane.org 1487440135 31431 195.159.176.226 (18 Feb 2017 17:48:55 GMT) X-Complaints-To: usenet@blaine.gmane.org NNTP-Posting-Date: Sat, 18 Feb 2017 17:48:55 +0000 (UTC) Cc: guile-devel To: Andy Wingo Original-X-From: guile-devel-bounces+guile-devel=m.gmane.org@gnu.org Sat Feb 18 18:48:51 2017 Return-path: Envelope-to: guile-devel@m.gmane.org Original-Received: from lists.gnu.org ([208.118.235.17]) by blaine.gmane.org with esmtp (Exim 4.84_2) (envelope-from ) id 1cf97o-0007UJ-DG for guile-devel@m.gmane.org; Sat, 18 Feb 2017 18:48:48 +0100 Original-Received: from localhost ([::1]:59361 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1cf97u-0003zk-1A for guile-devel@m.gmane.org; Sat, 18 Feb 2017 12:48:54 -0500 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:36708) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1cf97i-0003yh-BS for guile-devel@gnu.org; Sat, 18 Feb 2017 12:48:43 -0500 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1cf97f-0000O4-9f for guile-devel@gnu.org; Sat, 18 Feb 2017 12:48:42 -0500 Original-Received: from mail-pf0-x22c.google.com ([2607:f8b0:400e:c00::22c]:34987) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1cf97f-0000Ns-10 for guile-devel@gnu.org; Sat, 18 Feb 2017 12:48:39 -0500 Original-Received: by mail-pf0-x22c.google.com with SMTP id 68so9668066pfx.2 for ; Sat, 18 Feb 2017 09:48:38 -0800 (PST) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20161025; h=from:message-id:mime-version:subject:date:in-reply-to:cc:to :references; bh=M1D+gtmGdDwixImpLTr7kct6G1GMV95Qta4Lu5ttk3E=; b=PbQW3vlfwy6Vd7klQ3PD0X+fK8fzstzdq6XfBcxpGZgd81SA3d50w+W24k68Mvu2qy RiYFSDMcPknycuPTHm/yOngflbEoeXwFog4kI8Om9HIISHF/EMNWzKjMjI8yZlZWv3WF b8ARa7UKnFhkN5tykoVS1oYWgALJUwBGdh/06J8Wc3fzdfouKyZdMlaWmuwS19AyKVXu aXPOsr0vRQCNr7guLWXC96wCIcuaVU+KEiB5KAH1RvtkQqhOZYHXinCA8O/xdLZYGlzC BG938afVEL/a/xq8U7VTOCzm13byqiyujSGwsS9NlNkeRemKJmgsAnY6Majl0fV4Kx9H ++Xg== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20161025; h=x-gm-message-state:from:message-id:mime-version:subject:date :in-reply-to:cc:to:references; bh=M1D+gtmGdDwixImpLTr7kct6G1GMV95Qta4Lu5ttk3E=; b=lbmk94RSbWCLGjpwOSu/3JfCDSAy6mBMI+LDSkYIBX+0FlK0fA2QokvqvYq2eIFP/G MOqdPCZHl9au3+gHG3u3kOetmtAfaRDmmfspWfSE36md1XprtUVERBLrZLvVn/sKivfB oqIqd8/JTH6Qzv2ipZVG59MQVPiFrEllcFjQWDCqC+SfksiWEbWYiEWyzPxt5u0AKriS +adgHfmEInT8k3j1uFejWOdaIw7AY2fOcoNjhLm+ZoiJmYRsDNbKg31Qgmn1m8khIfEB UVu4TvsCEerLpIIb/IQpvBNsaVasqznTnSs3XpQFSI2W9pBmFrk/PBzxGX7yN4qw9r/Y lmpw== X-Gm-Message-State: AMke39lwLE83S564GY2biqmkteRWxm6rSrVfFNq0bX6Dw2SCfyfrg3TmngOSP8FnnWpJcA== X-Received: by 10.84.233.194 with SMTP id m2mr19876472pln.126.1487440118084; Sat, 18 Feb 2017 09:48:38 -0800 (PST) Original-Received: from nautilus.championbroadband.com (216-165-246-244.championbroadband.com. [216.165.246.244]) by smtp.gmail.com with ESMTPSA id g70sm26360833pfb.50.2017.02.18.09.48.36 (version=TLS1_2 cipher=ECDHE-RSA-AES128-GCM-SHA256 bits=128/128); Sat, 18 Feb 2017 09:48:37 -0800 (PST) In-Reply-To: <87y3x3zt6v.fsf@pobox.com> X-Mailer: Apple Mail (2.3259) X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-Received-From: 2607:f8b0:400e:c00::22c X-BeenThere: guile-devel@gnu.org X-Mailman-Version: 2.1.21 Precedence: list List-Id: "Developers list for Guile, the GNU extensibility library" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guile-devel-bounces+guile-devel=m.gmane.org@gnu.org Original-Sender: "guile-devel" Xref: news.gmane.org gmane.lisp.guile.devel:18918 Archived-At: --Apple-Mail=_4DEDE67D-F63B-48A7-AE9D-D38DD4839CF5 Content-Transfer-Encoding: quoted-printable Content-Type: text/plain; charset=us-ascii > On Feb 18, 2017, at 2:31 AM, Andy Wingo wrote: >=20 > We are pleased to announce GNU Guile release 2.1.7. >=20 > Guile 2.1.7 is the seventh pre-release in what will eventually become > the 2.2 release series. We encourage you to test this release and > provide feedback to guile-devel@gnu.org. In libguile/numbers.c abs() is used for long argument where labs() = should be used. =20 A patch is included below for guile-2.1.7. See also 25786 at = debbugs.gnu.org . /* Returns log(n/d), for exact non-zero integers n and d */ static SCM log_of_fraction (SCM n, SCM d) { long n_size =3D scm_to_long (scm_integer_length (n)); long d_size =3D scm_to_long (scm_integer_length (d)); if (abs (n_size - d_size) > 1) return (scm_difference (log_of_exact_integer (n), log_of_exact_integer (d))); --- libguile/numbers.c.orig 2017-02-18 08:29:52.000000000 -0800 +++ libguile/numbers.c 2017-02-18 08:30:23.000000000 -0800 @@ -9951,7 +9951,7 @@ long n_size =3D scm_to_long (scm_integer_length (n)); long d_size =3D scm_to_long (scm_integer_length (d)); =20 - if (abs (n_size - d_size) > 1) + if (labs (n_size - d_size) > 1) return (scm_difference (log_of_exact_integer (n), log_of_exact_integer (d))); else if (scm_is_false (scm_negative_p (n))) --Apple-Mail=_4DEDE67D-F63B-48A7-AE9D-D38DD4839CF5 Content-Transfer-Encoding: quoted-printable Content-Type: text/html; charset=us-ascii
On Feb 18, 2017, at 2:31 AM, Andy Wingo <wingo@pobox.com> = wrote:

We are pleased to announce GNU Guile release 2.1.7.

Guile 2.1.7 is the seventh pre-release in what = will eventually become
the 2.2 release series.  We = encourage you to test this release and
provide feedback to = guile-devel@gnu.org.

In = libguile/numbers.c abs() is used for long argument where labs() should = be used.  
A patch is included below for guile-2.1.7.  See also = 25786 at debbugs.gnu.org.

/* Returns = log(n/d), for exact non-zero integers n and d */
static SCM
log_of_fraction = (SCM n, SCM d)
{
  long n_size =3D = scm_to_long (scm_integer_length (n));
  long d_size =3D scm_to_long (scm_integer_length = (d));

  if = (abs (n_size - d_size) > 1)
  =   return (scm_difference (log_of_exact_integer = (n),
          =                 =   log_of_exact_integer (d)));


--- = libguile/numbers.c.orig 2017-02-18 08:29:52.000000000 = -0800
+++ libguile/numbers.c 2017-02-18 08:30:23.000000000 = -0800
@@ -9951,7 +9951,7 @@
   long n_size =3D = scm_to_long (scm_integer_length (n));
   long d_size =3D = scm_to_long (scm_integer_length (d));
 
-  if (abs = (n_size - d_size) > 1)
+  if (labs (n_size - d_size) > = 1)
     return (scm_difference = (log_of_exact_integer (n),
     =  log_of_exact_integer (d)));
   else if (scm_is_false = (scm_negative_p (n)))

= --Apple-Mail=_4DEDE67D-F63B-48A7-AE9D-D38DD4839CF5--