# 2.11BSD#431 - /usr/src/ucb/pascal/pxp/yyseman.c

##### Functions

    nullsem           X

       1: #
       2: /*
       3:  * pi - Pascal interpreter code translator
       4:  *
       5:  * Charles Haley, Bill Joy UCB
       6:  * Version 1.2 January 1979
       7:  *
       8:  *
       9:  * pxp - Pascal execution profiler
      10:  *
      11:  * Bill Joy UCB
      12:  * Version 1.2 January 1979
      13:  */
      14:
      15: #include "0.h"
      16: #include "yy.h"
      17:
      18: /*
      19:  * Assign semantics to a generated token
      20:  *
      21:  * Most terminals have a semantic value the current
      22:  * input line.  If they are generated they are flagged
      23:  * by having this number negated.
      24:  *
      25:  * The terminals which have true semantics such
      26:  * as identifiers and strings are instead given
      27:  * semantic value NIL here - we do not attempt
      28:  * to do repair, e.g. by giving generated integers
      29:  * the value 1, etc.
      30:  */
      31: nullsem(ch)
      32:     int ch;
      33: {
      34:
      35:     switch (ch) {
      36:         case YID:
      37:         case YINT:
      38:         case YNUMB:
      39:         case YBINT:
      40:         case YSTRING:
      41:             return (NIL);
      42:         default:
      43:             return (-yyeline);
      44:     }
      45: }

#### Defined functions

nullsem defined in line 31; used 10 times

- in /usr/src/ucb/pascal/pxp/yycosts.c line 170(2)
- in /usr/src/ucb/pascal/pxp/yypanic.c line 87, 156
- in /usr/src/ucb/pascal/pxp/yyprint.c line 34
- in /usr/src/ucb/pascal/pxp/yyrecover.c line 265, 285, 361, 471, 691

Last modified: 1981-07-10 Generated: 2016-12-26 | Generated by src2html V0.67 page hit count: 409 |