Annotation of 42BSD/ingres/source/equel/yyerror.c, revision 1.1.1.1

1.1       root        1: # include      <stdio.h>
                      2: # include      "constants.h"
                      3: # include      "globals.h"
                      4: # include      "y.tab.h"
                      5: # include      <sccs.h>
                      6: 
                      7: SCCSID(@(#)yyerror.c   7.3     2/8/83)
                      8: 
                      9: extern int     Exit_val;               /* value to exit with, incremented if error found */
                     10: 
                     11: 
                     12: /*
                     13: **  YYERROR -- Yacc error reporting routine.
                     14: **     Yyerror reports on syntax errors encountered by 
                     15: **     the yacc parser, and increments the Exit_val variable. 
                     16: **
                     17: **     Parameters:
                     18: **             s -- a string explaining the error
                     19: **
                     20: **     Returns:
                     21: **             none
                     22: */
                     23: 
                     24: 
                     25: yyerror(s)
                     26: char   *s;
                     27: {
                     28: 
                     29:        printf("\"%s\", line %d: ", Input_file_name, yyline);
                     30:        if (yychar == 0)
                     31:                printf("EOF = ");
                     32:        if (yylval.u_dn)
                     33:                printf("\"%s\" ", yylval.u_dn->d_elm);
                     34:        printf("%s\n", s);
                     35:        Exit_val++;
                     36: }
                     37: /*
                     38: **  YYSEMERR -- scanner error reporter
                     39: **             Also increments the Exit_val variable.
                     40: **     Parameters:
                     41: **             s -- string explaining the error
                     42: **             i -- if !0 a string which caused the error
                     43: **
                     44: **     Returns:
                     45: **             none
                     46: **
                     47: **     Called By:
                     48: **             lexical analysis routines -- if called from somewhere else,
                     49: **                     the line number is likely to be wrong.
                     50: */
                     51: 
                     52: 
                     53: yysemerr(s, i)
                     54: char           *s;
                     55: char           *i;
                     56: {
                     57:        char    *str;
                     58: 
                     59:        printf("\"%s\", line %d: ", Input_file_name, yyline);
                     60:        if (i)
                     61:                printf("\"%s\": ", i);
                     62:        printf("%s\n", s);
                     63:        Exit_val++;
                     64: }
                     65: /*
                     66: **  YYSERROR -- Semantic error reportin routine
                     67: **     reports on an error on an entry in the symbol space,
                     68: **     using the line number built into the entry. Exit_val gets
                     69: **     incremented.
                     70: **
                     71: **     Parameters:
                     72: **             s -- a string explaining the error
                     73: **             d -- a symbol space node
                     74: **
                     75: **     Returns:
                     76: **             none
                     77: **
                     78: **     Called By:
                     79: **             semantic productions
                     80: */
                     81: 
                     82: 
                     83: yyserror(s, d)
                     84: char                   *s;
                     85: struct disp_node       *d;
                     86: {
                     87:        printf("\"%s\", line %d: ", Input_file_name, d->d_line);
                     88:        printf("\"%s\": %s\n", d->d_elm, s);
                     89:        Exit_val++;
                     90: }

unix.superglobalmegacorp.com

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