From: Vladimir V. Zolotych
Subject: CLHS
Date: 
Message-ID: <3A9A7952.59EDF5AC@eurocom.od.ua>
CLHS section DEFINE CONDITION

(define-condition ate-too-much (error) 
     ((person :initarg :person :reader ate-too-much-person)
      (weight :initarg :weight :reader ate-too-much-weight)
      (kind-of-food :initarg :kind-of-food
                    :reader :ate-too-much-kind-of-food)))
                  ----------^

CLHS section RESTART-CASE

     (handler-bind ((error #'(lambda (c)
                             (declare (ignore condition))
                  ----------------------------^^^^^^^^^
                             (invoke-restart 'my-restart 7))))

Not sure it will be useful, I've found some more such
typos in HS. 

-- 
Vladimir Zolotych                         ······@eurocom.od.ua
From: Kent M Pitman
Subject: Re: CLHS
Date: 
Message-ID: <sfwitlx1lza.fsf@world.std.com>
"Vladimir V. Zolotych" <······@eurocom.od.ua> writes:

> CLHS section DEFINE CONDITION
> 
> (define-condition ate-too-much (error) 
>      ((person :initarg :person :reader ate-too-much-person)
>       (weight :initarg :weight :reader ate-too-much-weight)
>       (kind-of-food :initarg :kind-of-food
>                     :reader :ate-too-much-kind-of-food)))
>                   ----------^
> 
> CLHS section RESTART-CASE
> 
>      (handler-bind ((error #'(lambda (c)
>                              (declare (ignore condition))
>                   ----------------------------^^^^^^^^^
>                              (invoke-restart 'my-restart 7))))
> 
> Not sure it will be useful, I've found some more such
> typos in HS. 

You can send them to me privately.  I keep a file of such reports, though
have to date not done a whole lot with that.  It's on my low-grade to-do
list...

Note, though, this is a bug in ANSI CL, not in CLHS.  CLHS tries to be
true to the ANSI CL sources, so fixing it is ... tricky.  CLHS wants to
present itself as a mechanical translation of ANSI CL.  That's a tricky
proposition.