home *** CD-ROM | disk | FTP | other *** search
/ The Fred Fish Collection 1.5 / ffcollection-1-5-1992-11.iso / ff_disks / 200-299 / ff269.lzh / PropGadget / clean2.inc < prev    next >
Text File  |  1989-11-06  |  296b  |  15 lines
  1.  
  2. extern struct IntuitionBase *IntuitionBase;
  3. extern struct GfxBase *GfxBase;
  4.  
  5. void CleanUp(message) 
  6. FAST TEXT *message;
  7. { 
  8.   puts(message);
  9.  
  10.   if (GfxBase !=NULL) CloseLibrary((struct Library *)GfxBase);
  11.   if (IntuitionBase!=NULL) CloseLibrary((struct Library *)IntuitionBase);
  12.   exit(TRUE);
  13. }
  14.  
  15.