compiler/clib/arosc_startup.c

   1 /*
   2     Copyright © 1995-2011, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: autoinit library - arosc.library specific code
   6     Lang: english
   7 */
   8
   9 #include <aros/debug.h>
  10 #include <aros/symbolsets.h>
  11 #include <aros/startup.h>
  12
  13 #include <sys/arosc.h>
  14
  15 static void __arosc_startup(void)
  16 {
  17     struct arosc_userdata *udata = __get_arosc_userdata();
  18
  19     D(bug("[__arosc_startup] Start, base 0x%p, userdata 0x%p\n", aroscbase, udata));
  20
  21     __arosc_program_startup();
  22
  23     D(bug("[__arosc_startup] Library startup called, error %d\n", __startup_error));
  24     udata->acud_startup_error = __startup_error;
  25
  26     if (setjmp(udata->acud_startup_jmp_buf) == 0)
  27     {
  28         D(bug("[__arosc_startup] setjmp() called\n"));
  29         __startup_entries_next();
  30     }
  31     else
  32     {
  33         D(bug("[__arosc_startup] setjmp() return from longjmp\n"));
  34         __startup_error = udata->acud_startup_error;
  35     }
  36
  37     __arosc_program_end();
  38
  39     D(bug("[__arosc_startup] Leave\n"));
  40 }
  41
  42 ADD2SET(__arosc_startup, program_entries, 0);