|
|
1.1 root 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: * @(#)fdate_.c 5.1 6/7/85
7: */
8:
9: /*
10: * Return date and time in an ASCII string.
11: *
12: * calling sequence:
13: * character*24 string
14: * call fdate(string)
15: * where:
16: * the 24 character string will be filled with the date & time in
17: * ascii form as described under ctime(3).
18: * No 'newline' or NULL will be included.
19: */
20:
21: fdate_(s, strlen)
22: char *s; long strlen;
23: {
24: char *ctime(), *c;
25: long time(), t;
26:
27: t = time(0);
28: c = ctime(&t);
29: c[24] = '\0';
30: b_char(c, s, strlen);
31: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.