logo       

RE: Re: CLOS+defstruct issues: msg#00072

lisp.corman

Subject: RE: Re: CLOS+defstruct issues

Hi Kenny,

No it didn't. However, I added that just now. DEFSTRUCT no longer
generates accessors for included slots (which was the cause of this
problem) if accessors by the same name have already been defined. You
can get the updated patch:
http://www.cormanlisp.com/CormanLisp/patches/2_01/

Roger

-----Original Message-----
From: Kenny Tilton [mailto:ktilton@xxxxxxxxxx]
Sent: Saturday, March 15, 2003 8:32 AM
To: cormanlisp@xxxxxxxxxxxxxxx
Subject: Re: [cormanlisp] Re: CLOS+defstruct issues


Roger, do you happen to know if these patches fix this issue reported a
day earlier?:

> Here is a simpler way to get the bug mentioned yesterday:
>
> (in-package :cl-user)
>
> (defstruct (aaa (:conc-name nil))
> xxx)
>
> (defstruct (bbb (:include aaa)
> (:conc-name nil))
> yyy)
>
> #+test
> (let ((a (make-aaa :xxx 1)))
> (setf (xxx a) 2))
>
> The last form produces:
>
> ;;; An error occurred in function CHECK-STRUCT-TYPE:
> ;;; Error: The object #S( AAA :XXX 1 ) is not a BBB structure ;;;
> Entering Corman Lisp debug loop. ;;; Use :C followed by an option to
> exit. Type :HELP for help. ;;; Restart options:
> ;;; 1 Abort to top level.



--

kenny tilton
clinisys, inc
http://www.tilton-technology.com/
---------------------------------------------------------------
"Cells let us walk, talk, think, make love and realize
the bath water is cold." -- Lorraine Lee Cudmore




To unsubscribe from this group, send an email to:
cormanlisp-unsubscribe@xxxxxxxxxxxxxxx



Your use of Yahoo! Groups is subject to
http://docs.yahoo.com/info/terms/



------------------------ Yahoo! Groups Sponsor ---------------------~-->
Get 128 Bit SSL Encryption!
http://us.click.yahoo.com/xaxhjB/hdqFAA/xGHJAA/SyjtlB/TM
---------------------------------------------------------------------~->

To unsubscribe from this group, send an email to:
cormanlisp-unsubscribe@xxxxxxxxxxxxxxx



Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/





<Prev in Thread] Current Thread [Next in Thread>
Google Custom Search

News | FAQ | advertise