mirror of
https://github.com/deadw00d/AROS.git
synced 2026-01-12 16:58:30 +00:00
f93b20f0e6
git-svn-id: https://svn.aros.org/svn/aros/trunk/AROS@6132 fb15a70f-31f2-0310-bbcc-cdcc74a49acc
45 lines
1.0 KiB
C
45 lines
1.0 KiB
C
/*
|
|
(C) 1995-96 AROS - The Amiga Research OS
|
|
$Id$
|
|
|
|
Desc: Init of workbench.library
|
|
Lang: english
|
|
*/
|
|
|
|
#define AROS_ALMOST_COMPATIBLE
|
|
#include "workbench_intern.h"
|
|
#include "libdefs.h"
|
|
|
|
#ifdef SysBase
|
|
# undef SysBase
|
|
#endif
|
|
#ifdef ExecBase
|
|
# undef ExecBase
|
|
#endif
|
|
|
|
/* Customize libheader.c */
|
|
#define LC_SYSBASE_FIELD(lib) (((struct LIBBASETYPEPTR)(lib))->wb_SysBase)
|
|
#define LC_SEGLIST_FIELD(lib) (((struct LIBBASETYPEPTR)(lib))->wb_SegList)
|
|
#define LC_RESIDENTNAME Workbench_resident
|
|
#define LC_RESIDENTFLAGS RTF_AUTOINIT|RTF_COLDSTART
|
|
#define LC_RESIDENTPRI -120
|
|
#define LC_LIBBASESIZE sizeof(struct LIBBASETYPE)
|
|
#define LC_LIBHEADERTYPEPTR struct LIBBASETYPEPTR
|
|
#define LC_LIB_FIELD(lib) (((struct LIBBASETYPEPTR)(lib))->LibNode)
|
|
|
|
#define LC_NO_OPENLIB
|
|
#define LC_NO_CLOSELIB
|
|
#define LC_NO_EXPUNGELIB
|
|
#define LC_STATIC_INITLIB
|
|
|
|
#include <libcore/libheader.c>
|
|
|
|
struct ExecBase * SysBase; /* global variable */
|
|
|
|
ULONG SAVEDS LC_BUILDNAME(L_InitLib) (LC_LIBHEADERTYPEPTR lh)
|
|
{
|
|
SysBase = lh->wb_SysBase;
|
|
|
|
return TRUE;
|
|
} /* L_InitLib */
|