From: Tmr
Subject: Beginner question
Date: Thu, 23 Mar 2006 12:29:59 +0000
Message-ID: <1143116999.493877.170650@v46g2000cwv.googlegroups.com>

Why I can't succesfully evaluate this:

(do ((sd (+ (get-universal-time) 5)))
    ((> (get-universal-time) sd))
  (format t "Waiting~%")
  (sleep 1)))

without getting this:

READ from #1=#<INPUT STRING-INPUT-STREAM>: an object cannot start with
#\)
   [Condition of type SYSTEM::SIMPLE-READER-ERROR]

?

Used Lispbox 0.7, based on clisp-2.37

Thanks.

From: Simon Katz
Subject: Re: Beginner question
Date: Thu, 23 Mar 2006 12:38:15 +0000
Message-ID: <bk5522hginep5cal1jdr6272ofi16g0hpd@4ax.com>

On 23 Mar 2006 04:29:59 -0800, "Tmr" <········@gmail.com> wrote:

>Why I can't succesfully evaluate this:
>
>(do ((sd (+ (get-universal-time) 5)))
>    ((> (get-universal-time) sd))
>  (format t "Waiting~%")
>  (sleep 1)))
>
>without getting this:
>
>READ from #1=#<INPUT STRING-INPUT-STREAM>: an object cannot start with
>#\)
>   [Condition of type SYSTEM::SIMPLE-READER-ERROR]
>
>?
>
>Used Lispbox 0.7, based on clisp-2.37
>
>Thanks.

One too many close-parentheses at the end.

___________________
Real email address:
(substitute ··@ #\+ (substitute #\s #\! "u!enet001+nomi!tech.com"))