compiler/alib/domethod.c

   1 /*
   2     Copyright © 1995-2007, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #define INTUITION_NO_INLINE_STDARG
   7
   8 #include <aros/debug.h>
   9 #include <intuition/classes.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 DoMethodA (
  20
  21 /*  SYNOPSIS */
  22         Object * obj,
  23         Msg      message)
  24
  25 /*  FUNCTION
  26         Invokes a method on a BOOPSI object. The dispatcher of the class the
  27         object is inherited from is called. For more information about methods
  28         a class supports, see the class documentation.
  29
  30     INPUTS
  31         obj - The object on which the method is to be performed.
  32         message - The message. The first field is the same for all methods and
  33                   specifies which method is to be invoked (see
  34                   <intuition/classusr.h>).
  35
  36     RESULT
  37         Class and method dependent. See the class documentation. A value of 0
  38         can be a valid return code but can also mean that a method is not
  39         supported.
  40
  41     NOTES
  42
  43     EXAMPLE
  44
  45     BUGS
  46
  47     SEE ALSO
  48         NewObjectA(), SetAttrsA(), GetAttr(), DisposeObject(), CoerceMethodA(),
  49         DoSuperMethodA(), <intuition/classusr.h>
  50
  51 ******************************************************************************/
  52 {
  53     ASSERT_VALID_PTR(obj);
  54
  55     if (!obj)
  56         return 0L;
  57
  58     ASSERT_VALID_PTR(OCLASS(obj));
  59     ASSERT_VALID_PTR(message);
  60
  61     return CALLHOOKPKT((struct Hook *) OCLASS(obj), obj, message);
  62 } /* DoMethodA */
  63
  64 IPTR DoMethod (Object * obj, IPTR MethodID, ...)
  65 {
  66     ASSERT_VALID_PTR(obj);
  67     if (!obj)
  68         return 0L;
  69
  70     ASSERT_VALID_PTR(OCLASS(obj));
  71
  72     AROS_SLOWSTACKMETHODS_PRE(MethodID)
  73     retval = CALLHOOKPKT((struct Hook *) OCLASS(obj), obj, AROS_SLOWSTACKMETHODS_ARG(MethodID));
  74     AROS_SLOWSTACKMETHODS_POST
  75 } /* DoMethod() */
  76