File:  [MW Coherent from dump] / coherent / b / bin / c / common / unbget.c
Revision 1.1.1.1 (vendor branch): download - view: text, annotated - select for diffs
Wed May 29 04:56:37 2019 UTC (7 years, 2 months ago) by root
Branches: MarkWilliams, MAIN
CVS tags: relic, HEAD
coherent

/*
 * Standard stream library for the
 * C compiler and other compilers that use
 * C compiler factilities.
 * Unget a byte.
 */
#include <stdio.h>
#ifdef   vax
#include "INC$LIB:mch.h"
#include "INC$LIB:stream.h"
#else
#include "mch.h"
#include "stream.h"
#endif

extern	FILE	*ifp;

unbget(b)
{
#if	TEMPBUF
	if (ifp == NULL) {
		if (inbuf == inbufp)
			return(EOF);
		*--inbufp = b;
		return(b);
	}
#endif
	ungetc(b, ifp);
}

unix.superglobalmegacorp.com

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