compiler/alib/creategadget.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: Create a gadtools gadget
   6     Lang: english
   7 */
   8
   9 #define AROS_TAGRETURNTYPE struct Gadget *
  10
  11 #include "alib_intern.h"
  12
  13 extern struct Library * GadToolsBase;
  14
  15 /*****************************************************************************
  16
  17     NAME */
  18 #include <intuition/intuition.h>
  19 #include <utility/tagitem.h>
  20 #include <libraries/gadtools.h>
  21 #define NO_INLINE_STDARG /* turn off inline def */
  22 #include <proto/gadtools.h>
  23
  24         struct Gadget * CreateGadget (
  25
  26 /*  SYNOPSIS */
  27         ULONG kind,
  28         struct Gadget * previous,
  29         struct NewGadget * ng,
  30         Tag             tag1,
  31         ...             )
  32
  33 /*  FUNCTION
  34         Varargs version of gadtools.library/CreateGadgetA().
  35
  36     INPUTS
  37
  38     RESULT
  39
  40     NOTES
  41
  42     EXAMPLE
  43
  44     BUGS
  45
  46     SEE ALSO
  47
  48     INTERNALS
  49
  50     HISTORY
  51
  52 *****************************************************************************/
  53 {
  54     AROS_SLOWSTACKTAGS_PRE(tag1)
  55     retval = CreateGadgetA (kind, previous, ng, AROS_SLOWSTACKTAGS_ARG(tag1));
  56     AROS_SLOWSTACKTAGS_POST
  57 } /* CreateGadget */