home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD1.iso / EGS / egssys71.lha / EGSClusterInc.lha / GBSets.mod < prev    next >
Encoding:
Text File  |  1994-12-13  |  594 b   |  27 lines
  1. |##########|
  2. |#MAGIC   #|DBGFFBKP
  3. |#PROJECT #|""
  4. |#PATHS   #|"EGSProject"
  5. |#FLAGS   #|-x---x--x-----x-----------------
  6. |#USERSW  #|--------------------------------
  7. |#USERMASK#|--------------------------------
  8. |#SWITCHES#|x--x-x----------
  9. |##########|
  10. (* $V- $R- $S- $N- *)
  11. IMPLEMENTATION MODULE GBSets;
  12.  
  13. FROM Exec       IMPORT OpenLibrary,CloseLibrary;
  14. FROM Exceptions IMPORT CouldNotOpenLibrary;
  15.  
  16.  
  17. BEGIN
  18.   GBSetBase:=OpenLibrary("egb/gbsets.library",0);
  19.   ASSERT(GBSetBase#NIL,CouldNotOpenLibrary);
  20. CLOSE
  21.   IF GBSetBase#NIL THEN
  22.     CloseLibrary(GBSetBase);GBSetBase:=NIL
  23.   END;
  24. END GBSets.
  25.  
  26.  
  27.