[hunchentoot-devel] Hunchentoot Recursive Function

[Phil Marneweck]

This is most likely a problem with my understanding of lisp and not
hunchnetoot.

Why does the following function only out put "Recursive count- 0" to the
hunchentoot page?

(defun recursive-test (count)
  (with-html-output-to-string (*standard-output*)
    (if (< count 10)
        (recursive-test (+ count 1)))
    (str (format nil "Recursive count- ~A" count))))

(define-easy-handler (test-recursive :uri "/test.html" () 
    (with-html-output-to-string (*standard-output*)
      (str (recursive-test 0))))