[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Making System Functions Specializable
- To: "Timothy_Koschmann.DPMW4000"@Xerox.COM
- Subject: Making System Functions Specializable
- From: Michael Sokolov <sokolov@waterloo.media.mit.edu>
- Date: Tue, 19 Jul 88 09:55:21 EDT
- Cc: commonloops.PA@Xerox.COM, "Timothy_Koschmann.DPMW4000"@Xerox.COM
- In-reply-to: "Timothy_Koschmann.DPMW4000"@xerox.com's message of 18 Jul 88 13:10:46 PDT (Monday) <880718-131347-3707@Xerox>
- Redistributed: commonloops.PA
Here's one thing to try. Say you have want to define + on
arrays.
(setq num-plus (function #'+))
(fmakunbound #'+)
(defmethod + ((a array) (b array)) ....)
(defmethod + ((x number) (y number)) (num-plus x y))
Then, after you compile this, you could even get rid of
num-plus' function binding.
Mike S.