home *** CD-ROM | disk | FTP | other *** search
/ Garbo / Garbo.cdr / mac / source / luschsrc.sit / help.c < prev    next >
Text File  |  1990-05-23  |  616b  |  31 lines
  1. /********************************************************************************
  2.  *    help.c
  3.  *
  4.  *    Online Help Package
  5.  *
  6.  *    Written by Paco Xander Nathan
  7.  *    ⌐1990, Motorola Inc.  Public domain source code.
  8.  ********************************************************************************/
  9.  
  10. #include "applic.h"
  11. #include "help.h"
  12.  
  13.  
  14. /* Glue routine to access the "Help Compiler" code, text and dialog resources
  15.  */
  16. void
  17. HelpAppl ()
  18. {
  19.     Handle helpHdl;
  20.     ProcPtr helpProc;
  21.     
  22.     if (helpHdl = GetResource('CODE', 2000)) {
  23.         HLock(helpHdl);
  24.         helpProc = (ProcPtr) *helpHdl;
  25.  
  26.         (*helpProc)();
  27.  
  28.         ReleaseResource(helpHdl);
  29.     }
  30. }
  31.