home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 5 / DATAFILE_PDCD5.iso / utilities / a / armbob / !ArmBob / progs / h / chain < prev    next >
Text File  |  1994-06-06  |  286b  |  16 lines
  1. /* Chain another task - command given in s.          */
  2. /* Not for use in wimp programs.    GCW  02/03/94    */
  3. chain(s)
  4. {
  5.  local r, m;
  6.  (r = newvector(8))[0] = s;
  7.  in (m = newstring(4)) put { 0;}
  8.  wimp_init(310,"Chain",m);
  9.  swi("Wimp_StartTask",r);
  10.  wimp_closedown();
  11.  quit("");
  12. }
  13.  
  14.  
  15.  
  16.