Return to traceonoff.c CVS log

Up to [Research Unix] / researchv10no / ncurses / screen

researchv10 Norman

#include "curses.ext"
/*	@(#) traceonoff.c: 1.1 10/15/83	(1.13	8/20/82)	*/

traceon()
{
#ifdef DEBUG
	if (outf == NULL) {
		outf = fopen("trace", "a");
		if (outf == NULL) {
			perror("trace");
			exit(-1);
		}
		fprintf(outf, "trace turned on\n");
	}
#endif
}

traceoff()
{
#ifdef DEBUG
	if (outf != NULL) {
		fprintf(outf, "trace turned off\n");
		fclose(outf);
		outf = NULL;
	}
#endif
}

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.