DataMuseum.dk

Presents historical artifacts from the history of:

Commodore CBM-900

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Commodore CBM-900

Excavated with: AutoArchaeologist - Free & Open Source Software. 

top - download

⟦178f004a2⟧ TextFile

    Length: 253 (0xfd)
    Types: TextFile
    Notes: UNIX file
    Names: »time.c«

Derivation

└─⟦f27320a65⟧ Bits:30001972 Commodore 900 hard disk image with partial source code
    └─⟦f4b8d8c84⟧ UNIX V7 Filesystem
        └─ ⟦this⟧ »libc/sys/time.c«

TextFile

/*
 * Routine compatible with obsolete time system
 * call (using ftime system call).
 */

#include <timeb.h>
#define	NULL	((char *)0)

time_t
time(tp)
time_t *tp;
{
	struct timeb tb;

	ftime(&tb);
	if (tp != NULL)
		*tp = tb.time;
	return (tb.time);
}