2.9BSD/usr/src/lib/libF77/sleep_.c
/* Fortran sleep 3/20/80 */ sleep_(secs) int *secs; { sleep((unsigned) *secs); }