|
From: | Szavai Gyula |
Subject: | [bug #30071] unfold isn't tail-recursive |
Date: | Mon, 07 Jun 2010 18:30:35 +0000 |
User-agent: | Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.9.1.8) Gecko/20100202 Firefox/3.5.8 |
URL: <http://savannah.gnu.org/bugs/?30071> Summary: unfold isn't tail-recursive Project: Guile Submitted by: szgyg Submitted on: Mon 07 Jun 2010 06:30:34 PM GMT Category: None Severity: 3 - Normal Item Group: None Status: None Privacy: Public Assigned to: None Open/Closed: Open Discussion Lock: Any _______________________________________________________ Details: (use-modules (srfi srfi-1)) (write (false-if-exception (let ((stack (* 0.05 (cadr (member 'stack (debug-options)))))) (unfold (lambda (x) (> x stack)) identity 1+ 0) #t))) _______________________________________________________ Reply to this item at: <http://savannah.gnu.org/bugs/?30071> _______________________________________________ Message sent via/by Savannah http://savannah.gnu.org/
[Prev in Thread] | Current Thread | [Next in Thread] |