Return to unixvar.c CVS log

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

Annotation of coherent/b/bin/as/unixvar.c, revision 1.1

1.1     ! root        1: /*
        !             2:  * UNIX K&R version of error message functions.
        !             3:  */
        !             4: #include <varargs.h>
        !             5: 
        !             6: /*
        !             7:  * Put message and die.
        !             8:  */
        !             9: /*VARARGS*/
        !            10: void
        !            11: fatal(va_alist)
        !            12: va_dcl
        !            13: {
        !            14:        va_list args;
        !            15:        char *fmt;
        !            16:                
        !            17:        if(NULL != inpc)
        !            18:                printf("%d: %s: ", inpc->lineNo, inpc->name);   /* NODOC */
        !            19: 
        !            20:        va_start(args);
        !            21:        fmt = va_arg(args, char *);
        !            22:        vprintf(fmt, args);
        !            23:        va_end(args);
        !            24: 
        !            25:        putchar('\n');
        !            26:        exit(1);
        !            27: }
        !            28: 
        !            29: /*
        !            30:  * Put message to listing.
        !            31:  */
        !            32: /*VARARGS*/
        !            33: void
        !            34: yyerror(va_alist)      /* NODOC */
        !            35: va_dcl
        !            36: {
        !            37:        va_list args;
        !            38:        char *fmt;
        !            39:                
        !            40:        if(2 != pass)
        !            41:                return;
        !            42:        sTitle();
        !            43:        if(NULL != inpc)
        !            44:                printf("%d: %s: ", inpc->lineNo, inpc->name);
        !            45: 
        !            46:        va_start(args);
        !            47:        fmt = va_arg(args, char *);
        !            48:        vprintf(fmt, args);
        !            49:        va_end(args);
        !            50: 
        !            51:        putchar('\n');
        !            52: }

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