compiler/clib/__arosc_init.c

   1 /*
   2     Copyright © 2012, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: arosc.library - init code
   6 */
   7 #include <proto/exec.h>
   8
   9 #include <aros/symbolsets.h>
  10
  11 #include "__arosc_privdata.h"
  12
  13 static int __arosc_open(struct aroscbase *aroscbase)
  14 {
  15     aroscbase->acb_internalpool = CreatePool(MEMF_PUBLIC, 256, 256);
  16
  17     return aroscbase->acb_internalpool != NULL;
  18 }
  19
  20 static void __arosc_close(struct aroscbase *aroscbase)
  21 {
  22     DeletePool(aroscbase->acb_internalpool);
  23 }
  24
  25 ADD2OPENLIB(__arosc_open, -50);
  26 ADD2CLOSELIB(__arosc_close, -50);