home *** CD-ROM | disk | FTP | other *** search
- void __regargs __autoopenfail(char *);
-
- #include <proto/exec.h>
- struct Library *ProgArgsBase ;
- static void *libbase;
- extern long __progargsver;
- extern long __progargsreq;
-
- void __stdargs _STI_openprogargs(void)
- {
- ProgArgsBase = libbase =
- (void *)OpenLibrary("progargs.library", __progargsver);
-
- if(ProgArgsBase == NULL)
- ProgArgsBase = libbase =
- (void *)OpenLibrary("PROGDIR:progargs.library", __progargsver);
-
- if(ProgArgsBase == NULL)
- ProgArgsBase = libbase =
- (void *)OpenLibrary("PROGDIR:libs/progargs.library", __progargsver);
-
- if (ProgArgsBase == NULL && __progargsreq)
- __autoopenfail("progargs.library");
- }
-
- void __stdargs _STD_closeprogargs(void)
- {
- if (libbase)
- {
- CloseLibrary((struct Library *)libbase);
- libbase = ProgArgsBase = NULL;
- }
- }
-