Return to newseg.c CVS log

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

Annotation of coherent/b/bin/c/common/newseg.c, revision 1.1

1.1     ! root        1: /*
        !             2:  * Common routines used by the
        !             3:  * C compiler.
        !             4:  * Switch segments.
        !             5:  */
        !             6: #ifdef vax
        !             7: #include       "INC$LIB:ops.h"
        !             8: #else
        !             9: #include       "ops.h"
        !            10: #endif
        !            11: 
        !            12: int    oldseg  = -1;
        !            13: 
        !            14: /*
        !            15:  * Perform a segment switch.
        !            16:  * The driver of each phase sets "oldseg" to an illegal value (-1).
        !            17:  */
        !            18: newseg(nseg) register int nseg;
        !            19: {
        !            20:        register int oseg;
        !            21: 
        !            22:        if (oldseg == nseg)
        !            23:                return(nseg);
        !            24:        oseg = oldseg;
        !            25:        oldseg = nseg;
        !            26:        bput(ENTER);
        !            27:        bput(nseg);
        !            28:        return (oseg == -1 ? nseg : oseg);
        !            29: }

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