home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 4 / DATAFILE_PDCD4.iso / unix / unixlib36d / src / sys / c / alarm next >
Encoding:
Text File  |  1994-03-08  |  564 b   |  38 lines
  1. static char sccs_id[] = "@(#) alarm.c 1.0 " __DATE__ " HJR";
  2.  
  3. /* alarm.c (c) Copyright 1990 H.Rogers */
  4.  
  5. #include <errno.h>
  6. #include <time.h>
  7.  
  8. #include "sys/types.h"
  9. #include "sys/unix.h"
  10. #include "sys/syslib.h"
  11. #include "sys/os.h"
  12.  
  13. time_t
  14. alarm (register time_t t)
  15. {
  16.   int r[10];
  17.   time_t o;
  18.  
  19.   if (o = __u->alarm)
  20.     {
  21.       r[0] = (int) __h_sigalrm;
  22.       r[1] = 0;
  23.       os_swi (0x3d, r);
  24.     }
  25.  
  26.   __u->alarm = t;
  27.  
  28.   if (t > 0)
  29.     {
  30.       r[0] = (int) (t * 100);
  31.       r[1] = (int) __h_sigalrm;
  32.       r[2] = 0;
  33.       os_swi (0x3b, r);
  34.     }
  35.  
  36.   return (o);
  37. }
  38.