<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=iso-8859-1">
<META content="MSHTML 6.00.2800.1106" name=GENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=#ffffff>
<DIV><FONT face=Arial size=2></FONT> </DIV>
<BLOCKQUOTE
style="PADDING-RIGHT: 0px; PADDING-LEFT: 5px; MARGIN-LEFT: 5px; BORDER-LEFT: #000000 2px solid; MARGIN-RIGHT: 0px">
<DIV style="FONT: 10pt arial">----- Original Message ----- </DIV>
<DIV
style="BACKGROUND: #e4e4e4; FONT: 10pt arial; font-color: black"><B>From:</B>
<A title=pjhyett@gmail.com href="mailto:pjhyett@gmail.com">PJ Hyett</A> </DIV>
<DIV style="FONT: 10pt arial"><B>To:</B> <A title=chicago-lisp@common-lisp.net
href="mailto:chicago-lisp@common-lisp.net">chicago-lisp@common-lisp.net</A>
</DIV>
<DIV style="FONT: 10pt arial"><B>Sent:</B> Sunday, April 17, 2005 9:37
PM</DIV>
<DIV style="FONT: 10pt arial"><B>Subject:</B> [chicago-lisp] Working through
Practical Common Lisp</DIV>
<DIV><FONT face=Arial size=2></FONT><BR></DIV>
<DIV>Hi Lispers,<BR>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:<BR><BR>(defun prompt-read (prompt)<BR> (format *query-io*
"~a: " prompt)<BR> (force-output *query-io*)<BR> (read-line
*query-io*))<BR><BR>(defun prompt-twice()<BR> (prompt read (prompt-read
"hello"))<BR><BR>Running this on the REPL: (prompt-twice)<BR><BR>Gives me the
following output:<BR>hello: hi<BR>hi:<BR><BR>""<BR>NIL<BR><BR>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.</DIV></BLOCKQUOTE>
<DIV><FONT face=Arial size=2>Works fine on Allegro and LispWorks.</FONT></DIV>
<DIV><FONT face=Arial size=2></FONT> </DIV>
<DIV><FONT face=Arial size=2>??</FONT></DIV>
<DIV><FONT face=Arial size=2></FONT> </DIV>
<DIV><FONT face=Arial size=2>AKW</FONT></DIV></BODY></HTML>