#239 Can't redefine a class after previous definition errors about accessors

HEAD
closed
nobody
None
1
2014-09-23
2012-12-21
stassats
No
  (defclass foo ()
    ((foo :accessor list)))

   * The form (CLOS:LOAD-DEFCLASS 'FOO 'NIL '((:WRITERS ((SETF LIST)) :READERS (LIST) :NAME FOO)) NIL) was not evaluated successfully.
   Error detected:
   The symbol LIST is bound to an ordinary function and is not a valid name for a generic function

  (defclass foo ()
    ((foo :accessor foo)))

   * The form (CLOS:LOAD-DEFCLASS 'FOO 'NIL '((:WRITERS ((SETF FOO)) :READERS (FOO) :NAME FOO)) NIL) was not evaluated successfully.
   Error detected:
   No applicable method for FIND-METHOD with arguments of types
   COMPILED-FUNCTION
   NULL
   CONS
   NULL

Discussion

  • This seems to be fixed now. I keep it open because you might be doing something else after the first error is signaled which I miss.

    $ ecl -norc
    ECL (Embeddable Common-Lisp) 12.12.1 (git:7bec81a367548682e46a6f911e973100d9a9f428)
    Copyright (C) 1984 Taiichi Yuasa and Masami Hagiya
    Copyright (C) 1993 Giuseppe Attardi
    Copyright (C) 2000 Juan J. Garcia-Ripoll
    ECL is free software, and you are welcome to redistribute it
    under certain conditions; see file 'Copyright' for details.
    Type :h for Help.
    Top level in: #<process TOP-LEVEL="">.

    (defclass foo () ((foo :accessor list)))

    Condition of type: SIMPLE-PROGRAM-ERROR
    The symbol LIST is bound to an ordinary function and is not a valid name for a generic function

    Available restarts:

    1. (RESTART-TOPLEVEL) Go back to Top-Level REPL.

    Broken at SI:BYTECODES. [Evaluation of: (CLOS:LOAD-DEFCLASS 'FOO ...)] In: #<process TOP-LEVEL="">.

    :q

    Top level in: #<process TOP-LEVEL="">.

    (defclass foo () ((foo :accessor foo)))

    <The STANDARD-CLASS="" COMMON-LISP-USER::FOO="">

     

  • Anonymous
    2013-06-26

    I am also unable to reproduce this problem on 13.5.1

     


Anonymous


Cancel   Add attachments