Return to getnxtpage.c CVS log

Up to [Research Unix] / researchv9 / jerq / sgs / inc / sdpsrc / lo

Annotation of researchv9/jerq/sgs/inc/sdpsrc/lo/getnxtpage.c, revision 1.1

1.1     ! root        1: /*
        !             2:  * static char ID_gnxpagc[] = "@(#) getnxtpage.c: 1.1 1/7/82";
        !             3:  */
        !             4: 
        !             5: long getnxtpage(spacenbr)
        !             6: int spacenbr;
        !             7: {
        !             8:        register long pagenbr;
        !             9: 
        !            10:        pagenbr = global_frames[spacenbr].maxpage;
        !            11: 
        !            12:        if( ++pagenbr == SPSIZE )
        !            13:                return( (long) fatal("SDP page limit reached") );
        !            14: 
        !            15:        global_frames[spacenbr].maxpage = pagenbr;
        !            16: 
        !            17:        return( pagenbr );
        !            18: }

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