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

⟦c71ec21d4⟧ TextFile

    Length: 231 (0xe7)
    Types: TextFile
    Notes: UNIX file
    Names: »putw.c«

Derivation

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

TextFile

/*
 * Standard I/O Library
 * Put word (int) to file
 * Routine instead of macro for the cheap and lazy
 */

#include <stdio.h>
#undef	putw

int
putw(w, fp)
int	w;
register FILE	*fp;
{
	putc(w>>8, fp);
	putc(w, fp);
	return (w);
}