y.tab.c

<B>Digital的Unix操作系统VAX 4.2源码</B>

# line 431 "mod2.gram"
{ yyval = IfStmtNode(yypvt[-3],yypvt[-1],yypvt[-0]); } break;
case 95:
# line 436 "mod2.gram"
{ yyval = AddToStmtList(0,0); } break;
case 96:
# line 438 "mod2.gram"
{ yyval = yypvt[-1]; } break;
case 97:
# line 440 "mod2.gram"
{ yyval = AddToStmtList(0,IfStmtNode(yypvt[-3],yypvt[-1],yypvt[-0])); } break;
case 98:
# line 445 "mod2.gram"
{ yyval = AddToStmtList(0,0); } break;
case 99:
# line 447 "mod2.gram"
{ yyval = AddToStmtList(0,0); } break;
case 102:
# line 453 "mod2.gram"
{ yyval = yypvt[-0]; } break;
case 103:
# line 455 "mod2.gram"
{ yyval = yypvt[-1]; } break;
case 104:
# line 460 "mod2.gram"
{ yyval = AddToStmtList(0,yypvt[-0]); } break;
case 105:
# line 462 "mod2.gram"
{ yyval = AddToStmtList(yypvt[-2],yypvt[-0]); } break;
case 106:
# line 467 "mod2.gram"
{ yyval = ProcStmtNode(yypvt[-0],0); } break;
case 107:
# line 469 "mod2.gram"
{ yyval = ProcStmtNode(yypvt[-1],yypvt[-0]); } break;
case 108:
# line 474 "mod2.gram"
{ yyval = AssignStmtNode(yypvt[-2],yypvt[-0]); } break;
case 118:
# line 497 "mod2.gram"
{ yyval = ExitStmtNode(); } break;
case 119:
# line 502 "mod2.gram"
{ yyval = ReturnStmtNode(0); } break;
case 120:
# line 504 "mod2.gram"
{ yyval = ReturnStmtNode(yypvt[-0]); } break;
case 121:
# line 506 "mod2.gram"
{ yyval = 0; } break;
case 122:
# line 511 "mod2.gram"
{ yyval = AddToExprList(0,0); } break;
case 123:
# line 513 "mod2.gram"
{ yyval = yypvt[-1]; } break;
case 124:
# line 518 "mod2.gram"
{ yyval = ConstExprNode(yypvt[-0]); } break;
case 125:
# line 520 "mod2.gram"
{ yyval = ConstExprNode(yypvt[-0]); } break;
case 126:
# line 522 "mod2.gram"
{ yyval = ConstExprNode(yypvt[-0]); } break;
case 127:
# line 524 "mod2.gram"
{ yyval = ConstExprNode(yypvt[-0]); } break;
case 128:
# line 526 "mod2.gram"
{ yyval = ConstExprNode(yypvt[-0]); } break;
case 131:
# line 532 "mod2.gram"
{ yyval = FuncExprNode(yypvt[-1],yypvt[-0]); } break;
case 132:
# line 534 "mod2.gram"
{ yyval = yypvt[-1]; } break;
case 133:
# line 536 "mod2.gram"
{ yyval = UnOpExprNode(NOT,yypvt[-0]); } break;
case 134:
# line 538 "mod2.gram"
{ yyval = UnOpExprNode(PLUS,yypvt[-0]); } break;
case 135:
# line 540 "mod2.gram"
{ yyval = UnOpExprNode(MINUS,yypvt[-0]); } break;
case 137:
# line 547 "mod2.gram"
{ yyval = BinOpExprNode(ASTERISK,yypvt[-2],yypvt[-0]); } break;
case 138:
# line 549 "mod2.gram"
{ yyval = BinOpExprNode(SLASH,yypvt[-2],yypvt[-0]); } break;
case 139:
# line 551 "mod2.gram"
{ yyval = BinOpExprNode(DIV,yypvt[-2],yypvt[-0]); } break;
case 140:
# line 553 "mod2.gram"
{ yyval = BinOpExprNode(MOD,yypvt[-2],yypvt[-0]); } break;
case 141:
# line 555 "mod2.gram"
{ yyval = BinOpExprNode(PLUS,yypvt[-2],yypvt[-0]); } break;
case 142:
# line 557 "mod2.gram"
{ yyval = BinOpExprNode(MINUS,yypvt[-2],yypvt[-0]); } break;
case 143:
# line 559 "mod2.gram"
{ yyval = BinOpExprNode(AND,yypvt[-2],yypvt[-0]); } break;
case 144:
# line 561 "mod2.gram"
{ yyval = BinOpExprNode(AMPERSAND,yypvt[-2],yypvt[-0]); } break;
case 145:
# line 563 "mod2.gram"
{ yyval = BinOpExprNode(OR,yypvt[-2],yypvt[-0]); } break;
case 147:
# line 571 "mod2.gram"
{ yyval = BinOpExprNode(yypvt[-1],yypvt[-2],yypvt[-0]); } break;
case 148:
# line 576 "mod2.gram"
{ yyval = AddToExprList(0,yypvt[-0]); } break;
case 149:
# line 578 "mod2.gram"
{ yyval = AddToExprList(yypvt[-2],yypvt[-0]); } break;
case 150:
# line 583 "mod2.gram"
{ yyval = SubscriptExprNode(SymExprNode(yypvt[-3]),yypvt[-1]); } break;
case 151:
# line 585 "mod2.gram"
{ yyval = SubscriptExprNode(yypvt[-3],yypvt[-1]); } break;
case 152:
# line 587 "mod2.gram"
{ yyval = DerefExprNode(SymExprNode(yypvt[-1])); } break;
case 153:
# line 589 "mod2.gram"
{ yyval = DerefExprNode(yypvt[-1]); } break;
case 154:
# line 591 "mod2.gram"
{ yyval = DotExprNode(yypvt[-2],yypvt[-0]); } break;
case 155:
# line 596 "mod2.gram"
{ yyval = SymExprNode(yypvt[-0]); } break;
case 157:
# line 605 "mod2.gram"
{ DefineVarList(yypvt[-3],yypvt[-1],VAR); } break;
case 158:
# line 607 "mod2.gram"
{ DefineVarList(yypvt[-3],yypvt[-1],ATEXTERNAL); } break;
case 162:
# line 622 "mod2.gram"
{ yyval = 0; } break;
case 164:
# line 626 "mod2.gram"
{ yyval = AppendParamList(yypvt[-2],yypvt[-0]); } break;
case 165:
# line 631 "mod2.gram"
{ yyval = MakeParamList(0,0,yypvt[-0]); } break;
case 166:
# line 633 "mod2.gram"
{ yyval = MakeParamList(VAR,0,yypvt[-0]); } break;
case 167:
# line 638 "mod2.gram"
{ yyval = procTypeNode; } break;
case 168:
# line 640 "mod2.gram"
{ yyval = ProcType(yypvt[-1],0); } break;
case 169:
# line 642 "mod2.gram"
{ yyval = ProcType(yypvt[-3],TypeOf(yypvt[-0])); } break;
case 170:
# line 646 "mod2.gram"
{ yyval = POINTER; } break;
case 171:
# line 648 "mod2.gram"
{ yyval = ATPASCAL; } break;
case 172:
# line 650 "mod2.gram"
{ yyval = ATC; } break;
case 173:
# line 652 "mod2.gram"
{ yyval = ATNONE; } break;
case 174:
# line 654 "mod2.gram"
{ yyval = ATNIL; } break;
case 175:
# line 664 "mod2.gram"
{ yyval = PointerForwardType(yypvt[-0],yypvt[-2]); } break;
case 176:
# line 666 "mod2.gram"
{ yyval = PointerType(yypvt[-0],yypvt[-2]); } break;
case 177:
# line 671 "mod2.gram"
{ yyval = SetType(yypvt[-0]); } break;
case 178:
# line 676 "mod2.gram"
{ yyval = MakeConstSet(yypvt[-0],0); } break;
case 179:
# line 678 "mod2.gram"
{ yyval = MakeConstSet(yypvt[-2],yypvt[-0]); } break;
case 180:
# line 683 "mod2.gram"
{ yyval = AddToConstSetList(0,yypvt[-0]); } break;
case 181:
# line 685 "mod2.gram"
{ yyval = AddToConstSetList(yypvt[-2],yypvt[-0]); } break;
case 182:
# line 690 "mod2.gram"
{ yyval = MakeExprSet(yypvt[-0],0); } break;
case 183:
# line 692 "mod2.gram"
{ yyval = MakeExprSet(yypvt[-2],yypvt[-0]); } break;
case 184:
# line 697 "mod2.gram"
{ yyval = AddToExprSetList(0,yypvt[-0]); } break;
case 185:
# line 699 "mod2.gram"
{ yyval = AddToExprSetList(yypvt[-2],yypvt[-0]); } break;
case 186:
# line 704 "mod2.gram"
{ yyval = 0; } break;
case 187:
# line 706 "mod2.gram"
{ yyval = MakeVariant(yypvt[-2],yypvt[-0]); } break;
case 188:
# line 711 "mod2.gram"
{ yyval = AddToFieldList(0,0); } break;
case 189:
# line 713 "mod2.gram"
{ yyval = MakeFieldList(yypvt[-2],yypvt[-0]); } break;
case 190:
# line 715 "mod2.gram"
{ yyval = MakeVariantField(0,TypeOf(yypvt[-4]),yypvt[-2],yypvt[-1]); } break;
case 191:
# line 717 "mod2.gram"
{ yyval = MakeVariantField(yypvt[-6],TypeOf(yypvt[-4]),yypvt[-2],yypvt[-1]); } break;
case 192:
# line 722 "mod2.gram"
{ yyval = AddToVariantList(0,yypvt[-0]); } break;
case 193:
# line 724 "mod2.gram"
{ yyval = AddToVariantList(yypvt[-2],yypvt[-0]); } break;
case 194:
# line 729 "mod2.gram"
{ yyval = 0; } break;
case 195:
# line 731 "mod2.gram"
{ yyval = MakeVariant(0,yypvt[-0]); } break;
case 197:
# line 738 "mod2.gram"
{ yyval = AppendFieldList(yypvt[-2],yypvt[-0]); } break;
case 198:
# line 743 "mod2.gram"
{ yyval = RecordType(yypvt[-1]); } break;
case 199:
# line 748 "mod2.gram"
{ yyval = ARRAY; } break;
case 200:
# line 750 "mod2.gram"
{ yyval = ATDYNARRAY; } break;
case 201:
# line 752 "mod2.gram"
{ yyval = ATSUBARRAY; } break;
case 202:
# line 757 "mod2.gram"
{ yyval = ArrayType(yypvt[-1],yypvt[-0],ARRAY,0); } break;
case 203:
# line 759 "mod2.gram"
{ yyval = ArrayType(0,TypeOf(yypvt[-0]),yypvt[-2],0); } break;
case 204:
# line 761 "mod2.gram"
{ yyval = ArrayType(0,TypeOf(yypvt[-0]),yypvt[-3],ATNOCOUNT); } break;
case 205:
# line 766 "mod2.gram"
{ yyval = yypvt[-0]; } break;
case 206:
# line 769 "mod2.gram"
{ yyval = ArrayType(yypvt[-1],yypvt[-0],ARRAY,0); } break;
case 207:
# line 774 "mod2.gram"
{ yyval = SubrangeType(yypvt[-3],yypvt[-1]); } break;
case 208:
# line 779 "mod2.gram"
{ yyval = AddToIdentList(0,MakeIdent(yypvt[-0])); } break;
case 209:
# line 781 "mod2.gram"
{ yyval = AddToIdentList(yypvt[-2],MakeIdent(yypvt[-0])); } break;
case 210:
# line 786 "mod2.gram"
{ yyval =  EnumerationType(yypvt[-1]); } break;
case 211:
# line 791 "mod2.gram"
{ yyval = TypeOf(yypvt[-0]); } break;
case 220:
# line 812 "mod2.gram"
{ yyval = TypeWithSize(yypvt[-0],yypvt[-1]); } break;
case 221:
# line 814 "mod2.gram"
{ yyval = TypeWithAlign(yypvt[-0],yypvt[-1]); } break;
case 222:
# line 819 "mod2.gram"
{ DefineType(yypvt[-3],yypvt[-1]); } break;
case 226:
# line 834 "mod2.gram"
{ yyval = SetConst(yypvt[-1],0); } break;
case 227:
# line 836 "mod2.gram"
{ yyval = SetConst(yypvt[-1],TypeOf(yypvt[-3])); } break;
case 228:
# line 841 "mod2.gram"
{ yyval = 0; } break;
case 230:
# line 848 "mod2.gram"
{ yyval = SetExprNode(yypvt[-1],0); } break;
case 231:
# line 850 "mod2.gram"
{ yyval = SetExprNode(yypvt[-1],yypvt[-3]); } break;
case 232:
# line 855 "mod2.gram"
{ yyval = 0; } break;
case 234:
# line 862 "mod2.gram"
{ yyval = SymConst(yypvt[-0]); } break;
case 241:
# line 876 "mod2.gram"
{ yyval = yypvt[-1]; } break;
case 242:
# line 878 "mod2.gram"
{ yyval = UnOpConst(NOT,yypvt[-0]); } break;
case 243:
# line 880 "mod2.gram"
{ yyval = UnOpConst(PLUS,yypvt[-0]); } break;
case 244:
# line 882 "mod2.gram"
{ yyval = UnOpConst(MINUS,yypvt[-0]); } break;
case 246:
# line 890 "mod2.gram"
{ yyval = BinOpConst(ASTERISK,yypvt[-2],yypvt[-0],0); } break;
case 247:
# line 892 "mod2.gram"
{ yyval = BinOpConst(SLASH,yypvt[-2],yypvt[-0],0); } break;
case 248:
# line 894 "mod2.gram"
{ yyval = BinOpConst(DIV,yypvt[-2],yypvt[-0],0); } break;
case 249:
# line 896 "mod2.gram"
{ yyval = BinOpConst(MOD,yypvt[-2],yypvt[-0],0); } break;
case 250:
# line 898 "mod2.gram"
{ yyval = BinOpConst(PLUS,yypvt[-2],yypvt[-0],0); } break;
case 251:
# line 900 "mod2.gram"
{ yyval = BinOpConst(MINUS,yypvt[-2],yypvt[-0],0); } break;
case 252:
# line 902 "mod2.gram"
{ yyval = BinOpConst(AND,yypvt[-2],yypvt[-0],0); } break;
case 253:
# line 904 "mod2.gram"
{ yyval = BinOpConst(AMPERSAND,yypvt[-2],yypvt[-0],0); } break;
case 254:
# line 906 "mod2.gram"
{ yyval = BinOpConst(OR,yypvt[-2],yypvt[-0],0); } break;
case 255:
# line 912 "mod2.gram"
{ yyval = EQUALS; } break;
case 256:
# line 914 "mod2.gram"
{ yyval = SHARP; } break;
case 257:
# line 916 "mod2.gram"
{ yyval = NOTEQUAL; } break;
case 258:
# line 918 "mod2.gram"
{ yyval = LESS; } break;
case 259:
# line 920 "mod2.gram"
{ yyval = LSEQUAL; } break;
case 260:
# line 922 "mod2.gram"
{ yyval = GREATER; } break;
case 261:
# line 924 "mod2.gram"
{ yyval = GREQUAL; } break;
case 262:
# line 926 "mod2.gram"
{ yyval = IN; } break;
case 264:
# line 934 "mod2.gram"
{ yyval = BinOpConst(yypvt[-1],yypvt[-2],yypvt[-0],0); } break;
case 265:
# line 939 "mod2.gram"
{ DefineConst(yypvt[-3],yypvt[-1]); } break;
case 269:
# line 954 "mod2.gram"
{ yyval = AddToIdentList(0,MakeIdent(yypvt[-0])); } break;
case 270:
# line 956 "mod2.gram"
{ yyval = AddToIdentList(yypvt[-2],MakeIdent(yypvt[-0])); } break;
case 272:
# line 968 "mod2.gram"
{ yyval = yypvt[-0]; } break;
case 273:
# line 971 "mod2.gram"
{ ErrorMissingIdent(); yyval = 0; } break;
case 275:
# line 978 "mod2.gram"
{ ErrorModuleDot(); } break;
case 276:
# line 981 "mod2.gram"
{ ErrorModuleDot(); } break;
case 278:
# line 988 "mod2.gram"
{ ErrorMissingSemicolon(); } break; 
		}
		goto yystack;  /* stack new state and value */

	}