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

⟦623d3e85e⟧ TextFile

    Length: 330 (0x14a)
    Types: TextFile
    Notes: UNIX file
    Names: »owr.c«

Derivation

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

TextFile

#include	<stdio.h>

main()
{
	register int i,fd, br;
	char buf[512];
	buf[0] = 65;

	fd = open("/dev/rtest", 1);

	printf("fd = %d\n", fd);

	br = write(fd, buf, 512);
	printf("bw = %d\n", br);
	buf[0] = 66;
	br = write(fd, buf, 512);
	printf("bw = %d\n", br);
	buf[0] = 67;
	br = write(fd, buf, 512);
	printf("bw = %d\n", br);
}