static char SccsId
[] = "@(#)arpadate.c 2.1 %G%";
** ARPADATE -- Create date in ARPANET format
** pointer to an ARPANET date field
** date is stored in a local buffer -- subsequent
register char *ud
; /* the unix date */
extern struct tm
*localtime();
ud
[3] = ud
[7] = ud
[10] = ud
[19] = ud
[24] = '\0';
strcat(b
, &ud
[4]); /* Sep */
strcat(b
, &ud
[20]); /* 1979 */
strcat(b
, &ud
[11]); /* 01:03:52 */
if (localtime(&t
)->tm_isdst
)