home *** CD-ROM | disk | FTP | other *** search
- /*
- (C) 1995, 96 AROS - The Amiga Replacement OS
- $Id$
- $Log$
- Desc:
- Lang: english
- */
- #include "exec_intern.h"
- #include <aros/libcall.h>
-
- /*****************************************************************************
-
- NAME */
- #include <clib/exec_protos.h>
-
- __AROS_LH1(void, AddLibrary,
-
- /* SYNOPSIS */
- __AROS_LA(struct Library *, library,A1),
-
- /* LOCATION */
- struct ExecBase *, SysBase, 66, Exec)
-
- /* FUNCTION
- Adds a given library to the system's library list after checksumming
- the library vectors. This function is not for general use but
- (of course) for building shared librarys that don't use exec's
- MakeLibrary() mechanism.
-
- INPUTS
- library - Pointer to a ready for use library structure.
-
- RESULT
-
- NOTES
-
- EXAMPLE
-
- BUGS
-
- SEE ALSO
- RemLibrary(), MakeLibrary(), MakeFunctions(), InitStruct(), SumLibrary().
-
- INTERNALS
-
- HISTORY
-
- ******************************************************************************/
- {
- __AROS_FUNC_INIT
-
- /* Just in case the user forgot them */
- library->lib_Node.ln_Type=NT_LIBRARY;
- library->lib_Flags|=LIBF_CHANGED;
-
- /* Build checksum for library vectors */
- SumLibrary(library);
-
- /* Arbitrate for the library list */
- Forbid();
-
- /* And add the library */
- Enqueue(&SysBase->LibList,&library->lib_Node);
-
- /* All done. */
- Permit();
- __AROS_FUNC_EXIT
- } /* AddLibrary */
-
-