arosc.library: Properly rename __GM_GetBase() to __aros_getbase()
[AROS.git] / compiler / clib / __arosc_userdata.c
blobf62c1d84aba6a4141bcc775ef893ca6a2c1fed9d
1 #include "__arosc_privdata.h"
3 #include <proto/exec.h>
4 #include <proto/dos.h>
5 #include <dos/dosextens.h>
6 #include <sys/arosc.h>
7 #include <aros/symbolsets.h>
8 #include <stdlib.h>
10 #include "__ctype.h"
12 #include <aros/debug.h>
14 /* Provide local aroscbase for the static version of arosc */
15 #ifdef AROSC_STATIC
16 static struct aroscbase __aroscbase;
17 static struct aroscbase *aroscbase;
18 #endif
20 struct arosc_userdata *__get_arosc_userdata(void)
22 #ifdef AROSC_SHARED
23 struct aroscbase *aroscbase = __aros_getbase();
24 #endif
25 #ifdef AROSC_STATIC
26 static int __init = 0;
28 if(!__init)
30 __init = 1;
32 aroscbase = &__aroscbase;
34 #endif
35 #if !defined(AROSC_SHARED) && !defined(AROSC_STATIC)
36 extern struct aroscbase *aroscbase;
37 #endif
39 return &(aroscbase->acb_acud);