Return to fdate_.c CVS log

Up to [CSRG BSD Unix] / 42BSD / usr.lib / libU77

Annotation of 42BSD/usr.lib/libU77/fdate_.c, revision 1.1.1.1

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.