home *** CD-ROM | disk | FTP | other *** search
/ RISC DISC 1 / RISC_DISC_1.iso / pd_share / code / oslib / Examples / p3-073 < prev    next >
Encoding:
Text File  |  1994-03-24  |  435 b   |  23 lines
  1. #include <kernel.h>
  2.  
  3. #include "os.h"
  4. #include "wimp.h"
  5.  
  6. extern wimp_t Task_Handle;
  7.  
  8. extern char My_Command [];
  9.  
  10. /*This is a CMHG-style termination entry point.*/
  11.  
  12. _kernel_oserror *main_terminate (bool fatal, int instance, void *workspace)
  13.  
  14. {  os_error *error = NULL, *error1;
  15.  
  16.    if (Task_Handle != 0)
  17.    {  error1 = xwimp_close_down (Task_Handle);
  18.       if (error == NULL) error = error1;
  19.    }
  20.  
  21.    return (_kernel_oserror *) error;
  22. }
  23.