home *** CD-ROM | disk | FTP | other *** search
/ RISC DISC 1 / RISC_DISC_1.iso / pd_share / code / oslib / Examples / p2-491 < prev    next >
Encoding:
Text File  |  1994-03-24  |  465 b   |  22 lines
  1. #include <kernel.h>
  2.  
  3. #include "filer.h"
  4. #include "wimp.h"
  5.  
  6. extern wimp_t Task_Handle;
  7. extern char My_Command [];
  8.  
  9.    /*This is a CMHG-style service entry point.*/
  10.  
  11. void main_service (int service, _kernel_swi_regs *regs, void *workspace)
  12.  
  13. {  switch (service)
  14.    {  case Service_StartFiler:
  15.          if (Task_Handle == 0)
  16.          {  Task_Handle = (wimp_t) -1;
  17.             regs->r [0] = (int) My_Command;
  18.             regs->r [1] = FALSE;
  19.          }
  20.       break;
  21. }  }
  22.