[Openmcl-devel] including defstruct with colliding conc-name warning

[R. Matthew Emerson]

Thanks.  This looks like http://trac.clozure.com/openmcl/ticket/390

I added your test case and comments to that ticket.

On Oct 29, 2009, at 10:01 AM, Christophe Rhodes wrote:

> Compiling a file with the following contents, both with 1.3 and with
> trunk (r12863):
>
>  (defstruct foo
>    (bar nil))
>
>  (defstruct (foo1 (:conc-name foo-) (:include foo (bar t)))
>    (frob nil))
>
> generates a full warning about a duplicate definition of foo-bar  
> within
> the same file.  However, the second defstruct should not generate a
> definition of foo-bar at all, because foo-bar is already a reader for
> the bar slot in the (inherited) structure foo.  (See the last  
> paragraph
> of the :conc-name section in CLHS defstruct).
>
> The full warning causes tools which check the return values from
> compile-file (asdf, the sbcl build) to believe that compilation  
> failed.