[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Law of Good Style
- To: Dick Gabriel <RPG@sail.stanford.edu>
- Subject: Re: Law of Good Style
- From: David C. Martin <dcmartin%postgres.Berkeley.EDU@Berkeley.EDU>
- Date: Fri, 24 Jun 88 15:32:17 PDT
- Cc: commonloops.pa@Xerox.COM
- Email: dcmartin@postgres.Berkeley.EDU or {ihnp4,decvax}!ucbvax!dcmartin
- In-reply-to: Your message of 24 Jun 88 13:58 PDT <1O9rBs@SAIL.Stanford.EDU>
- Organization: University of California at Berkeley - Dept of EECS/CS Division
- Phone: 415/642-9585 (O)
- Redistributed: commonloops.pa
- Sender: dcmartin%avalon.Berkeley.EDU@Berkeley.EDU
This one also obeys the law. Let's combine these using generic-labels
(defmethod v ((p1 A) (p2 Z))
(generic-labels ((v1 (:method ((p B)) (v2 (slot-value p 'c))))
(v2 (:method ((p C)) (slot-value p 'd))))
(v1 (slot-value p 'b))))
Was this -------------- ^ -- supposed to be p1?
dcm