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

⟦e2a1d9cf2⟧ TextFile

    Length: 227 (0xe3)
    Types: TextFile
    Notes: UNIX file
    Names: »freopen.c«

Derivation

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

TextFile

/*
 * Standard I/O Library
 * Reopen file given structure ptr
 */

#include <stdio.h>

FILE *
freopen(name, type, fp)
char	*name, *type;
FILE	*fp;
{
	extern	FILE	*_fopen();

	fclose(fp);
	return (_fopen(name, type, fp, -1));
}