[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Creating new method combinations



GVGVGVGVGVGVGVGVGVGVGVGVGVGVGVGVGVGVGVGVGVGVGVGVGV
To: CommonLoops.PA
Subject: Creating new method combinations
From: nick(j). <nmj@cs.flinders.oz.au>
Return-Path: <nmj@cs.flinders.oz.au>
Redistributed: CommonLoops.PA
Received: from kurango.cs.flinders.oz.au ([129.96.1.3]) by Xerox.COM ; 24
AUG 90 00:37:17 PDT
Received: by kurango.cs.flinders.oz.au (5.61+IDA+MU/FU-5.8)	id AA20632;
Fri, 24 Aug 1990 17:06:59 +0930
Message-Id: <9008240736.AA20632@kurango.cs.flinders.oz.au>
Original-Date: Fri, 24 Aug 90 17:06:55 +0930
GVGVGVGVGVGVGVGVGVGVGVGVGVGVGVGVGVGVGVGVGVGVGVGVGV


(wrt 22/5/90 PCL (REV 2) and AKCL 1.485)

  I've been trying to create new method combinations using:
  "define-method-combination" (long form) and the object
  returned is:

 #<Standard-Method PCL::FIND-METHOD-COMBINATION (PCL::GENERIC-FUNCTION
                                                RULE T) 16050520>

  (for a combination called "rule"). What I'd like to do is
  have this new combination method replace the original standard
  combination (by setq'ing pcl::*standard-method-combination* with this
  value!?! am I an the right track?????)

  If I attempt this I get the following error:

Error: When initializing the generic-function #<compiled-closure FOO>:
       The :METHOD-COMBINATION initialization argument was:
         #<Standard-Method PCL::FIND-METHOD-COMBINATION
(PCL::GENERIC-FUNCTION RULE T) 15710000>.
       It must be a method combination object.
Error signalled by SHARED-INITIALIZE.

Broken at SHARED-INITIALIZE.  Type :H for Help.

  Has anyone got any pointers as to how one might replace the standard
method
  combination with a user defined?

PS I known this defeats the purpose of the mail group but could any
responses
   be mailed directly, as I'm not sure if the mail groups mail is getting
thro'

Thanx in advance. (nick j)

+------------------------------------------------------------------------+
|  Nick Jeitner                      PH  (08) 201 2874                   |
|  Flinders University               FAX (08) 201 2904                   |
|  Skool of Info Sci and Tech        email nmj@kurango.cs.flinders.oz.au |
|  GPO Box 2100, Adelaide SA, 5001.                                      |
+------------------------------------------------------------------------+