From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: "Steven H. Margolis" Newsgroups: gmane.lisp.guile.bugs Subject: bug#19389: visit-entry argument problem in module/language/cps/verify.scm Date: Mon, 15 Dec 2014 08:18:31 -0800 Message-ID: NNTP-Posting-Host: plane.gmane.org Mime-Version: 1.0 (Mac OS X Mail 7.3 \(1878.6\)) Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: quoted-printable X-Trace: ger.gmane.org 1418665832 27331 80.91.229.3 (15 Dec 2014 17:50:32 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Mon, 15 Dec 2014 17:50:32 +0000 (UTC) To: 19389@debbugs.gnu.org Original-X-From: bug-guile-bounces+guile-bugs=m.gmane.org@gnu.org Mon Dec 15 18:50:24 2014 Return-path: Envelope-to: guile-bugs@m.gmane.org Original-Received: from lists.gnu.org ([208.118.235.17]) by plane.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1Y0Zmq-0007kg-NS for guile-bugs@m.gmane.org; Mon, 15 Dec 2014 18:50:24 +0100 Original-Received: from localhost ([::1]:41255 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Y0Zmq-00009o-CD for guile-bugs@m.gmane.org; Mon, 15 Dec 2014 12:50:24 -0500 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:33168) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Y0Ypa-00065R-55 for bug-guile@gnu.org; Mon, 15 Dec 2014 11:49:16 -0500 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1Y0YpT-0000hi-9h for bug-guile@gnu.org; Mon, 15 Dec 2014 11:49:10 -0500 Original-Received: from debbugs.gnu.org ([140.186.70.43]:37752) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Y0YpT-0000hb-6n for bug-guile@gnu.org; Mon, 15 Dec 2014 11:49:03 -0500 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.80) (envelope-from ) id 1Y0YpT-0001B2-1w for bug-guile@gnu.org; Mon, 15 Dec 2014 11:49:03 -0500 X-Loop: help-debbugs@gnu.org Resent-From: "Steven H. Margolis" Original-Sender: "Debbugs-submit" Resent-CC: bug-guile@gnu.org Resent-Date: Mon, 15 Dec 2014 16:49:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 19389 X-GNU-PR-Package: guile X-GNU-PR-Keywords: X-Debbugs-Original-To: bug-guile@gnu.org Original-Received: via spool by submit@debbugs.gnu.org id=B.14186620934444 (code B ref -1); Mon, 15 Dec 2014 16:49:02 +0000 Original-Received: (at submit) by debbugs.gnu.org; 15 Dec 2014 16:48:13 +0000 Original-Received: from localhost ([127.0.0.1]:47116 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.80) (envelope-from ) id 1Y0Yoe-00019W-VV for submit@debbugs.gnu.org; Mon, 15 Dec 2014 11:48:13 -0500 Original-Received: from eggs.gnu.org ([208.118.235.92]:52579) by debbugs.gnu.org with esmtp (Exim 4.80) (envelope-from ) id 1Y0YMM-0000RU-Gr for submit@debbugs.gnu.org; Mon, 15 Dec 2014 11:18:59 -0500 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1Y0YMB-0007iO-6Z for submit@debbugs.gnu.org; Mon, 15 Dec 2014 11:18:53 -0500 Original-Received: from lists.gnu.org ([2001:4830:134:3::11]:56481) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Y0YMB-0007iJ-45 for submit@debbugs.gnu.org; Mon, 15 Dec 2014 11:18:47 -0500 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:54265) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Y0YM5-0000oU-K7 for bug-guile@gnu.org; Mon, 15 Dec 2014 11:18:47 -0500 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1Y0YLz-0007h0-W7 for bug-guile@gnu.org; Mon, 15 Dec 2014 11:18:41 -0500 Original-Received: from pb-smtp1.int.icgroup.com ([208.72.237.35]:53017 helo=sasl.smtp.pobox.com) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Y0YLz-0007gu-SG for bug-guile@gnu.org; Mon, 15 Dec 2014 11:18:35 -0500 Original-Received: from sasl.smtp.pobox.com (unknown [127.0.0.1]) by pb-smtp1.pobox.com (Postfix) with ESMTP id 400FF261F0 for ; Mon, 15 Dec 2014 11:18:34 -0500 (EST) DKIM-Signature: v=1; a=rsa-sha1; c=relaxed; d=pobox.com; h=from :content-type:content-transfer-encoding:subject:message-id:date :to:mime-version; s=sasl; bh=2PMwXLXRnCXiommO6J7viYyd3pM=; b=ORA qsXkImfIzFwJX/UA1r7jwUNSsdIhyxKsVNeBDjcWDjyLniXJfc4DX3ZemXhGIElY mZ4aSiP9CJlnv3dRqljRUxoSIEoPjs32hd1GJirdSqnuquunznAzmjmWVUdhIwiN GKYDpl39NayxX9z+3h6HqCoogl/bJQUglr9C99tE= DomainKey-Signature: a=rsa-sha1; c=nofws; d=pobox.com; h=from :content-type:content-transfer-encoding:subject:message-id:date :to:mime-version; q=dns; s=sasl; b=qNct5wJ3FN2S7e+OHE4jbhF5GuZHJ 8mwELmRtWCobIfXK18SnpXJ2Wx2FlqKZi7n8Opvz1/GCZ5HpSUW8kU0RAkBeRbB6 NRcxrxN3K0gX58sA58khQ049tkgbs/lUSM72QoNMjAMqv3bRanrr6w4pO56OhoCX KRZ5Bo9S01bZew= Original-Received: from pb-smtp1.int.icgroup.com (unknown [127.0.0.1]) by pb-smtp1.pobox.com (Postfix) with ESMTP id 34466261EE for ; Mon, 15 Dec 2014 11:18:34 -0500 (EST) Original-Received: from [10.0.1.46] (unknown [104.172.237.140]) (using TLSv1 with cipher ECDHE-RSA-AES256-SHA (256/256 bits)) (No client certificate requested) by pb-smtp1.pobox.com (Postfix) with ESMTPSA id 508EB261EB for ; Mon, 15 Dec 2014 11:18:33 -0500 (EST) X-Mailer: Apple Mail (2.1878.6) X-Pobox-Relay-ID: 03F46850-8476-11E4-B8A4-42529F42C9D4-29382324!pb-smtp1.pobox.com X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-detected-operating-system: by eggs.gnu.org: Error: Malformed IPv6 address (bad octet value). X-Mailman-Approved-At: Mon, 15 Dec 2014 11:48:09 -0500 X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.15 Precedence: list X-detected-operating-system: by eggs.gnu.org: GNU/Linux 3.x X-Received-From: 140.186.70.43 X-Mailman-Approved-At: Mon, 15 Dec 2014 12:50:22 -0500 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.org@gnu.org Original-Sender: bug-guile-bounces+guile-bugs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.lisp.guile.bugs:7688 Archived-At: This weekend I noticed a build problem in guile from the savannah git = repository. I think the patch below is an appropriate fix: (08:06:43 <~/OpenSource/guile2/guile-savannah>) 0 $ git diff diff --git a/module/language/cps/verify.scm = b/module/language/cps/verify.scm index a39e99b..b636fc4 100644 --- a/module/language/cps/verify.scm +++ b/module/language/cps/verify.scm @@ -129,7 +129,7 @@ (match fun (($ $fun (free ...) entry) (for-each (cut check-var <> v-env) free) - (visit-entry '() v-env)) + (visit-entry '() k-env v-env)) (_ (error "unexpected $fun" fun))))