xref: /csrg-svn/usr.bin/f77/libU77/sleep_.c (revision 2540)
1*2540Sdlw /*
2*2540Sdlw char id_sleep[] = "@(#)sleep_.c	1.1";
3*2540Sdlw  *
4*2540Sdlw  * sleep for awhile
5*2540Sdlw  *
6*2540Sdlw  * calling sequence:
7*2540Sdlw  *	call sleep(seconds)
8*2540Sdlw  * where:
9*2540Sdlw  *	seconds is an integer number of seconds to sleep (see sleep(3))
10*2540Sdlw  */
11*2540Sdlw 
12*2540Sdlw sleep_(sec)
13*2540Sdlw long *sec;
14*2540Sdlw {
15*2540Sdlw 	sleep((unsigned int)*sec);
16*2540Sdlw }
17