Re: [Chicken-users] help please

[Alex Shinn]

At Mon, 12 Apr 2004 12:22:49 -0400, Linh Dang wrote:
> 
> (define (read-and-print)
>   (unless (eqv? (map parse-ctags-line (read-lines)) '())
>     (read-and-print)))

Here you're building a large list you don't use.  Did you try

(define (read-and-print)
  (let ((line (read-line)))
    (unless (eof-object? line)
      (parse-ctags-line line)
      (read-and-print))))

-- 
Alex