Subject: Re: Newbie Help Please:  Reading into a list from a file
From: Erik Naggum <>
Date: 1999/04/30
Newsgroups: comp.lang.lisp
Message-ID: <>

* Kent M Pitman <>
|  (defun peek-char-after-whitespace (stream)
|    (loop for ch = (read-char stream nil nil)
|          while ch
|          when (not (whitespace? stream))
| 	   do (return ch)))

  I'd've used (peek-char t stream nil nil) for this.  have I read the
  specification too well, again?  :)