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

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.