From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Ludovic =?UTF-8?B?Q291cnTDqHM=?= Newsgroups: gmane.lisp.guile.bugs Subject: [bug #27062] `do' corner case leads to segfault (1.8.7) Date: Mon, 20 Jul 2009 21:50:12 +0000 Message-ID: <20090720-215009.sv15145.7559@savannah.gnu.org> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain;charset=UTF-8 X-Trace: ger.gmane.org 1248126639 16297 80.91.229.12 (20 Jul 2009 21:50:39 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Mon, 20 Jul 2009 21:50:39 +0000 (UTC) To: Ludovic =?UTF-8?B?Q291cnTDqHM=?= , bug-guile@gnu.org Original-X-From: bug-guile-bounces+guile-bugs=m.gmane.org@gnu.org Mon Jul 20 23:50:32 2009 Return-path: Envelope-to: guile-bugs@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by lo.gmane.org with esmtp (Exim 4.50) id 1MT0kf-0006M6-P0 for guile-bugs@m.gmane.org; Mon, 20 Jul 2009 23:50:30 +0200 Original-Received: from localhost ([127.0.0.1]:56264 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1MT0ke-0003kK-U8 for guile-bugs@m.gmane.org; Mon, 20 Jul 2009 17:50:28 -0400 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1MT0kb-0003jr-0U for bug-guile@gnu.org; Mon, 20 Jul 2009 17:50:25 -0400 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1MT0kW-0003j0-J6 for bug-guile@gnu.org; Mon, 20 Jul 2009 17:50:24 -0400 Original-Received: from [199.232.76.173] (port=48994 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1MT0kW-0003iw-Cy for bug-guile@gnu.org; Mon, 20 Jul 2009 17:50:20 -0400 Original-Received: from savannah.gnu.org ([199.232.41.3]:36697 helo=sv.gnu.org) by monty-python.gnu.org with esmtps (TLS-1.0:RSA_AES_256_CBC_SHA1:32) (Exim 4.60) (envelope-from ) id 1MT0kU-0001iC-H8; Mon, 20 Jul 2009 17:50:18 -0400 Original-Received: from savannah.gnu.org ([199.232.41.3]) by sv.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1MT0kS-0006iI-28; Mon, 20 Jul 2009 21:50:16 +0000 Original-Received: from www-data by savannah.gnu.org with local (Exim 4.69) (envelope-from ) id 1MT0kO-0006hy-4Q; Mon, 20 Jul 2009 21:50:15 +0000 X-Savane-Server: savannah.gnu.org:443 [199.232.41.3] X-Savane-Project: guile X-Savane-Tracker: bugs X-Savane-Item-ID: 27062 User-Agent: Mozilla/5.0 (X11; U; Linux x86_64; en-US; rv:1.9.1) Gecko/20090713 IceCat/3.5 X-Apparently-From: 80.67.176.83 (Savane authenticated user civodul) Original-References: In-Reply-To: X-detected-operating-system: by monty-python.gnu.org: GNU/Linux 2.6 (newer, 2) X-BeenThere: bug-guile@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: "Bug reports for GUILE, GNU's Ubiquitous Extension Language" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: bug-guile-bounces+guile-bugs=m.gmane.org@gnu.org Errors-To: bug-guile-bounces+guile-bugs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.lisp.guile.bugs:4278 Archived-At: URL: Summary: `do' corner case leads to segfault (1.8.7) Project: Guile Submitted by: civodul Submitted on: Mon 20 Jul 2009 09:50:08 PM GMT Category: None Severity: 3 - Normal Item Group: None Status: None Privacy: Public Assigned to: None Open/Closed: Open Discussion Lock: Any _______________________________________________________ Details: The corner case is: #v+ (let ((j (lambda () 0)) (k 0)) (do ((i (j) (j)) (l (lambda () 1) (lambda () (+ i 1)))) ((= i 3) k) (set! k (+ k i)))) #v- See http://thread.gmane.org/gmane.lisp.guile.devel/8899 for details. Ludo'. _______________________________________________________ Reply to this item at: _______________________________________________ Message sent via/by Savannah http://savannah.gnu.org/