2.9BSD/usr/src/lib/libU77/fdate_.c
/*
char id_fdate[] = "@(#)fdate_.c 1.1";
*
* Return date and time in an ASCII string.
*
* calling sequence:
* character*24 string
* call fdate(string)
* where:
* the 24 character string will be filled with the date & time in
* ascii form as described under ctime(3).
* No 'newline' or NULL will be included.
*/
#include "../libI77/fiodefs.h"
#include <sys/types.h>
fdate_(s, strlen)
char *s; ftnlen strlen;
{
char *ctime(), *c;
time_t time(), t;
t = time((time_t) 0);
c = ctime(&t);
c[24] = '\0';
b_char(c, s, strlen);
}