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 - metrics - download

⟦aa8bb32a8⟧ TextFile

    Length: 292 (0x124)
    Types: TextFile
    Notes: UNIX file
    Names: »gets.c«

Derivation

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

TextFile

/*
 * Standard I/O Library
 * Get string from standard input
 * deleting trailing '\n'
 */

#include <stdio.h>

char *
gets(is)
register char	*is;
{
	register char	*s = is;
	register int	c;

	while ((c=getchar())!=EOF && c!='\n')
		*s++ = c;
	*s = 0;
	return (c==EOF && s==is ? NULL : is);
}