Changeset cde708 in git for Singular/grammar.cc
- Timestamp:
- Nov 18, 2010, 4:22:29 PM (13 years ago)
- Branches:
- (u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')
- Children:
- 08daea27a84f44a9dbd7b72264d2be8e866b559d
- Parents:
- f1918b91d6d726b6d1f0d01d17e824aef21d68e7
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/grammar.cc
rf1918b rcde708 528 528 529 529 /* Line 216 of yacc.c. */ 530 #line 5 44"grammar.cc"530 #line 531 "grammar.cc" 531 531 532 532 #ifdef short … … 904 904 static const yytype_uint16 yyrline[] = 905 905 { 906 0, 3 70, 370, 372, 408, 409, 411, 413, 417, 422,907 4 24, 472, 473, 474, 475, 476, 477, 478, 479, 483,908 4 86, 487, 488, 489, 490, 491, 492, 493, 494, 497,909 504, 509, 513, 517, 521, 541, 569, 593, 599, 608,910 619, 625, 630, 631, 632, 636, 640, 644, 648, 652,911 6 56, 660, 664, 668, 672, 676, 680, 684, 688, 692,912 6 96, 700, 704, 708, 712, 716, 720, 724, 728, 732,913 7 36, 740, 744, 748, 766, 765, 783, 791, 800, 804,914 808, 812, 816, 820, 824, 828, 832, 836, 840, 844,915 8 48, 855, 862, 863, 882, 883, 895, 895, 900, 905,916 910, 914, 918, 934, 938, 954, 968, 989, 997, 1001,917 1002, 1016, 1024, 1033, 1078, 1079, 1088, 1089, 1095, 1108,918 1 107, 1115, 1120, 1127, 1135, 1147, 1163, 1182, 1186, 1190,919 11 95, 1199, 1203, 1207, 1211, 1215, 1220, 1226, 1232, 1238,920 12 44, 1250, 1256, 1262, 1274, 1281, 1285, 1323, 1333, 1346,921 13 46, 1349, 1421, 1427, 1456, 1469, 1486, 1495, 1500, 1508,922 1 520, 1539, 1550, 1570, 1594, 1600, 1612, 1619906 0, 357, 357, 359, 393, 394, 396, 398, 402, 407, 907 409, 460, 461, 462, 463, 464, 465, 466, 467, 471, 908 474, 475, 476, 477, 478, 479, 480, 481, 482, 485, 909 492, 497, 501, 505, 509, 515, 543, 567, 573, 582, 910 593, 599, 604, 605, 606, 610, 614, 618, 622, 626, 911 630, 634, 638, 642, 646, 650, 654, 658, 662, 666, 912 670, 674, 678, 682, 686, 690, 694, 698, 702, 706, 913 710, 714, 718, 722, 740, 739, 757, 765, 774, 778, 914 782, 786, 790, 794, 798, 802, 806, 810, 814, 818, 915 822, 829, 836, 837, 856, 857, 869, 869, 874, 879, 916 884, 888, 892, 908, 912, 928, 942, 963, 971, 975, 917 976, 990, 998, 1007, 1052, 1053, 1062, 1063, 1069, 1082, 918 1081, 1089, 1094, 1101, 1109, 1121, 1137, 1156, 1160, 1164, 919 1169, 1173, 1177, 1181, 1185, 1189, 1194, 1200, 1206, 1212, 920 1218, 1224, 1230, 1236, 1248, 1255, 1259, 1297, 1307, 1320, 921 1320, 1323, 1395, 1401, 1430, 1443, 1460, 1469, 1474, 1482, 922 1494, 1513, 1524, 1544, 1568, 1574, 1586, 1593 923 923 }; 924 924 #endif … … 2372 2372 { 2373 2373 case 3: 2374 #line 3 73"grammar.y"2374 #line 360 "grammar.y" 2375 2375 { 2376 2376 if (timerv) … … 2406 2406 2407 2407 case 5: 2408 #line 410"grammar.y"2408 #line 395 "grammar.y" 2409 2409 {currentVoice->ifsw=0;;} 2410 2410 break; 2411 2411 2412 2412 case 6: 2413 #line 412"grammar.y"2413 #line 397 "grammar.y" 2414 2414 { (yyvsp[(1) - (2)].lv).CleanUp(); currentVoice->ifsw=0;;} 2415 2415 break; 2416 2416 2417 2417 case 7: 2418 #line 414"grammar.y"2418 #line 399 "grammar.y" 2419 2419 { 2420 2420 YYACCEPT; … … 2423 2423 2424 2424 case 8: 2425 #line 4 18"grammar.y"2425 #line 403 "grammar.y" 2426 2426 { 2427 2427 currentVoice->ifsw=0; … … 2431 2431 2432 2432 case 9: 2433 #line 4 23"grammar.y"2433 #line 408 "grammar.y" 2434 2434 {currentVoice->ifsw=0;;} 2435 2435 break; 2436 2436 2437 2437 case 10: 2438 #line 4 25"grammar.y"2438 #line 410 "grammar.y" 2439 2439 { 2440 2440 #ifdef SIQ … … 2445 2445 if (inerror) 2446 2446 { 2447 /* bison failed here*/ 2447 2448 if ((inerror!=3) && ((yyvsp[(1) - (2)]).i<UMINUS) && ((yyvsp[(1) - (2)]).i>' ')) 2448 2449 { … … 2453 2454 Print(" error at token `%s`\n",iiTwoOps((yyvsp[(1) - (2)]).i)); 2454 2455 } 2456 /**/ 2457 2455 2458 } 2456 2459 if (!errorreported) WerrorS("...parse error"); … … 2485 2488 2486 2489 case 18: 2487 #line 4 80"grammar.y"2490 #line 468 "grammar.y" 2488 2491 {if (currentVoice!=NULL) currentVoice->ifsw=0;;} 2489 2492 break; 2490 2493 2491 2494 case 19: 2492 #line 4 83"grammar.y"2495 #line 471 "grammar.y" 2493 2496 { omFree((ADDRESS)(yyvsp[(2) - (2)].name)); ;} 2494 2497 break; 2495 2498 2496 2499 case 29: 2497 #line 4 98"grammar.y"2500 #line 486 "grammar.y" 2498 2501 { 2499 2502 if(iiAssign(&(yyvsp[(1) - (2)].lv),&(yyvsp[(2) - (2)].lv))) YYERROR; … … 2502 2505 2503 2506 case 30: 2504 #line 505"grammar.y"2507 #line 493 "grammar.y" 2505 2508 { 2506 2509 if (currRing==NULL) MYYERROR("no ring active"); … … 2510 2513 2511 2514 case 31: 2515 #line 498 "grammar.y" 2516 { 2517 syMake(&(yyval.lv),(yyvsp[(1) - (1)].name)); 2518 ;} 2519 break; 2520 2521 case 32: 2522 #line 502 "grammar.y" 2523 { 2524 if(iiExprArith2(&(yyval.lv), &(yyvsp[(1) - (3)].lv), COLONCOLON, &(yyvsp[(3) - (3)].lv))) YYERROR; 2525 ;} 2526 break; 2527 2528 case 33: 2529 #line 506 "grammar.y" 2530 { 2531 if(iiExprArith1(&(yyval.lv),&(yyvsp[(1) - (3)].lv),'(')) YYERROR; 2532 ;} 2533 break; 2534 2535 case 34: 2512 2536 #line 510 "grammar.y" 2513 2537 { 2514 syMake(&(yyval.lv),(yyvsp[(1) - (1)].name)); 2515 ;} 2516 break; 2517 2518 case 32: 2519 #line 514 "grammar.y" 2520 { 2521 if(iiExprArith2(&(yyval.lv), &(yyvsp[(1) - (3)].lv), COLONCOLON, &(yyvsp[(3) - (3)].lv))) YYERROR; 2522 ;} 2523 break; 2524 2525 case 33: 2526 #line 518 "grammar.y" 2527 { 2528 if(iiExprArith1(&(yyval.lv),&(yyvsp[(1) - (3)].lv),'(')) YYERROR; 2529 ;} 2530 break; 2531 2532 case 34: 2533 #line 522 "grammar.y" 2534 { 2535 if ((yyvsp[(1) - (4)].lv).rtyp==LIB_CMD) 2536 { 2537 if(iiExprArith1(&(yyval.lv),&(yyvsp[(3) - (4)].lv),LIB_CMD)) YYERROR; 2538 } 2539 else 2540 { 2541 if ((yyvsp[(1) - (4)].lv).Typ()==UNKNOWN) 2542 { 2543 if(iiExprArith2(&(yyval.lv),&(yyvsp[(1) - (4)].lv),'(',&(yyvsp[(3) - (4)].lv))) YYERROR; 2544 } 2545 else 2546 { 2547 (yyvsp[(1) - (4)].lv).next=(leftv)omAllocBin(sleftv_bin); 2548 memcpy((yyvsp[(1) - (4)].lv).next,&(yyvsp[(3) - (4)].lv),sizeof(sleftv)); 2549 if(iiExprArithM(&(yyval.lv),&(yyvsp[(1) - (4)].lv),'(')) YYERROR; 2550 } 2551 } 2538 (yyvsp[(1) - (4)].lv).next=(leftv)omAllocBin(sleftv_bin); 2539 memcpy((yyvsp[(1) - (4)].lv).next,&(yyvsp[(3) - (4)].lv),sizeof(sleftv)); 2540 if(iiExprArithM(&(yyval.lv),&(yyvsp[(1) - (4)].lv),'(')) YYERROR; 2552 2541 ;} 2553 2542 break; 2554 2543 2555 2544 case 35: 2556 #line 5 42"grammar.y"2545 #line 516 "grammar.y" 2557 2546 { 2558 2547 if (currRingHdl==NULL) MYYERROR("no ring active"); … … 2585 2574 2586 2575 case 36: 2587 #line 5 70"grammar.y"2576 #line 544 "grammar.y" 2588 2577 { 2589 2578 memset(&(yyval.lv),0,sizeof((yyval.lv))); … … 2612 2601 2613 2602 case 37: 2614 #line 5 94"grammar.y"2603 #line 568 "grammar.y" 2615 2604 { 2616 2605 memset(&(yyval.lv),0,sizeof((yyval.lv))); … … 2621 2610 2622 2611 case 38: 2623 #line 600"grammar.y"2612 #line 574 "grammar.y" 2624 2613 { 2625 2614 memset(&(yyval.lv),0,sizeof((yyval.lv))); … … 2630 2619 2631 2620 case 39: 2632 #line 609"grammar.y"2621 #line 583 "grammar.y" 2633 2622 { 2634 2623 leftv v = &(yyvsp[(1) - (3)].lv); … … 2644 2633 2645 2634 case 40: 2646 #line 620"grammar.y"2635 #line 594 "grammar.y" 2647 2636 { 2648 2637 (yyval.lv) = (yyvsp[(1) - (1)].lv); … … 2651 2640 2652 2641 case 41: 2653 #line 6 26"grammar.y"2642 #line 600 "grammar.y" 2654 2643 { 2655 2644 /*if ($1.typ == eunknown) YYERROR;*/ … … 2659 2648 2660 2649 case 42: 2661 #line 6 30"grammar.y"2650 #line 604 "grammar.y" 2662 2651 { (yyval.lv) = (yyvsp[(1) - (1)].lv); ;} 2663 2652 break; 2664 2653 2665 2654 case 43: 2655 #line 605 "grammar.y" 2656 { (yyval.lv) = (yyvsp[(2) - (3)].lv); ;} 2657 break; 2658 2659 case 44: 2660 #line 607 "grammar.y" 2661 { 2662 if(iiExprArith3(&(yyval.lv),'[',&(yyvsp[(1) - (6)].lv),&(yyvsp[(3) - (6)].lv),&(yyvsp[(5) - (6)].lv))) YYERROR; 2663 ;} 2664 break; 2665 2666 case 45: 2667 #line 611 "grammar.y" 2668 { 2669 if(iiExprArith2(&(yyval.lv),&(yyvsp[(1) - (4)].lv),'[',&(yyvsp[(3) - (4)].lv))) YYERROR; 2670 ;} 2671 break; 2672 2673 case 46: 2674 #line 615 "grammar.y" 2675 { 2676 if(iiExprArith1(&(yyval.lv),&(yyvsp[(3) - (4)].lv),(yyvsp[(1) - (4)].i))) YYERROR; 2677 ;} 2678 break; 2679 2680 case 47: 2681 #line 619 "grammar.y" 2682 { 2683 if(iiExprArithM(&(yyval.lv),&(yyvsp[(3) - (4)].lv),(yyvsp[(1) - (4)].i))) YYERROR; 2684 ;} 2685 break; 2686 2687 case 48: 2688 #line 623 "grammar.y" 2689 { 2690 if(iiExprArithM(&(yyval.lv),NULL,(yyvsp[(1) - (3)].i))) YYERROR; 2691 ;} 2692 break; 2693 2694 case 49: 2695 #line 627 "grammar.y" 2696 { 2697 if(iiExprArith1(&(yyval.lv),&(yyvsp[(3) - (4)].lv),(yyvsp[(1) - (4)].i))) YYERROR; 2698 ;} 2699 break; 2700 2701 case 50: 2666 2702 #line 631 "grammar.y" 2667 { (yyval.lv) = (yyvsp[(2) - (3)].lv); ;} 2668 break; 2669 2670 case 44: 2671 #line 633 "grammar.y" 2672 { 2673 if(iiExprArith3(&(yyval.lv),'[',&(yyvsp[(1) - (6)].lv),&(yyvsp[(3) - (6)].lv),&(yyvsp[(5) - (6)].lv))) YYERROR; 2674 ;} 2675 break; 2676 2677 case 45: 2678 #line 637 "grammar.y" 2679 { 2680 if(iiExprArith2(&(yyval.lv),&(yyvsp[(1) - (4)].lv),'[',&(yyvsp[(3) - (4)].lv))) YYERROR; 2681 ;} 2682 break; 2683 2684 case 46: 2685 #line 641 "grammar.y" 2703 { 2704 if(iiExprArithM(&(yyval.lv),&(yyvsp[(3) - (4)].lv),(yyvsp[(1) - (4)].i))) YYERROR; 2705 ;} 2706 break; 2707 2708 case 51: 2709 #line 635 "grammar.y" 2710 { 2711 if(iiExprArithM(&(yyval.lv),NULL,(yyvsp[(1) - (3)].i))) YYERROR; 2712 ;} 2713 break; 2714 2715 case 52: 2716 #line 639 "grammar.y" 2686 2717 { 2687 2718 if(iiExprArith1(&(yyval.lv),&(yyvsp[(3) - (4)].lv),(yyvsp[(1) - (4)].i))) YYERROR; … … 2689 2720 break; 2690 2721 2691 case 47: 2692 #line 645 "grammar.y" 2722 case 53: 2723 #line 643 "grammar.y" 2724 { 2725 if(iiExprArith2(&(yyval.lv),&(yyvsp[(3) - (6)].lv),(yyvsp[(1) - (6)].i),&(yyvsp[(5) - (6)].lv),TRUE)) YYERROR; 2726 ;} 2727 break; 2728 2729 case 54: 2730 #line 647 "grammar.y" 2731 { 2732 if(iiExprArith3(&(yyval.lv),(yyvsp[(1) - (8)].i),&(yyvsp[(3) - (8)].lv),&(yyvsp[(5) - (8)].lv),&(yyvsp[(7) - (8)].lv))) YYERROR; 2733 ;} 2734 break; 2735 2736 case 55: 2737 #line 651 "grammar.y" 2738 { 2739 if(iiExprArith2(&(yyval.lv),&(yyvsp[(3) - (6)].lv),(yyvsp[(1) - (6)].i),&(yyvsp[(5) - (6)].lv),TRUE)) YYERROR; 2740 ;} 2741 break; 2742 2743 case 56: 2744 #line 655 "grammar.y" 2745 { 2746 if(iiExprArith3(&(yyval.lv),(yyvsp[(1) - (8)].i),&(yyvsp[(3) - (8)].lv),&(yyvsp[(5) - (8)].lv),&(yyvsp[(7) - (8)].lv))) YYERROR; 2747 ;} 2748 break; 2749 2750 case 57: 2751 #line 659 "grammar.y" 2752 { 2753 if(iiExprArith1(&(yyval.lv),&(yyvsp[(3) - (4)].lv),(yyvsp[(1) - (4)].i))) YYERROR; 2754 ;} 2755 break; 2756 2757 case 58: 2758 #line 663 "grammar.y" 2759 { 2760 if(iiExprArith1(&(yyval.lv),&(yyvsp[(3) - (4)].lv),(yyvsp[(1) - (4)].i))) YYERROR; 2761 ;} 2762 break; 2763 2764 case 59: 2765 #line 667 "grammar.y" 2766 { 2767 if(iiExprArith2(&(yyval.lv),&(yyvsp[(3) - (6)].lv),(yyvsp[(1) - (6)].i),&(yyvsp[(5) - (6)].lv),TRUE)) YYERROR; 2768 ;} 2769 break; 2770 2771 case 60: 2772 #line 671 "grammar.y" 2773 { 2774 if(iiExprArith1(&(yyval.lv),&(yyvsp[(3) - (4)].lv),(yyvsp[(1) - (4)].i))) YYERROR; 2775 ;} 2776 break; 2777 2778 case 61: 2779 #line 675 "grammar.y" 2780 { 2781 if(iiExprArith2(&(yyval.lv),&(yyvsp[(3) - (6)].lv),(yyvsp[(1) - (6)].i),&(yyvsp[(5) - (6)].lv),TRUE)) YYERROR; 2782 ;} 2783 break; 2784 2785 case 62: 2786 #line 679 "grammar.y" 2787 { 2788 if(iiExprArith3(&(yyval.lv),(yyvsp[(1) - (8)].i),&(yyvsp[(3) - (8)].lv),&(yyvsp[(5) - (8)].lv),&(yyvsp[(7) - (8)].lv))) YYERROR; 2789 ;} 2790 break; 2791 2792 case 63: 2793 #line 683 "grammar.y" 2794 { 2795 if(iiExprArith3(&(yyval.lv),(yyvsp[(1) - (8)].i),&(yyvsp[(3) - (8)].lv),&(yyvsp[(5) - (8)].lv),&(yyvsp[(7) - (8)].lv))) YYERROR; 2796 ;} 2797 break; 2798 2799 case 64: 2800 #line 687 "grammar.y" 2801 { 2802 if(iiExprArithM(&(yyval.lv),NULL,(yyvsp[(1) - (3)].i))) YYERROR; 2803 ;} 2804 break; 2805 2806 case 65: 2807 #line 691 "grammar.y" 2693 2808 { 2694 2809 if(iiExprArithM(&(yyval.lv),&(yyvsp[(3) - (4)].lv),(yyvsp[(1) - (4)].i))) YYERROR; … … 2696 2811 break; 2697 2812 2698 case 48:2699 #line 649 "grammar.y"2700 {2701 if(iiExprArithM(&(yyval.lv),NULL,(yyvsp[(1) - (3)].i))) YYERROR;2702 ;}2703 break;2704 2705 case 49:2706 #line 653 "grammar.y"2707 {2708 if(iiExprArith1(&(yyval.lv),&(yyvsp[(3) - (4)].lv),(yyvsp[(1) - (4)].i))) YYERROR;2709 ;}2710 break;2711 2712 case 50:2713 #line 657 "grammar.y"2714 {2715 if(iiExprArithM(&(yyval.lv),&(yyvsp[(3) - (4)].lv),(yyvsp[(1) - (4)].i))) YYERROR;2716 ;}2717 break;2718 2719 case 51:2720 #line 661 "grammar.y"2721 {2722 if(iiExprArithM(&(yyval.lv),NULL,(yyvsp[(1) - (3)].i))) YYERROR;2723 ;}2724 break;2725 2726 case 52:2727 #line 665 "grammar.y"2728 {2729 if(iiExprArith1(&(yyval.lv),&(yyvsp[(3) - (4)].lv),(yyvsp[(1) - (4)].i))) YYERROR;2730 ;}2731 break;2732 2733 case 53:2734 #line 669 "grammar.y"2735 {2736 if(iiExprArith2(&(yyval.lv),&(yyvsp[(3) - (6)].lv),(yyvsp[(1) - (6)].i),&(yyvsp[(5) - (6)].lv),TRUE)) YYERROR;2737 ;}2738 break;2739 2740 case 54:2741 #line 673 "grammar.y"2742 {2743 if(iiExprArith3(&(yyval.lv),(yyvsp[(1) - (8)].i),&(yyvsp[(3) - (8)].lv),&(yyvsp[(5) - (8)].lv),&(yyvsp[(7) - (8)].lv))) YYERROR;2744 ;}2745 break;2746 2747 case 55:2748 #line 677 "grammar.y"2749 {2750 if(iiExprArith2(&(yyval.lv),&(yyvsp[(3) - (6)].lv),(yyvsp[(1) - (6)].i),&(yyvsp[(5) - (6)].lv),TRUE)) YYERROR;2751 ;}2752 break;2753 2754 case 56:2755 #line 681 "grammar.y"2756 {2757 if(iiExprArith3(&(yyval.lv),(yyvsp[(1) - (8)].i),&(yyvsp[(3) - (8)].lv),&(yyvsp[(5) - (8)].lv),&(yyvsp[(7) - (8)].lv))) YYERROR;2758 ;}2759 break;2760 2761 case 57:2762 #line 685 "grammar.y"2763 {2764 if(iiExprArith1(&(yyval.lv),&(yyvsp[(3) - (4)].lv),(yyvsp[(1) - (4)].i))) YYERROR;2765 ;}2766 break;2767 2768 case 58:2769 #line 689 "grammar.y"2770 {2771 if(iiExprArith1(&(yyval.lv),&(yyvsp[(3) - (4)].lv),(yyvsp[(1) - (4)].i))) YYERROR;2772 ;}2773 break;2774 2775 case 59:2776 #line 693 "grammar.y"2777 {2778 if(iiExprArith2(&(yyval.lv),&(yyvsp[(3) - (6)].lv),(yyvsp[(1) - (6)].i),&(yyvsp[(5) - (6)].lv),TRUE)) YYERROR;2779 ;}2780 break;2781 2782 case 60:2783 #line 697 "grammar.y"2784 {2785 if(iiExprArith1(&(yyval.lv),&(yyvsp[(3) - (4)].lv),(yyvsp[(1) - (4)].i))) YYERROR;2786 ;}2787 break;2788 2789 case 61:2790 #line 701 "grammar.y"2791 {2792 if(iiExprArith2(&(yyval.lv),&(yyvsp[(3) - (6)].lv),(yyvsp[(1) - (6)].i),&(yyvsp[(5) - (6)].lv),TRUE)) YYERROR;2793 ;}2794 break;2795 2796 case 62:2797 #line 705 "grammar.y"2798 {2799 if(iiExprArith3(&(yyval.lv),(yyvsp[(1) - (8)].i),&(yyvsp[(3) - (8)].lv),&(yyvsp[(5) - (8)].lv),&(yyvsp[(7) - (8)].lv))) YYERROR;2800 ;}2801 break;2802 2803 case 63:2804 #line 709 "grammar.y"2805 {2806 if(iiExprArith3(&(yyval.lv),(yyvsp[(1) - (8)].i),&(yyvsp[(3) - (8)].lv),&(yyvsp[(5) - (8)].lv),&(yyvsp[(7) - (8)].lv))) YYERROR;2807 ;}2808 break;2809 2810 case 64:2811 #line 713 "grammar.y"2812 {2813 if(iiExprArithM(&(yyval.lv),NULL,(yyvsp[(1) - (3)].i))) YYERROR;2814 ;}2815 break;2816 2817 case 65:2818 #line 717 "grammar.y"2819 {2820 if(iiExprArithM(&(yyval.lv),&(yyvsp[(3) - (4)].lv),(yyvsp[(1) - (4)].i))) YYERROR;2821 ;}2822 break;2823 2824 2813 case 66: 2825 #line 721"grammar.y"2814 #line 695 "grammar.y" 2826 2815 { 2827 2816 if(iiExprArith3(&(yyval.lv),MATRIX_CMD,&(yyvsp[(3) - (8)].lv),&(yyvsp[(5) - (8)].lv),&(yyvsp[(7) - (8)].lv))) YYERROR; … … 2830 2819 2831 2820 case 67: 2832 #line 725"grammar.y"2821 #line 699 "grammar.y" 2833 2822 { 2834 2823 if(iiExprArith1(&(yyval.lv),&(yyvsp[(3) - (4)].lv),MATRIX_CMD)) YYERROR; … … 2837 2826 2838 2827 case 68: 2839 #line 7 29"grammar.y"2828 #line 703 "grammar.y" 2840 2829 { 2841 2830 if(iiExprArith3(&(yyval.lv),INTMAT_CMD,&(yyvsp[(3) - (8)].lv),&(yyvsp[(5) - (8)].lv),&(yyvsp[(7) - (8)].lv))) YYERROR; … … 2844 2833 2845 2834 case 69: 2846 #line 7 33"grammar.y"2835 #line 707 "grammar.y" 2847 2836 { 2848 2837 if(iiExprArith1(&(yyval.lv),&(yyvsp[(3) - (4)].lv),INTMAT_CMD)) YYERROR; … … 2851 2840 2852 2841 case 70: 2853 #line 7 37"grammar.y"2842 #line 711 "grammar.y" 2854 2843 { 2855 2844 if(iiExprArith3(&(yyval.lv),RING_CMD,&(yyvsp[(3) - (8)].lv),&(yyvsp[(5) - (8)].lv),&(yyvsp[(7) - (8)].lv))) YYERROR; … … 2858 2847 2859 2848 case 71: 2860 #line 7 41"grammar.y"2849 #line 715 "grammar.y" 2861 2850 { 2862 2851 if(iiExprArith1(&(yyval.lv),&(yyvsp[(3) - (4)].lv),RING_CMD)) YYERROR; … … 2865 2854 2866 2855 case 72: 2867 #line 7 45"grammar.y"2856 #line 719 "grammar.y" 2868 2857 { 2869 2858 (yyval.lv)=(yyvsp[(2) - (3)].lv); … … 2872 2861 2873 2862 case 73: 2874 #line 7 49"grammar.y"2863 #line 723 "grammar.y" 2875 2864 { 2876 2865 #ifdef SIQ … … 2892 2881 2893 2882 case 74: 2894 #line 7 66"grammar.y"2883 #line 740 "grammar.y" 2895 2884 { 2896 2885 #ifdef SIQ … … 2901 2890 2902 2891 case 75: 2903 #line 7 72"grammar.y"2892 #line 746 "grammar.y" 2904 2893 { 2905 2894 #ifdef SIQ … … 2914 2903 2915 2904 case 76: 2916 #line 7 84"grammar.y"2905 #line 758 "grammar.y" 2917 2906 { 2918 2907 #ifdef SIQ … … 2923 2912 2924 2913 case 77: 2925 #line 7 92"grammar.y"2914 #line 766 "grammar.y" 2926 2915 { 2927 2916 #ifdef SIQ … … 2932 2921 2933 2922 case 78: 2934 #line 801"grammar.y"2923 #line 775 "grammar.y" 2935 2924 { 2936 2925 if(iiExprArith1(&(yyval.lv),&(yyvsp[(1) - (2)].lv),PLUSPLUS)) YYERROR; … … 2939 2928 2940 2929 case 79: 2941 #line 805"grammar.y"2930 #line 779 "grammar.y" 2942 2931 { 2943 2932 if(iiExprArith1(&(yyval.lv),&(yyvsp[(1) - (2)].lv),MINUSMINUS)) YYERROR; … … 2946 2935 2947 2936 case 80: 2948 #line 809"grammar.y"2937 #line 783 "grammar.y" 2949 2938 { 2950 2939 if(iiExprArith2(&(yyval.lv),&(yyvsp[(1) - (3)].lv),'+',&(yyvsp[(3) - (3)].lv))) YYERROR; … … 2953 2942 2954 2943 case 81: 2955 #line 813"grammar.y"2944 #line 787 "grammar.y" 2956 2945 { 2957 2946 if(iiExprArith2(&(yyval.lv),&(yyvsp[(1) - (3)].lv),'-',&(yyvsp[(3) - (3)].lv))) YYERROR; … … 2960 2949 2961 2950 case 82: 2962 #line 817"grammar.y"2951 #line 791 "grammar.y" 2963 2952 { 2964 2953 if(iiExprArith2(&(yyval.lv),&(yyvsp[(1) - (3)].lv),(yyvsp[(2) - (3)].i),&(yyvsp[(3) - (3)].lv))) YYERROR; … … 2967 2956 2968 2957 case 83: 2969 #line 821"grammar.y"2958 #line 795 "grammar.y" 2970 2959 { 2971 2960 if(iiExprArith2(&(yyval.lv),&(yyvsp[(1) - (3)].lv),'^',&(yyvsp[(3) - (3)].lv))) YYERROR; … … 2974 2963 2975 2964 case 84: 2976 #line 825"grammar.y"2965 #line 799 "grammar.y" 2977 2966 { 2978 2967 if(iiExprArith2(&(yyval.lv),&(yyvsp[(1) - (3)].lv),(yyvsp[(2) - (3)].i),&(yyvsp[(3) - (3)].lv))) YYERROR; … … 2981 2970 2982 2971 case 85: 2983 #line 8 29"grammar.y"2972 #line 803 "grammar.y" 2984 2973 { 2985 2974 if(iiExprArith2(&(yyval.lv),&(yyvsp[(1) - (3)].lv),(yyvsp[(2) - (3)].i),&(yyvsp[(3) - (3)].lv))) YYERROR; … … 2988 2977 2989 2978 case 86: 2990 #line 8 33"grammar.y"2979 #line 807 "grammar.y" 2991 2980 { 2992 2981 if(iiExprArith2(&(yyval.lv),&(yyvsp[(1) - (3)].lv),NOTEQUAL,&(yyvsp[(3) - (3)].lv))) YYERROR; … … 2995 2984 2996 2985 case 87: 2997 #line 8 37"grammar.y"2986 #line 811 "grammar.y" 2998 2987 { 2999 2988 if(iiExprArith2(&(yyval.lv),&(yyvsp[(1) - (3)].lv),EQUAL_EQUAL,&(yyvsp[(3) - (3)].lv))) YYERROR; … … 3002 2991 3003 2992 case 88: 3004 #line 8 41"grammar.y"2993 #line 815 "grammar.y" 3005 2994 { 3006 2995 if(iiExprArith2(&(yyval.lv),&(yyvsp[(1) - (3)].lv),DOTDOT,&(yyvsp[(3) - (3)].lv))) YYERROR; … … 3009 2998 3010 2999 case 89: 3011 #line 8 45"grammar.y"3000 #line 819 "grammar.y" 3012 3001 { 3013 3002 if(iiExprArith2(&(yyval.lv),&(yyvsp[(1) - (3)].lv),':',&(yyvsp[(3) - (3)].lv))) YYERROR; … … 3016 3005 3017 3006 case 90: 3018 #line 8 49"grammar.y"3007 #line 823 "grammar.y" 3019 3008 { 3020 3009 memset(&(yyval.lv),0,sizeof((yyval.lv))); … … 3026 3015 3027 3016 case 91: 3028 #line 8 56"grammar.y"3017 #line 830 "grammar.y" 3029 3018 { 3030 3019 if(iiExprArith1(&(yyval.lv),&(yyvsp[(2) - (2)].lv),'-')) YYERROR; … … 3033 3022 3034 3023 case 92: 3035 #line 8 62"grammar.y"3024 #line 836 "grammar.y" 3036 3025 { (yyval.lv) = (yyvsp[(1) - (2)].lv); ;} 3037 3026 break; 3038 3027 3039 3028 case 93: 3040 #line 8 64"grammar.y"3029 #line 838 "grammar.y" 3041 3030 { 3042 3031 if ((yyvsp[(1) - (2)].lv).rtyp==0) … … 3056 3045 3057 3046 case 95: 3058 #line 8 84"grammar.y"3047 #line 858 "grammar.y" 3059 3048 { 3060 3049 if ((yyvsp[(2) - (3)].lv).Typ()!=STRING_CMD) … … 3068 3057 3069 3058 case 98: 3070 #line 901"grammar.y"3059 #line 875 "grammar.y" 3071 3060 { 3072 3061 if (iiDeclCommand(&(yyval.lv),&(yyvsp[(2) - (2)].lv),myynest,(yyvsp[(1) - (2)].i),&((yyvsp[(2) - (2)].lv).req_packhdl->idroot))) … … 3076 3065 3077 3066 case 99: 3078 #line 906"grammar.y"3067 #line 880 "grammar.y" 3079 3068 { 3080 3069 if (iiDeclCommand(&(yyval.lv),&(yyvsp[(2) - (2)].lv),myynest,(yyvsp[(1) - (2)].i),&((yyvsp[(2) - (2)].lv).req_packhdl->idroot))) … … 3084 3073 3085 3074 case 100: 3086 #line 911"grammar.y"3075 #line 885 "grammar.y" 3087 3076 { 3088 3077 if (iiDeclCommand(&(yyval.lv),&(yyvsp[(2) - (2)].lv),myynest,(yyvsp[(1) - (2)].i),&(currRing->idroot), TRUE)) YYERROR; … … 3091 3080 3092 3081 case 101: 3093 #line 915"grammar.y"3082 #line 889 "grammar.y" 3094 3083 { 3095 3084 if (iiDeclCommand(&(yyval.lv),&(yyvsp[(2) - (2)].lv),myynest,(yyvsp[(1) - (2)].i),&(currRing->idroot), TRUE)) YYERROR; … … 3098 3087 3099 3088 case 102: 3100 #line 919"grammar.y"3089 #line 893 "grammar.y" 3101 3090 { 3102 3091 if (iiDeclCommand(&(yyval.lv),&(yyvsp[(2) - (8)].lv),myynest,(yyvsp[(1) - (8)].i),&(currRing->idroot), TRUE)) YYERROR; … … 3117 3106 3118 3107 case 103: 3119 #line 9 35"grammar.y"3108 #line 909 "grammar.y" 3120 3109 { 3121 3110 if (iiDeclCommand(&(yyval.lv),&(yyvsp[(2) - (2)].lv),myynest,(yyvsp[(1) - (2)].i),&(currRing->idroot), TRUE)) YYERROR; … … 3124 3113 3125 3114 case 104: 3126 #line 9 39"grammar.y"3115 #line 913 "grammar.y" 3127 3116 { 3128 3117 int r; TESTSETINT((yyvsp[(4) - (8)].lv),r); … … 3143 3132 3144 3133 case 105: 3145 #line 9 55"grammar.y"3134 #line 929 "grammar.y" 3146 3135 { 3147 3136 if (iiDeclCommand(&(yyval.lv),&(yyvsp[(2) - (2)].lv),myynest,(yyvsp[(1) - (2)].i),&((yyvsp[(2) - (2)].lv).req_packhdl->idroot))) … … 3160 3149 3161 3150 case 106: 3162 #line 9 69"grammar.y"3151 #line 943 "grammar.y" 3163 3152 { 3164 3153 int t=(yyvsp[(1) - (3)].lv).Typ(); … … 3184 3173 3185 3174 case 107: 3186 #line 9 90"grammar.y"3175 #line 964 "grammar.y" 3187 3176 { 3188 3177 if (iiDeclCommand(&(yyval.lv),&(yyvsp[(2) - (2)].lv),myynest,(yyvsp[(1) - (2)].i),&((yyvsp[(2) - (2)].lv).req_packhdl->idroot))) … … 3192 3181 3193 3182 case 110: 3194 #line 1003"grammar.y"3183 #line 977 "grammar.y" 3195 3184 { 3196 3185 leftv v = &(yyvsp[(2) - (5)].lv); … … 3206 3195 3207 3196 case 111: 3208 #line 1017"grammar.y"3197 #line 991 "grammar.y" 3209 3198 { 3210 3199 // let rInit take care of any errors … … 3214 3203 3215 3204 case 112: 3216 #line 1025"grammar.y"3205 #line 999 "grammar.y" 3217 3206 { 3218 3207 memset(&(yyval.lv),0,sizeof((yyval.lv))); … … 3226 3215 3227 3216 case 113: 3228 #line 10 34"grammar.y"3217 #line 1008 "grammar.y" 3229 3218 { 3230 3219 memset(&(yyval.lv),0,sizeof((yyval.lv))); … … 3271 3260 3272 3261 case 115: 3273 #line 10 80"grammar.y"3262 #line 1054 "grammar.y" 3274 3263 { 3275 3264 (yyval.lv) = (yyvsp[(1) - (3)].lv); … … 3280 3269 3281 3270 case 117: 3282 #line 10 90"grammar.y"3271 #line 1064 "grammar.y" 3283 3272 { 3284 3273 (yyval.lv) = (yyvsp[(2) - (3)].lv); … … 3287 3276 3288 3277 case 118: 3289 #line 10 96"grammar.y"3278 #line 1070 "grammar.y" 3290 3279 { 3291 3280 expected_parms = TRUE; … … 3294 3283 3295 3284 case 119: 3296 #line 1 108"grammar.y"3285 #line 1082 "grammar.y" 3297 3286 { if ((yyvsp[(1) - (2)].i) != '<') YYERROR; 3298 3287 if((feFilePending=feFopen((yyvsp[(2) - (2)].name),"r",NULL,TRUE))==NULL) YYERROR; ;} … … 3300 3289 3301 3290 case 120: 3302 #line 1 111"grammar.y"3291 #line 1085 "grammar.y" 3303 3292 { newFile((yyvsp[(2) - (4)].name),feFilePending); ;} 3304 3293 break; 3305 3294 3306 3295 case 121: 3307 #line 1 116"grammar.y"3296 #line 1090 "grammar.y" 3308 3297 { 3309 3298 feHelp((yyvsp[(2) - (3)].name)); … … 3313 3302 3314 3303 case 122: 3315 #line 1 121"grammar.y"3304 #line 1095 "grammar.y" 3316 3305 { 3317 3306 feHelp(NULL); … … 3320 3309 3321 3310 case 123: 3322 #line 11 28"grammar.y"3311 #line 1102 "grammar.y" 3323 3312 { 3324 3313 singular_example((yyvsp[(2) - (3)].name)); … … 3328 3317 3329 3318 case 124: 3330 #line 11 36"grammar.y"3319 #line 1110 "grammar.y" 3331 3320 { 3332 3321 if (basePack!=(yyvsp[(2) - (2)].lv).req_packhdl) … … 3340 3329 3341 3330 case 125: 3342 #line 11 48"grammar.y"3331 #line 1122 "grammar.y" 3343 3332 { 3344 3333 leftv v=&(yyvsp[(2) - (2)].lv); … … 3359 3348 3360 3349 case 126: 3361 #line 11 64"grammar.y"3350 #line 1138 "grammar.y" 3362 3351 { 3363 3352 leftv v=&(yyvsp[(3) - (3)].lv); … … 3378 3367 3379 3368 case 127: 3380 #line 11 83"grammar.y"3369 #line 1157 "grammar.y" 3381 3370 { 3382 3371 list_cmd((yyvsp[(3) - (4)].i),NULL,"// ",TRUE); … … 3385 3374 3386 3375 case 128: 3387 #line 11 87"grammar.y"3376 #line 1161 "grammar.y" 3388 3377 { 3389 3378 list_cmd((yyvsp[(3) - (4)].i),NULL,"// ",TRUE); … … 3392 3381 3393 3382 case 129: 3394 #line 11 91"grammar.y"3383 #line 1165 "grammar.y" 3395 3384 { 3396 3385 if ((yyvsp[(3) - (4)].i)==QRING_CMD) (yyvsp[(3) - (4)].i)=RING_CMD; … … 3400 3389 3401 3390 case 130: 3402 #line 11 96"grammar.y"3391 #line 1170 "grammar.y" 3403 3392 { 3404 3393 list_cmd((yyvsp[(3) - (4)].i),NULL,"// ",TRUE); … … 3407 3396 3408 3397 case 131: 3409 #line 1 200"grammar.y"3398 #line 1174 "grammar.y" 3410 3399 { 3411 3400 list_cmd(RING_CMD,NULL,"// ",TRUE); … … 3414 3403 3415 3404 case 132: 3416 #line 1 204"grammar.y"3405 #line 1178 "grammar.y" 3417 3406 { 3418 3407 list_cmd(MATRIX_CMD,NULL,"// ",TRUE); … … 3421 3410 3422 3411 case 133: 3423 #line 1 208"grammar.y"3412 #line 1182 "grammar.y" 3424 3413 { 3425 3414 list_cmd(INTMAT_CMD,NULL,"// ",TRUE); … … 3428 3417 3429 3418 case 134: 3430 #line 1 212"grammar.y"3419 #line 1186 "grammar.y" 3431 3420 { 3432 3421 list_cmd(PROC_CMD,NULL,"// ",TRUE); … … 3435 3424 3436 3425 case 135: 3437 #line 1 216"grammar.y"3426 #line 1190 "grammar.y" 3438 3427 { 3439 3428 list_cmd(0,(yyvsp[(3) - (4)].lv).Fullname(),"// ",TRUE); … … 3443 3432 3444 3433 case 136: 3445 #line 1 221"grammar.y"3434 #line 1195 "grammar.y" 3446 3435 { 3447 3436 if((yyvsp[(3) - (6)].lv).Typ() == PACKAGE_CMD) … … 3452 3441 3453 3442 case 137: 3454 #line 12 27"grammar.y"3443 #line 1201 "grammar.y" 3455 3444 { 3456 3445 if((yyvsp[(3) - (6)].lv).Typ() == PACKAGE_CMD) … … 3461 3450 3462 3451 case 138: 3463 #line 12 33"grammar.y"3452 #line 1207 "grammar.y" 3464 3453 { 3465 3454 if((yyvsp[(3) - (6)].lv).Typ() == PACKAGE_CMD) … … 3470 3459 3471 3460 case 139: 3472 #line 12 39"grammar.y"3461 #line 1213 "grammar.y" 3473 3462 { 3474 3463 if((yyvsp[(3) - (6)].lv).Typ() == PACKAGE_CMD) … … 3479 3468 3480 3469 case 140: 3481 #line 12 45"grammar.y"3470 #line 1219 "grammar.y" 3482 3471 { 3483 3472 if((yyvsp[(3) - (6)].lv).Typ() == PACKAGE_CMD) … … 3488 3477 3489 3478 case 141: 3490 #line 12 51"grammar.y"3479 #line 1225 "grammar.y" 3491 3480 { 3492 3481 if((yyvsp[(3) - (6)].lv).Typ() == PACKAGE_CMD) … … 3497 3486 3498 3487 case 142: 3499 #line 12 57"grammar.y"3488 #line 1231 "grammar.y" 3500 3489 { 3501 3490 if((yyvsp[(3) - (6)].lv).Typ() == PACKAGE_CMD) … … 3506 3495 3507 3496 case 143: 3508 #line 12 63"grammar.y"3497 #line 1237 "grammar.y" 3509 3498 { 3510 3499 if((yyvsp[(3) - (6)].lv).Typ() == PACKAGE_CMD) … … 3515 3504 3516 3505 case 144: 3517 #line 12 75"grammar.y"3506 #line 1249 "grammar.y" 3518 3507 { 3519 3508 list_cmd(-1,NULL,"// ",TRUE); … … 3522 3511 3523 3512 case 145: 3524 #line 12 81"grammar.y"3513 #line 1255 "grammar.y" 3525 3514 { yyInRingConstruction = TRUE; ;} 3526 3515 break; 3527 3516 3528 3517 case 146: 3529 #line 12 90"grammar.y"3518 #line 1264 "grammar.y" 3530 3519 { 3531 3520 const char *ring_name = (yyvsp[(2) - (8)].lv).name; … … 3564 3553 3565 3554 case 147: 3566 #line 1 324"grammar.y"3555 #line 1298 "grammar.y" 3567 3556 { 3568 3557 const char *ring_name = (yyvsp[(2) - (2)].lv).name; … … 3574 3563 3575 3564 case 148: 3576 #line 13 34"grammar.y"3565 #line 1308 "grammar.y" 3577 3566 { 3578 3567 if (((yyvsp[(1) - (2)].i)!=LIB_CMD)||(iiLibCmd((yyvsp[(2) - (2)].name),TRUE,TRUE,TRUE))) … … 3588 3577 3589 3578 case 151: 3590 #line 13 50"grammar.y"3579 #line 1324 "grammar.y" 3591 3580 { 3592 3581 if (((yyvsp[(1) - (2)].i)==KEEPRING_CMD) && (myynest==0)) … … 3660 3649 3661 3650 case 152: 3662 #line 1 422"grammar.y"3651 #line 1396 "grammar.y" 3663 3652 { 3664 3653 if ((yyvsp[(2) - (2)].lv).rtyp!=IDHDL) MYYERROR("identifier expected"); … … 3669 3658 3670 3659 case 153: 3671 #line 14 28"grammar.y"3660 #line 1402 "grammar.y" 3672 3661 { 3673 3662 //Print("typ is %d, rtyp:%d\n",$1.Typ(),$1.rtyp); … … 3695 3684 3696 3685 case 154: 3697 #line 14 57"grammar.y"3686 #line 1431 "grammar.y" 3698 3687 { 3699 3688 int i; TESTSETINT((yyvsp[(3) - (5)].lv),i); … … 3711 3700 3712 3701 case 155: 3713 #line 14 70"grammar.y"3702 #line 1444 "grammar.y" 3714 3703 { 3715 3704 if (currentVoice->ifsw==1) … … 3731 3720 3732 3721 case 156: 3733 #line 14 87"grammar.y"3722 #line 1461 "grammar.y" 3734 3723 { 3735 3724 int i; TESTSETINT((yyvsp[(3) - (5)].lv),i); … … 3743 3732 3744 3733 case 157: 3745 #line 14 96"grammar.y"3734 #line 1470 "grammar.y" 3746 3735 { 3747 3736 if (exitBuffer(BT_break)) YYERROR; … … 3751 3740 3752 3741 case 158: 3753 #line 1 501"grammar.y"3742 #line 1475 "grammar.y" 3754 3743 { 3755 3744 if (contBuffer(BT_break)) YYERROR; … … 3759 3748 3760 3749 case 159: 3761 #line 1 509"grammar.y"3750 #line 1483 "grammar.y" 3762 3751 { 3763 3752 /* -> if(!$2) break; $3; continue;*/ … … 3771 3760 3772 3761 case 160: 3773 #line 1 521"grammar.y"3762 #line 1495 "grammar.y" 3774 3763 { 3775 3764 /* $2 */ … … 3790 3779 3791 3780 case 161: 3792 #line 15 40"grammar.y"3781 #line 1514 "grammar.y" 3793 3782 { 3794 3783 procinfov pi; … … 3804 3793 3805 3794 case 162: 3806 #line 15 51"grammar.y"3795 #line 1525 "grammar.y" 3807 3796 { 3808 3797 idhdl h = enterid((yyvsp[(1) - (3)].name),myynest,PROC_CMD,&IDROOT,TRUE); … … 3827 3816 3828 3817 case 163: 3829 #line 15 71"grammar.y"3818 #line 1545 "grammar.y" 3830 3819 { 3831 3820 omFree((ADDRESS)(yyvsp[(3) - (4)].name)); … … 3851 3840 3852 3841 case 164: 3853 #line 15 95"grammar.y"3842 #line 1569 "grammar.y" 3854 3843 { 3855 3844 // decl. of type proc p(int i) … … 3860 3849 3861 3850 case 165: 3862 #line 1 601"grammar.y"3851 #line 1575 "grammar.y" 3863 3852 { 3864 3853 // decl. of type proc p(i) … … 3872 3861 3873 3862 case 166: 3874 #line 1 613"grammar.y"3863 #line 1587 "grammar.y" 3875 3864 { 3876 3865 if(iiRETURNEXPR==NULL) YYERROR; … … 3882 3871 3883 3872 case 167: 3884 #line 1 620"grammar.y"3873 #line 1594 "grammar.y" 3885 3874 { 3886 3875 if ((yyvsp[(1) - (3)].i)==RETURN) … … 3896 3885 3897 3886 /* Line 1267 of yacc.c. */ 3898 #line 3 911"grammar.cc"3887 #line 3885 "grammar.cc" 3899 3888 default: break; 3900 3889 }
Note: See TracChangeset
for help on using the changeset viewer.