xref: /original-bsd/usr.bin/f77/libU77/time_.c (revision a9c19d04)
1 /*
2  * Copyright (c) 1980 Regents of the University of California.
3  * All rights reserved.  The Berkeley software License Agreement
4  * specifies the terms and conditions for redistribution.
5  *
6  *	@(#)time_.c	5.1	06/07/85
7  */
8 
9 /*
10  * return the current time as an integer
11  *
12  * calling sequence:
13  *	integer time
14  *	i = time()
15  * where:
16  *	i will receive the current GMT in seconds.
17  */
18 
19 long time();
20 
21 long time_()
22 {
23 	return(time(0));
24 }
25