[armedbear-devel] Small problem with DESCRIBE

[Ville Voutilainen]

On 9 February 2010 22:31, Blake McBride <blake at mcbride.name> wrote:
> Below there is a line that reads "IV3   unboundThe following slots have
> :CLASS allocation:"
> There should be a carriage return before the "The".
>
> $ java -jar abcl.jar
> Armed Bear Common Lisp 0.19.0-dev
> Java 1.6.0_17 Apple Inc.
> Java HotSpot(TM) 64-Bit Server VM
> Low-level initialization completed in 0.374 seconds.
> Startup completed in 1.086 seconds.
> Type ":help" for a list of available commands.
> CL-USER(1): (defclass myclass ()
>   (iv1 iv2 iv3
>        (cv1 :allocation :class)))
> #<STANDARD-CLASS MYCLASS {5EE04FD}>
> CL-USER(2): (setq i1 (make-instance 'myclass))
> #<MYCLASS {195B6AAD}>
> CL-USER(3): i1
> #<MYCLASS {195B6AAD}>
> CL-USER(4): (describe i1)
> #<MYCLASS {195B6AAD}> is an instance of #<STANDARD-CLASS MYCLASS {5EE04FD}>.
> The following slots have :INSTANCE allocation:
>   IV1   unbound
>   IV2   unbound
>   IV3   unboundThe following slots have :CLASS allocation:
>   CV1   unbound
> CL-USER(5):

Fixed in r12436, get it while it's hot! :)

So:

$ rlwrap ./abcl
Armed Bear Common Lisp 0.19.0-dev
Java 1.6.0_15 Sun Microsystems Inc.
Java HotSpot(TM) Server VM
Low-level initialization completed in 0.517 seconds.
Startup completed in 1.508 seconds.
Type ":help" for a list of available commands.
(defclass myclass ()
  (iv1 iv2 iv3
       (cv1 :allocation :class)))
#<STANDARD-CLASS MYCLASS {DB3331}>
CL-USER(2): (setq i1 (make-instance 'myclass))
#<MYCLASS {1FCD402}>
CL-USER(3):  i1
#<MYCLASS {1FCD402}>
CL-USER(4): (describe i1)
#<MYCLASS {1FCD402}> is an instance of #<STANDARD-CLASS MYCLASS {DB3331}>.
The following slots have :INSTANCE allocation:
  IV1   unbound
  IV2   unbound
  IV3   unbound
The following slots have :CLASS allocation:
  CV1   unbound
CL-USER(5):

Looks better now.