home *** CD-ROM | disk | FTP | other *** search
/ MACD 4 / MACD4.iso / Emulatory / AROS / intuition / addclass.c < prev    next >
Encoding:
C/C++ Source or Header  |  1978-03-06  |  1.6 KB  |  73 lines
  1. /*
  2.     (C) 1995-96 AROS - The Amiga Replacement OS
  3.     $Id: addclass.c,v 1.2 1996/10/24 15:51:17 aros Exp $
  4.     $Log: addclass.c,v $
  5.     Revision 1.2  1996/10/24 15:51:17  aros
  6.     Use the official AROS macros over the __AROS versions.
  7.  
  8.     Revision 1.1  1996/08/28 17:55:34  digulla
  9.     Proportional gadgets
  10.     BOOPSI
  11.  
  12.  
  13.     Desc:
  14.     Lang: english
  15. */
  16. #include <clib/exec_protos.h>
  17. #include "intuition_intern.h"
  18.  
  19. /*****************************************************************************
  20.  
  21.     NAME */
  22.     #include <intuition/classes.h>
  23.     #include <clib/intuition_protos.h>
  24.  
  25.     AROS_LH1(void, AddClass,
  26.  
  27. /*  SYNOPSIS */
  28.     AROS_LHA(struct IClass *, classPtr, A0),
  29.  
  30. /*  LOCATION */
  31.     struct IntuitionBase *, IntuitionBase, 114, Intuition)
  32.  
  33. /*  FUNCTION
  34.     Makes a class publically usable. This function must not be called
  35.     before MakeClass().
  36.  
  37.     INPUTS
  38.     class - The result of MakeClass()
  39.  
  40.     RESULT
  41.     None.
  42.  
  43.     NOTES
  44.  
  45.     EXAMPLE
  46.     There is no protection against creating multiple classes with
  47.     the same name yet. The operation of the system is undefined
  48.     in this case.
  49.  
  50.     BUGS
  51.  
  52.     SEE ALSO
  53.     MakeClass(), FreeClass(), RemoveClass(), "Basic Object-Oriented
  54.     Programming System for Intuition" and "boopsi Class Reference"
  55.  
  56.     INTERNALS
  57.  
  58.     HISTORY
  59.     29-10-95    digulla automatically created from
  60.                 intuition_lib.fd and clib/intuition_protos.h
  61.  
  62. *****************************************************************************/
  63. {
  64.     AROS_LIBFUNC_INIT
  65.     AROS_LIBBASE_EXT_DECL(struct IntuitionBase *,IntuitionBase)
  66.  
  67.     AddTail (PublicClassList, (struct Node *)classPtr);
  68.  
  69.     classPtr->cl_Flags |= CLF_INLIST;
  70.  
  71.     AROS_LIBFUNC_EXIT
  72. } /* AddClass */
  73.