[chicago-lisp] Working through Practical Common Lisp

[PJ Hyett]

Hi Lispers,
I'm a total Lisp newbie working my way through the new Practical Common Lisp 
book and I've encountered an odd problem. Using these functions:

(defun prompt-read (prompt)
(format *query-io* "~a: " prompt)
(force-output *query-io*)
(read-line *query-io*))

(defun prompt-twice()
(prompt read (prompt-read "hello"))

Running this on the REPL: (prompt-twice)

Gives me the following output:
hello: hi
hi:

""
NIL

The program exits before I have a change to enter anything on the hi: line. 
Any Lisp guys out there wanna set me straight? I'm using Lisp in a Box on 
Suse 9.2 Pro.

Thanks,
PJ
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.common-lisp.net/pipermail/chicago-lisp/attachments/20050417/9d2309d3/attachment.html>