[BACK]Return to ytab.c CVS log [TXT][DIR] Up to [local] / OpenXM_contrib2 / asir2000 / parse

Diff for /OpenXM_contrib2/asir2000/parse/ytab.c between version 1.9 and 1.10

version 1.9, 2010/02/19 06:20:13 version 1.10, 2011/06/16 08:17:15
Line 2022  yyreduce:
Line 2022  yyreduce:
   
 /* Line 1455 of yacc.c  */  /* Line 1455 of yacc.c  */
 #line 160 "parse.y"  #line 160 "parse.y"
     { (yyval.s) = mksnode(1,S_RETURN,0); }      { (yyval.s) = mksnode(1,S_RETURN,NULLP); }
     break;      break;
   
   case 20:    case 20:
Line 2036  yyreduce:
Line 2036  yyreduce:
   
 /* Line 1455 of yacc.c  */  /* Line 1455 of yacc.c  */
 #line 164 "parse.y"  #line 164 "parse.y"
     { (yyval.s) = mksnode(4,S_IFELSE,(yyvsp[(1) - (5)].i),(yyvsp[(3) - (5)].n),(yyvsp[(5) - (5)].s),0); (yyvsp[(5) - (5)].s)?(yyval.s)->ln=(yyvsp[(5) - (5)].s)->ln:0; NOPR; }      { (yyval.s) = mksnode(4,S_IFELSE,(yyvsp[(1) - (5)].i),(yyvsp[(3) - (5)].n),(yyvsp[(5) - (5)].s),NULLP); (yyvsp[(5) - (5)].s)?(yyval.s)->ln=(yyvsp[(5) - (5)].s)->ln:0; NOPR; }
     break;      break;
   
   case 22:    case 22:
Line 2057  yyreduce:
Line 2057  yyreduce:
   
 /* Line 1455 of yacc.c  */  /* Line 1455 of yacc.c  */
 #line 170 "parse.y"  #line 170 "parse.y"
     { (yyval.s) = mksnode(5,S_FOR,(yyvsp[(1) - (5)].i),0,(yyvsp[(3) - (5)].n),0,(yyvsp[(5) - (5)].s)); (yyvsp[(5) - (5)].s)?(yyval.s)->ln=(yyvsp[(5) - (5)].s)->ln:0; NOPR; }      { (yyval.s) = mksnode(5,S_FOR,(yyvsp[(1) - (5)].i),NULLP,(yyvsp[(3) - (5)].n),NULLP,(yyvsp[(5) - (5)].s)); (yyvsp[(5) - (5)].s)?(yyval.s)->ln=(yyvsp[(5) - (5)].s)->ln:0; NOPR; }
     break;      break;
   
   case 25:    case 25:
Line 2078  yyreduce:
Line 2078  yyreduce:
   
 /* Line 1455 of yacc.c  */  /* Line 1455 of yacc.c  */
 #line 176 "parse.y"  #line 176 "parse.y"
     { (yyval.s) = mksnode(3,S_PFDEF,(yyvsp[(2) - (6)].p),(yyvsp[(4) - (6)].n),0); NOPR; }      { (yyval.s) = mksnode(3,S_PFDEF,(yyvsp[(2) - (6)].p),(yyvsp[(4) - (6)].n),NULLP); NOPR; }
     break;      break;
   
   case 28:    case 28:
Line 2128  yyreduce:
Line 2128  yyreduce:
   
 /* Line 1455 of yacc.c  */  /* Line 1455 of yacc.c  */
 #line 190 "parse.y"  #line 190 "parse.y"
     { CUR_MODULE = 0; MPVS = 0; (yyval.s) = mksnode(1,S_MODULE,0); NOPR; }      { CUR_MODULE = 0; MPVS = 0; (yyval.s) = mksnode(1,S_MODULE,NULLP); NOPR; }
     break;      break;
   
   case 34:    case 34:
Line 2343  yyreduce:
Line 2343  yyreduce:
   
                                 searchf(noargsysf,(yyvsp[(1) - (1)].p),&f);                                  searchf(noargsysf,(yyvsp[(1) - (1)].p),&f);
                                 if ( f )                                  if ( f )
                                          (yyval.f) = mkfnode(2,I_FUNC,f,0);                                           (yyval.f) = mkfnode(2,I_FUNC,f,NULLP);
                                 else {                                  else {
                                         searchc((yyvsp[(1) - (1)].p),&f);                                          searchc((yyvsp[(1) - (1)].p),&f);
                                         if ( f )                                          if ( f )
                                                 (yyval.f) = mkfnode(2,I_FUNC,f,mkfnode(1,I_LIST,0));                                                  (yyval.f) = mkfnode(2,I_FUNC,f,mkfnode(1,I_LIST,NULLP));
                                         else {                                          else {
                                                 gen_searchf_searchonly((yyvsp[(1) - (1)].p),(FUNC *)&f);                                                  gen_searchf_searchonly((yyvsp[(1) - (1)].p),(FUNC *)&f);
                                                 if ( f )                                                  if ( f )
Line 2429  yyreduce:
Line 2429  yyreduce:
 /* Line 1455 of yacc.c  */  /* Line 1455 of yacc.c  */
 #line 319 "parse.y"  #line 319 "parse.y"
     {      {
                                 (yyval.f) = mkfnode(2,I_GETOPT,0);                                  (yyval.f) = mkfnode(2,I_GETOPT,NULLP);
                         }                          }
     break;      break;
   
Line 2450  yyreduce:
Line 2450  yyreduce:
                                 searchf(parif,(yyvsp[(3) - (4)].p),(FUNC *)&val);                                  searchf(parif,(yyvsp[(3) - (4)].p),(FUNC *)&val);
                                 if ( !val )                                  if ( !val )
                                         mkparif((yyvsp[(3) - (4)].p),(FUNC *)&val);                                          mkparif((yyvsp[(3) - (4)].p),(FUNC *)&val);
                                 (yyval.f) = mkfnode(2,I_FUNC,val,0);                                  (yyval.f) = mkfnode(2,I_FUNC,val,NULLP);
                         }                          }
     break;      break;
   
Line 2471  yyreduce:
Line 2471  yyreduce:
 /* Line 1455 of yacc.c  */  /* Line 1455 of yacc.c  */
 #line 341 "parse.y"  #line 341 "parse.y"
     {      {
                                 (yyval.f) = mkfnode(2,I_IFUNC,(yyvsp[(3) - (7)].f),mkfnode(1,I_LIST,(yyvsp[(6) - (7)].n)),0);                                  (yyval.f) = mkfnode(2,I_IFUNC,(yyvsp[(3) - (7)].f),mkfnode(1,I_LIST,(yyvsp[(6) - (7)].n)),NULLP);
                         }                          }
     break;      break;
   
Line 2491  yyreduce:
Line 2491  yyreduce:
 #line 350 "parse.y"  #line 350 "parse.y"
     {      {
                                 if ( main_parser || allow_create_var )                                  if ( main_parser || allow_create_var )
                                         t = mkfnode(2,I_PVAR,makepvar((yyvsp[(1) - (4)].p)),0);                                          t = mkfnode(2,I_PVAR,makepvar((yyvsp[(1) - (4)].p)),NULLP);
                                 else {                                  else {
                                         ind = searchpvar((yyvsp[(1) - (4)].p));                                          ind = searchpvar((yyvsp[(1) - (4)].p));
                                         if ( ind == -1 ) {                                          if ( ind == -1 ) {
                                                 fprintf(stderr,"%s : no such variable.\n",(yyvsp[(1) - (4)].p));                                                  fprintf(stderr,"%s : no such variable.\n",(yyvsp[(1) - (4)].p));
                                                 YYABORT;                                                  YYABORT;
                                         } else                                          } else
                                                 t = mkfnode(2,I_PVAR,ind,0);                                                  t = mkfnode(2,I_PVAR,ind,NULLP);
                                 }                                  }
                                 (yyval.f) = mkfnode(2,I_IFUNC,t,mkfnode(1,I_LIST,(yyvsp[(3) - (4)].n)));                                  (yyval.f) = mkfnode(2,I_IFUNC,t,mkfnode(1,I_LIST,(yyvsp[(3) - (4)].n)));
                         }                          }
Line 2531  yyreduce:
Line 2531  yyreduce:
 #line 370 "parse.y"  #line 370 "parse.y"
     {      {
                                 if ( main_parser || allow_create_var )                                  if ( main_parser || allow_create_var )
                                         (yyval.f) = mkfnode(2,I_PVAR,makepvar((yyvsp[(1) - (1)].p)),0);                                          (yyval.f) = mkfnode(2,I_PVAR,makepvar((yyvsp[(1) - (1)].p)),NULLP);
                                 else {                                  else {
                                         ind = searchpvar((yyvsp[(1) - (1)].p));                                          ind = searchpvar((yyvsp[(1) - (1)].p));
                                         if ( ind == -1 ) {                                          if ( ind == -1 ) {
                                                 fprintf(stderr,"%s : no such variable.\n",(yyvsp[(1) - (1)].p));                                                  fprintf(stderr,"%s : no such variable.\n",(yyvsp[(1) - (1)].p));
                                                 YYABORT;                                                  YYABORT;
                                         } else                                          } else
                                                 (yyval.f) = mkfnode(2,I_PVAR,ind,0);                                                  (yyval.f) = mkfnode(2,I_PVAR,ind,NULLP);
                                 }                                  }
                         }                          }
     break;      break;
Line 2576  yyreduce:
Line 2576  yyreduce:
   
 /* Line 1455 of yacc.c  */  /* Line 1455 of yacc.c  */
 #line 398 "parse.y"  #line 398 "parse.y"
     { (yyval.f) = mkfnode(3,I_CAST,structtoindex((yyvsp[(3) - (5)].p)),(yyvsp[(5) - (5)].f),0); }      { (yyval.f) = mkfnode(3,I_CAST,structtoindex((yyvsp[(3) - (5)].p)),(yyvsp[(5) - (5)].f),NULLP); }
     break;      break;
   
   case 85:    case 85:
Line 2702  yyreduce:
Line 2702  yyreduce:
   
 /* Line 1455 of yacc.c  */  /* Line 1455 of yacc.c  */
 #line 434 "parse.y"  #line 434 "parse.y"
     { (yyval.f) = mkfnode(3,I_LOP,(yyvsp[(1) - (2)].i),(yyvsp[(2) - (2)].f),0); }      { (yyval.f) = mkfnode(3,I_LOP,(yyvsp[(1) - (2)].i),(yyvsp[(2) - (2)].f),NULLP); }
     break;      break;
   
   case 103:    case 103:

Legend:
Removed from v.1.9  
changed lines
  Added in v.1.10

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>