rom/hyperlayers/newlayerinfo.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc:
   6     Lang: english
   7 */
   8 #include <aros/libcall.h>
   9 #include <exec/memory.h>
  10 #include <proto/exec.h>
  11
  12 #define DEBUG 0
  13 #include <aros/debug.h>
  14 #undef kprintf
  15
  16 /*****************************************************************************
  17
  18     NAME */
  19 #include <proto/layers.h>
  20 #include "layers_intern.h"
  21 #include "basicfuncs.h"
  22
  23         AROS_LH0(struct Layer_Info *, NewLayerInfo,
  24
  25 /*  SYNOPSIS */
  26         /* void */
  27
  28 /*  LOCATION */
  29         struct LayersBase *, LayersBase, 24, Layers)
  30
  31 /*  FUNCTION
  32
  33     INPUTS
  34
  35     RESULT
  36
  37     NOTES
  38
  39     EXAMPLE
  40
  41     BUGS
  42
  43     SEE ALSO
  44
  45     INTERNALS
  46
  47     HISTORY
  48         27-11-96    digulla automatically created from
  49                             layers_lib.fd and clib/layers_protos.h
  50
  51 *****************************************************************************/
  52 {
  53     AROS_LIBFUNC_INIT
  54     AROS_LIBBASE_EXT_DECL(struct LayersBase *,LayersBase)
  55
  56     struct Layer_Info *li;
  57
  58     D(bug("NewLayerInfo(void)\n"));
  59
  60     if(!(li = (struct Layer_Info *)AllocMem(sizeof(struct Layer_Info), MEMF_PUBLIC)))
  61         return NULL;
  62
  63     InitLayers(li);
  64
  65     /* get memory for LayerInfo_extra structure */
  66     if(!_AllocExtLayerInfo(li, LayersBase))
  67     {
  68       FreeMem(li, sizeof(struct Layer_Info));
  69       return NULL;
  70     }
  71
  72     li->Flags |= NEWLAYERINFO_CALLED;
  73
  74     return li;
  75
  76     AROS_LIBFUNC_EXIT
  77 } /* NewLayerInfo */