[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Source nesting limit

From: Andy Wingo
Subject: Source nesting limit
Date: Mon, 04 Oct 2004 21:41:21 +0200

A bit improbable, but I was curious how much it would take to break the

(define (make-let n)
  (let lp ((n n) (out 'x))
    (if (zero? n)
        (list 'let '((x 1)) out)
        (lp (1- n) (list 'let '((a 2)) out)))))

(eval (make-let (expt 2 20)) (current-module))

It segfaults in an endless stack of scm_copy_tree, presumably due to a
stack overflow. This is with guile 1.6.4.

Andy Wingo <address@hidden>

reply via email to

[Prev in Thread] Current Thread [Next in Thread]