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

##### Functions

    nullsem           X

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

#### Defined functions

nullsem defined in line 34; used 10 times

- in /usr/src/ucb/pascal/pi/yycosts.c line 172(2)
- in /usr/src/ucb/pascal/pi/yypanic.c line 90, 159
- in /usr/src/ucb/pascal/pi/yyprint.c line 40
- in /usr/src/ucb/pascal/pi/yyrecover.c line 270, 290, 368, 483, 724

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