home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 13 / 13.iso / s / s001 / 1.ddi / TS / SRC / TSRRIP.C < prev    next >
Encoding:
C/C++ Source or Header  |  1987-08-22  |  501 b   |  22 lines
  1.                 /******************************************
  2.            *           TS_RRIP.C             *
  3.                * Copyright TimeSlice, Inc. 1985, 86, 87. *
  4.                ******************************************/
  5.  
  6.  
  7. #include <ts.h>
  8.  
  9.  
  10. /***
  11. * TS_RRIP()
  12. * Check if curproc ready to R.I.P., and if it should, do so.
  13. ***/
  14. void ts_rrip() {
  15.  
  16.   if( (curproc->status & KILL) && (!curproc->crlev) && (!curproc->chlev) ) {
  17.     curproc->status &= ~KILL;    /*do this to avoid infinite recursion */
  18.     endself();
  19.   }
  20. }
  21.  
  22.