projects
/
unix-history
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
tags
|
clone url
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
blame
|
history
|
raw
|
HEAD
date and time created 81/02/19 18:12:05 by dlw
[unix-history]
/
usr
/
src
/
usr.bin
/
f77
/
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.
*/
fdate_
(
s
,
strlen
)
char
*
s
;
long
strlen
;
{
char
*
ctime
(), *
c
;
long
time
(),
t
;
t
=
time
(
0
);
c
=
ctime
(&
t
);
c
[
24
] =
'\0'
;
b_char
(
c
,
s
,
strlen
);
}