compiler/alib/dosupermethod.c

   1 /*
   2     Copyright © 1995-2003, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #define INTUITION_NO_INLINE_STDARG
   7
   8 #include <intuition/classes.h>
   9 #include <stdarg.h>
  10 #include <proto/alib.h>
  11 #include "alib_intern.h"
  12
  13 /******************************************************************************
  14
  15     NAME */
  16 #include <intuition/classusr.h>
  17 #include <proto/intuition.h>
  18
  19         IPTR DoSuperMethodA (
  20
  21 /*  SYNOPSIS */
  22         Class  * cl,
  23         Object * obj,
  24         Msg      message)
  25
  26 /*  FUNCTION
  27         Invokes a method on a BOOPSI object, as if this was a object, inherited
  28         from the superclass of the class passed in. Ie the dispatcher of the
  29         superclass is called instead of the objects classes dispatcher.
  30
  31     INPUTS
  32         cl - Class, which superclasses dispatcher is to be called.
  33         obj - The object, on which the method is to be performed on.
  34         message - The message. The first field is the same for all methods and
  35                   specifies which method is to be invokes (see
  36                   <intuition/classusr.h>).
  37
  38     RESULT
  39         Class and method depending. See the class documentation. A value of 0
  40         can mean a valid return code but can also mean that a method was not
  41         supported.
  42
  43     NOTES
  44
  45     EXAMPLE
  46
  47     BUGS
  48
  49     SEE ALSO
  50         NewObjectA(), SetAttrsA(), GetAttr(), DisposeObject(), DoMethodA(),
  51         CoerceMethodA(), <intuition/classes.h>
  52
  53 ******************************************************************************/
  54 {
  55     if ((!obj) || (!cl))
  56         return 0L;
  57     return CALLHOOKPKT((struct Hook *)cl->cl_Super, obj, message);
  58 } /* DoSuperMethodA() */
  59
  60
  61 IPTR DoSuperMethod (Class * cl, Object * obj, ULONG MethodID, ...)
  62 {
  63     if ((!obj) || (!cl))
  64         return 0L;
  65
  66     return CALLHOOKPKT((struct Hook *)cl->cl_Super, obj, &MethodID);
  67 } /* DoSuperMethod()*/