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

⟦b5456ab87⟧ TextFile

    Length: 270 (0x10e)
    Types: TextFile
    Notes: UNIX file
    Names: »erwrt.c«

Derivation

└─⟦f27320a65⟧ Bits:30001972 Commodore 900 hard disk image with partial source code
    └─⟦2d53db1df⟧ UNIX V7 Filesystem
        └─ ⟦this⟧ »frankh/lib/erwrt.c«

TextFile

/*
 *
 */

#include	<flib.h>

int
erwrt( file, dev, err)
char 	*dev;
int	err;
FILE	*file;
{
	char	*num;
	num = "            ";

	stwrite(file, "Device:\t");
	stwrite(file, dev);
	stwrite(file, "\tDisk errors:  ");
	stwrite(file, itoa(err, num));
	stwrite(file, "\n");
}