Return to pb_tput.c CVS log

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

Annotation of 43BSD/ingres/source/ctlmod/pb_tput.c, revision 1.1.1.1

1.1       root        1: # include      "ctlmod.h"
                      2: # include      "pipes.h"
                      3: # include      <sccs.h>
                      4: 
                      5: SCCSID(@(#)pb_tput.c   8.1     12/31/84)
                      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.