home *** CD-ROM | disk | FTP | other *** search
/ RISC DISC 1 / RISC_DISC_1.iso / pd_share / code / oslib / Examples / p3-072 < prev    next >
Encoding:
Text File  |  1994-03-24  |  441 b   |  25 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 service entry point.*/
  11.  
  12. void main_service (int service, _kernel_swi_regs *regs, void *workspace)
  13.  
  14. {  switch (service)
  15.    {  case Service_Reset:
  16.          Task_Handle = 0;
  17.       break;
  18.  
  19.       case Service_StartedWimp:
  20.          if (Task_Handle == (wimp_t) -1)
  21.             Task_Handle = 0;
  22.       break;
  23.    }
  24. }
  25.