#333 Redefining a class with new initargs does not work

closed-fixed
Bruno Haible
clisp (525)
5
2006-04-22
2006-04-15
Kim Minh Kaplan
No

$ uname -a
Darwin kika.local 8.6.0 Darwin Kernel Version 8.6.0: Tue Mar 7
16:58:48 PST 2006; root:xnu-792.6.70.obj~1/RELEASE_PPC Power
Macintosh powerpc
$ clisp -norc
i i i i i i i ooooo o ooooooo ooooo ooooo
I I I I I I I 8 8 8 8 8 o 8 8
I \ `+' / I 8 8 8 8 8 8
\ `-+-' / 8 8 8 ooooo 8oooo
`-__|__-' 8 8 8 8 8
| 8 o 8 8 o 8 8
------+------ ooooo 8oooooo ooo8ooo ooooo 8

Copyright (c) Bruno Haible, Michael Stoll 1992, 1993
Copyright (c) Bruno Haible, Marcus Daniels 1994-1997
Copyright (c) Bruno Haible, Pierpaolo Bernardi, Sam Steingold 1998
Copyright (c) Bruno Haible, Sam Steingold 1999-2000
Copyright (c) Sam Steingold, Bruno Haible 2001-2006

[1]> (lisp-implementation-type)
"CLISP"
[2]> (lisp-implementation-version)
"2.38 (2006-01-24) (built on kika.nic.fr [192.134.4.117])"
[3]> (defclass foo () (bar))
#<STANDARD-CLASS FOO>
[4]> (make-instance 'foo)
#<FOO #x19FCCA7D>
[5]> (defclass foo () ((bar :initarg :bar)))
WARNING: DEFCLASS: Class FOO (or one of its ancestors) is being
redefined,
instances are obsolete
#<STANDARD-CLASS FOO :VERSION 1>
[6]> (make-instance 'foo :bar :baz)

*** - MAKE-INSTANCE : Paire mot-clé - valeur :BAR, :BAZ illicite dans
la liste
d'arguments.
Les mots-clé permis sont NIL
Rentrées possibles:
ABORT :R1 ABORT

Discussion

  • Bruno Haible
    Bruno Haible
    2006-04-22

    • status: open --> closed-fixed
     
  • Bruno Haible
    Bruno Haible
    2006-04-22

    Logged In: YES
    user_id=5923

    Thanks for the nice test case. Fixed in the CVS.