Return to print.c CVS log

Up to [Research Unix] / researchv9 / jtools / src / v9compat

Annotation of researchv9/jtools/src/v9compat/print.c, revision 1.1

1.1     ! root        1: #include <varargs.h>
        !             2: 
        !             3: #define        SIZE    1024
        !             4: extern int     printcol;
        !             5: 
        !             6: char   *doprint();
        !             7: 
        !             8: print(va_alist)
        !             9: va_dcl
        !            10: {
        !            11:        va_list args;
        !            12:        char *fmt;
        !            13:        char buf[SIZE], *out;
        !            14: 
        !            15:        va_start(args);
        !            16:        fmt = va_arg(args, char *);
        !            17:        va_end(args);
        !            18:        out = doprint(buf, fmt, (char *)args);
        !            19:        return write(1, buf, (int)(out-buf));
        !            20: }
        !            21: 
        !            22: fprint(va_alist)
        !            23: va_dcl
        !            24: {
        !            25:        va_list args;
        !            26:        char *fmt;
        !            27:        int f;
        !            28:        char buf[SIZE], *out;
        !            29: 
        !            30:        va_start(args);
        !            31:        f = va_arg(args, int);
        !            32:        fmt = va_arg(args, char *);
        !            33:        va_end(args);
        !            34:        out = doprint(buf, fmt, (char *)args);
        !            35:        return write(f, buf, (int)(out-buf));
        !            36: }
        !            37: 
        !            38: sprint(va_alist)
        !            39: va_dcl
        !            40: {
        !            41:        va_list args;
        !            42:        char *buf;
        !            43:        char *fmt;
        !            44:        char *out;
        !            45:        int scol;
        !            46: 
        !            47:        va_start(args);
        !            48:        buf = va_arg(args, char *);
        !            49:        fmt = va_arg(args, char *);
        !            50:        va_end(args);
        !            51:        scol = printcol;
        !            52:        out = doprint(buf, fmt, (char *)args);
        !            53:        printcol = scol;
        !            54:        return out-buf;
        !            55: }

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