Return to unbget.c CVS log

Up to [MW Coherent from dump] / coherent / d / bin / cc / c / common

Annotation of coherent/d/bin/cc/c/common/unbget.c, revision 1.1

1.1     ! root        1: /*
        !             2:  * Standard stream library for the
        !             3:  * C compiler and other compilers that use
        !             4:  * C compiler factilities.
        !             5:  * Unget a byte.
        !             6:  */
        !             7: #include <stdio.h>
        !             8: #ifdef   vax
        !             9: #include "INC$LIB:mch.h"
        !            10: #include "INC$LIB:stream.h"
        !            11: #else
        !            12: #include "mch.h"
        !            13: #include "stream.h"
        !            14: #endif
        !            15: 
        !            16: extern FILE    *ifp;
        !            17: 
        !            18: unbget(b)
        !            19: {
        !            20: #if    TEMPBUF
        !            21:        if (ifp == NULL) {
        !            22:                if (inbuf == inbufp)
        !            23:                        return(EOF);
        !            24:                *--inbufp = b;
        !            25:                return(b);
        !            26:        }
        !            27: #endif
        !            28:        ungetc(b, ifp);
        !            29: }

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