2.9BSD - /usr/src/lib/libF77/alarm_.c

   1: /* Fortran alarm PLWard 3/20/80 */
   2: long alarm_(secs,remaining)
   3:     int *secs,*remaining;
   4: {
   5:     unsigned seconds;
   6:     seconds = *secs;
   7:     *remaining = alarm(seconds);
   8: }

Defined functions