unofficial mirror of guile-devel@gnu.org 
 help / color / mirror / Atom feed
* Source nesting limit
@ 2004-10-04 19:41 Andy Wingo
  0 siblings, 0 replies; only message in thread
From: Andy Wingo @ 2004-10-04 19:41 UTC (permalink / raw)


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

(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.

Regards
-- 
Andy Wingo <wingo@pobox.com>
http://ambient.2y.net/wingo/


_______________________________________________
Guile-devel mailing list
Guile-devel@gnu.org
http://lists.gnu.org/mailman/listinfo/guile-devel


^ permalink raw reply	[flat|nested] only message in thread

only message in thread, other threads:[~2004-10-04 19:41 UTC | newest]

Thread overview: (only message) (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2004-10-04 19:41 Source nesting limit Andy Wingo

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).