Return to pb_tput.c CVS log

Up to [CSRG BSD Unix] / 42BSD / ingres / source / ctlmod

Annotation of 42BSD/ingres/source/ctlmod/pb_tput.c, revision 1.1

1.1     ! root        1: # include      "ctlmod.h"
        !             2: # include      "pipes.h"
        !             3: # include      <sccs.h>
        !             4: 
        !             5: SCCSID(@(#)pb_tput.c   7.1     2/5/81)
        !             6: 
        !             7: /*
        !             8: **  PB_TPUT -- tagged put
        !             9: **
        !            10: **     Puts the symbol out to the pipe with the tag.
        !            11: **
        !            12: **     Parameters:
        !            13: **             tag -- the type of this symbol.
        !            14: **             dp -- the pointer to the data.
        !            15: **             len -- the length of the data.
        !            16: **             ppb -- the pipe buffer to write it on.
        !            17: **
        !            18: **     Returns:
        !            19: **             none
        !            20: **
        !            21: **     Side Effects:
        !            22: **             none
        !            23: **
        !            24: **     Trace Flags:
        !            25: **             none
        !            26: */
        !            27: 
        !            28: pb_tput(tag, dp, len, ppb)
        !            29: int            tag;
        !            30: char           *dp;
        !            31: int            len;
        !            32: register pb_t  *ppb;
        !            33: {
        !            34:        auto char       xt;
        !            35:        auto short      xlen;
        !            36: 
        !            37:        xt = tag;
        !            38:        pb_put(&xt, 1, ppb);
        !            39:        xlen = len;
        !            40:        pb_put((char *) &xlen, 2, ppb);
        !            41:        pb_put(dp, len, ppb);
        !            42: }

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