compiler/alib/newdtobject.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: Varargs version of datatypes.library/NewDTObject()
   6     Lang: english
   7 */
   8
   9 #define AROS_TAGRETURNTYPE Object *
  10 #include <intuition/classusr.h>
  11 #include <utility/tagitem.h>
  12
  13 #include <aros/debug.h>
  14
  15 extern struct Library *DataTypesBase;
  16
  17 /*****************************************************************************
  18
  19     NAME */
  20 #define NO_INLINE_STDARG /* turn off inline def */
  21 #include <proto/datatypes.h>
  22
  23         Object * NewDTObject (
  24
  25 /*  SYNOPSIS */
  26         APTR name,
  27         Tag tag1,
  28         ...)
  29
  30 /*  FUNCTION
  31         This is the varargs version of datatypes.library/NewDTObjectA().
  32         For information see datatypes.library/NewDTObjectA().
  33
  34     INPUTS
  35
  36     RESULT
  37
  38     NOTES
  39
  40     EXAMPLE
  41
  42     BUGS
  43
  44     SEE ALSO
  45
  46     INTERNALS
  47
  48     HISTORY
  49
  50 *****************************************************************************/
  51 {
  52     AROS_SLOWSTACKTAGS_PRE(tag1)
  53     retval = NewDTObjectA (name, AROS_SLOWSTACKTAGS_ARG(tag1));
  54     AROS_SLOWSTACKTAGS_POST
  55
  56     kprintf("NewDTObject: leave (alib)\n");
  57 } /* NewDTObject */