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