note description: "Eiffel parsers" legal: "See notice at end of class." status: "See notice at end of class." date: "$Date$" revision: "$Revision$" class EIFFEL_PARSER inherit EIFFEL_PARSER_SKELETON create make, make_with_factory feature {NONE} -- Implementation yy_build_parser_tables -- Build parser tables. do yytranslate := yytranslate_template yyr1 := yyr1_template yytypes1 := yytypes1_template yytypes2 := yytypes2_template yydefact := yydefact_template yydefgoto := yydefgoto_template yypact := yypact_template yypgoto := yypgoto_template yytable := yytable_template yycheck := yycheck_template end yy_create_value_stacks -- Create value stacks. do create yyspecial_routines1 yyvsc1 := yyInitial_yyvs_size yyvs1 := yyspecial_routines1.make (yyvsc1) create yyspecial_routines2 yyvsc2 := yyInitial_yyvs_size yyvs2 := yyspecial_routines2.make (yyvsc2) create yyspecial_routines3 yyvsc3 := yyInitial_yyvs_size yyvs3 := yyspecial_routines3.make (yyvsc3) create yyspecial_routines4 yyvsc4 := yyInitial_yyvs_size yyvs4 := yyspecial_routines4.make (yyvsc4) create yyspecial_routines5 yyvsc5 := yyInitial_yyvs_size yyvs5 := yyspecial_routines5.make (yyvsc5) create yyspecial_routines6 yyvsc6 := yyInitial_yyvs_size yyvs6 := yyspecial_routines6.make (yyvsc6) create yyspecial_routines7 yyvsc7 := yyInitial_yyvs_size yyvs7 := yyspecial_routines7.make (yyvsc7) create yyspecial_routines8 yyvsc8 := yyInitial_yyvs_size yyvs8 := yyspecial_routines8.make (yyvsc8) create yyspecial_routines9 yyvsc9 := yyInitial_yyvs_size yyvs9 := yyspecial_routines9.make (yyvsc9) create yyspecial_routines10 yyvsc10 := yyInitial_yyvs_size yyvs10 := yyspecial_routines10.make (yyvsc10) create yyspecial_routines11 yyvsc11 := yyInitial_yyvs_size yyvs11 := yyspecial_routines11.make (yyvsc11) create yyspecial_routines12 yyvsc12 := yyInitial_yyvs_size yyvs12 := yyspecial_routines12.make (yyvsc12) create yyspecial_routines13 yyvsc13 := yyInitial_yyvs_size yyvs13 := yyspecial_routines13.make (yyvsc13) create yyspecial_routines14 yyvsc14 := yyInitial_yyvs_size yyvs14 := yyspecial_routines14.make (yyvsc14) create yyspecial_routines15 yyvsc15 := yyInitial_yyvs_size yyvs15 := yyspecial_routines15.make (yyvsc15) create yyspecial_routines16 yyvsc16 := yyInitial_yyvs_size yyvs16 := yyspecial_routines16.make (yyvsc16) create yyspecial_routines17 yyvsc17 := yyInitial_yyvs_size yyvs17 := yyspecial_routines17.make (yyvsc17) create yyspecial_routines18 yyvsc18 := yyInitial_yyvs_size yyvs18 := yyspecial_routines18.make (yyvsc18) create yyspecial_routines19 yyvsc19 := yyInitial_yyvs_size yyvs19 := yyspecial_routines19.make (yyvsc19) create yyspecial_routines20 yyvsc20 := yyInitial_yyvs_size yyvs20 := yyspecial_routines20.make (yyvsc20) create yyspecial_routines21 yyvsc21 := yyInitial_yyvs_size yyvs21 := yyspecial_routines21.make (yyvsc21) create yyspecial_routines22 yyvsc22 := yyInitial_yyvs_size yyvs22 := yyspecial_routines22.make (yyvsc22) create yyspecial_routines23 yyvsc23 := yyInitial_yyvs_size yyvs23 := yyspecial_routines23.make (yyvsc23) create yyspecial_routines24 yyvsc24 := yyInitial_yyvs_size yyvs24 := yyspecial_routines24.make (yyvsc24) create yyspecial_routines25 yyvsc25 := yyInitial_yyvs_size yyvs25 := yyspecial_routines25.make (yyvsc25) create yyspecial_routines26 yyvsc26 := yyInitial_yyvs_size yyvs26 := yyspecial_routines26.make (yyvsc26) create yyspecial_routines27 yyvsc27 := yyInitial_yyvs_size yyvs27 := yyspecial_routines27.make (yyvsc27) create yyspecial_routines28 yyvsc28 := yyInitial_yyvs_size yyvs28 := yyspecial_routines28.make (yyvsc28) create yyspecial_routines29 yyvsc29 := yyInitial_yyvs_size yyvs29 := yyspecial_routines29.make (yyvsc29) create yyspecial_routines30 yyvsc30 := yyInitial_yyvs_size yyvs30 := yyspecial_routines30.make (yyvsc30) create yyspecial_routines31 yyvsc31 := yyInitial_yyvs_size yyvs31 := yyspecial_routines31.make (yyvsc31) create yyspecial_routines32 yyvsc32 := yyInitial_yyvs_size yyvs32 := yyspecial_routines32.make (yyvsc32) create yyspecial_routines33 yyvsc33 := yyInitial_yyvs_size yyvs33 := yyspecial_routines33.make (yyvsc33) create yyspecial_routines34 yyvsc34 := yyInitial_yyvs_size yyvs34 := yyspecial_routines34.make (yyvsc34) create yyspecial_routines35 yyvsc35 := yyInitial_yyvs_size yyvs35 := yyspecial_routines35.make (yyvsc35) create yyspecial_routines36 yyvsc36 := yyInitial_yyvs_size yyvs36 := yyspecial_routines36.make (yyvsc36) create yyspecial_routines37 yyvsc37 := yyInitial_yyvs_size yyvs37 := yyspecial_routines37.make (yyvsc37) create yyspecial_routines38 yyvsc38 := yyInitial_yyvs_size yyvs38 := yyspecial_routines38.make (yyvsc38) create yyspecial_routines39 yyvsc39 := yyInitial_yyvs_size yyvs39 := yyspecial_routines39.make (yyvsc39) create yyspecial_routines40 yyvsc40 := yyInitial_yyvs_size yyvs40 := yyspecial_routines40.make (yyvsc40) create yyspecial_routines41 yyvsc41 := yyInitial_yyvs_size yyvs41 := yyspecial_routines41.make (yyvsc41) create yyspecial_routines42 yyvsc42 := yyInitial_yyvs_size yyvs42 := yyspecial_routines42.make (yyvsc42) create yyspecial_routines43 yyvsc43 := yyInitial_yyvs_size yyvs43 := yyspecial_routines43.make (yyvsc43) create yyspecial_routines44 yyvsc44 := yyInitial_yyvs_size yyvs44 := yyspecial_routines44.make (yyvsc44) create yyspecial_routines45 yyvsc45 := yyInitial_yyvs_size yyvs45 := yyspecial_routines45.make (yyvsc45) create yyspecial_routines46 yyvsc46 := yyInitial_yyvs_size yyvs46 := yyspecial_routines46.make (yyvsc46) create yyspecial_routines47 yyvsc47 := yyInitial_yyvs_size yyvs47 := yyspecial_routines47.make (yyvsc47) create yyspecial_routines48 yyvsc48 := yyInitial_yyvs_size yyvs48 := yyspecial_routines48.make (yyvsc48) create yyspecial_routines49 yyvsc49 := yyInitial_yyvs_size yyvs49 := yyspecial_routines49.make (yyvsc49) create yyspecial_routines50 yyvsc50 := yyInitial_yyvs_size yyvs50 := yyspecial_routines50.make (yyvsc50) create yyspecial_routines51 yyvsc51 := yyInitial_yyvs_size yyvs51 := yyspecial_routines51.make (yyvsc51) create yyspecial_routines52 yyvsc52 := yyInitial_yyvs_size yyvs52 := yyspecial_routines52.make (yyvsc52) create yyspecial_routines53 yyvsc53 := yyInitial_yyvs_size yyvs53 := yyspecial_routines53.make (yyvsc53) create yyspecial_routines54 yyvsc54 := yyInitial_yyvs_size yyvs54 := yyspecial_routines54.make (yyvsc54) create yyspecial_routines55 yyvsc55 := yyInitial_yyvs_size yyvs55 := yyspecial_routines55.make (yyvsc55) create yyspecial_routines56 yyvsc56 := yyInitial_yyvs_size yyvs56 := yyspecial_routines56.make (yyvsc56) create yyspecial_routines57 yyvsc57 := yyInitial_yyvs_size yyvs57 := yyspecial_routines57.make (yyvsc57) create yyspecial_routines58 yyvsc58 := yyInitial_yyvs_size yyvs58 := yyspecial_routines58.make (yyvsc58) create yyspecial_routines59 yyvsc59 := yyInitial_yyvs_size yyvs59 := yyspecial_routines59.make (yyvsc59) create yyspecial_routines60 yyvsc60 := yyInitial_yyvs_size yyvs60 := yyspecial_routines60.make (yyvsc60) create yyspecial_routines61 yyvsc61 := yyInitial_yyvs_size yyvs61 := yyspecial_routines61.make (yyvsc61) create yyspecial_routines62 yyvsc62 := yyInitial_yyvs_size yyvs62 := yyspecial_routines62.make (yyvsc62) create yyspecial_routines63 yyvsc63 := yyInitial_yyvs_size yyvs63 := yyspecial_routines63.make (yyvsc63) create yyspecial_routines64 yyvsc64 := yyInitial_yyvs_size yyvs64 := yyspecial_routines64.make (yyvsc64) create yyspecial_routines65 yyvsc65 := yyInitial_yyvs_size yyvs65 := yyspecial_routines65.make (yyvsc65) create yyspecial_routines66 yyvsc66 := yyInitial_yyvs_size yyvs66 := yyspecial_routines66.make (yyvsc66) create yyspecial_routines67 yyvsc67 := yyInitial_yyvs_size yyvs67 := yyspecial_routines67.make (yyvsc67) create yyspecial_routines68 yyvsc68 := yyInitial_yyvs_size yyvs68 := yyspecial_routines68.make (yyvsc68) create yyspecial_routines69 yyvsc69 := yyInitial_yyvs_size yyvs69 := yyspecial_routines69.make (yyvsc69) create yyspecial_routines70 yyvsc70 := yyInitial_yyvs_size yyvs70 := yyspecial_routines70.make (yyvsc70) create yyspecial_routines71 yyvsc71 := yyInitial_yyvs_size yyvs71 := yyspecial_routines71.make (yyvsc71) create yyspecial_routines72 yyvsc72 := yyInitial_yyvs_size yyvs72 := yyspecial_routines72.make (yyvsc72) create yyspecial_routines73 yyvsc73 := yyInitial_yyvs_size yyvs73 := yyspecial_routines73.make (yyvsc73) create yyspecial_routines74 yyvsc74 := yyInitial_yyvs_size yyvs74 := yyspecial_routines74.make (yyvsc74) create yyspecial_routines75 yyvsc75 := yyInitial_yyvs_size yyvs75 := yyspecial_routines75.make (yyvsc75) create yyspecial_routines76 yyvsc76 := yyInitial_yyvs_size yyvs76 := yyspecial_routines76.make (yyvsc76) create yyspecial_routines77 yyvsc77 := yyInitial_yyvs_size yyvs77 := yyspecial_routines77.make (yyvsc77) create yyspecial_routines78 yyvsc78 := yyInitial_yyvs_size yyvs78 := yyspecial_routines78.make (yyvsc78) create yyspecial_routines79 yyvsc79 := yyInitial_yyvs_size yyvs79 := yyspecial_routines79.make (yyvsc79) create yyspecial_routines80 yyvsc80 := yyInitial_yyvs_size yyvs80 := yyspecial_routines80.make (yyvsc80) create yyspecial_routines81 yyvsc81 := yyInitial_yyvs_size yyvs81 := yyspecial_routines81.make (yyvsc81) create yyspecial_routines82 yyvsc82 := yyInitial_yyvs_size yyvs82 := yyspecial_routines82.make (yyvsc82) create yyspecial_routines83 yyvsc83 := yyInitial_yyvs_size yyvs83 := yyspecial_routines83.make (yyvsc83) create yyspecial_routines84 yyvsc84 := yyInitial_yyvs_size yyvs84 := yyspecial_routines84.make (yyvsc84) create yyspecial_routines85 yyvsc85 := yyInitial_yyvs_size yyvs85 := yyspecial_routines85.make (yyvsc85) create yyspecial_routines86 yyvsc86 := yyInitial_yyvs_size yyvs86 := yyspecial_routines86.make (yyvsc86) create yyspecial_routines87 yyvsc87 := yyInitial_yyvs_size yyvs87 := yyspecial_routines87.make (yyvsc87) create yyspecial_routines88 yyvsc88 := yyInitial_yyvs_size yyvs88 := yyspecial_routines88.make (yyvsc88) create yyspecial_routines89 yyvsc89 := yyInitial_yyvs_size yyvs89 := yyspecial_routines89.make (yyvsc89) create yyspecial_routines90 yyvsc90 := yyInitial_yyvs_size yyvs90 := yyspecial_routines90.make (yyvsc90) create yyspecial_routines91 yyvsc91 := yyInitial_yyvs_size yyvs91 := yyspecial_routines91.make (yyvsc91) create yyspecial_routines92 yyvsc92 := yyInitial_yyvs_size yyvs92 := yyspecial_routines92.make (yyvsc92) create yyspecial_routines93 yyvsc93 := yyInitial_yyvs_size yyvs93 := yyspecial_routines93.make (yyvsc93) create yyspecial_routines94 yyvsc94 := yyInitial_yyvs_size yyvs94 := yyspecial_routines94.make (yyvsc94) create yyspecial_routines95 yyvsc95 := yyInitial_yyvs_size yyvs95 := yyspecial_routines95.make (yyvsc95) create yyspecial_routines96 yyvsc96 := yyInitial_yyvs_size yyvs96 := yyspecial_routines96.make (yyvsc96) create yyspecial_routines97 yyvsc97 := yyInitial_yyvs_size yyvs97 := yyspecial_routines97.make (yyvsc97) create yyspecial_routines98 yyvsc98 := yyInitial_yyvs_size yyvs98 := yyspecial_routines98.make (yyvsc98) create yyspecial_routines99 yyvsc99 := yyInitial_yyvs_size yyvs99 := yyspecial_routines99.make (yyvsc99) create yyspecial_routines100 yyvsc100 := yyInitial_yyvs_size yyvs100 := yyspecial_routines100.make (yyvsc100) create yyspecial_routines101 yyvsc101 := yyInitial_yyvs_size yyvs101 := yyspecial_routines101.make (yyvsc101) create yyspecial_routines102 yyvsc102 := yyInitial_yyvs_size yyvs102 := yyspecial_routines102.make (yyvsc102) create yyspecial_routines103 yyvsc103 := yyInitial_yyvs_size yyvs103 := yyspecial_routines103.make (yyvsc103) create yyspecial_routines104 yyvsc104 := yyInitial_yyvs_size yyvs104 := yyspecial_routines104.make (yyvsc104) create yyspecial_routines105 yyvsc105 := yyInitial_yyvs_size yyvs105 := yyspecial_routines105.make (yyvsc105) create yyspecial_routines106 yyvsc106 := yyInitial_yyvs_size yyvs106 := yyspecial_routines106.make (yyvsc106) create yyspecial_routines107 yyvsc107 := yyInitial_yyvs_size yyvs107 := yyspecial_routines107.make (yyvsc107) create yyspecial_routines108 yyvsc108 := yyInitial_yyvs_size yyvs108 := yyspecial_routines108.make (yyvsc108) create yyspecial_routines109 yyvsc109 := yyInitial_yyvs_size yyvs109 := yyspecial_routines109.make (yyvsc109) create yyspecial_routines110 yyvsc110 := yyInitial_yyvs_size yyvs110 := yyspecial_routines110.make (yyvsc110) create yyspecial_routines111 yyvsc111 := yyInitial_yyvs_size yyvs111 := yyspecial_routines111.make (yyvsc111) create yyspecial_routines112 yyvsc112 := yyInitial_yyvs_size yyvs112 := yyspecial_routines112.make (yyvsc112) create yyspecial_routines113 yyvsc113 := yyInitial_yyvs_size yyvs113 := yyspecial_routines113.make (yyvsc113) create yyspecial_routines114 yyvsc114 := yyInitial_yyvs_size yyvs114 := yyspecial_routines114.make (yyvsc114) create yyspecial_routines115 yyvsc115 := yyInitial_yyvs_size yyvs115 := yyspecial_routines115.make (yyvsc115) create yyspecial_routines116 yyvsc116 := yyInitial_yyvs_size yyvs116 := yyspecial_routines116.make (yyvsc116) create yyspecial_routines117 yyvsc117 := yyInitial_yyvs_size yyvs117 := yyspecial_routines117.make (yyvsc117) create yyspecial_routines118 yyvsc118 := yyInitial_yyvs_size yyvs118 := yyspecial_routines118.make (yyvsc118) create yyspecial_routines119 yyvsc119 := yyInitial_yyvs_size yyvs119 := yyspecial_routines119.make (yyvsc119) create yyspecial_routines120 yyvsc120 := yyInitial_yyvs_size yyvs120 := yyspecial_routines120.make (yyvsc120) create yyspecial_routines121 yyvsc121 := yyInitial_yyvs_size yyvs121 := yyspecial_routines121.make (yyvsc121) create yyspecial_routines122 yyvsc122 := yyInitial_yyvs_size yyvs122 := yyspecial_routines122.make (yyvsc122) create yyspecial_routines123 yyvsc123 := yyInitial_yyvs_size yyvs123 := yyspecial_routines123.make (yyvsc123) create yyspecial_routines124 yyvsc124 := yyInitial_yyvs_size yyvs124 := yyspecial_routines124.make (yyvsc124) create yyspecial_routines125 yyvsc125 := yyInitial_yyvs_size yyvs125 := yyspecial_routines125.make (yyvsc125) create yyspecial_routines126 yyvsc126 := yyInitial_yyvs_size yyvs126 := yyspecial_routines126.make (yyvsc126) create yyspecial_routines127 yyvsc127 := yyInitial_yyvs_size yyvs127 := yyspecial_routines127.make (yyvsc127) create yyspecial_routines128 yyvsc128 := yyInitial_yyvs_size yyvs128 := yyspecial_routines128.make (yyvsc128) create yyspecial_routines129 yyvsc129 := yyInitial_yyvs_size yyvs129 := yyspecial_routines129.make (yyvsc129) create yyspecial_routines130 yyvsc130 := yyInitial_yyvs_size yyvs130 := yyspecial_routines130.make (yyvsc130) create yyspecial_routines131 yyvsc131 := yyInitial_yyvs_size yyvs131 := yyspecial_routines131.make (yyvsc131) create yyspecial_routines132 yyvsc132 := yyInitial_yyvs_size yyvs132 := yyspecial_routines132.make (yyvsc132) create yyspecial_routines133 yyvsc133 := yyInitial_yyvs_size yyvs133 := yyspecial_routines133.make (yyvsc133) create yyspecial_routines134 yyvsc134 := yyInitial_yyvs_size yyvs134 := yyspecial_routines134.make (yyvsc134) create yyspecial_routines135 yyvsc135 := yyInitial_yyvs_size yyvs135 := yyspecial_routines135.make (yyvsc135) end yy_init_value_stacks -- Initialize value stacks. do yyvsp1 := -1 yyvsp2 := -1 yyvsp3 := -1 yyvsp4 := -1 yyvsp5 := -1 yyvsp6 := -1 yyvsp7 := -1 yyvsp8 := -1 yyvsp9 := -1 yyvsp10 := -1 yyvsp11 := -1 yyvsp12 := -1 yyvsp13 := -1 yyvsp14 := -1 yyvsp15 := -1 yyvsp16 := -1 yyvsp17 := -1 yyvsp18 := -1 yyvsp19 := -1 yyvsp20 := -1 yyvsp21 := -1 yyvsp22 := -1 yyvsp23 := -1 yyvsp24 := -1 yyvsp25 := -1 yyvsp26 := -1 yyvsp27 := -1 yyvsp28 := -1 yyvsp29 := -1 yyvsp30 := -1 yyvsp31 := -1 yyvsp32 := -1 yyvsp33 := -1 yyvsp34 := -1 yyvsp35 := -1 yyvsp36 := -1 yyvsp37 := -1 yyvsp38 := -1 yyvsp39 := -1 yyvsp40 := -1 yyvsp41 := -1 yyvsp42 := -1 yyvsp43 := -1 yyvsp44 := -1 yyvsp45 := -1 yyvsp46 := -1 yyvsp47 := -1 yyvsp48 := -1 yyvsp49 := -1 yyvsp50 := -1 yyvsp51 := -1 yyvsp52 := -1 yyvsp53 := -1 yyvsp54 := -1 yyvsp55 := -1 yyvsp56 := -1 yyvsp57 := -1 yyvsp58 := -1 yyvsp59 := -1 yyvsp60 := -1 yyvsp61 := -1 yyvsp62 := -1 yyvsp63 := -1 yyvsp64 := -1 yyvsp65 := -1 yyvsp66 := -1 yyvsp67 := -1 yyvsp68 := -1 yyvsp69 := -1 yyvsp70 := -1 yyvsp71 := -1 yyvsp72 := -1 yyvsp73 := -1 yyvsp74 := -1 yyvsp75 := -1 yyvsp76 := -1 yyvsp77 := -1 yyvsp78 := -1 yyvsp79 := -1 yyvsp80 := -1 yyvsp81 := -1 yyvsp82 := -1 yyvsp83 := -1 yyvsp84 := -1 yyvsp85 := -1 yyvsp86 := -1 yyvsp87 := -1 yyvsp88 := -1 yyvsp89 := -1 yyvsp90 := -1 yyvsp91 := -1 yyvsp92 := -1 yyvsp93 := -1 yyvsp94 := -1 yyvsp95 := -1 yyvsp96 := -1 yyvsp97 := -1 yyvsp98 := -1 yyvsp99 := -1 yyvsp100 := -1 yyvsp101 := -1 yyvsp102 := -1 yyvsp103 := -1 yyvsp104 := -1 yyvsp105 := -1 yyvsp106 := -1 yyvsp107 := -1 yyvsp108 := -1 yyvsp109 := -1 yyvsp110 := -1 yyvsp111 := -1 yyvsp112 := -1 yyvsp113 := -1 yyvsp114 := -1 yyvsp115 := -1 yyvsp116 := -1 yyvsp117 := -1 yyvsp118 := -1 yyvsp119 := -1 yyvsp120 := -1 yyvsp121 := -1 yyvsp122 := -1 yyvsp123 := -1 yyvsp124 := -1 yyvsp125 := -1 yyvsp126 := -1 yyvsp127 := -1 yyvsp128 := -1 yyvsp129 := -1 yyvsp130 := -1 yyvsp131 := -1 yyvsp132 := -1 yyvsp133 := -1 yyvsp134 := -1 yyvsp135 := -1 end yy_clear_value_stacks -- Clear objects in semantic value stacks so that -- they can be collected by the garbage collector. do yyvs1.keep_head (0) yyvs2.keep_head (0) yyvs3.keep_head (0) yyvs4.keep_head (0) yyvs5.keep_head (0) yyvs6.keep_head (0) yyvs7.keep_head (0) yyvs8.keep_head (0) yyvs9.keep_head (0) yyvs10.keep_head (0) yyvs11.keep_head (0) yyvs12.keep_head (0) yyvs13.keep_head (0) yyvs14.keep_head (0) yyvs15.keep_head (0) yyvs16.keep_head (0) yyvs17.keep_head (0) yyvs18.keep_head (0) yyvs19.keep_head (0) yyvs20.keep_head (0) yyvs21.keep_head (0) yyvs22.keep_head (0) yyvs23.keep_head (0) yyvs24.keep_head (0) yyvs25.keep_head (0) yyvs26.keep_head (0) yyvs27.keep_head (0) yyvs28.keep_head (0) yyvs29.keep_head (0) yyvs30.keep_head (0) yyvs31.keep_head (0) yyvs32.keep_head (0) yyvs33.keep_head (0) yyvs34.keep_head (0) yyvs35.keep_head (0) yyvs36.keep_head (0) yyvs37.keep_head (0) yyvs38.keep_head (0) yyvs39.keep_head (0) yyvs40.keep_head (0) yyvs41.keep_head (0) yyvs42.keep_head (0) yyvs43.keep_head (0) yyvs44.keep_head (0) yyvs45.keep_head (0) yyvs46.keep_head (0) yyvs47.keep_head (0) yyvs48.keep_head (0) yyvs49.keep_head (0) yyvs50.keep_head (0) yyvs51.keep_head (0) yyvs52.keep_head (0) yyvs53.keep_head (0) yyvs54.keep_head (0) yyvs55.keep_head (0) yyvs56.keep_head (0) yyvs57.keep_head (0) yyvs58.keep_head (0) yyvs59.keep_head (0) yyvs60.keep_head (0) yyvs61.keep_head (0) yyvs62.keep_head (0) yyvs63.keep_head (0) yyvs64.keep_head (0) yyvs65.keep_head (0) yyvs66.keep_head (0) yyvs67.keep_head (0) yyvs68.keep_head (0) yyvs69.keep_head (0) yyvs70.keep_head (0) yyvs71.keep_head (0) yyvs72.keep_head (0) yyvs73.keep_head (0) yyvs74.keep_head (0) yyvs75.keep_head (0) yyvs76.keep_head (0) yyvs77.keep_head (0) yyvs78.keep_head (0) yyvs79.keep_head (0) yyvs80.keep_head (0) yyvs81.keep_head (0) yyvs82.keep_head (0) yyvs83.keep_head (0) yyvs84.keep_head (0) yyvs85.keep_head (0) yyvs86.keep_head (0) yyvs87.keep_head (0) yyvs88.keep_head (0) yyvs89.keep_head (0) yyvs90.keep_head (0) yyvs91.keep_head (0) yyvs92.keep_head (0) yyvs93.keep_head (0) yyvs94.keep_head (0) yyvs95.keep_head (0) yyvs96.keep_head (0) yyvs97.keep_head (0) yyvs98.keep_head (0) yyvs99.keep_head (0) yyvs100.keep_head (0) yyvs101.keep_head (0) yyvs102.keep_head (0) yyvs103.keep_head (0) yyvs104.keep_head (0) yyvs105.keep_head (0) yyvs106.keep_head (0) yyvs107.keep_head (0) yyvs108.keep_head (0) yyvs109.keep_head (0) yyvs110.keep_head (0) yyvs111.keep_head (0) yyvs112.keep_head (0) yyvs113.keep_head (0) yyvs114.keep_head (0) yyvs115.keep_head (0) yyvs116.keep_head (0) yyvs117.keep_head (0) yyvs118.keep_head (0) yyvs119.keep_head (0) yyvs120.keep_head (0) yyvs121.keep_head (0) yyvs122.keep_head (0) yyvs123.keep_head (0) yyvs124.keep_head (0) yyvs125.keep_head (0) yyvs126.keep_head (0) yyvs127.keep_head (0) yyvs128.keep_head (0) yyvs129.keep_head (0) yyvs130.keep_head (0) yyvs131.keep_head (0) yyvs132.keep_head (0) yyvs133.keep_head (0) yyvs134.keep_head (0) yyvs135.keep_head (0) end yy_push_last_value (yychar1: INTEGER) -- Push semantic value associated with token `last_token' -- (with internal id `yychar1') on top of corresponding -- value stack. do inspect yytypes2.item (yychar1) when 1 then yyvsp1 := yyvsp1 + 1 if yyvsp1 >= yyvsc1 then debug ("GEYACC") std.error.put_line ("Resize yyvs1") end yyvsc1 := yyvsc1 + yyInitial_yyvs_size yyvs1 := yyspecial_routines1.aliased_resized_area (yyvs1, yyvsc1) end yyspecial_routines1.force (yyvs1, last_detachable_any_value, yyvsp1) when 4 then yyvsp4 := yyvsp4 + 1 if yyvsp4 >= yyvsc4 then debug ("GEYACC") std.error.put_line ("Resize yyvs4") end yyvsc4 := yyvsc4 + yyInitial_yyvs_size yyvs4 := yyspecial_routines4.aliased_resized_area (yyvs4, yyvsc4) end yyspecial_routines4.force (yyvs4, last_detachable_symbol_as_value, yyvsp4) when 6 then yyvsp6 := yyvsp6 + 1 if yyvsp6 >= yyvsc6 then debug ("GEYACC") std.error.put_line ("Resize yyvs6") end yyvsc6 := yyvsc6 + yyInitial_yyvs_size yyvs6 := yyspecial_routines6.aliased_resized_area (yyvs6, yyvsc6) end yyspecial_routines6.force (yyvs6, last_symbol_id_value, yyvsp6) when 14 then yyvsp14 := yyvsp14 + 1 if yyvsp14 >= yyvsc14 then debug ("GEYACC") std.error.put_line ("Resize yyvs14") end yyvsc14 := yyvsc14 + yyInitial_yyvs_size yyvs14 := yyspecial_routines14.aliased_resized_area (yyvs14, yyvsc14) end yyspecial_routines14.force (yyvs14, last_detachable_keyword_as_value, yyvsp14) when 2 then yyvsp2 := yyvsp2 + 1 if yyvsp2 >= yyvsc2 then debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.aliased_resized_area (yyvs2, yyvsc2) end yyspecial_routines2.force (yyvs2, last_detachable_id_as_value, yyvsp2) when 3 then yyvsp3 := yyvsp3 + 1 if yyvsp3 >= yyvsc3 then debug ("GEYACC") std.error.put_line ("Resize yyvs3") end yyvsc3 := yyvsc3 + yyInitial_yyvs_size yyvs3 := yyspecial_routines3.aliased_resized_area (yyvs3, yyvsc3) end yyspecial_routines3.force (yyvs3, last_detachable_char_as_value, yyvsp3) when 7 then yyvsp7 := yyvsp7 + 1 if yyvsp7 >= yyvsc7 then debug ("GEYACC") std.error.put_line ("Resize yyvs7") end yyvsc7 := yyvsc7 + yyInitial_yyvs_size yyvs7 := yyspecial_routines7.aliased_resized_area (yyvs7, yyvsc7) end yyspecial_routines7.force (yyvs7, last_detachable_bool_as_value, yyvsp7) when 8 then yyvsp8 := yyvsp8 + 1 if yyvsp8 >= yyvsc8 then debug ("GEYACC") std.error.put_line ("Resize yyvs8") end yyvsc8 := yyvsc8 + yyInitial_yyvs_size yyvs8 := yyspecial_routines8.aliased_resized_area (yyvs8, yyvsc8) end yyspecial_routines8.force (yyvs8, last_detachable_result_as_value, yyvsp8) when 9 then yyvsp9 := yyvsp9 + 1 if yyvsp9 >= yyvsc9 then debug ("GEYACC") std.error.put_line ("Resize yyvs9") end yyvsc9 := yyvsc9 + yyInitial_yyvs_size yyvs9 := yyspecial_routines9.aliased_resized_area (yyvs9, yyvsc9) end yyspecial_routines9.force (yyvs9, last_detachable_retry_as_value, yyvsp9) when 10 then yyvsp10 := yyvsp10 + 1 if yyvsp10 >= yyvsc10 then debug ("GEYACC") std.error.put_line ("Resize yyvs10") end yyvsc10 := yyvsc10 + yyInitial_yyvs_size yyvs10 := yyspecial_routines10.aliased_resized_area (yyvs10, yyvsc10) end yyspecial_routines10.force (yyvs10, last_detachable_unique_as_value, yyvsp10) when 11 then yyvsp11 := yyvsp11 + 1 if yyvsp11 >= yyvsc11 then debug ("GEYACC") std.error.put_line ("Resize yyvs11") end yyvsc11 := yyvsc11 + yyInitial_yyvs_size yyvs11 := yyspecial_routines11.aliased_resized_area (yyvs11, yyvsc11) end yyspecial_routines11.force (yyvs11, last_detachable_current_as_value, yyvsp11) when 12 then yyvsp12 := yyvsp12 + 1 if yyvsp12 >= yyvsc12 then debug ("GEYACC") std.error.put_line ("Resize yyvs12") end yyvsc12 := yyvsc12 + yyInitial_yyvs_size yyvs12 := yyspecial_routines12.aliased_resized_area (yyvs12, yyvsc12) end yyspecial_routines12.force (yyvs12, last_detachable_deferred_as_value, yyvsp12) when 13 then yyvsp13 := yyvsp13 + 1 if yyvsp13 >= yyvsc13 then debug ("GEYACC") std.error.put_line ("Resize yyvs13") end yyvsc13 := yyvsc13 + yyInitial_yyvs_size yyvs13 := yyspecial_routines13.aliased_resized_area (yyvs13, yyvsc13) end yyspecial_routines13.force (yyvs13, last_detachable_void_as_value, yyvsp13) when 15 then yyvsp15 := yyvsp15 + 1 if yyvsp15 >= yyvsc15 then debug ("GEYACC") std.error.put_line ("Resize yyvs15") end yyvsc15 := yyvsc15 + yyInitial_yyvs_size yyvs15 := yyspecial_routines15.aliased_resized_area (yyvs15, yyvsc15) end yyspecial_routines15.force (yyvs15, last_keyword_id_value, yyvsp15) when 16 then yyvsp16 := yyvsp16 + 1 if yyvsp16 >= yyvsc16 then debug ("GEYACC") std.error.put_line ("Resize yyvs16") end yyvsc16 := yyvsc16 + yyInitial_yyvs_size yyvs16 := yyspecial_routines16.aliased_resized_area (yyvs16, yyvsc16) end yyspecial_routines16.force (yyvs16, last_detachable_string_as_value, yyvsp16) else debug ("GEYACC") std.error.put_string ("Error in parser: not a token type: ") std.error.put_integer (yytypes2.item (yychar1)) std.error.put_new_line end abort end end yy_push_error_value -- Push semantic value associated with token 'error' -- on top of corresponding value stack. local yyval1: detachable ANY do yyvsp1 := yyvsp1 + 1 if yyvsp1 >= yyvsc1 then debug ("GEYACC") std.error.put_line ("Resize yyvs1") end yyvsc1 := yyvsc1 + yyInitial_yyvs_size yyvs1 := yyspecial_routines1.aliased_resized_area (yyvs1, yyvsc1) end yyspecial_routines1.force (yyvs1, yyval1, yyvsp1) end yy_pop_last_value (yystate: INTEGER) -- Pop semantic value from stack when in state `yystate'. local yy_type_id: INTEGER do yy_type_id := yytypes1.item (yystate) inspect yy_type_id when 1 then yyvsp1 := yyvsp1 - 1 when 2 then yyvsp2 := yyvsp2 - 1 when 3 then yyvsp3 := yyvsp3 - 1 when 4 then yyvsp4 := yyvsp4 - 1 when 5 then yyvsp5 := yyvsp5 - 1 when 6 then yyvsp6 := yyvsp6 - 1 when 7 then yyvsp7 := yyvsp7 - 1 when 8 then yyvsp8 := yyvsp8 - 1 when 9 then yyvsp9 := yyvsp9 - 1 when 10 then yyvsp10 := yyvsp10 - 1 when 11 then yyvsp11 := yyvsp11 - 1 when 12 then yyvsp12 := yyvsp12 - 1 when 13 then yyvsp13 := yyvsp13 - 1 when 14 then yyvsp14 := yyvsp14 - 1 when 15 then yyvsp15 := yyvsp15 - 1 when 16 then yyvsp16 := yyvsp16 - 1 when 17 then yyvsp17 := yyvsp17 - 1 when 18 then yyvsp18 := yyvsp18 - 1 when 19 then yyvsp19 := yyvsp19 - 1 when 20 then yyvsp20 := yyvsp20 - 1 when 21 then yyvsp21 := yyvsp21 - 1 when 22 then yyvsp22 := yyvsp22 - 1 when 23 then yyvsp23 := yyvsp23 - 1 when 24 then yyvsp24 := yyvsp24 - 1 when 25 then yyvsp25 := yyvsp25 - 1 when 26 then yyvsp26 := yyvsp26 - 1 when 27 then yyvsp27 := yyvsp27 - 1 when 28 then yyvsp28 := yyvsp28 - 1 when 29 then yyvsp29 := yyvsp29 - 1 when 30 then yyvsp30 := yyvsp30 - 1 when 31 then yyvsp31 := yyvsp31 - 1 when 32 then yyvsp32 := yyvsp32 - 1 when 33 then yyvsp33 := yyvsp33 - 1 when 34 then yyvsp34 := yyvsp34 - 1 when 35 then yyvsp35 := yyvsp35 - 1 when 36 then yyvsp36 := yyvsp36 - 1 when 37 then yyvsp37 := yyvsp37 - 1 when 38 then yyvsp38 := yyvsp38 - 1 when 39 then yyvsp39 := yyvsp39 - 1 when 40 then yyvsp40 := yyvsp40 - 1 when 41 then yyvsp41 := yyvsp41 - 1 when 42 then yyvsp42 := yyvsp42 - 1 when 43 then yyvsp43 := yyvsp43 - 1 when 44 then yyvsp44 := yyvsp44 - 1 when 45 then yyvsp45 := yyvsp45 - 1 when 46 then yyvsp46 := yyvsp46 - 1 when 47 then yyvsp47 := yyvsp47 - 1 when 48 then yyvsp48 := yyvsp48 - 1 when 49 then yyvsp49 := yyvsp49 - 1 when 50 then yyvsp50 := yyvsp50 - 1 when 51 then yyvsp51 := yyvsp51 - 1 when 52 then yyvsp52 := yyvsp52 - 1 when 53 then yyvsp53 := yyvsp53 - 1 when 54 then yyvsp54 := yyvsp54 - 1 when 55 then yyvsp55 := yyvsp55 - 1 when 56 then yyvsp56 := yyvsp56 - 1 when 57 then yyvsp57 := yyvsp57 - 1 when 58 then yyvsp58 := yyvsp58 - 1 when 59 then yyvsp59 := yyvsp59 - 1 when 60 then yyvsp60 := yyvsp60 - 1 when 61 then yyvsp61 := yyvsp61 - 1 when 62 then yyvsp62 := yyvsp62 - 1 when 63 then yyvsp63 := yyvsp63 - 1 when 64 then yyvsp64 := yyvsp64 - 1 when 65 then yyvsp65 := yyvsp65 - 1 when 66 then yyvsp66 := yyvsp66 - 1 when 67 then yyvsp67 := yyvsp67 - 1 when 68 then yyvsp68 := yyvsp68 - 1 when 69 then yyvsp69 := yyvsp69 - 1 when 70 then yyvsp70 := yyvsp70 - 1 when 71 then yyvsp71 := yyvsp71 - 1 when 72 then yyvsp72 := yyvsp72 - 1 when 73 then yyvsp73 := yyvsp73 - 1 when 74 then yyvsp74 := yyvsp74 - 1 when 75 then yyvsp75 := yyvsp75 - 1 when 76 then yyvsp76 := yyvsp76 - 1 when 77 then yyvsp77 := yyvsp77 - 1 when 78 then yyvsp78 := yyvsp78 - 1 when 79 then yyvsp79 := yyvsp79 - 1 when 80 then yyvsp80 := yyvsp80 - 1 when 81 then yyvsp81 := yyvsp81 - 1 when 82 then yyvsp82 := yyvsp82 - 1 when 83 then yyvsp83 := yyvsp83 - 1 when 84 then yyvsp84 := yyvsp84 - 1 when 85 then yyvsp85 := yyvsp85 - 1 when 86 then yyvsp86 := yyvsp86 - 1 when 87 then yyvsp87 := yyvsp87 - 1 when 88 then yyvsp88 := yyvsp88 - 1 when 89 then yyvsp89 := yyvsp89 - 1 when 90 then yyvsp90 := yyvsp90 - 1 when 91 then yyvsp91 := yyvsp91 - 1 when 92 then yyvsp92 := yyvsp92 - 1 when 93 then yyvsp93 := yyvsp93 - 1 when 94 then yyvsp94 := yyvsp94 - 1 when 95 then yyvsp95 := yyvsp95 - 1 when 96 then yyvsp96 := yyvsp96 - 1 when 97 then yyvsp97 := yyvsp97 - 1 when 98 then yyvsp98 := yyvsp98 - 1 when 99 then yyvsp99 := yyvsp99 - 1 when 100 then yyvsp100 := yyvsp100 - 1 when 101 then yyvsp101 := yyvsp101 - 1 when 102 then yyvsp102 := yyvsp102 - 1 when 103 then yyvsp103 := yyvsp103 - 1 when 104 then yyvsp104 := yyvsp104 - 1 when 105 then yyvsp105 := yyvsp105 - 1 when 106 then yyvsp106 := yyvsp106 - 1 when 107 then yyvsp107 := yyvsp107 - 1 when 108 then yyvsp108 := yyvsp108 - 1 when 109 then yyvsp109 := yyvsp109 - 1 when 110 then yyvsp110 := yyvsp110 - 1 when 111 then yyvsp111 := yyvsp111 - 1 when 112 then yyvsp112 := yyvsp112 - 1 when 113 then yyvsp113 := yyvsp113 - 1 when 114 then yyvsp114 := yyvsp114 - 1 when 115 then yyvsp115 := yyvsp115 - 1 when 116 then yyvsp116 := yyvsp116 - 1 when 117 then yyvsp117 := yyvsp117 - 1 when 118 then yyvsp118 := yyvsp118 - 1 when 119 then yyvsp119 := yyvsp119 - 1 when 120 then yyvsp120 := yyvsp120 - 1 when 121 then yyvsp121 := yyvsp121 - 1 when 122 then yyvsp122 := yyvsp122 - 1 when 123 then yyvsp123 := yyvsp123 - 1 when 124 then yyvsp124 := yyvsp124 - 1 when 125 then yyvsp125 := yyvsp125 - 1 when 126 then yyvsp126 := yyvsp126 - 1 when 127 then yyvsp127 := yyvsp127 - 1 when 128 then yyvsp128 := yyvsp128 - 1 when 129 then yyvsp129 := yyvsp129 - 1 when 130 then yyvsp130 := yyvsp130 - 1 when 131 then yyvsp131 := yyvsp131 - 1 when 132 then yyvsp132 := yyvsp132 - 1 when 133 then yyvsp133 := yyvsp133 - 1 when 134 then yyvsp134 := yyvsp134 - 1 when 135 then yyvsp135 := yyvsp135 - 1 else debug ("GEYACC") std.error.put_string ("Error in parser: unknown type id: ") std.error.put_integer (yy_type_id) std.error.put_new_line end abort end end yy_run_geyacc -- You must run geyacc to regenerate this class. do end feature {NONE} -- Semantic actions yy_do_action (yy_act: INTEGER) -- Execute semantic action. do if yy_act <= 200 then yy_do_action_1_200 (yy_act) elseif yy_act <= 400 then yy_do_action_201_400 (yy_act) elseif yy_act <= 600 then yy_do_action_401_600 (yy_act) elseif yy_act <= 800 then yy_do_action_601_800 (yy_act) else debug ("GEYACC") std.error.put_string ("Error in parser: unknown rule id: ") std.error.put_integer (yy_act) std.error.put_new_line end abort end end yy_do_action_1_200 (yy_act: INTEGER) -- Execute semantic action. do inspect yy_act when 1 then --|#line "eiffel.y" yy_do_action_1 when 2 then --|#line "eiffel.y" yy_do_action_2 when 3 then --|#line "eiffel.y" yy_do_action_3 when 4 then --|#line "eiffel.y" yy_do_action_4 when 5 then --|#line "eiffel.y" yy_do_action_5 when 6 then --|#line "eiffel.y" yy_do_action_6 when 7 then --|#line "eiffel.y" yy_do_action_7 when 8 then --|#line "eiffel.y" yy_do_action_8 when 9 then --|#line "eiffel.y" yy_do_action_9 when 10 then --|#line "eiffel.y" yy_do_action_10 when 11 then --|#line "eiffel.y" yy_do_action_11 when 12 then --|#line "eiffel.y" yy_do_action_12 when 13 then --|#line "eiffel.y" yy_do_action_13 when 14 then --|#line "eiffel.y" yy_do_action_14 when 15 then --|#line "eiffel.y" yy_do_action_15 when 16 then --|#line "eiffel.y" yy_do_action_16 when 17 then --|#line "eiffel.y" yy_do_action_17 when 18 then --|#line "eiffel.y" yy_do_action_18 when 19 then --|#line "eiffel.y" yy_do_action_19 when 20 then --|#line "eiffel.y" yy_do_action_20 when 21 then --|#line "eiffel.y" yy_do_action_21 when 22 then --|#line "eiffel.y" yy_do_action_22 when 23 then --|#line "eiffel.y" yy_do_action_23 when 24 then --|#line "eiffel.y" yy_do_action_24 when 25 then --|#line "eiffel.y" yy_do_action_25 when 26 then --|#line "eiffel.y" yy_do_action_26 when 27 then --|#line "eiffel.y" yy_do_action_27 when 28 then --|#line "eiffel.y" yy_do_action_28 when 29 then --|#line "eiffel.y" yy_do_action_29 when 30 then --|#line "eiffel.y" yy_do_action_30 when 31 then --|#line "eiffel.y" yy_do_action_31 when 32 then --|#line "eiffel.y" yy_do_action_32 when 33 then --|#line "eiffel.y" yy_do_action_33 when 34 then --|#line "eiffel.y" yy_do_action_34 when 35 then --|#line "eiffel.y" yy_do_action_35 when 36 then --|#line "eiffel.y" yy_do_action_36 when 37 then --|#line "eiffel.y" yy_do_action_37 when 38 then --|#line "eiffel.y" yy_do_action_38 when 39 then --|#line "eiffel.y" yy_do_action_39 when 40 then --|#line "eiffel.y" yy_do_action_40 when 41 then --|#line "eiffel.y" yy_do_action_41 when 42 then --|#line "eiffel.y" yy_do_action_42 when 43 then --|#line "eiffel.y" yy_do_action_43 when 44 then --|#line "eiffel.y" yy_do_action_44 when 45 then --|#line "eiffel.y" yy_do_action_45 when 46 then --|#line "eiffel.y" yy_do_action_46 when 47 then --|#line "eiffel.y" yy_do_action_47 when 48 then --|#line "eiffel.y" yy_do_action_48 when 49 then --|#line "eiffel.y" yy_do_action_49 when 50 then --|#line "eiffel.y" yy_do_action_50 when 51 then --|#line "eiffel.y" yy_do_action_51 when 52 then --|#line "eiffel.y" yy_do_action_52 when 53 then --|#line "eiffel.y" yy_do_action_53 when 54 then --|#line "eiffel.y" yy_do_action_54 when 55 then --|#line "eiffel.y" yy_do_action_55 when 56 then --|#line "eiffel.y" yy_do_action_56 when 57 then --|#line "eiffel.y" yy_do_action_57 when 58 then --|#line "eiffel.y" yy_do_action_58 when 59 then --|#line "eiffel.y" yy_do_action_59 when 60 then --|#line "eiffel.y" yy_do_action_60 when 61 then --|#line "eiffel.y" yy_do_action_61 when 62 then --|#line "eiffel.y" yy_do_action_62 when 63 then --|#line "eiffel.y" yy_do_action_63 when 64 then --|#line "eiffel.y" yy_do_action_64 when 65 then --|#line "eiffel.y" yy_do_action_65 when 66 then --|#line "eiffel.y" yy_do_action_66 when 67 then --|#line "eiffel.y" yy_do_action_67 when 68 then --|#line "eiffel.y" yy_do_action_68 when 69 then --|#line "eiffel.y" yy_do_action_69 when 70 then --|#line "eiffel.y" yy_do_action_70 when 71 then --|#line "eiffel.y" yy_do_action_71 when 72 then --|#line "eiffel.y" yy_do_action_72 when 73 then --|#line "eiffel.y" yy_do_action_73 when 74 then --|#line "eiffel.y" yy_do_action_74 when 75 then --|#line "eiffel.y" yy_do_action_75 when 76 then --|#line "eiffel.y" yy_do_action_76 when 77 then --|#line "eiffel.y" yy_do_action_77 when 78 then --|#line "eiffel.y" yy_do_action_78 when 79 then --|#line "eiffel.y" yy_do_action_79 when 80 then --|#line "eiffel.y" yy_do_action_80 when 81 then --|#line "eiffel.y" yy_do_action_81 when 82 then --|#line "eiffel.y" yy_do_action_82 when 83 then --|#line "eiffel.y" yy_do_action_83 when 84 then --|#line "eiffel.y" yy_do_action_84 when 85 then --|#line "eiffel.y" yy_do_action_85 when 86 then --|#line "eiffel.y" yy_do_action_86 when 87 then --|#line "eiffel.y" yy_do_action_87 when 88 then --|#line "eiffel.y" yy_do_action_88 when 89 then --|#line "eiffel.y" yy_do_action_89 when 90 then --|#line "eiffel.y" yy_do_action_90 when 91 then --|#line "eiffel.y" yy_do_action_91 when 92 then --|#line "eiffel.y" yy_do_action_92 when 93 then --|#line "eiffel.y" yy_do_action_93 when 94 then --|#line "eiffel.y" yy_do_action_94 when 95 then --|#line "eiffel.y" yy_do_action_95 when 96 then --|#line "eiffel.y" yy_do_action_96 when 97 then --|#line "eiffel.y" yy_do_action_97 when 98 then --|#line "eiffel.y" yy_do_action_98 when 99 then --|#line "eiffel.y" yy_do_action_99 when 100 then --|#line "eiffel.y" yy_do_action_100 when 101 then --|#line "eiffel.y" yy_do_action_101 when 102 then --|#line "eiffel.y" yy_do_action_102 when 103 then --|#line "eiffel.y" yy_do_action_103 when 104 then --|#line "eiffel.y" yy_do_action_104 when 105 then --|#line "eiffel.y" yy_do_action_105 when 106 then --|#line "eiffel.y" yy_do_action_106 when 107 then --|#line "eiffel.y" yy_do_action_107 when 108 then --|#line "eiffel.y" yy_do_action_108 when 109 then --|#line "eiffel.y" yy_do_action_109 when 110 then --|#line "eiffel.y" yy_do_action_110 when 111 then --|#line "eiffel.y" yy_do_action_111 when 112 then --|#line "eiffel.y" yy_do_action_112 when 113 then --|#line "eiffel.y" yy_do_action_113 when 114 then --|#line "eiffel.y" yy_do_action_114 when 115 then --|#line "eiffel.y" yy_do_action_115 when 116 then --|#line "eiffel.y" yy_do_action_116 when 117 then --|#line "eiffel.y" yy_do_action_117 when 118 then --|#line "eiffel.y" yy_do_action_118 when 119 then --|#line "eiffel.y" yy_do_action_119 when 120 then --|#line "eiffel.y" yy_do_action_120 when 121 then --|#line "eiffel.y" yy_do_action_121 when 122 then --|#line "eiffel.y" yy_do_action_122 when 123 then --|#line "eiffel.y" yy_do_action_123 when 124 then --|#line "eiffel.y" yy_do_action_124 when 125 then --|#line "eiffel.y" yy_do_action_125 when 126 then --|#line "eiffel.y" yy_do_action_126 when 127 then --|#line "eiffel.y" yy_do_action_127 when 128 then --|#line "eiffel.y" yy_do_action_128 when 129 then --|#line "eiffel.y" yy_do_action_129 when 130 then --|#line "eiffel.y" yy_do_action_130 when 131 then --|#line "eiffel.y" yy_do_action_131 when 132 then --|#line "eiffel.y" yy_do_action_132 when 133 then --|#line "eiffel.y" yy_do_action_133 when 134 then --|#line "eiffel.y" yy_do_action_134 when 135 then --|#line "eiffel.y" yy_do_action_135 when 136 then --|#line "eiffel.y" yy_do_action_136 when 137 then --|#line "eiffel.y" yy_do_action_137 when 138 then --|#line "eiffel.y" yy_do_action_138 when 139 then --|#line "eiffel.y" yy_do_action_139 when 140 then --|#line "eiffel.y" yy_do_action_140 when 141 then --|#line "eiffel.y" yy_do_action_141 when 142 then --|#line "eiffel.y" yy_do_action_142 when 143 then --|#line "eiffel.y" yy_do_action_143 when 144 then --|#line "eiffel.y" yy_do_action_144 when 145 then --|#line "eiffel.y" yy_do_action_145 when 146 then --|#line "eiffel.y" yy_do_action_146 when 147 then --|#line "eiffel.y" yy_do_action_147 when 148 then --|#line "eiffel.y" yy_do_action_148 when 149 then --|#line "eiffel.y" yy_do_action_149 when 150 then --|#line "eiffel.y" yy_do_action_150 when 151 then --|#line "eiffel.y" yy_do_action_151 when 152 then --|#line "eiffel.y" yy_do_action_152 when 153 then --|#line "eiffel.y" yy_do_action_153 when 154 then --|#line "eiffel.y" yy_do_action_154 when 155 then --|#line "eiffel.y" yy_do_action_155 when 156 then --|#line "eiffel.y" yy_do_action_156 when 157 then --|#line "eiffel.y" yy_do_action_157 when 158 then --|#line "eiffel.y" yy_do_action_158 when 159 then --|#line "eiffel.y" yy_do_action_159 when 160 then --|#line "eiffel.y" yy_do_action_160 when 161 then --|#line "eiffel.y" yy_do_action_161 when 162 then --|#line "eiffel.y" yy_do_action_162 when 163 then --|#line "eiffel.y" yy_do_action_163 when 164 then --|#line "eiffel.y" yy_do_action_164 when 165 then --|#line "eiffel.y" yy_do_action_165 when 166 then --|#line "eiffel.y" yy_do_action_166 when 167 then --|#line "eiffel.y" yy_do_action_167 when 168 then --|#line "eiffel.y" yy_do_action_168 when 169 then --|#line "eiffel.y" yy_do_action_169 when 170 then --|#line "eiffel.y" yy_do_action_170 when 171 then --|#line "eiffel.y" yy_do_action_171 when 172 then --|#line "eiffel.y" yy_do_action_172 when 173 then --|#line "eiffel.y" yy_do_action_173 when 174 then --|#line "eiffel.y" yy_do_action_174 when 175 then --|#line "eiffel.y" yy_do_action_175 when 176 then --|#line "eiffel.y" yy_do_action_176 when 177 then --|#line "eiffel.y" yy_do_action_177 when 178 then --|#line "eiffel.y" yy_do_action_178 when 179 then --|#line "eiffel.y" yy_do_action_179 when 180 then --|#line "eiffel.y" yy_do_action_180 when 181 then --|#line "eiffel.y" yy_do_action_181 when 182 then --|#line "eiffel.y" yy_do_action_182 when 183 then --|#line "eiffel.y" yy_do_action_183 when 184 then --|#line "eiffel.y" yy_do_action_184 when 185 then --|#line "eiffel.y" yy_do_action_185 when 186 then --|#line "eiffel.y" yy_do_action_186 when 187 then --|#line "eiffel.y" yy_do_action_187 when 188 then --|#line "eiffel.y" yy_do_action_188 when 189 then --|#line "eiffel.y" yy_do_action_189 when 190 then --|#line "eiffel.y" yy_do_action_190 when 191 then --|#line "eiffel.y" yy_do_action_191 when 192 then --|#line "eiffel.y" yy_do_action_192 when 193 then --|#line "eiffel.y" yy_do_action_193 when 194 then --|#line "eiffel.y" yy_do_action_194 when 195 then --|#line "eiffel.y" yy_do_action_195 when 196 then --|#line "eiffel.y" yy_do_action_196 when 197 then --|#line "eiffel.y" yy_do_action_197 when 198 then --|#line "eiffel.y" yy_do_action_198 when 199 then --|#line "eiffel.y" yy_do_action_199 when 200 then --|#line "eiffel.y" yy_do_action_200 else debug ("GEYACC") std.error.put_string ("Error in parser: unknown rule id: ") std.error.put_integer (yy_act) std.error.put_new_line end abort end end yy_do_action_201_400 (yy_act: INTEGER) -- Execute semantic action. do inspect yy_act when 201 then --|#line "eiffel.y" yy_do_action_201 when 202 then --|#line "eiffel.y" yy_do_action_202 when 203 then --|#line "eiffel.y" yy_do_action_203 when 204 then --|#line "eiffel.y" yy_do_action_204 when 205 then --|#line "eiffel.y" yy_do_action_205 when 206 then --|#line "eiffel.y" yy_do_action_206 when 207 then --|#line "eiffel.y" yy_do_action_207 when 208 then --|#line "eiffel.y" yy_do_action_208 when 209 then --|#line "eiffel.y" yy_do_action_209 when 210 then --|#line "eiffel.y" yy_do_action_210 when 211 then --|#line "eiffel.y" yy_do_action_211 when 212 then --|#line "eiffel.y" yy_do_action_212 when 213 then --|#line "eiffel.y" yy_do_action_213 when 214 then --|#line "eiffel.y" yy_do_action_214 when 215 then --|#line "eiffel.y" yy_do_action_215 when 216 then --|#line "eiffel.y" yy_do_action_216 when 217 then --|#line "eiffel.y" yy_do_action_217 when 218 then --|#line "eiffel.y" yy_do_action_218 when 219 then --|#line "eiffel.y" yy_do_action_219 when 220 then --|#line "eiffel.y" yy_do_action_220 when 221 then --|#line "eiffel.y" yy_do_action_221 when 222 then --|#line "eiffel.y" yy_do_action_222 when 223 then --|#line "eiffel.y" yy_do_action_223 when 224 then --|#line "eiffel.y" yy_do_action_224 when 225 then --|#line "eiffel.y" yy_do_action_225 when 226 then --|#line "eiffel.y" yy_do_action_226 when 227 then --|#line "eiffel.y" yy_do_action_227 when 228 then --|#line "eiffel.y" yy_do_action_228 when 229 then --|#line "eiffel.y" yy_do_action_229 when 230 then --|#line "eiffel.y" yy_do_action_230 when 231 then --|#line "eiffel.y" yy_do_action_231 when 232 then --|#line "eiffel.y" yy_do_action_232 when 233 then --|#line "eiffel.y" yy_do_action_233 when 234 then --|#line "eiffel.y" yy_do_action_234 when 235 then --|#line "eiffel.y" yy_do_action_235 when 236 then --|#line "eiffel.y" yy_do_action_236 when 237 then --|#line "eiffel.y" yy_do_action_237 when 238 then --|#line "eiffel.y" yy_do_action_238 when 239 then --|#line "eiffel.y" yy_do_action_239 when 240 then --|#line "eiffel.y" yy_do_action_240 when 241 then --|#line "eiffel.y" yy_do_action_241 when 242 then --|#line "eiffel.y" yy_do_action_242 when 243 then --|#line "eiffel.y" yy_do_action_243 when 244 then --|#line "eiffel.y" yy_do_action_244 when 245 then --|#line "eiffel.y" yy_do_action_245 when 246 then --|#line "eiffel.y" yy_do_action_246 when 247 then --|#line "eiffel.y" yy_do_action_247 when 248 then --|#line "eiffel.y" yy_do_action_248 when 249 then --|#line "eiffel.y" yy_do_action_249 when 250 then --|#line "eiffel.y" yy_do_action_250 when 251 then --|#line "eiffel.y" yy_do_action_251 when 252 then --|#line "eiffel.y" yy_do_action_252 when 253 then --|#line "eiffel.y" yy_do_action_253 when 254 then --|#line "eiffel.y" yy_do_action_254 when 255 then --|#line "eiffel.y" yy_do_action_255 when 256 then --|#line "eiffel.y" yy_do_action_256 when 257 then --|#line "eiffel.y" yy_do_action_257 when 258 then --|#line "eiffel.y" yy_do_action_258 when 259 then --|#line "eiffel.y" yy_do_action_259 when 260 then --|#line "eiffel.y" yy_do_action_260 when 261 then --|#line "eiffel.y" yy_do_action_261 when 262 then --|#line "eiffel.y" yy_do_action_262 when 263 then --|#line "eiffel.y" yy_do_action_263 when 264 then --|#line "eiffel.y" yy_do_action_264 when 265 then --|#line "eiffel.y" yy_do_action_265 when 266 then --|#line "eiffel.y" yy_do_action_266 when 267 then --|#line "eiffel.y" yy_do_action_267 when 268 then --|#line "eiffel.y" yy_do_action_268 when 269 then --|#line "eiffel.y" yy_do_action_269 when 270 then --|#line "eiffel.y" yy_do_action_270 when 271 then --|#line "eiffel.y" yy_do_action_271 when 272 then --|#line "eiffel.y" yy_do_action_272 when 273 then --|#line "eiffel.y" yy_do_action_273 when 274 then --|#line "eiffel.y" yy_do_action_274 when 275 then --|#line "eiffel.y" yy_do_action_275 when 276 then --|#line "eiffel.y" yy_do_action_276 when 277 then --|#line "eiffel.y" yy_do_action_277 when 278 then --|#line "eiffel.y" yy_do_action_278 when 279 then --|#line "eiffel.y" yy_do_action_279 when 280 then --|#line "eiffel.y" yy_do_action_280 when 281 then --|#line "eiffel.y" yy_do_action_281 when 282 then --|#line "eiffel.y" yy_do_action_282 when 283 then --|#line "eiffel.y" yy_do_action_283 when 284 then --|#line "eiffel.y" yy_do_action_284 when 285 then --|#line "eiffel.y" yy_do_action_285 when 286 then --|#line "eiffel.y" yy_do_action_286 when 287 then --|#line "eiffel.y" yy_do_action_287 when 288 then --|#line "eiffel.y" yy_do_action_288 when 289 then --|#line "eiffel.y" yy_do_action_289 when 290 then --|#line "eiffel.y" yy_do_action_290 when 291 then --|#line "eiffel.y" yy_do_action_291 when 292 then --|#line "eiffel.y" yy_do_action_292 when 293 then --|#line "eiffel.y" yy_do_action_293 when 294 then --|#line "eiffel.y" yy_do_action_294 when 295 then --|#line "eiffel.y" yy_do_action_295 when 296 then --|#line "eiffel.y" yy_do_action_296 when 297 then --|#line "eiffel.y" yy_do_action_297 when 298 then --|#line "eiffel.y" yy_do_action_298 when 299 then --|#line "eiffel.y" yy_do_action_299 when 300 then --|#line "eiffel.y" yy_do_action_300 when 301 then --|#line "eiffel.y" yy_do_action_301 when 302 then --|#line "eiffel.y" yy_do_action_302 when 303 then --|#line "eiffel.y" yy_do_action_303 when 304 then --|#line "eiffel.y" yy_do_action_304 when 305 then --|#line "eiffel.y" yy_do_action_305 when 306 then --|#line "eiffel.y" yy_do_action_306 when 307 then --|#line "eiffel.y" yy_do_action_307 when 308 then --|#line "eiffel.y" yy_do_action_308 when 309 then --|#line "eiffel.y" yy_do_action_309 when 310 then --|#line "eiffel.y" yy_do_action_310 when 311 then --|#line "eiffel.y" yy_do_action_311 when 312 then --|#line "eiffel.y" yy_do_action_312 when 313 then --|#line "eiffel.y" yy_do_action_313 when 314 then --|#line "eiffel.y" yy_do_action_314 when 315 then --|#line "eiffel.y" yy_do_action_315 when 316 then --|#line "eiffel.y" yy_do_action_316 when 317 then --|#line "eiffel.y" yy_do_action_317 when 318 then --|#line "eiffel.y" yy_do_action_318 when 319 then --|#line "eiffel.y" yy_do_action_319 when 320 then --|#line "eiffel.y" yy_do_action_320 when 321 then --|#line "eiffel.y" yy_do_action_321 when 322 then --|#line "eiffel.y" yy_do_action_322 when 323 then --|#line "eiffel.y" yy_do_action_323 when 324 then --|#line "eiffel.y" yy_do_action_324 when 325 then --|#line "eiffel.y" yy_do_action_325 when 326 then --|#line "eiffel.y" yy_do_action_326 when 327 then --|#line "eiffel.y" yy_do_action_327 when 328 then --|#line "eiffel.y" yy_do_action_328 when 329 then --|#line "eiffel.y" yy_do_action_329 when 330 then --|#line "eiffel.y" yy_do_action_330 when 331 then --|#line "eiffel.y" yy_do_action_331 when 332 then --|#line "eiffel.y" yy_do_action_332 when 333 then --|#line "eiffel.y" yy_do_action_333 when 334 then --|#line "eiffel.y" yy_do_action_334 when 335 then --|#line "eiffel.y" yy_do_action_335 when 336 then --|#line "eiffel.y" yy_do_action_336 when 337 then --|#line "eiffel.y" yy_do_action_337 when 338 then --|#line "eiffel.y" yy_do_action_338 when 339 then --|#line "eiffel.y" yy_do_action_339 when 340 then --|#line "eiffel.y" yy_do_action_340 when 341 then --|#line "eiffel.y" yy_do_action_341 when 342 then --|#line "eiffel.y" yy_do_action_342 when 343 then --|#line "eiffel.y" yy_do_action_343 when 344 then --|#line "eiffel.y" yy_do_action_344 when 345 then --|#line "eiffel.y" yy_do_action_345 when 346 then --|#line "eiffel.y" yy_do_action_346 when 347 then --|#line "eiffel.y" yy_do_action_347 when 348 then --|#line "eiffel.y" yy_do_action_348 when 349 then --|#line "eiffel.y" yy_do_action_349 when 350 then --|#line "eiffel.y" yy_do_action_350 when 351 then --|#line "eiffel.y" yy_do_action_351 when 352 then --|#line "eiffel.y" yy_do_action_352 when 353 then --|#line "eiffel.y" yy_do_action_353 when 354 then --|#line "eiffel.y" yy_do_action_354 when 355 then --|#line "eiffel.y" yy_do_action_355 when 356 then --|#line "eiffel.y" yy_do_action_356 when 357 then --|#line "eiffel.y" yy_do_action_357 when 358 then --|#line "eiffel.y" yy_do_action_358 when 359 then --|#line "eiffel.y" yy_do_action_359 when 360 then --|#line "eiffel.y" yy_do_action_360 when 361 then --|#line "eiffel.y" yy_do_action_361 when 362 then --|#line "eiffel.y" yy_do_action_362 when 363 then --|#line "eiffel.y" yy_do_action_363 when 364 then --|#line "eiffel.y" yy_do_action_364 when 365 then --|#line "eiffel.y" yy_do_action_365 when 366 then --|#line "eiffel.y" yy_do_action_366 when 367 then --|#line "eiffel.y" yy_do_action_367 when 368 then --|#line "eiffel.y" yy_do_action_368 when 369 then --|#line "eiffel.y" yy_do_action_369 when 370 then --|#line "eiffel.y" yy_do_action_370 when 371 then --|#line "eiffel.y" yy_do_action_371 when 372 then --|#line "eiffel.y" yy_do_action_372 when 373 then --|#line "eiffel.y" yy_do_action_373 when 374 then --|#line "eiffel.y" yy_do_action_374 when 375 then --|#line "eiffel.y" yy_do_action_375 when 376 then --|#line "eiffel.y" yy_do_action_376 when 377 then --|#line "eiffel.y" yy_do_action_377 when 378 then --|#line "eiffel.y" yy_do_action_378 when 379 then --|#line "eiffel.y" yy_do_action_379 when 380 then --|#line "eiffel.y" yy_do_action_380 when 381 then --|#line "eiffel.y" yy_do_action_381 when 382 then --|#line "eiffel.y" yy_do_action_382 when 383 then --|#line "eiffel.y" yy_do_action_383 when 384 then --|#line "eiffel.y" yy_do_action_384 when 385 then --|#line "eiffel.y" yy_do_action_385 when 386 then --|#line "eiffel.y" yy_do_action_386 when 387 then --|#line "eiffel.y" yy_do_action_387 when 388 then --|#line "eiffel.y" yy_do_action_388 when 389 then --|#line "eiffel.y" yy_do_action_389 when 390 then --|#line "eiffel.y" yy_do_action_390 when 391 then --|#line "eiffel.y" yy_do_action_391 when 392 then --|#line "eiffel.y" yy_do_action_392 when 393 then --|#line "eiffel.y" yy_do_action_393 when 394 then --|#line "eiffel.y" yy_do_action_394 when 395 then --|#line "eiffel.y" yy_do_action_395 when 396 then --|#line "eiffel.y" yy_do_action_396 when 397 then --|#line "eiffel.y" yy_do_action_397 when 398 then --|#line "eiffel.y" yy_do_action_398 when 399 then --|#line "eiffel.y" yy_do_action_399 when 400 then --|#line "eiffel.y" yy_do_action_400 else debug ("GEYACC") std.error.put_string ("Error in parser: unknown rule id: ") std.error.put_integer (yy_act) std.error.put_new_line end abort end end yy_do_action_401_600 (yy_act: INTEGER) -- Execute semantic action. do inspect yy_act when 401 then --|#line "eiffel.y" yy_do_action_401 when 402 then --|#line "eiffel.y" yy_do_action_402 when 403 then --|#line "eiffel.y" yy_do_action_403 when 404 then --|#line "eiffel.y" yy_do_action_404 when 405 then --|#line "eiffel.y" yy_do_action_405 when 406 then --|#line "eiffel.y" yy_do_action_406 when 407 then --|#line "eiffel.y" yy_do_action_407 when 408 then --|#line "eiffel.y" yy_do_action_408 when 409 then --|#line "eiffel.y" yy_do_action_409 when 410 then --|#line "eiffel.y" yy_do_action_410 when 411 then --|#line "eiffel.y" yy_do_action_411 when 412 then --|#line "eiffel.y" yy_do_action_412 when 413 then --|#line "eiffel.y" yy_do_action_413 when 414 then --|#line "eiffel.y" yy_do_action_414 when 415 then --|#line "eiffel.y" yy_do_action_415 when 416 then --|#line "eiffel.y" yy_do_action_416 when 417 then --|#line "eiffel.y" yy_do_action_417 when 418 then --|#line "eiffel.y" yy_do_action_418 when 419 then --|#line "eiffel.y" yy_do_action_419 when 420 then --|#line "eiffel.y" yy_do_action_420 when 421 then --|#line "eiffel.y" yy_do_action_421 when 422 then --|#line "eiffel.y" yy_do_action_422 when 423 then --|#line "eiffel.y" yy_do_action_423 when 424 then --|#line "eiffel.y" yy_do_action_424 when 425 then --|#line "eiffel.y" yy_do_action_425 when 426 then --|#line "eiffel.y" yy_do_action_426 when 427 then --|#line "eiffel.y" yy_do_action_427 when 428 then --|#line "eiffel.y" yy_do_action_428 when 429 then --|#line "eiffel.y" yy_do_action_429 when 430 then --|#line "eiffel.y" yy_do_action_430 when 431 then --|#line "eiffel.y" yy_do_action_431 when 432 then --|#line "eiffel.y" yy_do_action_432 when 433 then --|#line "eiffel.y" yy_do_action_433 when 434 then --|#line "eiffel.y" yy_do_action_434 when 435 then --|#line "eiffel.y" yy_do_action_435 when 436 then --|#line "eiffel.y" yy_do_action_436 when 437 then --|#line "eiffel.y" yy_do_action_437 when 438 then --|#line "eiffel.y" yy_do_action_438 when 439 then --|#line "eiffel.y" yy_do_action_439 when 440 then --|#line "eiffel.y" yy_do_action_440 when 441 then --|#line "eiffel.y" yy_do_action_441 when 442 then --|#line "eiffel.y" yy_do_action_442 when 443 then --|#line "eiffel.y" yy_do_action_443 when 444 then --|#line "eiffel.y" yy_do_action_444 when 445 then --|#line "eiffel.y" yy_do_action_445 when 446 then --|#line "eiffel.y" yy_do_action_446 when 447 then --|#line "eiffel.y" yy_do_action_447 when 448 then --|#line "eiffel.y" yy_do_action_448 when 449 then --|#line "eiffel.y" yy_do_action_449 when 450 then --|#line "eiffel.y" yy_do_action_450 when 451 then --|#line "eiffel.y" yy_do_action_451 when 452 then --|#line "eiffel.y" yy_do_action_452 when 453 then --|#line "eiffel.y" yy_do_action_453 when 454 then --|#line "eiffel.y" yy_do_action_454 when 455 then --|#line "eiffel.y" yy_do_action_455 when 456 then --|#line "eiffel.y" yy_do_action_456 when 457 then --|#line "eiffel.y" yy_do_action_457 when 458 then --|#line "eiffel.y" yy_do_action_458 when 459 then --|#line "eiffel.y" yy_do_action_459 when 460 then --|#line "eiffel.y" yy_do_action_460 when 461 then --|#line "eiffel.y" yy_do_action_461 when 462 then --|#line "eiffel.y" yy_do_action_462 when 463 then --|#line "eiffel.y" yy_do_action_463 when 464 then --|#line "eiffel.y" yy_do_action_464 when 465 then --|#line "eiffel.y" yy_do_action_465 when 466 then --|#line "eiffel.y" yy_do_action_466 when 467 then --|#line "eiffel.y" yy_do_action_467 when 468 then --|#line "eiffel.y" yy_do_action_468 when 469 then --|#line "eiffel.y" yy_do_action_469 when 470 then --|#line "eiffel.y" yy_do_action_470 when 471 then --|#line "eiffel.y" yy_do_action_471 when 472 then --|#line "eiffel.y" yy_do_action_472 when 473 then --|#line "eiffel.y" yy_do_action_473 when 474 then --|#line "eiffel.y" yy_do_action_474 when 475 then --|#line "eiffel.y" yy_do_action_475 when 476 then --|#line "eiffel.y" yy_do_action_476 when 477 then --|#line "eiffel.y" yy_do_action_477 when 478 then --|#line "eiffel.y" yy_do_action_478 when 479 then --|#line "eiffel.y" yy_do_action_479 when 480 then --|#line "eiffel.y" yy_do_action_480 when 481 then --|#line "eiffel.y" yy_do_action_481 when 482 then --|#line "eiffel.y" yy_do_action_482 when 483 then --|#line "eiffel.y" yy_do_action_483 when 484 then --|#line "eiffel.y" yy_do_action_484 when 485 then --|#line "eiffel.y" yy_do_action_485 when 486 then --|#line "eiffel.y" yy_do_action_486 when 487 then --|#line "eiffel.y" yy_do_action_487 when 488 then --|#line "eiffel.y" yy_do_action_488 when 489 then --|#line "eiffel.y" yy_do_action_489 when 490 then --|#line "eiffel.y" yy_do_action_490 when 491 then --|#line "eiffel.y" yy_do_action_491 when 492 then --|#line "eiffel.y" yy_do_action_492 when 493 then --|#line "eiffel.y" yy_do_action_493 when 494 then --|#line "eiffel.y" yy_do_action_494 when 495 then --|#line "eiffel.y" yy_do_action_495 when 496 then --|#line "eiffel.y" yy_do_action_496 when 497 then --|#line "eiffel.y" yy_do_action_497 when 498 then --|#line "eiffel.y" yy_do_action_498 when 499 then --|#line "eiffel.y" yy_do_action_499 when 500 then --|#line "eiffel.y" yy_do_action_500 when 501 then --|#line "eiffel.y" yy_do_action_501 when 502 then --|#line "eiffel.y" yy_do_action_502 when 503 then --|#line "eiffel.y" yy_do_action_503 when 504 then --|#line "eiffel.y" yy_do_action_504 when 505 then --|#line "eiffel.y" yy_do_action_505 when 506 then --|#line "eiffel.y" yy_do_action_506 when 507 then --|#line "eiffel.y" yy_do_action_507 when 508 then --|#line "eiffel.y" yy_do_action_508 when 509 then --|#line "eiffel.y" yy_do_action_509 when 510 then --|#line "eiffel.y" yy_do_action_510 when 511 then --|#line "eiffel.y" yy_do_action_511 when 512 then --|#line "eiffel.y" yy_do_action_512 when 513 then --|#line "eiffel.y" yy_do_action_513 when 514 then --|#line "eiffel.y" yy_do_action_514 when 515 then --|#line "eiffel.y" yy_do_action_515 when 516 then --|#line "eiffel.y" yy_do_action_516 when 517 then --|#line "eiffel.y" yy_do_action_517 when 518 then --|#line "eiffel.y" yy_do_action_518 when 519 then --|#line "eiffel.y" yy_do_action_519 when 520 then --|#line "eiffel.y" yy_do_action_520 when 521 then --|#line "eiffel.y" yy_do_action_521 when 522 then --|#line "eiffel.y" yy_do_action_522 when 523 then --|#line "eiffel.y" yy_do_action_523 when 524 then --|#line "eiffel.y" yy_do_action_524 when 525 then --|#line "eiffel.y" yy_do_action_525 when 526 then --|#line "eiffel.y" yy_do_action_526 when 527 then --|#line "eiffel.y" yy_do_action_527 when 528 then --|#line "eiffel.y" yy_do_action_528 when 529 then --|#line "eiffel.y" yy_do_action_529 when 530 then --|#line "eiffel.y" yy_do_action_530 when 531 then --|#line "eiffel.y" yy_do_action_531 when 532 then --|#line "eiffel.y" yy_do_action_532 when 533 then --|#line "eiffel.y" yy_do_action_533 when 534 then --|#line "eiffel.y" yy_do_action_534 when 535 then --|#line "eiffel.y" yy_do_action_535 when 536 then --|#line "eiffel.y" yy_do_action_536 when 537 then --|#line "eiffel.y" yy_do_action_537 when 538 then --|#line "eiffel.y" yy_do_action_538 when 539 then --|#line "eiffel.y" yy_do_action_539 when 540 then --|#line "eiffel.y" yy_do_action_540 when 541 then --|#line "eiffel.y" yy_do_action_541 when 542 then --|#line "eiffel.y" yy_do_action_542 when 543 then --|#line "eiffel.y" yy_do_action_543 when 544 then --|#line "eiffel.y" yy_do_action_544 when 545 then --|#line "eiffel.y" yy_do_action_545 when 546 then --|#line "eiffel.y" yy_do_action_546 when 547 then --|#line "eiffel.y" yy_do_action_547 when 548 then --|#line "eiffel.y" yy_do_action_548 when 549 then --|#line "eiffel.y" yy_do_action_549 when 550 then --|#line "eiffel.y" yy_do_action_550 when 551 then --|#line "eiffel.y" yy_do_action_551 when 552 then --|#line "eiffel.y" yy_do_action_552 when 553 then --|#line "eiffel.y" yy_do_action_553 when 554 then --|#line "eiffel.y" yy_do_action_554 when 555 then --|#line "eiffel.y" yy_do_action_555 when 556 then --|#line "eiffel.y" yy_do_action_556 when 557 then --|#line "eiffel.y" yy_do_action_557 when 558 then --|#line "eiffel.y" yy_do_action_558 when 559 then --|#line "eiffel.y" yy_do_action_559 when 560 then --|#line "eiffel.y" yy_do_action_560 when 561 then --|#line "eiffel.y" yy_do_action_561 when 562 then --|#line "eiffel.y" yy_do_action_562 when 563 then --|#line "eiffel.y" yy_do_action_563 when 564 then --|#line "eiffel.y" yy_do_action_564 when 565 then --|#line "eiffel.y" yy_do_action_565 when 566 then --|#line "eiffel.y" yy_do_action_566 when 567 then --|#line "eiffel.y" yy_do_action_567 when 568 then --|#line "eiffel.y" yy_do_action_568 when 569 then --|#line "eiffel.y" yy_do_action_569 when 570 then --|#line "eiffel.y" yy_do_action_570 when 571 then --|#line "eiffel.y" yy_do_action_571 when 572 then --|#line "eiffel.y" yy_do_action_572 when 573 then --|#line "eiffel.y" yy_do_action_573 when 574 then --|#line "eiffel.y" yy_do_action_574 when 575 then --|#line "eiffel.y" yy_do_action_575 when 576 then --|#line "eiffel.y" yy_do_action_576 when 577 then --|#line "eiffel.y" yy_do_action_577 when 578 then --|#line "eiffel.y" yy_do_action_578 when 579 then --|#line "eiffel.y" yy_do_action_579 when 580 then --|#line "eiffel.y" yy_do_action_580 when 581 then --|#line "eiffel.y" yy_do_action_581 when 582 then --|#line "eiffel.y" yy_do_action_582 when 583 then --|#line "eiffel.y" yy_do_action_583 when 584 then --|#line "eiffel.y" yy_do_action_584 when 585 then --|#line "eiffel.y" yy_do_action_585 when 586 then --|#line "eiffel.y" yy_do_action_586 when 587 then --|#line "eiffel.y" yy_do_action_587 when 588 then --|#line "eiffel.y" yy_do_action_588 when 589 then --|#line "eiffel.y" yy_do_action_589 when 590 then --|#line "eiffel.y" yy_do_action_590 when 591 then --|#line "eiffel.y" yy_do_action_591 when 592 then --|#line "eiffel.y" yy_do_action_592 when 593 then --|#line "eiffel.y" yy_do_action_593 when 594 then --|#line "eiffel.y" yy_do_action_594 when 595 then --|#line "eiffel.y" yy_do_action_595 when 596 then --|#line "eiffel.y" yy_do_action_596 when 597 then --|#line "eiffel.y" yy_do_action_597 when 598 then --|#line "eiffel.y" yy_do_action_598 when 599 then --|#line "eiffel.y" yy_do_action_599 when 600 then --|#line "eiffel.y" yy_do_action_600 else debug ("GEYACC") std.error.put_string ("Error in parser: unknown rule id: ") std.error.put_integer (yy_act) std.error.put_new_line end abort end end yy_do_action_601_800 (yy_act: INTEGER) -- Execute semantic action. do inspect yy_act when 601 then --|#line "eiffel.y" yy_do_action_601 when 602 then --|#line "eiffel.y" yy_do_action_602 when 603 then --|#line "eiffel.y" yy_do_action_603 when 604 then --|#line "eiffel.y" yy_do_action_604 when 605 then --|#line "eiffel.y" yy_do_action_605 when 606 then --|#line "eiffel.y" yy_do_action_606 when 607 then --|#line "eiffel.y" yy_do_action_607 when 608 then --|#line "eiffel.y" yy_do_action_608 when 609 then --|#line "eiffel.y" yy_do_action_609 when 610 then --|#line "eiffel.y" yy_do_action_610 when 611 then --|#line "eiffel.y" yy_do_action_611 when 612 then --|#line "eiffel.y" yy_do_action_612 when 613 then --|#line "eiffel.y" yy_do_action_613 when 614 then --|#line "eiffel.y" yy_do_action_614 when 615 then --|#line "eiffel.y" yy_do_action_615 when 616 then --|#line "eiffel.y" yy_do_action_616 when 617 then --|#line "eiffel.y" yy_do_action_617 when 618 then --|#line "eiffel.y" yy_do_action_618 when 619 then --|#line "eiffel.y" yy_do_action_619 when 620 then --|#line "eiffel.y" yy_do_action_620 when 621 then --|#line "eiffel.y" yy_do_action_621 when 622 then --|#line "eiffel.y" yy_do_action_622 when 623 then --|#line "eiffel.y" yy_do_action_623 when 624 then --|#line "eiffel.y" yy_do_action_624 when 625 then --|#line "eiffel.y" yy_do_action_625 when 626 then --|#line "eiffel.y" yy_do_action_626 when 627 then --|#line "eiffel.y" yy_do_action_627 when 628 then --|#line "eiffel.y" yy_do_action_628 when 629 then --|#line "eiffel.y" yy_do_action_629 when 630 then --|#line "eiffel.y" yy_do_action_630 when 631 then --|#line "eiffel.y" yy_do_action_631 when 632 then --|#line "eiffel.y" yy_do_action_632 when 633 then --|#line "eiffel.y" yy_do_action_633 when 634 then --|#line "eiffel.y" yy_do_action_634 when 635 then --|#line "eiffel.y" yy_do_action_635 when 636 then --|#line "eiffel.y" yy_do_action_636 when 637 then --|#line "eiffel.y" yy_do_action_637 when 638 then --|#line "eiffel.y" yy_do_action_638 when 639 then --|#line "eiffel.y" yy_do_action_639 when 640 then --|#line "eiffel.y" yy_do_action_640 when 641 then --|#line "eiffel.y" yy_do_action_641 when 642 then --|#line "eiffel.y" yy_do_action_642 when 643 then --|#line "eiffel.y" yy_do_action_643 when 644 then --|#line "eiffel.y" yy_do_action_644 when 645 then --|#line "eiffel.y" yy_do_action_645 when 646 then --|#line "eiffel.y" yy_do_action_646 when 647 then --|#line "eiffel.y" yy_do_action_647 when 648 then --|#line "eiffel.y" yy_do_action_648 when 649 then --|#line "eiffel.y" yy_do_action_649 when 650 then --|#line "eiffel.y" yy_do_action_650 when 651 then --|#line "eiffel.y" yy_do_action_651 when 652 then --|#line "eiffel.y" yy_do_action_652 when 653 then --|#line "eiffel.y" yy_do_action_653 when 654 then --|#line "eiffel.y" yy_do_action_654 when 655 then --|#line "eiffel.y" yy_do_action_655 when 656 then --|#line "eiffel.y" yy_do_action_656 when 657 then --|#line "eiffel.y" yy_do_action_657 when 658 then --|#line "eiffel.y" yy_do_action_658 when 659 then --|#line "eiffel.y" yy_do_action_659 when 660 then --|#line "eiffel.y" yy_do_action_660 when 661 then --|#line "eiffel.y" yy_do_action_661 when 662 then --|#line "eiffel.y" yy_do_action_662 when 663 then --|#line "eiffel.y" yy_do_action_663 when 664 then --|#line "eiffel.y" yy_do_action_664 when 665 then --|#line "eiffel.y" yy_do_action_665 when 666 then --|#line "eiffel.y" yy_do_action_666 when 667 then --|#line "eiffel.y" yy_do_action_667 when 668 then --|#line "eiffel.y" yy_do_action_668 when 669 then --|#line "eiffel.y" yy_do_action_669 when 670 then --|#line "eiffel.y" yy_do_action_670 when 671 then --|#line "eiffel.y" yy_do_action_671 when 672 then --|#line "eiffel.y" yy_do_action_672 when 673 then --|#line "eiffel.y" yy_do_action_673 when 674 then --|#line "eiffel.y" yy_do_action_674 when 675 then --|#line "eiffel.y" yy_do_action_675 when 676 then --|#line "eiffel.y" yy_do_action_676 when 677 then --|#line "eiffel.y" yy_do_action_677 when 678 then --|#line "eiffel.y" yy_do_action_678 when 679 then --|#line "eiffel.y" yy_do_action_679 when 680 then --|#line "eiffel.y" yy_do_action_680 when 681 then --|#line "eiffel.y" yy_do_action_681 when 682 then --|#line "eiffel.y" yy_do_action_682 when 683 then --|#line "eiffel.y" yy_do_action_683 when 684 then --|#line "eiffel.y" yy_do_action_684 when 685 then --|#line "eiffel.y" yy_do_action_685 when 686 then --|#line "eiffel.y" yy_do_action_686 when 687 then --|#line "eiffel.y" yy_do_action_687 when 688 then --|#line "eiffel.y" yy_do_action_688 else debug ("GEYACC") std.error.put_string ("Error in parser: unknown rule id: ") std.error.put_integer (yy_act) std.error.put_new_line end abort end end yy_do_action_1 --|#line "eiffel.y" local yyval1: detachable ANY do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if type_parser or expression_parser or feature_parser or indexing_parser or entity_declaration_parser or invariant_parser then raise_error end formal_parameters.wipe_out if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines1.force (yyvs1, yyval1, yyvsp1) end end yy_do_action_2 --|#line "eiffel.y" local yyval1: detachable ANY do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if not type_parser or expression_parser or feature_parser or indexing_parser or entity_declaration_parser or invariant_parser then raise_error end type_node := yyvs88.item (yyvsp88) formal_parameters.wipe_out if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp1 := yyvsp1 + 1 yyvsp2 := yyvsp2 -1 yyvsp88 := yyvsp88 -1 if yyvsp1 >= yyvsc1 then debug ("GEYACC") std.error.put_line ("Resize yyvs1") end yyvsc1 := yyvsc1 + yyInitial_yyvs_size yyvs1 := yyspecial_routines1.aliased_resized_area (yyvs1, yyvsc1) end yyspecial_routines1.force (yyvs1, yyval1, yyvsp1) end end yy_do_action_3 --|#line "eiffel.y" local yyval1: detachable ANY do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if not feature_parser or type_parser or expression_parser or indexing_parser or entity_declaration_parser or invariant_parser then raise_error end feature_node := yyvs54.item (yyvsp54) formal_parameters.wipe_out if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp1 := yyvsp1 + 1 yyvsp14 := yyvsp14 -1 yyvsp54 := yyvsp54 -1 if yyvsp1 >= yyvsc1 then debug ("GEYACC") std.error.put_line ("Resize yyvs1") end yyvsc1 := yyvsc1 + yyInitial_yyvs_size yyvs1 := yyspecial_routines1.aliased_resized_area (yyvs1, yyvsc1) end yyspecial_routines1.force (yyvs1, yyval1, yyvsp1) end end yy_do_action_4 --|#line "eiffel.y" local yyval1: detachable ANY do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if not expression_parser or type_parser or feature_parser or indexing_parser or entity_declaration_parser or invariant_parser then raise_error end expression_node := yyvs50.item (yyvsp50) formal_parameters.wipe_out if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp1 := yyvsp1 + 1 yyvsp14 := yyvsp14 -1 yyvsp50 := yyvsp50 -1 if yyvsp1 >= yyvsc1 then debug ("GEYACC") std.error.put_line ("Resize yyvs1") end yyvsc1 := yyvsc1 + yyInitial_yyvs_size yyvs1 := yyspecial_routines1.aliased_resized_area (yyvs1, yyvsc1) end yyspecial_routines1.force (yyvs1, yyval1, yyvsp1) end end yy_do_action_5 --|#line "eiffel.y" local yyval1: detachable ANY do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if not indexing_parser or type_parser or expression_parser or feature_parser or entity_declaration_parser or invariant_parser then raise_error end indexing_node := yyvs116.item (yyvsp116) formal_parameters.wipe_out if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp1 := yyvsp1 + 1 yyvsp116 := yyvsp116 -1 if yyvsp1 >= yyvsc1 then debug ("GEYACC") std.error.put_line ("Resize yyvs1") end yyvsc1 := yyvsc1 + yyInitial_yyvs_size yyvs1 := yyspecial_routines1.aliased_resized_area (yyvs1, yyvsc1) end yyspecial_routines1.force (yyvs1, yyval1, yyvsp1) end end yy_do_action_6 --|#line "eiffel.y" local yyval1: detachable ANY do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if not invariant_parser or type_parser or expression_parser or feature_parser or indexing_parser or entity_declaration_parser then raise_error end invariant_node := yyvs69.item (yyvsp69) formal_parameters.wipe_out if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp1 := yyvsp1 + 1 yyvsp14 := yyvsp14 -1 yyvsp69 := yyvsp69 -1 if yyvsp1 >= yyvsc1 then debug ("GEYACC") std.error.put_line ("Resize yyvs1") end yyvsc1 := yyvsc1 + yyInitial_yyvs_size yyvs1 := yyspecial_routines1.aliased_resized_area (yyvs1, yyvsc1) end yyspecial_routines1.force (yyvs1, yyval1, yyvsp1) end end yy_do_action_7 --|#line "eiffel.y" local yyval1: detachable ANY do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if not entity_declaration_parser or type_parser or expression_parser or feature_parser or indexing_parser or invariant_parser then raise_error end entity_declaration_node := Void formal_parameters.wipe_out if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp1 := yyvsp1 + 1 yyvsp14 := yyvsp14 -1 if yyvsp1 >= yyvsc1 then debug ("GEYACC") std.error.put_line ("Resize yyvs1") end yyvsc1 := yyvsc1 + yyInitial_yyvs_size yyvs1 := yyspecial_routines1.aliased_resized_area (yyvs1, yyvsc1) end yyspecial_routines1.force (yyvs1, yyval1, yyvsp1) end end yy_do_action_8 --|#line "eiffel.y" local yyval1: detachable ANY do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if not entity_declaration_parser or type_parser or expression_parser or feature_parser or indexing_parser or invariant_parser then raise_error end entity_declaration_node := yyvs130.item (yyvsp130) formal_parameters.wipe_out if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp1 := yyvsp1 -1 yyvsp14 := yyvsp14 -1 yyvsp130 := yyvsp130 -1 yyspecial_routines1.force (yyvs1, yyval1, yyvsp1) end end yy_do_action_9 --|#line "eiffel.y" local yyval1: detachable ANY do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs21.item (yyvsp21 - 1) as l_external then temp_string_as1 := l_external.second else temp_string_as1 := Void end if attached yyvs21.item (yyvsp21) as l_obsolete then temp_string_as2 := l_obsolete.second else temp_string_as2 := Void end root_node := new_class_description (yyvs2.item (yyvsp2), temp_string_as1, is_deferred, is_expanded, is_frozen_class, is_external_class, is_partial_class, is_once, yyvs116.item (yyvsp116 - 1), yyvs116.item (yyvsp116), yyvs114.item (yyvsp114), yyvs122.item (yyvsp122 - 1), yyvs122.item (yyvsp122), yyvs99.item (yyvsp99), yyvs98.item (yyvsp98), yyvs107.item (yyvsp107), yyvs69.item (yyvsp69), suppliers, temp_string_as2, yyvs14.item (yyvsp14)) if attached root_node as l_root_node then l_root_node.set_text_positions ( formal_generics_end_position, conforming_inheritance_end_position, non_conforming_inheritance_end_position, features_end_position, formal_generics_character_end_position, conforming_inheritance_character_end_position, non_conforming_inheritance_character_end_position, features_character_end_position ) if attached yyvs21.item (yyvsp21 - 1) as l_external then l_root_node.set_alias_keyword (l_external.first) end if attached yyvs21.item (yyvsp21) as l_obsolete then l_root_node.set_obsolete_keyword (l_obsolete.first) end l_root_node.set_header_mark (frozen_keyword, expanded_keyword, deferred_keyword, once_keyword, external_keyword) l_root_node.set_class_keyword (yyvs14.item (yyvsp14 - 1)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 19 yyvsp1 := yyvsp1 -4 yyvsp116 := yyvsp116 -2 yyvsp14 := yyvsp14 -2 yyvsp2 := yyvsp2 -1 yyvsp114 := yyvsp114 -1 yyvsp21 := yyvsp21 -2 yyvsp122 := yyvsp122 -2 yyvsp99 := yyvsp99 -1 yyvsp98 := yyvsp98 -1 yyvsp107 := yyvsp107 -1 yyvsp69 := yyvsp69 -1 yyspecial_routines1.force (yyvs1, yyval1, yyvsp1) end end yy_do_action_10 --|#line "eiffel.y" local yyval1: detachable ANY do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end conforming_inheritance_flag := False; non_conforming_inheritance_flag := False if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp1 := yyvsp1 + 1 if yyvsp1 >= yyvsc1 then debug ("GEYACC") std.error.put_line ("Resize yyvs1") end yyvsc1 := yyvsc1 + yyInitial_yyvs_size yyvs1 := yyspecial_routines1.aliased_resized_area (yyvs1, yyvsc1) end yyspecial_routines1.force (yyvs1, yyval1, yyvsp1) end end yy_do_action_11 --|#line "eiffel.y" local yyval1: detachable ANY do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end set_conforming_inheritance_end_positions; conforming_inheritance_flag := True if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp1 := yyvsp1 + 1 if yyvsp1 >= yyvsc1 then debug ("GEYACC") std.error.put_line ("Resize yyvs1") end yyvsc1 := yyvsc1 + yyInitial_yyvs_size yyvs1 := yyspecial_routines1.aliased_resized_area (yyvs1, yyvsc1) end yyspecial_routines1.force (yyvs1, yyval1, yyvsp1) end end yy_do_action_12 --|#line "eiffel.y" local yyval1: detachable ANY do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end set_non_conforming_inheritance_end_positions if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp1 := yyvsp1 + 1 if yyvsp1 >= yyvsc1 then debug ("GEYACC") std.error.put_line ("Resize yyvs1") end yyvsc1 := yyvsc1 + yyInitial_yyvs_size yyvs1 := yyspecial_routines1.aliased_resized_area (yyvs1, yyvsc1) end yyspecial_routines1.force (yyvs1, yyval1, yyvsp1) end end yy_do_action_13 --|#line "eiffel.y" local yyval1: detachable ANY do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end set_features_end_positions if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp1 := yyvsp1 + 1 if yyvsp1 >= yyvsc1 then debug ("GEYACC") std.error.put_line ("Resize yyvs1") end yyvsc1 := yyvsc1 + yyInitial_yyvs_size yyvs1 := yyspecial_routines1.aliased_resized_area (yyvs1, yyvsc1) end yyspecial_routines1.force (yyvs1, yyval1, yyvsp1) end end yy_do_action_14 --|#line "eiffel.y" local yyval1: detachable ANY do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end set_feature_clause_end_positions if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp1 := yyvsp1 + 1 if yyvsp1 >= yyvsc1 then debug ("GEYACC") std.error.put_line ("Resize yyvs1") end yyvsc1 := yyvsc1 + yyInitial_yyvs_size yyvs1 := yyspecial_routines1.aliased_resized_area (yyvs1, yyvsc1) end yyspecial_routines1.force (yyvs1, yyval1, yyvsp1) end end yy_do_action_15 --|#line "eiffel.y" local yyval116: detachable INDEXING_CLAUSE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp116 := yyvsp116 + 1 if yyvsp116 >= yyvsc116 then debug ("GEYACC") std.error.put_line ("Resize yyvs116") end yyvsc116 := yyvsc116 + yyInitial_yyvs_size yyvs116 := yyspecial_routines116.aliased_resized_area (yyvs116, yyvsc116) end yyspecial_routines116.force (yyvs116, yyval116, yyvsp116) end end yy_do_action_16 --|#line "eiffel.y" local yyval116: detachable INDEXING_CLAUSE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs116.item (yyvsp116) as l_list then yyval116 := l_list l_list.set_indexing_keyword (extract_keyword (yyvs15.item (yyvsp15))) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp15 := yyvsp15 -1 yyvsp1 := yyvsp1 -2 yyspecial_routines116.force (yyvs116, yyval116, yyvsp116) end end yy_do_action_17 --|#line "eiffel.y" local yyval116: detachable INDEXING_CLAUSE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached ast_factory.new_indexing_clause_as (Void, 0) as l_list then yyval116 := l_list l_list.set_indexing_keyword (extract_keyword (yyvs15.item (yyvsp15))) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp116 := yyvsp116 + 1 yyvsp15 := yyvsp15 -1 if yyvsp116 >= yyvsc116 then debug ("GEYACC") std.error.put_line ("Resize yyvs116") end yyvsc116 := yyvsc116 + yyInitial_yyvs_size yyvs116 := yyspecial_routines116.aliased_resized_area (yyvs116, yyvsc116) end yyspecial_routines116.force (yyvs116, yyval116, yyvsp116) end end yy_do_action_18 --|#line "eiffel.y" local yyval116: detachable INDEXING_CLAUSE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs116.item (yyvsp116) as l_list then yyval116 := l_list l_list.set_indexing_keyword (extract_keyword (yyvs15.item (yyvsp15))) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp15 := yyvsp15 -1 yyvsp1 := yyvsp1 -2 yyspecial_routines116.force (yyvs116, yyval116, yyvsp116) end end yy_do_action_19 --|#line "eiffel.y" local yyval116: detachable INDEXING_CLAUSE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached ast_factory.new_indexing_clause_as (Void, 0) as l_list then yyval116 := l_list l_list.set_indexing_keyword (extract_keyword (yyvs15.item (yyvsp15))) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp116 := yyvsp116 + 1 yyvsp15 := yyvsp15 -1 if yyvsp116 >= yyvsc116 then debug ("GEYACC") std.error.put_line ("Resize yyvs116") end yyvsc116 := yyvsc116 + yyInitial_yyvs_size yyvs116 := yyspecial_routines116.aliased_resized_area (yyvs116, yyvsc116) end yyspecial_routines116.force (yyvs116, yyval116, yyvsp116) end end yy_do_action_20 --|#line "eiffel.y" local yyval116: detachable INDEXING_CLAUSE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp116 := yyvsp116 + 1 if yyvsp116 >= yyvsc116 then debug ("GEYACC") std.error.put_line ("Resize yyvs116") end yyvsc116 := yyvsc116 + yyInitial_yyvs_size yyvs116 := yyspecial_routines116.aliased_resized_area (yyvs116, yyvsc116) end yyspecial_routines116.force (yyvs116, yyval116, yyvsp116) end end yy_do_action_21 --|#line "eiffel.y" local yyval116: detachable INDEXING_CLAUSE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached ast_factory.new_indexing_clause_as (Void, 0) as l_list then yyval116 := l_list l_list.set_indexing_keyword (extract_keyword (yyvs15.item (yyvsp15))) l_list.set_end_keyword (yyvs14.item (yyvsp14)) end if has_syntax_warning then report_one_warning (create {SYNTAX_WARNING}.make (token_line (yyvs14.item (yyvsp14)), token_column (yyvs14.item (yyvsp14)), filename, locale.translation_in_context (once "Missing `attribute` keyword before `end` keyword.", once "parser.eiffel.warning"))) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp116 := yyvsp116 + 1 yyvsp15 := yyvsp15 -1 yyvsp14 := yyvsp14 -1 if yyvsp116 >= yyvsc116 then debug ("GEYACC") std.error.put_line ("Resize yyvs116") end yyvsc116 := yyvsc116 + yyInitial_yyvs_size yyvs116 := yyspecial_routines116.aliased_resized_area (yyvs116, yyvsc116) end yyspecial_routines116.force (yyvs116, yyval116, yyvsp116) end end yy_do_action_22 --|#line "eiffel.y" local yyval116: detachable INDEXING_CLAUSE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs116.item (yyvsp116) as l_list then yyval116 := l_list if attached yyvs15.item (yyvsp15) as l_indexing then l_list.set_indexing_keyword (extract_keyword (l_indexing)) end if attached yyvs14.item (yyvsp14) as l_end then l_list.set_end_keyword (l_end) end end if has_syntax_warning then report_one_warning (create {SYNTAX_WARNING}.make (token_line (yyvs14.item (yyvsp14)), token_column (yyvs14.item (yyvsp14)), filename, locale.translation_in_context (once "Missing `attribute` keyword before `end` keyword.", once "parser.eiffel.warning"))) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp15 := yyvsp15 -1 yyvsp1 := yyvsp1 -2 yyvsp14 := yyvsp14 -1 yyspecial_routines116.force (yyvs116, yyval116, yyvsp116) end end yy_do_action_23 --|#line "eiffel.y" local yyval116: detachable INDEXING_CLAUSE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs62.item (yyvsp62) as v then yyval116 := ast_factory.new_indexing_clause_as (v, counter_value + 1) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp116 := yyvsp116 + 1 yyvsp62 := yyvsp62 -1 if yyvsp116 >= yyvsc116 then debug ("GEYACC") std.error.put_line ("Resize yyvs116") end yyvsc116 := yyvsc116 + yyInitial_yyvs_size yyvs116 := yyspecial_routines116.aliased_resized_area (yyvs116, yyvsc116) end yyspecial_routines116.force (yyvs116, yyval116, yyvsp116) end end yy_do_action_24 --|#line "eiffel.y" local yyval116: detachable INDEXING_CLAUSE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval116 := yyvs116.item (yyvsp116) if attached yyval116 as l_list and then attached yyvs62.item (yyvsp62) as v then l_list.reverse_extend (v) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp62 := yyvsp62 -1 yyvsp1 := yyvsp1 -1 yyspecial_routines116.force (yyvs116, yyval116, yyvsp116) end end yy_do_action_25 --|#line "eiffel.y" local yyval116: detachable INDEXING_CLAUSE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs62.item (yyvsp62) as v then yyval116 := ast_factory.new_indexing_clause_as (v, counter_value + 1) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp116 := yyvsp116 + 1 yyvsp62 := yyvsp62 -1 if yyvsp116 >= yyvsc116 then debug ("GEYACC") std.error.put_line ("Resize yyvs116") end yyvsc116 := yyvsc116 + yyInitial_yyvs_size yyvs116 := yyspecial_routines116.aliased_resized_area (yyvs116, yyvsc116) end yyspecial_routines116.force (yyvs116, yyval116, yyvsp116) end end yy_do_action_26 --|#line "eiffel.y" local yyval116: detachable INDEXING_CLAUSE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval116 := yyvs116.item (yyvsp116) if attached yyval116 as l_list and then attached yyvs62.item (yyvsp62) as v then l_list.reverse_extend (v) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp62 := yyvsp62 -1 yyvsp4 := yyvsp4 -1 yyvsp1 := yyvsp1 -1 yyspecial_routines116.force (yyvs116, yyval116, yyvsp116) end end yy_do_action_27 --|#line "eiffel.y" local yyval62: detachable INDEX_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval62 := yyvs62.item (yyvsp62) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp1 := yyvsp1 -2 yyspecial_routines62.force (yyvs62, yyval62, yyvsp62) end end yy_do_action_28 --|#line "eiffel.y" local yyval62: detachable INDEX_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval62 := yyvs62.item (yyvsp62) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp1 := yyvsp1 -2 yyspecial_routines62.force (yyvs62, yyval62, yyvsp62) end end yy_do_action_29 --|#line "eiffel.y" local yyval62: detachable INDEX_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval62 := ast_factory.new_index_as (yyvs2.item (yyvsp2), yyvs95.item (yyvsp95), yyvs4.item (yyvsp4 - 1)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp62 := yyvsp62 + 1 yyvsp2 := yyvsp2 -1 yyvsp4 := yyvsp4 -2 yyvsp95 := yyvsp95 -1 if yyvsp62 >= yyvsc62 then debug ("GEYACC") std.error.put_line ("Resize yyvs62") end yyvsc62 := yyvsc62 + yyInitial_yyvs_size yyvs62 := yyspecial_routines62.aliased_resized_area (yyvs62, yyvsc62) end yyspecial_routines62.force (yyvs62, yyval62, yyvsp62) end end yy_do_action_30 --|#line "eiffel.y" local yyval62: detachable INDEX_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval62 := ast_factory.new_index_as (Void, yyvs95.item (yyvsp95), Void) if has_syntax_warning then report_one_warning (create {SYNTAX_WARNING}.make (token_line (yyvs95.item (yyvsp95)), token_column (yyvs95.item (yyvsp95)), filename, locale.translation_in_context (once "Missing Index part of Index_clause.", once "parser.eiffel.warning"))) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp62 := yyvsp62 + 1 yyvsp95 := yyvsp95 -1 yyvsp4 := yyvsp4 -1 if yyvsp62 >= yyvsc62 then debug ("GEYACC") std.error.put_line ("Resize yyvs62") end yyvsc62 := yyvsc62 + yyInitial_yyvs_size yyvs62 := yyspecial_routines62.aliased_resized_area (yyvs62, yyvsc62) end yyspecial_routines62.force (yyvs62, yyval62, yyvsp62) end end yy_do_action_31 --|#line "eiffel.y" local yyval62: detachable INDEX_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval62 := ast_factory.new_index_as (yyvs2.item (yyvsp2), yyvs95.item (yyvsp95), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp62 := yyvsp62 + 1 yyvsp2 := yyvsp2 -1 yyvsp4 := yyvsp4 -1 yyvsp95 := yyvsp95 -1 if yyvsp62 >= yyvsc62 then debug ("GEYACC") std.error.put_line ("Resize yyvs62") end yyvsc62 := yyvsc62 + yyInitial_yyvs_size yyvs62 := yyspecial_routines62.aliased_resized_area (yyvs62, yyvsc62) end yyspecial_routines62.force (yyvs62, yyval62, yyvsp62) end end yy_do_action_32 --|#line "eiffel.y" local yyval95: detachable EIFFEL_LIST [ATOMIC_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs31.item (yyvsp31) as v then yyval95 := ast_factory.new_eiffel_list_atomic_as (v, counter_value + 1) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp95 := yyvsp95 + 1 yyvsp31 := yyvsp31 -1 if yyvsp95 >= yyvsc95 then debug ("GEYACC") std.error.put_line ("Resize yyvs95") end yyvsc95 := yyvsc95 + yyInitial_yyvs_size yyvs95 := yyspecial_routines95.aliased_resized_area (yyvs95, yyvsc95) end yyspecial_routines95.force (yyvs95, yyval95, yyvsp95) end end yy_do_action_33 --|#line "eiffel.y" local yyval95: detachable EIFFEL_LIST [ATOMIC_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval95 := yyvs95.item (yyvsp95) if attached yyval95 as l_list and then attached yyvs31.item (yyvsp31) as l_val then l_list.reverse_extend (l_val) ast_factory.reverse_extend_separator (l_list, yyvs4.item (yyvsp4)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp31 := yyvsp31 -1 yyvsp4 := yyvsp4 -1 yyvsp1 := yyvsp1 -1 yyspecial_routines95.force (yyvs95, yyval95, yyvsp95) end end yy_do_action_34 --|#line "eiffel.y" local yyval95: detachable EIFFEL_LIST [ATOMIC_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- TO DO: remove this TE_SEMICOLON (see: INDEX_AS.index_list /= Void) yyval95 := ast_factory.new_eiffel_list_atomic_as (Void, 0) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp95 := yyvsp95 + 1 yyvsp4 := yyvsp4 -1 if yyvsp95 >= yyvsc95 then debug ("GEYACC") std.error.put_line ("Resize yyvs95") end yyvsc95 := yyvsc95 + yyInitial_yyvs_size yyvs95 := yyspecial_routines95.aliased_resized_area (yyvs95, yyvsc95) end yyspecial_routines95.force (yyvs95, yyval95, yyvsp95) end end yy_do_action_35 --|#line "eiffel.y" local yyval95: detachable EIFFEL_LIST [ATOMIC_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs31.item (yyvsp31) as v then yyval95 := ast_factory.new_eiffel_list_atomic_as (v, counter_value + 1) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp95 := yyvsp95 + 1 yyvsp31 := yyvsp31 -1 if yyvsp95 >= yyvsc95 then debug ("GEYACC") std.error.put_line ("Resize yyvs95") end yyvsc95 := yyvsc95 + yyInitial_yyvs_size yyvs95 := yyspecial_routines95.aliased_resized_area (yyvs95, yyvsc95) end yyspecial_routines95.force (yyvs95, yyval95, yyvsp95) end end yy_do_action_36 --|#line "eiffel.y" local yyval95: detachable EIFFEL_LIST [ATOMIC_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval95 := yyvs95.item (yyvsp95) if attached yyval95 as l_list and then attached yyvs31.item (yyvsp31) as v then l_list.reverse_extend (v) ast_factory.reverse_extend_separator (l_list, yyvs4.item (yyvsp4)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp31 := yyvsp31 -1 yyvsp4 := yyvsp4 -1 yyvsp1 := yyvsp1 -1 yyspecial_routines95.force (yyvs95, yyval95, yyvsp95) end end yy_do_action_37 --|#line "eiffel.y" local yyval31: detachable ATOMIC_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval31 := yyvs2.item (yyvsp2) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp31 := yyvsp31 + 1 yyvsp2 := yyvsp2 -1 if yyvsp31 >= yyvsc31 then debug ("GEYACC") std.error.put_line ("Resize yyvs31") end yyvsc31 := yyvsc31 + yyInitial_yyvs_size yyvs31 := yyspecial_routines31.aliased_resized_area (yyvs31, yyvsc31) end yyspecial_routines31.force (yyvs31, yyval31, yyvsp31) end end yy_do_action_38 --|#line "eiffel.y" local yyval31: detachable ATOMIC_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval31 := yyvs31.item (yyvsp31) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines31.force (yyvs31, yyval31, yyvsp31) end end yy_do_action_39 --|#line "eiffel.y" local yyval31: detachable ATOMIC_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval31 := ast_factory.new_custom_attribute_as (yyvs44.item (yyvsp44), Void, yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp31 := yyvsp31 + 1 yyvsp1 := yyvsp1 -2 yyvsp44 := yyvsp44 -1 yyvsp14 := yyvsp14 -1 if yyvsp31 >= yyvsc31 then debug ("GEYACC") std.error.put_line ("Resize yyvs31") end yyvsc31 := yyvsc31 + yyInitial_yyvs_size yyvs31 := yyspecial_routines31.aliased_resized_area (yyvs31, yyvsc31) end yyspecial_routines31.force (yyvs31, yyval31, yyvsp31) end end yy_do_action_40 --|#line "eiffel.y" local yyval31: detachable ATOMIC_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval31 := ast_factory.new_custom_attribute_as (yyvs44.item (yyvsp44), yyvs87.item (yyvsp87), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp31 := yyvsp31 + 1 yyvsp1 := yyvsp1 -2 yyvsp44 := yyvsp44 -1 yyvsp87 := yyvsp87 -1 yyvsp14 := yyvsp14 -1 if yyvsp31 >= yyvsc31 then debug ("GEYACC") std.error.put_line ("Resize yyvs31") end yyvsc31 := yyvsc31 + yyInitial_yyvs_size yyvs31 := yyspecial_routines31.aliased_resized_area (yyvs31, yyvsc31) end yyspecial_routines31.force (yyvs31, yyval31, yyvsp31) end end yy_do_action_41 --|#line "eiffel.y" local yyval1: detachable ANY do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end is_supplier_recorded := False if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp1 := yyvsp1 + 1 if yyvsp1 >= yyvsc1 then debug ("GEYACC") std.error.put_line ("Resize yyvs1") end yyvsc1 := yyvsc1 + yyInitial_yyvs_size yyvs1 := yyspecial_routines1.aliased_resized_area (yyvs1, yyvsc1) end yyspecial_routines1.force (yyvs1, yyval1, yyvsp1) end end yy_do_action_42 --|#line "eiffel.y" local yyval1: detachable ANY do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end is_supplier_recorded := True if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp1 := yyvsp1 + 1 if yyvsp1 >= yyvsc1 then debug ("GEYACC") std.error.put_line ("Resize yyvs1") end yyvsc1 := yyvsc1 + yyInitial_yyvs_size yyvs1 := yyspecial_routines1.aliased_resized_area (yyvs1, yyvsc1) end yyspecial_routines1.force (yyvs1, yyval1, yyvsp1) end end yy_do_action_43 --|#line "eiffel.y" local yyval1: detachable ANY do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if not il_parser then is_supplier_recorded := False end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp1 := yyvsp1 + 1 if yyvsp1 >= yyvsc1 then debug ("GEYACC") std.error.put_line ("Resize yyvs1") end yyvsc1 := yyvsc1 + yyInitial_yyvs_size yyvs1 := yyspecial_routines1.aliased_resized_area (yyvs1, yyvsc1) end yyspecial_routines1.force (yyvs1, yyval1, yyvsp1) end end yy_do_action_44 --|#line "eiffel.y" local yyval1: detachable ANY do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if not il_parser then is_supplier_recorded := True end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp1 := yyvsp1 + 1 if yyvsp1 >= yyvsc1 then debug ("GEYACC") std.error.put_line ("Resize yyvs1") end yyvsc1 := yyvsc1 + yyInitial_yyvs_size yyvs1 := yyspecial_routines1.aliased_resized_area (yyvs1, yyvsc1) end yyspecial_routines1.force (yyvs1, yyval1, yyvsp1) end end yy_do_action_45 --|#line "eiffel.y" local yyval1: detachable ANY do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp1 := yyvsp1 -1 yyspecial_routines1.force (yyvs1, yyval1, yyvsp1) end end yy_do_action_46 --|#line "eiffel.y" local yyval1: detachable ANY do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end is_deferred := True deferred_keyword := yyvs12.item (yyvsp12) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp12 := yyvsp12 -1 yyspecial_routines1.force (yyvs1, yyval1, yyvsp1) end end yy_do_action_47 --|#line "eiffel.y" local yyval1: detachable ANY do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end is_expanded := True expanded_keyword := yyvs14.item (yyvsp14) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp1 := yyvsp1 -1 yyvsp14 := yyvsp14 -1 yyspecial_routines1.force (yyvs1, yyval1, yyvsp1) end end yy_do_action_48 --|#line "eiffel.y" local yyval1: detachable ANY do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end is_once := True once_keyword := yyvs14.item (yyvsp14) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp1 := yyvsp1 -1 yyvsp14 := yyvsp14 -1 yyspecial_routines1.force (yyvs1, yyval1, yyvsp1) end end yy_do_action_49 --|#line "eiffel.y" local yyval1: detachable ANY do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp1 := yyvsp1 + 1 if yyvsp1 >= yyvsc1 then debug ("GEYACC") std.error.put_line ("Resize yyvs1") end yyvsc1 := yyvsc1 + yyInitial_yyvs_size yyvs1 := yyspecial_routines1.aliased_resized_area (yyvs1, yyvsc1) end yyspecial_routines1.force (yyvs1, yyval1, yyvsp1) end end yy_do_action_50 --|#line "eiffel.y" local yyval1: detachable ANY do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end is_frozen_class := True frozen_keyword := yyvs14.item (yyvsp14) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp1 := yyvsp1 + 1 yyvsp14 := yyvsp14 -1 if yyvsp1 >= yyvsc1 then debug ("GEYACC") std.error.put_line ("Resize yyvs1") end yyvsc1 := yyvsc1 + yyInitial_yyvs_size yyvs1 := yyspecial_routines1.aliased_resized_area (yyvs1, yyvsc1) end yyspecial_routines1.force (yyvs1, yyval1, yyvsp1) end end yy_do_action_51 --|#line "eiffel.y" local yyval1: detachable ANY do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp1 := yyvsp1 + 1 if yyvsp1 >= yyvsc1 then debug ("GEYACC") std.error.put_line ("Resize yyvs1") end yyvsc1 := yyvsc1 + yyInitial_yyvs_size yyvs1 := yyspecial_routines1.aliased_resized_area (yyvs1, yyvsc1) end yyspecial_routines1.force (yyvs1, yyval1, yyvsp1) end end yy_do_action_52 --|#line "eiffel.y" local yyval1: detachable ANY do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if il_parser then is_external_class := True external_keyword := yyvs14.item (yyvsp14) else -- Trigger a syntax error. raise_error end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp1 := yyvsp1 + 1 yyvsp14 := yyvsp14 -1 if yyvsp1 >= yyvsc1 then debug ("GEYACC") std.error.put_line ("Resize yyvs1") end yyvsc1 := yyvsc1 + yyInitial_yyvs_size yyvs1 := yyspecial_routines1.aliased_resized_area (yyvs1, yyvsc1) end yyspecial_routines1.force (yyvs1, yyval1, yyvsp1) end end yy_do_action_53 --|#line "eiffel.y" local yyval14: detachable KEYWORD_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval14 := yyvs14.item (yyvsp14); is_partial_class := false; formal_parameters.wipe_out if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines14.force (yyvs14, yyval14, yyvsp14) end end yy_do_action_54 --|#line "eiffel.y" local yyval14: detachable KEYWORD_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval14 := yyvs14.item (yyvsp14); is_partial_class := true; formal_parameters.wipe_out if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines14.force (yyvs14, yyval14, yyvsp14) end end yy_do_action_55 --|#line "eiffel.y" local yyval21: detachable PAIR [KEYWORD_AS, STRING_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp21 := yyvsp21 + 1 if yyvsp21 >= yyvsc21 then debug ("GEYACC") std.error.put_line ("Resize yyvs21") end yyvsc21 := yyvsc21 + yyInitial_yyvs_size yyvs21 := yyspecial_routines21.aliased_resized_area (yyvs21, yyvsc21) end yyspecial_routines21.force (yyvs21, yyval21, yyvsp21) end end yy_do_action_56 --|#line "eiffel.y" local yyval21: detachable PAIR [KEYWORD_AS, STRING_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval21 := ast_factory.new_keyword_string_pair (yyvs14.item (yyvsp14), yyvs16.item (yyvsp16)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp21 := yyvsp21 + 1 yyvsp14 := yyvsp14 -1 yyvsp16 := yyvsp16 -1 if yyvsp21 >= yyvsc21 then debug ("GEYACC") std.error.put_line ("Resize yyvs21") end yyvsc21 := yyvsc21 + yyInitial_yyvs_size yyvs21 := yyspecial_routines21.aliased_resized_area (yyvs21, yyvsc21) end yyspecial_routines21.force (yyvs21, yyval21, yyvsp21) end end yy_do_action_57 --|#line "eiffel.y" local yyval107: detachable EIFFEL_LIST [FEATURE_CLAUSE_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp107 := yyvsp107 + 1 if yyvsp107 >= yyvsc107 then debug ("GEYACC") std.error.put_line ("Resize yyvs107") end yyvsc107 := yyvsc107 + yyInitial_yyvs_size yyvs107 := yyspecial_routines107.aliased_resized_area (yyvs107, yyvsc107) end yyspecial_routines107.force (yyvs107, yyval107, yyvsp107) end end yy_do_action_58 --|#line "eiffel.y" local yyval107: detachable EIFFEL_LIST [FEATURE_CLAUSE_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs107.item (yyvsp107) as l_list then if l_list.is_empty then yyval107 := Void else yyval107 := l_list end end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp1 := yyvsp1 -2 yyspecial_routines107.force (yyvs107, yyval107, yyvsp107) end end yy_do_action_59 --|#line "eiffel.y" local yyval107: detachable EIFFEL_LIST [FEATURE_CLAUSE_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs55.item (yyvsp55) as v then yyval107 := ast_factory.new_eiffel_list_feature_clause_as (v, counter_value + 1) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp107 := yyvsp107 + 1 yyvsp55 := yyvsp55 -1 if yyvsp107 >= yyvsc107 then debug ("GEYACC") std.error.put_line ("Resize yyvs107") end yyvsc107 := yyvsc107 + yyInitial_yyvs_size yyvs107 := yyspecial_routines107.aliased_resized_area (yyvs107, yyvsc107) end yyspecial_routines107.force (yyvs107, yyval107, yyvsp107) end end yy_do_action_60 --|#line "eiffel.y" local yyval107: detachable EIFFEL_LIST [FEATURE_CLAUSE_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval107 := yyvs107.item (yyvsp107) if attached yyval107 as l_list and then attached yyvs55.item (yyvsp55) as l_val then l_list.reverse_extend (l_val) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp55 := yyvsp55 -1 yyvsp1 := yyvsp1 -1 yyspecial_routines107.force (yyvs107, yyval107, yyvsp107) end end yy_do_action_61 --|#line "eiffel.y" local yyval55: detachable FEATURE_CLAUSE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval55 := ast_factory.new_feature_clause_as (yyvs39.item (yyvsp39), ast_factory.new_eiffel_list_feature_as (Void, 0), fclause_pos, feature_clause_end_position) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp55 := yyvsp55 + 1 yyvsp39 := yyvsp39 -1 yyvsp1 := yyvsp1 -1 if yyvsp55 >= yyvsc55 then debug ("GEYACC") std.error.put_line ("Resize yyvs55") end yyvsc55 := yyvsc55 + yyInitial_yyvs_size yyvs55 := yyspecial_routines55.aliased_resized_area (yyvs55, yyvsc55) end yyspecial_routines55.force (yyvs55, yyval55, yyvsp55) end end yy_do_action_62 --|#line "eiffel.y" local yyval55: detachable FEATURE_CLAUSE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval55 := ast_factory.new_feature_clause_as (yyvs39.item (yyvsp39), yyvs106.item (yyvsp106), fclause_pos, feature_clause_end_position) if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp55 := yyvsp55 + 1 yyvsp39 := yyvsp39 -1 yyvsp1 := yyvsp1 -3 yyvsp106 := yyvsp106 -1 if yyvsp55 >= yyvsc55 then debug ("GEYACC") std.error.put_line ("Resize yyvs55") end yyvsc55 := yyvsc55 + yyInitial_yyvs_size yyvs55 := yyspecial_routines55.aliased_resized_area (yyvs55, yyvsc55) end yyspecial_routines55.force (yyvs55, yyval55, yyvsp55) end end yy_do_action_63 --|#line "eiffel.y" local yyval39: detachable CLIENT_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval39 := yyvs39.item (yyvsp39) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp39 := yyvsp39 -1 yyvsp14 := yyvsp14 -1 yyspecial_routines39.force (yyvs39, yyval39, yyvsp39) end end yy_do_action_64 --|#line "eiffel.y" local yyval39: detachable CLIENT_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs14.item (yyvsp14) as l_keyword then -- Originally, it was 8, I changed it to 7, delete the following line when fully tested. (Jason) l_keyword.set_position (line, column, position, 7, character_column, character_position, 7) fclause_pos := l_keyword else -- Originally, it was 8, I changed it to 7 (Jason) fclause_pos := ast_factory.new_feature_keyword_as (line, column, position, 7, character_column, character_position, 7, Current) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp39 := yyvsp39 + 1 if yyvsp39 >= yyvsc39 then debug ("GEYACC") std.error.put_line ("Resize yyvs39") end yyvsc39 := yyvsc39 + yyInitial_yyvs_size yyvs39 := yyspecial_routines39.aliased_resized_area (yyvs39, yyvsc39) end yyspecial_routines39.force (yyvs39, yyval39, yyvsp39) end end yy_do_action_65 --|#line "eiffel.y" local yyval39: detachable CLIENT_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp39 := yyvsp39 + 1 if yyvsp39 >= yyvsc39 then debug ("GEYACC") std.error.put_line ("Resize yyvs39") end yyvsc39 := yyvsc39 + yyInitial_yyvs_size yyvs39 := yyspecial_routines39.aliased_resized_area (yyvs39, yyvsc39) end yyspecial_routines39.force (yyvs39, yyval39, yyvsp39) end end yy_do_action_66 --|#line "eiffel.y" local yyval39: detachable CLIENT_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval39 := ast_factory.new_client_as (yyvs115.item (yyvsp115)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp39 := yyvsp39 + 1 yyvsp115 := yyvsp115 -1 if yyvsp39 >= yyvsc39 then debug ("GEYACC") std.error.put_line ("Resize yyvs39") end yyvsc39 := yyvsc39 + yyInitial_yyvs_size yyvs39 := yyspecial_routines39.aliased_resized_area (yyvs39, yyvsc39) end yyspecial_routines39.force (yyvs39, yyval39, yyvsp39) end end yy_do_action_67 --|#line "eiffel.y" local yyval115: detachable CLASS_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- Per ECMA, this should be rejected. For now we only raise -- a warning. And on the compiler side, we will simply consider as {NONE}. if has_syntax_warning then report_one_warning (create {SYNTAX_WARNING}.make (token_line (yyvs4.item (yyvsp4 - 1)), token_column (yyvs4.item (yyvsp4 - 1)), filename, locale.translation_in_context (once "Empty Client_list is not allowed and will be assumed to be {NONE}.", once "parser.eiffel.warning"))) end if attached new_none_id as l_none_id then yyval115 := ast_factory.new_class_list_as (l_none_id, 1) if attached yyval115 as l_list then l_list.set_lcurly_symbol (yyvs4.item (yyvsp4 - 1)) l_list.set_rcurly_symbol (yyvs4.item (yyvsp4)) end end if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp115 := yyvsp115 + 1 yyvsp4 := yyvsp4 -2 if yyvsp115 >= yyvsc115 then debug ("GEYACC") std.error.put_line ("Resize yyvs115") end yyvsc115 := yyvsc115 + yyInitial_yyvs_size yyvs115 := yyspecial_routines115.aliased_resized_area (yyvs115, yyvsc115) end yyspecial_routines115.force (yyvs115, yyval115, yyvsp115) end end yy_do_action_68 --|#line "eiffel.y" local yyval115: detachable CLASS_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs115.item (yyvsp115) as l_list then yyval115 := l_list l_list.set_lcurly_symbol (yyvs4.item (yyvsp4 - 1)) l_list.set_rcurly_symbol (yyvs4.item (yyvsp4)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp4 := yyvsp4 -2 yyvsp1 := yyvsp1 -2 yyspecial_routines115.force (yyvs115, yyval115, yyvsp115) end end yy_do_action_69 --|#line "eiffel.y" local yyval115: detachable CLASS_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs2.item (yyvsp2) as v then yyval115 := ast_factory.new_class_list_as (v, counter_value + 1) suppliers.insert_light_supplier_id (v) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp115 := yyvsp115 + 1 yyvsp2 := yyvsp2 -1 if yyvsp115 >= yyvsc115 then debug ("GEYACC") std.error.put_line ("Resize yyvs115") end yyvsc115 := yyvsc115 + yyInitial_yyvs_size yyvs115 := yyspecial_routines115.aliased_resized_area (yyvs115, yyvsc115) end yyspecial_routines115.force (yyvs115, yyval115, yyvsp115) end end yy_do_action_70 --|#line "eiffel.y" local yyval115: detachable CLASS_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval115 := yyvs115.item (yyvsp115) if attached yyval115 as l_list and then attached yyvs2.item (yyvsp2) as l_val then l_list.reverse_extend (l_val) suppliers.insert_light_supplier_id (l_val) ast_factory.reverse_extend_separator (l_list, yyvs4.item (yyvsp4)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp2 := yyvsp2 -1 yyvsp4 := yyvsp4 -1 yyvsp1 := yyvsp1 -1 yyspecial_routines115.force (yyvs115, yyval115, yyvsp115) end end yy_do_action_71 --|#line "eiffel.y" local yyval106: detachable EIFFEL_LIST [FEATURE_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs54.item (yyvsp54) as v then yyval106 := ast_factory.new_eiffel_list_feature_as (v, counter_value + 1) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp106 := yyvsp106 + 1 yyvsp54 := yyvsp54 -1 if yyvsp106 >= yyvsc106 then debug ("GEYACC") std.error.put_line ("Resize yyvs106") end yyvsc106 := yyvsc106 + yyInitial_yyvs_size yyvs106 := yyspecial_routines106.aliased_resized_area (yyvs106, yyvsc106) end yyspecial_routines106.force (yyvs106, yyval106, yyvsp106) end end yy_do_action_72 --|#line "eiffel.y" local yyval106: detachable EIFFEL_LIST [FEATURE_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval106 := yyvs106.item (yyvsp106) if attached yyval106 as l_list and then attached yyvs54.item (yyvsp54) as l_val then l_list.reverse_extend (l_val) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp54 := yyvsp54 -1 yyvsp1 := yyvsp1 -1 yyspecial_routines106.force (yyvs106, yyval106, yyvsp106) end end yy_do_action_73 --|#line "eiffel.y" local yyval4: detachable SYMBOL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp4 := yyvsp4 + 1 if yyvsp4 >= yyvsc4 then debug ("GEYACC") std.error.put_line ("Resize yyvs4") end yyvsc4 := yyvsc4 + yyInitial_yyvs_size yyvs4 := yyspecial_routines4.aliased_resized_area (yyvs4, yyvsc4) end yyspecial_routines4.force (yyvs4, yyval4, yyvsp4) end end yy_do_action_74 --|#line "eiffel.y" local yyval4: detachable SYMBOL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval4 := yyvs4.item (yyvsp4) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines4.force (yyvs4, yyval4, yyvsp4) end end yy_do_action_75 --|#line "eiffel.y" local yyval54: detachable FEATURE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval54 := ast_factory.new_feature_as (yyvs108.item (yyvsp108), yyvs33.item (yyvsp33), feature_indexes, position) if has_syntax_warning then if attached feature_indexes as fi and then fi.has_global_once then if attached fi.once_status_index_as as fi_tok then report_one_warning (create {SYNTAX_WARNING}.make (token_line (fi_tok), token_column (fi_tok), filename, locale.translation_in_context (once "Specifying once_status in indexing note is Obsolete, please use once (%"PROCESS%").", once "parser.eiffel.warning"))) else check indexes_has_once_status_index: False end end end end if attached (yyval54) as l_feature_as and then attached l_feature_as.once_as as l_once_as then if l_once_as.has_key_conflict (yyval54) then report_one_error (ast_factory.new_vvok1_error (token_line (l_once_as), token_column (l_once_as), filename, yyval54)) elseif l_once_as.has_invalid_key (yyval54) then if attached l_once_as.invalid_key (yyval54) as l_once_invalid_key then report_one_error (ast_factory.new_vvok2_error (token_line (l_once_invalid_key), token_column (l_once_invalid_key), filename, yyval54)) else report_one_error (ast_factory.new_vvok2_error (token_line (l_once_as), token_column (l_once_as), filename, yyval54)) end end end feature_indexes := Void if yy_parsing_status >= yyContinue then yyssp := yyssp - 7 yyvsp54 := yyvsp54 -1 yyvsp1 := yyvsp1 -3 yyvsp108 := yyvsp108 -1 yyvsp33 := yyvsp33 -1 yyspecial_routines54.force (yyvs54, yyval54, yyvsp54) end end yy_do_action_76 --|#line "eiffel.y" local yyval54: detachable FEATURE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end enter_scope if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp54 := yyvsp54 + 1 if yyvsp54 >= yyvsc54 then debug ("GEYACC") std.error.put_line ("Resize yyvs54") end yyvsc54 := yyvsc54 + yyInitial_yyvs_size yyvs54 := yyspecial_routines54.aliased_resized_area (yyvs54, yyvsc54) end yyspecial_routines54.force (yyvs54, yyval54, yyvsp54) end end yy_do_action_77 --|#line "eiffel.y" local yyval54: detachable FEATURE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end leave_scope if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp54 := yyvsp54 + 1 if yyvsp54 >= yyvsc54 then debug ("GEYACC") std.error.put_line ("Resize yyvs54") end yyvsc54 := yyvsc54 + yyInitial_yyvs_size yyvs54 := yyspecial_routines54.aliased_resized_area (yyvs54, yyvsc54) end yyspecial_routines54.force (yyvs54, yyval54, yyvsp54) end end yy_do_action_78 --|#line "eiffel.y" local yyval108: detachable EIFFEL_LIST [FEATURE_NAME] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs94.item (yyvsp94) as v then yyval108 := ast_factory.new_eiffel_list_feature_name (v, counter_value + 1) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp108 := yyvsp108 + 1 yyvsp94 := yyvsp94 -1 if yyvsp108 >= yyvsc108 then debug ("GEYACC") std.error.put_line ("Resize yyvs108") end yyvsc108 := yyvsc108 + yyInitial_yyvs_size yyvs108 := yyspecial_routines108.aliased_resized_area (yyvs108, yyvsc108) end yyspecial_routines108.force (yyvs108, yyval108, yyvsp108) end end yy_do_action_79 --|#line "eiffel.y" local yyval108: detachable EIFFEL_LIST [FEATURE_NAME] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval108 := yyvs108.item (yyvsp108) if attached yyval108 as l_list and then attached yyvs94.item (yyvsp94) as l_val then l_list.reverse_extend (l_val) ast_factory.reverse_extend_separator (l_list, yyvs4.item (yyvsp4)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp94 := yyvsp94 -1 yyvsp4 := yyvsp4 -1 yyvsp1 := yyvsp1 -1 yyspecial_routines108.force (yyvs108, yyval108, yyvsp108) end end yy_do_action_80 --|#line "eiffel.y" local yyval94: detachable FEATURE_NAME do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval94 := yyvs94.item (yyvsp94) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines94.force (yyvs94, yyval94, yyvsp94) end end yy_do_action_81 --|#line "eiffel.y" local yyval94: detachable FEATURE_NAME do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs94.item (yyvsp94) as l_name then yyval94 := l_name l_name.set_frozen_keyword (yyvs14.item (yyvsp14)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp14 := yyvsp14 -1 yyspecial_routines94.force (yyvs94, yyval94, yyvsp94) end end yy_do_action_82 --|#line "eiffel.y" local yyval94: detachable FEATURE_NAME do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval94 := yyvs94.item (yyvsp94) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines94.force (yyvs94, yyval94, yyvsp94) end end yy_do_action_83 --|#line "eiffel.y" local yyval94: detachable FEATURE_NAME do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs18.item (yyvsp18) as l_aliases and then not l_aliases.is_empty then yyval94 := ast_factory.new_feature_name_alias_as (yyvs2.item (yyvsp2), l_aliases, yyvs14.item (yyvsp14)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp94 := yyvsp94 + 1 yyvsp2 := yyvsp2 -1 yyvsp1 := yyvsp1 -2 yyvsp18 := yyvsp18 -1 yyvsp14 := yyvsp14 -1 if yyvsp94 >= yyvsc94 then debug ("GEYACC") std.error.put_line ("Resize yyvs94") end yyvsc94 := yyvsc94 + yyInitial_yyvs_size yyvs94 := yyspecial_routines94.aliased_resized_area (yyvs94, yyvsc94) end yyspecial_routines94.force (yyvs94, yyval94, yyvsp94) end end yy_do_action_84 --|#line "eiffel.y" local yyval94: detachable FEATURE_NAME do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval94 := ast_factory.new_feature_name_id_as (yyvs2.item (yyvsp2)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp94 := yyvsp94 + 1 yyvsp2 := yyvsp2 -1 if yyvsp94 >= yyvsc94 then debug ("GEYACC") std.error.put_line ("Resize yyvs94") end yyvsc94 := yyvsc94 + yyInitial_yyvs_size yyvs94 := yyspecial_routines94.aliased_resized_area (yyvs94, yyvsc94) end yyspecial_routines94.force (yyvs94, yyval94, yyvsp94) end end yy_do_action_85 --|#line "eiffel.y" local yyval18: detachable CONSTRUCT_LIST [FEATURE_ALIAS_NAME] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval18 := ast_factory.new_alias_list (counter_value + 1) if attached yyval18 as l_list and then attached yyvs17.item (yyvsp17) as l_val then l_list.extend (l_val) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp18 := yyvsp18 + 1 yyvsp17 := yyvsp17 -1 if yyvsp18 >= yyvsc18 then debug ("GEYACC") std.error.put_line ("Resize yyvs18") end yyvsc18 := yyvsc18 + yyInitial_yyvs_size yyvs18 := yyspecial_routines18.aliased_resized_area (yyvs18, yyvsc18) end yyspecial_routines18.force (yyvs18, yyval18, yyvsp18) end end yy_do_action_86 --|#line "eiffel.y" local yyval18: detachable CONSTRUCT_LIST [FEATURE_ALIAS_NAME] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval18 := yyvs18.item (yyvsp18) if attached yyval18 as l_list and then attached yyvs17.item (yyvsp17) as l_val then l_list.put_front (l_val) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp17 := yyvsp17 -1 yyvsp1 := yyvsp1 -1 yyspecial_routines18.force (yyvs18, yyval18, yyvsp18) end end yy_do_action_87 --|#line "eiffel.y" local yyval17: detachable FEATURE_ALIAS_NAME do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval17 := ast_factory.new_alias_name (yyvs14.item (yyvsp14), yyvs16.item (yyvsp16), {OPERATOR_KIND}.is_valid_binary_kind_mask) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp17 := yyvsp17 + 1 yyvsp14 := yyvsp14 -1 yyvsp16 := yyvsp16 -1 if yyvsp17 >= yyvsc17 then debug ("GEYACC") std.error.put_line ("Resize yyvs17") end yyvsc17 := yyvsc17 + yyInitial_yyvs_size yyvs17 := yyspecial_routines17.aliased_resized_area (yyvs17, yyvsc17) end yyspecial_routines17.force (yyvs17, yyval17, yyvsp17) end end yy_do_action_88 --|#line "eiffel.y" local yyval17: detachable FEATURE_ALIAS_NAME do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval17 := ast_factory.new_alias_name (yyvs14.item (yyvsp14), yyvs16.item (yyvsp16), {OPERATOR_KIND}.is_valid_binary_kind_mask + {OPERATOR_KIND}.is_valid_unary_kind_mask) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp17 := yyvsp17 + 1 yyvsp14 := yyvsp14 -1 yyvsp16 := yyvsp16 -1 if yyvsp17 >= yyvsc17 then debug ("GEYACC") std.error.put_line ("Resize yyvs17") end yyvsc17 := yyvsc17 + yyInitial_yyvs_size yyvs17 := yyspecial_routines17.aliased_resized_area (yyvs17, yyvsc17) end yyspecial_routines17.force (yyvs17, yyval17, yyvsp17) end end yy_do_action_89 --|#line "eiffel.y" local yyval17: detachable FEATURE_ALIAS_NAME do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval17 := ast_factory.new_alias_name (yyvs14.item (yyvsp14), yyvs16.item (yyvsp16), {OPERATOR_KIND}.is_bracket_kind_mask) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp17 := yyvsp17 + 1 yyvsp14 := yyvsp14 -1 yyvsp16 := yyvsp16 -1 if yyvsp17 >= yyvsc17 then debug ("GEYACC") std.error.put_line ("Resize yyvs17") end yyvsc17 := yyvsc17 + yyInitial_yyvs_size yyvs17 := yyspecial_routines17.aliased_resized_area (yyvs17, yyvsc17) end yyspecial_routines17.force (yyvs17, yyval17, yyvsp17) end end yy_do_action_90 --|#line "eiffel.y" local yyval17: detachable FEATURE_ALIAS_NAME do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval17 := ast_factory.new_alias_name (yyvs14.item (yyvsp14), yyvs16.item (yyvsp16), {OPERATOR_KIND}.is_parentheses_kind_mask) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp17 := yyvsp17 + 1 yyvsp14 := yyvsp14 -1 yyvsp16 := yyvsp16 -1 if yyvsp17 >= yyvsc17 then debug ("GEYACC") std.error.put_line ("Resize yyvs17") end yyvsc17 := yyvsc17 + yyInitial_yyvs_size yyvs17 := yyspecial_routines17.aliased_resized_area (yyvs17, yyvsc17) end yyspecial_routines17.force (yyvs17, yyval17, yyvsp17) end end yy_do_action_91 --|#line "eiffel.y" local yyval17: detachable FEATURE_ALIAS_NAME do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval17 := ast_factory.new_alias_name (yyvs14.item (yyvsp14), yyvs16.item (yyvsp16), {OPERATOR_KIND}.is_valid_unary_kind_mask) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp17 := yyvsp17 + 1 yyvsp14 := yyvsp14 -1 yyvsp16 := yyvsp16 -1 if yyvsp17 >= yyvsc17 then debug ("GEYACC") std.error.put_line ("Resize yyvs17") end yyvsc17 := yyvsc17 + yyInitial_yyvs_size yyvs17 := yyspecial_routines17.aliased_resized_area (yyvs17, yyvsc17) end yyspecial_routines17.force (yyvs17, yyval17, yyvsp17) end end yy_do_action_92 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp16 := yyvsp16 + 1 if yyvsp16 >= yyvsc16 then debug ("GEYACC") std.error.put_line ("Resize yyvs16") end yyvsc16 := yyvsc16 + yyInitial_yyvs_size yyvs16 := yyspecial_routines16.aliased_resized_area (yyvs16, yyvsc16) end yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_93 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_94 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_95 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- Alias names should always be taken in their lower case version if attached yyvs16.item (yyvsp16) as l_str_free then l_str_free.value_to_lower yyval16 := l_str_free end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_96 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_97 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_98 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_99 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_100 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_101 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_102 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_103 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_104 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_105 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- Alias names should always be taken in their lower case version if attached yyvs16.item (yyvsp16) as l_str_and then l_str_and.value_to_lower yyval16 := l_str_and end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_106 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- Alias names should always be taken in their lower case version if attached yyvs16.item (yyvsp16) as l_str_and_then then l_str_and_then.value_to_lower yyval16 := l_str_and_then end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_107 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- Alias names should always be taken in their lower case version if attached yyvs16.item (yyvsp16) as l_str_implies then l_str_implies.value_to_lower yyval16 := l_str_implies end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_108 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- Alias names should always be taken in their lower case version if attached yyvs16.item (yyvsp16) as l_str_or then l_str_or.value_to_lower yyval16 := l_str_or end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_109 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- Alias names should always be taken in their lower case version if attached yyvs16.item (yyvsp16) as l_str_or_else then l_str_or_else.value_to_lower yyval16 := l_str_or_else end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_110 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- Alias names should always be taken in their lower case version if attached yyvs16.item (yyvsp16) as l_str_xor then l_str_xor.value_to_lower yyval16 := l_str_xor end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_111 --|#line "eiffel.y" local yyval14: detachable KEYWORD_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end has_convert_mark := False if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp14 := yyvsp14 + 1 if yyvsp14 >= yyvsc14 then debug ("GEYACC") std.error.put_line ("Resize yyvs14") end yyvsc14 := yyvsc14 + yyInitial_yyvs_size yyvs14 := yyspecial_routines14.aliased_resized_area (yyvs14, yyvsc14) end yyspecial_routines14.force (yyvs14, yyval14, yyvsp14) end end yy_do_action_112 --|#line "eiffel.y" local yyval14: detachable KEYWORD_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end has_convert_mark := True yyval14 := yyvs14.item (yyvsp14) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines14.force (yyvs14, yyval14, yyvsp14) end end yy_do_action_113 --|#line "eiffel.y" local yyval14: detachable KEYWORD_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval14 := Void if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp14 := yyvsp14 + 1 if yyvsp14 >= yyvsc14 then debug ("GEYACC") std.error.put_line ("Resize yyvs14") end yyvsc14 := yyvsc14 + yyInitial_yyvs_size yyvs14 := yyspecial_routines14.aliased_resized_area (yyvs14, yyvsc14) end yyspecial_routines14.force (yyvs14, yyval14, yyvsp14) end end yy_do_action_114 --|#line "eiffel.y" local yyval14: detachable KEYWORD_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval14 := extract_keyword (yyvs15.item (yyvsp15)) report_deprecated_use_of_keyword_is (yyval14) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp14 := yyvsp14 + 1 yyvsp15 := yyvsp15 -1 if yyvsp14 >= yyvsc14 then debug ("GEYACC") std.error.put_line ("Resize yyvs14") end yyvsc14 := yyvsc14 + yyInitial_yyvs_size yyvs14 := yyspecial_routines14.aliased_resized_area (yyvs14, yyvsc14) end yyspecial_routines14.force (yyvs14, yyval14, yyvsp14) end end yy_do_action_115 --|#line "eiffel.y" local yyval33: detachable BODY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- Attribute case if attached yyvs20.item (yyvsp20) as l_assigner_mark then yyval33 := ast_factory.new_body_as (Void, yyvs88.item (yyvsp88), l_assigner_mark.second, Void, yyvs4.item (yyvsp4), Void, l_assigner_mark.first, yyvs116.item (yyvsp116)) else yyval33 := ast_factory.new_body_as (Void, yyvs88.item (yyvsp88), Void, Void, yyvs4.item (yyvsp4), Void, Void, yyvs116.item (yyvsp116)) end feature_indexes := yyvs116.item (yyvsp116) if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp33 := yyvsp33 + 1 yyvsp4 := yyvsp4 -1 yyvsp88 := yyvsp88 -1 yyvsp20 := yyvsp20 -1 yyvsp116 := yyvsp116 -1 if yyvsp33 >= yyvsc33 then debug ("GEYACC") std.error.put_line ("Resize yyvs33") end yyvsc33 := yyvsc33 + yyInitial_yyvs_size yyvs33 := yyspecial_routines33.aliased_resized_area (yyvs33, yyvsc33) end yyspecial_routines33.force (yyvs33, yyval33, yyvsp33) end end yy_do_action_116 --|#line "eiffel.y" local yyval33: detachable BODY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- Constant case if attached yyvs20.item (yyvsp20) as l_assigner_mark then yyval33 := ast_factory.new_body_as (Void, yyvs88.item (yyvsp88), l_assigner_mark.second, yyvs40.item (yyvsp40), yyvs4.item (yyvsp4 - 1), yyvs4.item (yyvsp4), l_assigner_mark.first, yyvs116.item (yyvsp116)) else yyval33 := ast_factory.new_body_as (Void, yyvs88.item (yyvsp88), Void, yyvs40.item (yyvsp40), yyvs4.item (yyvsp4 - 1), yyvs4.item (yyvsp4), Void, yyvs116.item (yyvsp116)) end feature_indexes := yyvs116.item (yyvsp116) if yy_parsing_status >= yyContinue then yyssp := yyssp - 6 yyvsp33 := yyvsp33 + 1 yyvsp4 := yyvsp4 -2 yyvsp88 := yyvsp88 -1 yyvsp20 := yyvsp20 -1 yyvsp40 := yyvsp40 -1 yyvsp116 := yyvsp116 -1 if yyvsp33 >= yyvsc33 then debug ("GEYACC") std.error.put_line ("Resize yyvs33") end yyvsc33 := yyvsc33 + yyInitial_yyvs_size yyvs33 := yyspecial_routines33.aliased_resized_area (yyvs33, yyvsc33) end yyspecial_routines33.force (yyvs33, yyval33, yyvsp33) end end yy_do_action_117 --|#line "eiffel.y" local yyval33: detachable BODY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- Constant case if attached yyvs20.item (yyvsp20) as l_assigner_mark then yyval33 := ast_factory.new_body_as (Void, yyvs88.item (yyvsp88), l_assigner_mark.second, yyvs40.item (yyvsp40), yyvs4.item (yyvsp4), extract_keyword (yyvs15.item (yyvsp15)), l_assigner_mark.first, yyvs116.item (yyvsp116)) else yyval33 := ast_factory.new_body_as (Void, yyvs88.item (yyvsp88), Void, yyvs40.item (yyvsp40), yyvs4.item (yyvsp4), extract_keyword (yyvs15.item (yyvsp15)), Void, yyvs116.item (yyvsp116)) end feature_indexes := yyvs116.item (yyvsp116) report_deprecated_use_of_keyword_is (extract_keyword (yyvs15.item (yyvsp15))) if yy_parsing_status >= yyContinue then yyssp := yyssp - 6 yyvsp33 := yyvsp33 + 1 yyvsp4 := yyvsp4 -1 yyvsp88 := yyvsp88 -1 yyvsp20 := yyvsp20 -1 yyvsp15 := yyvsp15 -1 yyvsp40 := yyvsp40 -1 yyvsp116 := yyvsp116 -1 if yyvsp33 >= yyvsc33 then debug ("GEYACC") std.error.put_line ("Resize yyvs33") end yyvsc33 := yyvsc33 + yyInitial_yyvs_size yyvs33 := yyspecial_routines33.aliased_resized_area (yyvs33, yyvsc33) end yyspecial_routines33.force (yyvs33, yyval33, yyvsp33) end end yy_do_action_118 --|#line "eiffel.y" local yyval33: detachable BODY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- procedure without arguments yyval33 := ast_factory.new_body_as (Void, Void, Void, yyvs83.item (yyvsp83), Void, yyvs14.item (yyvsp14), Void, yyvs116.item (yyvsp116)) feature_indexes := yyvs116.item (yyvsp116) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp33 := yyvsp33 + 1 yyvsp14 := yyvsp14 -1 yyvsp116 := yyvsp116 -1 yyvsp83 := yyvsp83 -1 if yyvsp33 >= yyvsc33 then debug ("GEYACC") std.error.put_line ("Resize yyvs33") end yyvsc33 := yyvsc33 + yyInitial_yyvs_size yyvs33 := yyspecial_routines33.aliased_resized_area (yyvs33, yyvsc33) end yyspecial_routines33.force (yyvs33, yyval33, yyvsp33) end end yy_do_action_119 --|#line "eiffel.y" local yyval33: detachable BODY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- Function without arguments if attached yyvs20.item (yyvsp20) as l_assigner_mark then yyval33 := ast_factory.new_body_as (Void, yyvs88.item (yyvsp88), l_assigner_mark.second, yyvs83.item (yyvsp83), yyvs4.item (yyvsp4), extract_keyword (yyvs15.item (yyvsp15)), l_assigner_mark.first, yyvs116.item (yyvsp116)) else yyval33 := ast_factory.new_body_as (Void, yyvs88.item (yyvsp88), Void, yyvs83.item (yyvsp83), yyvs4.item (yyvsp4), extract_keyword (yyvs15.item (yyvsp15)), Void, yyvs116.item (yyvsp116)) end feature_indexes := yyvs116.item (yyvsp116) report_deprecated_use_of_keyword_is (extract_keyword (yyvs15.item (yyvsp15))) if yy_parsing_status >= yyContinue then yyssp := yyssp - 6 yyvsp33 := yyvsp33 + 1 yyvsp4 := yyvsp4 -1 yyvsp88 := yyvsp88 -1 yyvsp20 := yyvsp20 -1 yyvsp15 := yyvsp15 -1 yyvsp116 := yyvsp116 -1 yyvsp83 := yyvsp83 -1 if yyvsp33 >= yyvsc33 then debug ("GEYACC") std.error.put_line ("Resize yyvs33") end yyvsc33 := yyvsc33 + yyInitial_yyvs_size yyvs33 := yyspecial_routines33.aliased_resized_area (yyvs33, yyvsc33) end yyspecial_routines33.force (yyvs33, yyval33, yyvsp33) end end yy_do_action_120 --|#line "eiffel.y" local yyval33: detachable BODY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- Function without arguments if attached yyvs20.item (yyvsp20) as l_assigner_mark then yyval33 := ast_factory.new_body_as (Void, yyvs88.item (yyvsp88), l_assigner_mark.second, yyvs83.item (yyvsp83), yyvs4.item (yyvsp4), Void, l_assigner_mark.first, yyvs116.item (yyvsp116)) else yyval33 := ast_factory.new_body_as (Void, yyvs88.item (yyvsp88), Void, yyvs83.item (yyvsp83), yyvs4.item (yyvsp4), Void, Void, yyvs116.item (yyvsp116)) end feature_indexes := yyvs116.item (yyvsp116) if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp33 := yyvsp33 + 1 yyvsp4 := yyvsp4 -1 yyvsp88 := yyvsp88 -1 yyvsp20 := yyvsp20 -1 yyvsp116 := yyvsp116 -1 yyvsp83 := yyvsp83 -1 if yyvsp33 >= yyvsc33 then debug ("GEYACC") std.error.put_line ("Resize yyvs33") end yyvsc33 := yyvsc33 + yyInitial_yyvs_size yyvs33 := yyspecial_routines33.aliased_resized_area (yyvs33, yyvsc33) end yyspecial_routines33.force (yyvs33, yyval33, yyvsp33) end end yy_do_action_121 --|#line "eiffel.y" local yyval33: detachable BODY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- procedure with arguments yyval33 := ast_factory.new_body_as (yyvs132.item (yyvsp132), Void, Void, yyvs83.item (yyvsp83), Void, yyvs14.item (yyvsp14), Void, yyvs116.item (yyvsp116)) feature_indexes := yyvs116.item (yyvsp116) if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp33 := yyvsp33 + 1 yyvsp132 := yyvsp132 -1 yyvsp14 := yyvsp14 -1 yyvsp116 := yyvsp116 -1 yyvsp83 := yyvsp83 -1 if yyvsp33 >= yyvsc33 then debug ("GEYACC") std.error.put_line ("Resize yyvs33") end yyvsc33 := yyvsc33 + yyInitial_yyvs_size yyvs33 := yyspecial_routines33.aliased_resized_area (yyvs33, yyvsc33) end yyspecial_routines33.force (yyvs33, yyval33, yyvsp33) end end yy_do_action_122 --|#line "eiffel.y" local yyval33: detachable BODY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- Function with arguments if attached yyvs20.item (yyvsp20) as l_assigner_mark then yyval33 := ast_factory.new_body_as (yyvs132.item (yyvsp132), yyvs88.item (yyvsp88), l_assigner_mark.second, yyvs83.item (yyvsp83), yyvs4.item (yyvsp4), yyvs14.item (yyvsp14), l_assigner_mark.first, yyvs116.item (yyvsp116)) else yyval33 := ast_factory.new_body_as (yyvs132.item (yyvsp132), yyvs88.item (yyvsp88), Void, yyvs83.item (yyvsp83), yyvs4.item (yyvsp4), yyvs14.item (yyvsp14), Void, yyvs116.item (yyvsp116)) end feature_indexes := yyvs116.item (yyvsp116) if yy_parsing_status >= yyContinue then yyssp := yyssp - 7 yyvsp33 := yyvsp33 + 1 yyvsp132 := yyvsp132 -1 yyvsp4 := yyvsp4 -1 yyvsp88 := yyvsp88 -1 yyvsp20 := yyvsp20 -1 yyvsp14 := yyvsp14 -1 yyvsp116 := yyvsp116 -1 yyvsp83 := yyvsp83 -1 if yyvsp33 >= yyvsc33 then debug ("GEYACC") std.error.put_line ("Resize yyvs33") end yyvsc33 := yyvsc33 + yyInitial_yyvs_size yyvs33 := yyspecial_routines33.aliased_resized_area (yyvs33, yyvsc33) end yyspecial_routines33.force (yyvs33, yyval33, yyvsp33) end end yy_do_action_123 --|#line "eiffel.y" local yyval20: detachable PAIR [KEYWORD_AS, ID_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval20 := ast_factory.new_assigner_mark_as (Void, Void) if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp20 := yyvsp20 + 1 if yyvsp20 >= yyvsc20 then debug ("GEYACC") std.error.put_line ("Resize yyvs20") end yyvsc20 := yyvsc20 + yyInitial_yyvs_size yyvs20 := yyspecial_routines20.aliased_resized_area (yyvs20, yyvsc20) end yyspecial_routines20.force (yyvs20, yyval20, yyvsp20) end end yy_do_action_124 --|#line "eiffel.y" local yyval20: detachable PAIR [KEYWORD_AS, ID_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval20 := ast_factory.new_assigner_mark_as (extract_keyword (yyvs15.item (yyvsp15)), yyvs2.item (yyvsp2)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp20 := yyvsp20 + 1 yyvsp15 := yyvsp15 -1 yyvsp2 := yyvsp2 -1 if yyvsp20 >= yyvsc20 then debug ("GEYACC") std.error.put_line ("Resize yyvs20") end yyvsc20 := yyvsc20 + yyInitial_yyvs_size yyvs20 := yyspecial_routines20.aliased_resized_area (yyvs20, yyvsc20) end yyspecial_routines20.force (yyvs20, yyval20, yyvsp20) end end yy_do_action_125 --|#line "eiffel.y" local yyval40: detachable CONSTANT_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval40 := ast_factory.new_constant_as (yyvs31.item (yyvsp31)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp40 := yyvsp40 + 1 yyvsp31 := yyvsp31 -1 if yyvsp40 >= yyvsc40 then debug ("GEYACC") std.error.put_line ("Resize yyvs40") end yyvsc40 := yyvsc40 + yyInitial_yyvs_size yyvs40 := yyspecial_routines40.aliased_resized_area (yyvs40, yyvsc40) end yyspecial_routines40.force (yyvs40, yyval40, yyvsp40) end end yy_do_action_126 --|#line "eiffel.y" local yyval40: detachable CONSTANT_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval40 := ast_factory.new_constant_as (yyvs10.item (yyvsp10)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp40 := yyvsp40 + 1 yyvsp10 := yyvsp10 -1 if yyvsp40 >= yyvsc40 then debug ("GEYACC") std.error.put_line ("Resize yyvs40") end yyvsc40 := yyvsc40 + yyInitial_yyvs_size yyvs40 := yyspecial_routines40.aliased_resized_area (yyvs40, yyvsc40) end yyspecial_routines40.force (yyvs40, yyval40, yyvsp40) end end yy_do_action_127 --|#line "eiffel.y" local yyval122: detachable PARENT_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval122 := Void if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp122 := yyvsp122 + 1 if yyvsp122 >= yyvsc122 then debug ("GEYACC") std.error.put_line ("Resize yyvs122") end yyvsc122 := yyvsc122 + yyInitial_yyvs_size yyvs122 := yyspecial_routines122.aliased_resized_area (yyvs122, yyvsc122) end yyspecial_routines122.force (yyvs122, yyval122, yyvsp122) end end yy_do_action_128 --|#line "eiffel.y" local yyval122: detachable PARENT_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if not conforming_inheritance_flag then -- Conforming inheritance if has_syntax_warning then report_one_warning (create {SYNTAX_WARNING}.make (token_line (yyvs14.item (yyvsp14)), token_column (yyvs14.item (yyvsp14)), filename, locale.translation_in_context (once "Use `inherit ANY` or do not specify an empty inherit clause", once "parser.eiffel.warning"))) end yyval122 := ast_factory.new_eiffel_list_parent_as (Void, 0) if attached yyval122 as l_inheritance then l_inheritance.set_inheritance_tokens (yyvs14.item (yyvsp14), Void, Void, Void) end else -- Raise error as conforming inheritance has already been specified if non_conforming_inheritance_flag then report_one_error (create {SYNTAX_ERROR}.make (token_line (yyvs14.item (yyvsp14)), token_column (yyvs14.item (yyvsp14)), filename, locale.translation_in_context ("Conforming inheritance clause must come before non conforming inheritance clause.", once "parser.eiffel.error"))) else report_one_error (create {SYNTAX_ERROR}.make (token_line (yyvs14.item (yyvsp14)), token_column (yyvs14.item (yyvsp14)), filename, locale.translation_in_context ("Only one conforming inheritance clause allowed per class.", once "parser.eiffel.error"))) end end if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp122 := yyvsp122 + 1 yyvsp14 := yyvsp14 -1 yyvsp4 := yyvsp4 -1 if yyvsp122 >= yyvsc122 then debug ("GEYACC") std.error.put_line ("Resize yyvs122") end yyvsc122 := yyvsc122 + yyInitial_yyvs_size yyvs122 := yyspecial_routines122.aliased_resized_area (yyvs122, yyvsc122) end yyspecial_routines122.force (yyvs122, yyval122, yyvsp122) end end yy_do_action_129 --|#line "eiffel.y" local yyval122: detachable PARENT_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if not conforming_inheritance_flag then -- Conforming inheritance yyval122 := yyvs122.item (yyvsp122) if attached yyval122 as l_inheritance then l_inheritance.set_inheritance_tokens (yyvs14.item (yyvsp14), Void, Void, Void) end else -- Raise error as conforming inheritance has already been specified if non_conforming_inheritance_flag then report_one_error (create {SYNTAX_ERROR}.make (token_line (yyvs14.item (yyvsp14)), token_column (yyvs14.item (yyvsp14)), filename, locale.translation_in_context ("Conforming inheritance clause must come before non conforming inheritance clause", once "parser.eiffel.error"))) else report_one_error (create {SYNTAX_ERROR}.make (token_line (yyvs14.item (yyvsp14)), token_column (yyvs14.item (yyvsp14)), filename, locale.translation_in_context ("Only one conforming inheritance clause allowed per class", once "parser.eiffel.error"))) end end if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp14 := yyvsp14 -1 yyvsp1 := yyvsp1 -2 yyspecial_routines122.force (yyvs122, yyval122, yyvsp122) end end yy_do_action_130 --|#line "eiffel.y" local yyval122: detachable PARENT_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval122 := yyvs122.item (yyvsp122) if attached yyval122 as l_inheritance then l_inheritance.set_inheritance_tokens (yyvs14.item (yyvsp14), yyvs4.item (yyvsp4 - 1), yyvs2.item (yyvsp2), yyvs4.item (yyvsp4)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 8 yyvsp122 := yyvsp122 -1 yyvsp14 := yyvsp14 -1 yyvsp4 := yyvsp4 -2 yyvsp2 := yyvsp2 -1 yyvsp1 := yyvsp1 -2 yyspecial_routines122.force (yyvs122, yyval122, yyvsp122) end end yy_do_action_131 --|#line "eiffel.y" local yyval122: detachable PARENT_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- Non conforming inheritance if not non_conforming_inheritance_flag then -- Check to make sure Class_identifier is 'NONE' -- An error will be thrown if TYPE_AS is not of type NONE_TYPE_AS ast_factory.validate_non_conforming_inheritance_type (Current, new_class_type (yyvs2.item (yyvsp2), Void)) -- Set flag so that no more inheritance clauses can be added as non-conforming is always the last one. non_conforming_inheritance_flag := True else -- Raise error as non conforming inheritance has already been specified report_one_error (create {SYNTAX_ERROR}.make (token_line (yyvs14.item (yyvsp14)), token_column (yyvs14.item (yyvsp14)), filename, locale.translation_in_context ("Only one non-conforming inheritance clause allowed per class", once "parser.eiffel.error"))) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp122 := yyvsp122 + 1 if yyvsp122 >= yyvsc122 then debug ("GEYACC") std.error.put_line ("Resize yyvs122") end yyvsc122 := yyvsc122 + yyInitial_yyvs_size yyvs122 := yyspecial_routines122.aliased_resized_area (yyvs122, yyvsc122) end yyspecial_routines122.force (yyvs122, yyval122, yyvsp122) end end yy_do_action_132 --|#line "eiffel.y" local yyval122: detachable PARENT_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs75.item (yyvsp75) as v then yyval122 := ast_factory.new_eiffel_list_parent_as (v, counter_value + 1) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp122 := yyvsp122 + 1 yyvsp75 := yyvsp75 -1 if yyvsp122 >= yyvsc122 then debug ("GEYACC") std.error.put_line ("Resize yyvs122") end yyvsc122 := yyvsc122 + yyInitial_yyvs_size yyvs122 := yyspecial_routines122.aliased_resized_area (yyvs122, yyvsc122) end yyspecial_routines122.force (yyvs122, yyval122, yyvsp122) end end yy_do_action_133 --|#line "eiffel.y" local yyval122: detachable PARENT_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval122 := yyvs122.item (yyvsp122) if attached yyval122 as l_list and then attached yyvs75.item (yyvsp75) as l_val then l_list.reverse_extend (l_val) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp75 := yyvsp75 -1 yyvsp1 := yyvsp1 -1 yyspecial_routines122.force (yyvs122, yyval122, yyvsp122) end end yy_do_action_134 --|#line "eiffel.y" local yyval75: detachable PARENT_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval75 := yyvs75.item (yyvsp75) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp4 := yyvsp4 -1 yyspecial_routines75.force (yyvs75, yyval75, yyvsp75) end end yy_do_action_135 --|#line "eiffel.y" local yyval90: detachable CLASS_TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval90 := ast_factory.new_class_type_as (yyvs2.item (yyvsp2), yyvs128.item (yyvsp128)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp90 := yyvsp90 + 1 yyvsp2 := yyvsp2 -1 yyvsp128 := yyvsp128 -1 if yyvsp90 >= yyvsc90 then debug ("GEYACC") std.error.put_line ("Resize yyvs90") end yyvsc90 := yyvsc90 + yyInitial_yyvs_size yyvs90 := yyspecial_routines90.aliased_resized_area (yyvs90, yyvsc90) end yyspecial_routines90.force (yyvs90, yyval90, yyvsp90) end end yy_do_action_136 --|#line "eiffel.y" local yyval75: detachable PARENT_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval75 := ast_factory.new_parent_as (yyvs90.item (yyvsp90), Void, Void, Void, Void, Void, Void) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp75 := yyvsp75 + 1 yyvsp90 := yyvsp90 -1 if yyvsp75 >= yyvsc75 then debug ("GEYACC") std.error.put_line ("Resize yyvs75") end yyvsc75 := yyvsc75 + yyInitial_yyvs_size yyvs75 := yyspecial_routines75.aliased_resized_area (yyvs75, yyvsc75) end yyspecial_routines75.force (yyvs75, yyval75, yyvsp75) end end yy_do_action_137 --|#line "eiffel.y" local yyval75: detachable PARENT_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval75 := ast_factory.new_parent_as (yyvs90.item (yyvsp90), Void, Void, Void, Void, yyvs113.item (yyvsp113), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp75 := yyvsp75 + 1 yyvsp90 := yyvsp90 -1 yyvsp113 := yyvsp113 -1 yyvsp14 := yyvsp14 -1 if yyvsp75 >= yyvsc75 then debug ("GEYACC") std.error.put_line ("Resize yyvs75") end yyvsc75 := yyvsc75 + yyInitial_yyvs_size yyvs75 := yyspecial_routines75.aliased_resized_area (yyvs75, yyvsc75) end yyspecial_routines75.force (yyvs75, yyval75, yyvsp75) end end yy_do_action_138 --|#line "eiffel.y" local yyval75: detachable PARENT_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval75 := ast_factory.new_parent_as (yyvs90.item (yyvsp90), Void, Void, Void, yyvs112.item (yyvsp112), yyvs113.item (yyvsp113), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp75 := yyvsp75 + 1 yyvsp90 := yyvsp90 -1 yyvsp112 := yyvsp112 -1 yyvsp113 := yyvsp113 -1 yyvsp14 := yyvsp14 -1 if yyvsp75 >= yyvsc75 then debug ("GEYACC") std.error.put_line ("Resize yyvs75") end yyvsc75 := yyvsc75 + yyInitial_yyvs_size yyvs75 := yyspecial_routines75.aliased_resized_area (yyvs75, yyvsc75) end yyspecial_routines75.force (yyvs75, yyval75, yyvsp75) end end yy_do_action_139 --|#line "eiffel.y" local yyval75: detachable PARENT_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval75 := ast_factory.new_parent_as (yyvs90.item (yyvsp90), Void, Void, yyvs111.item (yyvsp111), yyvs112.item (yyvsp112), yyvs113.item (yyvsp113), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp75 := yyvsp75 + 1 yyvsp90 := yyvsp90 -1 yyvsp111 := yyvsp111 -1 yyvsp112 := yyvsp112 -1 yyvsp113 := yyvsp113 -1 yyvsp14 := yyvsp14 -1 if yyvsp75 >= yyvsc75 then debug ("GEYACC") std.error.put_line ("Resize yyvs75") end yyvsc75 := yyvsc75 + yyInitial_yyvs_size yyvs75 := yyspecial_routines75.aliased_resized_area (yyvs75, yyvsc75) end yyspecial_routines75.force (yyvs75, yyval75, yyvsp75) end end yy_do_action_140 --|#line "eiffel.y" local yyval75: detachable PARENT_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval75 := ast_factory.new_parent_as (yyvs90.item (yyvsp90), Void, yyvs103.item (yyvsp103), yyvs111.item (yyvsp111), yyvs112.item (yyvsp112), yyvs113.item (yyvsp113), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 6 yyvsp75 := yyvsp75 + 1 yyvsp90 := yyvsp90 -1 yyvsp103 := yyvsp103 -1 yyvsp111 := yyvsp111 -1 yyvsp112 := yyvsp112 -1 yyvsp113 := yyvsp113 -1 yyvsp14 := yyvsp14 -1 if yyvsp75 >= yyvsc75 then debug ("GEYACC") std.error.put_line ("Resize yyvs75") end yyvsc75 := yyvsc75 + yyInitial_yyvs_size yyvs75 := yyspecial_routines75.aliased_resized_area (yyvs75, yyvsc75) end yyspecial_routines75.force (yyvs75, yyval75, yyvsp75) end end yy_do_action_141 --|#line "eiffel.y" local yyval75: detachable PARENT_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval75 := ast_factory.new_parent_as (yyvs90.item (yyvsp90), yyvs124.item (yyvsp124), yyvs103.item (yyvsp103), yyvs111.item (yyvsp111), yyvs112.item (yyvsp112), yyvs113.item (yyvsp113), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 7 yyvsp75 := yyvsp75 + 1 yyvsp90 := yyvsp90 -1 yyvsp124 := yyvsp124 -1 yyvsp103 := yyvsp103 -1 yyvsp111 := yyvsp111 -1 yyvsp112 := yyvsp112 -1 yyvsp113 := yyvsp113 -1 yyvsp14 := yyvsp14 -1 if yyvsp75 >= yyvsc75 then debug ("GEYACC") std.error.put_line ("Resize yyvs75") end yyvsc75 := yyvsc75 + yyInitial_yyvs_size yyvs75 := yyspecial_routines75.aliased_resized_area (yyvs75, yyvsc75) end yyspecial_routines75.force (yyvs75, yyval75, yyvsp75) end end yy_do_action_142 --|#line "eiffel.y" local yyval124: detachable RENAME_CLAUSE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval124 := ast_factory.new_rename_clause_as (Void, yyvs14.item (yyvsp14)) if is_constraint_renaming then report_one_error (create {SYNTAX_ERROR}.make (token_line (yyvs14.item (yyvsp14)), token_column (yyvs14.item (yyvsp14)), filename, locale.translation_in_context ("Empty rename clause.", once "parser.eiffel.error"))) else report_one_warning (create {SYNTAX_WARNING}.make (token_line (yyvs14.item (yyvsp14)), token_column (yyvs14.item (yyvsp14)), filename, locale.translation_in_context ("Remove empty rename clauses.", once "parser.eiffel.warning"))) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp124 := yyvsp124 + 1 yyvsp14 := yyvsp14 -1 if yyvsp124 >= yyvsc124 then debug ("GEYACC") std.error.put_line ("Resize yyvs124") end yyvsc124 := yyvsc124 + yyInitial_yyvs_size yyvs124 := yyspecial_routines124.aliased_resized_area (yyvs124, yyvsc124) end yyspecial_routines124.force (yyvs124, yyval124, yyvsp124) end end yy_do_action_143 --|#line "eiffel.y" local yyval124: detachable RENAME_CLAUSE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval124 := ast_factory.new_rename_clause_as (yyvs123.item (yyvsp123), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp124 := yyvsp124 + 1 yyvsp14 := yyvsp14 -1 yyvsp1 := yyvsp1 -2 yyvsp123 := yyvsp123 -1 if yyvsp124 >= yyvsc124 then debug ("GEYACC") std.error.put_line ("Resize yyvs124") end yyvsc124 := yyvsc124 + yyInitial_yyvs_size yyvs124 := yyspecial_routines124.aliased_resized_area (yyvs124, yyvsc124) end yyspecial_routines124.force (yyvs124, yyval124, yyvsp124) end end yy_do_action_144 --|#line "eiffel.y" local yyval123: detachable EIFFEL_LIST [RENAME_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs79.item (yyvsp79) as v then yyval123 := ast_factory.new_eiffel_list_rename_as (v, counter_value + 1) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp123 := yyvsp123 + 1 yyvsp79 := yyvsp79 -1 if yyvsp123 >= yyvsc123 then debug ("GEYACC") std.error.put_line ("Resize yyvs123") end yyvsc123 := yyvsc123 + yyInitial_yyvs_size yyvs123 := yyspecial_routines123.aliased_resized_area (yyvs123, yyvsc123) end yyspecial_routines123.force (yyvs123, yyval123, yyvsp123) end end yy_do_action_145 --|#line "eiffel.y" local yyval123: detachable EIFFEL_LIST [RENAME_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval123 := yyvs123.item (yyvsp123) if attached yyval123 as l_list and then attached yyvs79.item (yyvsp79) as l_val then l_list.reverse_extend (l_val) ast_factory.reverse_extend_separator (l_list, yyvs4.item (yyvsp4)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp79 := yyvsp79 -1 yyvsp4 := yyvsp4 -1 yyvsp1 := yyvsp1 -1 yyspecial_routines123.force (yyvs123, yyval123, yyvsp123) end end yy_do_action_146 --|#line "eiffel.y" local yyval79: detachable RENAME_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval79 := ast_factory.new_rename_as (yyvs94.item (yyvsp94 - 1), yyvs94.item (yyvsp94), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp79 := yyvsp79 + 1 yyvsp94 := yyvsp94 -2 yyvsp14 := yyvsp14 -1 if yyvsp79 >= yyvsc79 then debug ("GEYACC") std.error.put_line ("Resize yyvs79") end yyvsc79 := yyvsc79 + yyInitial_yyvs_size yyvs79 := yyspecial_routines79.aliased_resized_area (yyvs79, yyvsc79) end yyspecial_routines79.force (yyvs79, yyval79, yyvsp79) end end yy_do_action_147 --|#line "eiffel.y" local yyval103: detachable EXPORT_CLAUSE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp103 := yyvsp103 + 1 if yyvsp103 >= yyvsc103 then debug ("GEYACC") std.error.put_line ("Resize yyvs103") end yyvsc103 := yyvsc103 + yyInitial_yyvs_size yyvs103 := yyspecial_routines103.aliased_resized_area (yyvs103, yyvsc103) end yyspecial_routines103.force (yyvs103, yyval103, yyvsp103) end end yy_do_action_148 --|#line "eiffel.y" local yyval103: detachable EXPORT_CLAUSE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval103 := yyvs103.item (yyvsp103) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines103.force (yyvs103, yyval103, yyvsp103) end end yy_do_action_149 --|#line "eiffel.y" local yyval103: detachable EXPORT_CLAUSE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval103 := ast_factory.new_export_clause_as (yyvs102.item (yyvsp102), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp103 := yyvsp103 + 1 yyvsp14 := yyvsp14 -1 yyvsp1 := yyvsp1 -2 yyvsp102 := yyvsp102 -1 if yyvsp103 >= yyvsc103 then debug ("GEYACC") std.error.put_line ("Resize yyvs103") end yyvsc103 := yyvsc103 + yyInitial_yyvs_size yyvs103 := yyspecial_routines103.aliased_resized_area (yyvs103, yyvsc103) end yyspecial_routines103.force (yyvs103, yyval103, yyvsp103) end end yy_do_action_150 --|#line "eiffel.y" local yyval103: detachable EXPORT_CLAUSE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval103 := ast_factory.new_export_clause_as (Void, yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp103 := yyvsp103 + 1 yyvsp14 := yyvsp14 -1 yyvsp4 := yyvsp4 -1 if yyvsp103 >= yyvsc103 then debug ("GEYACC") std.error.put_line ("Resize yyvs103") end yyvsc103 := yyvsc103 + yyInitial_yyvs_size yyvs103 := yyspecial_routines103.aliased_resized_area (yyvs103, yyvsc103) end yyspecial_routines103.force (yyvs103, yyval103, yyvsp103) end end yy_do_action_151 --|#line "eiffel.y" local yyval102: detachable EIFFEL_LIST [EXPORT_ITEM_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs49.item (yyvsp49) as v then yyval102 := ast_factory.new_eiffel_list_export_item_as (v, counter_value + 1) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp102 := yyvsp102 + 1 yyvsp49 := yyvsp49 -1 if yyvsp102 >= yyvsc102 then debug ("GEYACC") std.error.put_line ("Resize yyvs102") end yyvsc102 := yyvsc102 + yyInitial_yyvs_size yyvs102 := yyspecial_routines102.aliased_resized_area (yyvs102, yyvsc102) end yyspecial_routines102.force (yyvs102, yyval102, yyvsp102) end end yy_do_action_152 --|#line "eiffel.y" local yyval102: detachable EIFFEL_LIST [EXPORT_ITEM_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval102 := yyvs102.item (yyvsp102) if attached yyval102 as l_list and then attached yyvs49.item (yyvsp49) as l_val then l_list.reverse_extend (l_val) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp49 := yyvsp49 -1 yyvsp1 := yyvsp1 -1 yyspecial_routines102.force (yyvs102, yyval102, yyvsp102) end end yy_do_action_153 --|#line "eiffel.y" local yyval49: detachable EXPORT_ITEM_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yyvs56.item (yyvsp56) = Void then -- Per ECMA, this should be rejected. For now we only raise -- a warning. And on the compiler side, we will simply ignore them altogether. if has_syntax_warning then report_one_warning (create {SYNTAX_WARNING}.make (token_line (yyvs115.item (yyvsp115)), token_column (yyvs115.item (yyvsp115)), filename, locale.translation_in_context (once "Empty Feature_set is not allowed and will be discarded.", once "parser.eiffel.warning"))) end end yyval49 := ast_factory.new_export_item_as (ast_factory.new_client_as (yyvs115.item (yyvsp115)), yyvs56.item (yyvsp56)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp49 := yyvsp49 + 1 yyvsp115 := yyvsp115 -1 yyvsp56 := yyvsp56 -1 yyvsp4 := yyvsp4 -1 if yyvsp49 >= yyvsc49 then debug ("GEYACC") std.error.put_line ("Resize yyvs49") end yyvsc49 := yyvsc49 + yyInitial_yyvs_size yyvs49 := yyspecial_routines49.aliased_resized_area (yyvs49, yyvsc49) end yyspecial_routines49.force (yyvs49, yyval49, yyvsp49) end end yy_do_action_154 --|#line "eiffel.y" local yyval56: detachable FEATURE_SET_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp56 := yyvsp56 + 1 if yyvsp56 >= yyvsc56 then debug ("GEYACC") std.error.put_line ("Resize yyvs56") end yyvsc56 := yyvsc56 + yyInitial_yyvs_size yyvs56 := yyspecial_routines56.aliased_resized_area (yyvs56, yyvsc56) end yyspecial_routines56.force (yyvs56, yyval56, yyvsp56) end end yy_do_action_155 --|#line "eiffel.y" local yyval56: detachable FEATURE_SET_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval56 := ast_factory.new_all_as (yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp56 := yyvsp56 + 1 yyvsp14 := yyvsp14 -1 if yyvsp56 >= yyvsc56 then debug ("GEYACC") std.error.put_line ("Resize yyvs56") end yyvsc56 := yyvsc56 + yyInitial_yyvs_size yyvs56 := yyspecial_routines56.aliased_resized_area (yyvs56, yyvsc56) end yyspecial_routines56.force (yyvs56, yyval56, yyvsp56) end end yy_do_action_156 --|#line "eiffel.y" local yyval56: detachable FEATURE_SET_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval56 := ast_factory.new_feature_list_as (yyvs108.item (yyvsp108)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp56 := yyvsp56 + 1 yyvsp108 := yyvsp108 -1 if yyvsp56 >= yyvsc56 then debug ("GEYACC") std.error.put_line ("Resize yyvs56") end yyvsc56 := yyvsc56 + yyInitial_yyvs_size yyvs56 := yyspecial_routines56.aliased_resized_area (yyvs56, yyvsc56) end yyspecial_routines56.force (yyvs56, yyval56, yyvsp56) end end yy_do_action_157 --|#line "eiffel.y" local yyval98: detachable CONVERT_FEAT_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp98 := yyvsp98 + 1 if yyvsp98 >= yyvsc98 then debug ("GEYACC") std.error.put_line ("Resize yyvs98") end yyvsc98 := yyvsc98 + yyInitial_yyvs_size yyvs98 := yyspecial_routines98.aliased_resized_area (yyvs98, yyvsc98) end yyspecial_routines98.force (yyvs98, yyval98, yyvsp98) end end yy_do_action_158 --|#line "eiffel.y" local yyval98: detachable CONVERT_FEAT_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs98.item (yyvsp98) as l_list then yyval98 := l_list l_list.set_convert_keyword (yyvs14.item (yyvsp14)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp14 := yyvsp14 -1 yyvsp1 := yyvsp1 -2 yyspecial_routines98.force (yyvs98, yyval98, yyvsp98) end end yy_do_action_159 --|#line "eiffel.y" local yyval98: detachable CONVERT_FEAT_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs41.item (yyvsp41) as v then yyval98 := ast_factory.new_eiffel_list_convert (v, counter_value + 1) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp98 := yyvsp98 + 1 yyvsp41 := yyvsp41 -1 if yyvsp98 >= yyvsc98 then debug ("GEYACC") std.error.put_line ("Resize yyvs98") end yyvsc98 := yyvsc98 + yyInitial_yyvs_size yyvs98 := yyspecial_routines98.aliased_resized_area (yyvs98, yyvsc98) end yyspecial_routines98.force (yyvs98, yyval98, yyvsp98) end end yy_do_action_160 --|#line "eiffel.y" local yyval98: detachable CONVERT_FEAT_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval98 := yyvs98.item (yyvsp98) if attached yyval98 as l_list and then attached yyvs41.item (yyvsp41) as l_val then l_list.reverse_extend (l_val) ast_factory.reverse_extend_separator (l_list, yyvs4.item (yyvsp4)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp41 := yyvsp41 -1 yyvsp4 := yyvsp4 -1 yyvsp1 := yyvsp1 -1 yyspecial_routines98.force (yyvs98, yyval98, yyvsp98) end end yy_do_action_161 --|#line "eiffel.y" local yyval41: detachable CONVERT_FEAT_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- True because this is a conversion feature used as a creation -- procedure in current class. yyval41 := ast_factory.new_convert_feat_as (True, yyvs94.item (yyvsp94), yyvs128.item (yyvsp128), yyvs4.item (yyvsp4 - 3), yyvs4.item (yyvsp4), Void, yyvs4.item (yyvsp4 - 2), yyvs4.item (yyvsp4 - 1)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 6 yyvsp41 := yyvsp41 + 1 yyvsp94 := yyvsp94 -1 yyvsp4 := yyvsp4 -4 yyvsp128 := yyvsp128 -1 if yyvsp41 >= yyvsc41 then debug ("GEYACC") std.error.put_line ("Resize yyvs41") end yyvsc41 := yyvsc41 + yyInitial_yyvs_size yyvs41 := yyspecial_routines41.aliased_resized_area (yyvs41, yyvsc41) end yyspecial_routines41.force (yyvs41, yyval41, yyvsp41) end end yy_do_action_162 --|#line "eiffel.y" local yyval41: detachable CONVERT_FEAT_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- False because this is not a conversion feature used as a creation -- procedure. yyval41 := ast_factory.new_convert_feat_as (False, yyvs94.item (yyvsp94), yyvs128.item (yyvsp128), Void, Void, yyvs4.item (yyvsp4 - 2), yyvs4.item (yyvsp4 - 1), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp41 := yyvsp41 + 1 yyvsp94 := yyvsp94 -1 yyvsp4 := yyvsp4 -3 yyvsp128 := yyvsp128 -1 if yyvsp41 >= yyvsc41 then debug ("GEYACC") std.error.put_line ("Resize yyvs41") end yyvsc41 := yyvsc41 + yyInitial_yyvs_size yyvs41 := yyspecial_routines41.aliased_resized_area (yyvs41, yyvsc41) end yyspecial_routines41.force (yyvs41, yyval41, yyvsp41) end end yy_do_action_163 --|#line "eiffel.y" local yyval108: detachable EIFFEL_LIST [FEATURE_NAME] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval108 := yyvs108.item (yyvsp108) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp1 := yyvsp1 -2 yyspecial_routines108.force (yyvs108, yyval108, yyvsp108) end end yy_do_action_164 --|#line "eiffel.y" local yyval108: detachable EIFFEL_LIST [FEATURE_NAME] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs2.item (yyvsp2) as l_val and then attached ast_factory.new_feature_name_id_as (l_val) as l_id then yyval108 := ast_factory.new_eiffel_list_feature_name_id (l_id, counter_value + 1) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp108 := yyvsp108 + 1 yyvsp2 := yyvsp2 -1 if yyvsp108 >= yyvsc108 then debug ("GEYACC") std.error.put_line ("Resize yyvs108") end yyvsc108 := yyvsc108 + yyInitial_yyvs_size yyvs108 := yyspecial_routines108.aliased_resized_area (yyvs108, yyvsc108) end yyspecial_routines108.force (yyvs108, yyval108, yyvsp108) end end yy_do_action_165 --|#line "eiffel.y" local yyval108: detachable EIFFEL_LIST [FEATURE_NAME] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval108 := yyvs108.item (yyvsp108) if attached yyval108 as l_list and then attached yyvs2.item (yyvsp2) as l_val and then attached ast_factory.new_feature_name_id_as (l_val) as l_id then l_list.reverse_extend (l_id) ast_factory.reverse_extend_separator (l_list, yyvs4.item (yyvsp4)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp2 := yyvsp2 -1 yyvsp4 := yyvsp4 -1 yyvsp1 := yyvsp1 -1 yyspecial_routines108.force (yyvs108, yyval108, yyvsp108) end end yy_do_action_166 --|#line "eiffel.y" local yyval108: detachable EIFFEL_LIST [FEATURE_NAME] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval108 := yyvs108.item (yyvsp108) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp1 := yyvsp1 -2 yyspecial_routines108.force (yyvs108, yyval108, yyvsp108) end end yy_do_action_167 --|#line "eiffel.y" local yyval108: detachable EIFFEL_LIST [FEATURE_NAME] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs94.item (yyvsp94) as v then yyval108 := ast_factory.new_eiffel_list_feature_name (v, counter_value + 1) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp108 := yyvsp108 + 1 yyvsp94 := yyvsp94 -1 if yyvsp108 >= yyvsc108 then debug ("GEYACC") std.error.put_line ("Resize yyvs108") end yyvsc108 := yyvsc108 + yyInitial_yyvs_size yyvs108 := yyspecial_routines108.aliased_resized_area (yyvs108, yyvsc108) end yyspecial_routines108.force (yyvs108, yyval108, yyvsp108) end end yy_do_action_168 --|#line "eiffel.y" local yyval108: detachable EIFFEL_LIST [FEATURE_NAME] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval108 := yyvs108.item (yyvsp108) if attached yyval108 as l_list and then attached yyvs94.item (yyvsp94) as l_val then l_list.reverse_extend (l_val) ast_factory.reverse_extend_separator (l_list, yyvs4.item (yyvsp4)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp94 := yyvsp94 -1 yyvsp4 := yyvsp4 -1 yyvsp1 := yyvsp1 -1 yyspecial_routines108.force (yyvs108, yyval108, yyvsp108) end end yy_do_action_169 --|#line "eiffel.y" local yyval111: detachable UNDEFINE_CLAUSE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp111 := yyvsp111 + 1 if yyvsp111 >= yyvsc111 then debug ("GEYACC") std.error.put_line ("Resize yyvs111") end yyvsc111 := yyvsc111 + yyInitial_yyvs_size yyvs111 := yyspecial_routines111.aliased_resized_area (yyvs111, yyvsc111) end yyspecial_routines111.force (yyvs111, yyval111, yyvsp111) end end yy_do_action_170 --|#line "eiffel.y" local yyval111: detachable UNDEFINE_CLAUSE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval111 := yyvs111.item (yyvsp111) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines111.force (yyvs111, yyval111, yyvsp111) end end yy_do_action_171 --|#line "eiffel.y" local yyval111: detachable UNDEFINE_CLAUSE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval111 := ast_factory.new_undefine_clause_as (Void, yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp111 := yyvsp111 + 1 yyvsp14 := yyvsp14 -1 if yyvsp111 >= yyvsc111 then debug ("GEYACC") std.error.put_line ("Resize yyvs111") end yyvsc111 := yyvsc111 + yyInitial_yyvs_size yyvs111 := yyspecial_routines111.aliased_resized_area (yyvs111, yyvsc111) end yyspecial_routines111.force (yyvs111, yyval111, yyvsp111) end end yy_do_action_172 --|#line "eiffel.y" local yyval111: detachable UNDEFINE_CLAUSE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval111 := ast_factory.new_undefine_clause_as (yyvs108.item (yyvsp108), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp111 := yyvsp111 + 1 yyvsp14 := yyvsp14 -1 yyvsp108 := yyvsp108 -1 if yyvsp111 >= yyvsc111 then debug ("GEYACC") std.error.put_line ("Resize yyvs111") end yyvsc111 := yyvsc111 + yyInitial_yyvs_size yyvs111 := yyspecial_routines111.aliased_resized_area (yyvs111, yyvsc111) end yyspecial_routines111.force (yyvs111, yyval111, yyvsp111) end end yy_do_action_173 --|#line "eiffel.y" local yyval112: detachable REDEFINE_CLAUSE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp112 := yyvsp112 + 1 if yyvsp112 >= yyvsc112 then debug ("GEYACC") std.error.put_line ("Resize yyvs112") end yyvsc112 := yyvsc112 + yyInitial_yyvs_size yyvs112 := yyspecial_routines112.aliased_resized_area (yyvs112, yyvsc112) end yyspecial_routines112.force (yyvs112, yyval112, yyvsp112) end end yy_do_action_174 --|#line "eiffel.y" local yyval112: detachable REDEFINE_CLAUSE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval112 := yyvs112.item (yyvsp112) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines112.force (yyvs112, yyval112, yyvsp112) end end yy_do_action_175 --|#line "eiffel.y" local yyval112: detachable REDEFINE_CLAUSE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval112 := ast_factory.new_redefine_clause_as (Void, yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp112 := yyvsp112 + 1 yyvsp14 := yyvsp14 -1 if yyvsp112 >= yyvsc112 then debug ("GEYACC") std.error.put_line ("Resize yyvs112") end yyvsc112 := yyvsc112 + yyInitial_yyvs_size yyvs112 := yyspecial_routines112.aliased_resized_area (yyvs112, yyvsc112) end yyspecial_routines112.force (yyvs112, yyval112, yyvsp112) end end yy_do_action_176 --|#line "eiffel.y" local yyval112: detachable REDEFINE_CLAUSE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval112 := ast_factory.new_redefine_clause_as (yyvs108.item (yyvsp108), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp112 := yyvsp112 + 1 yyvsp14 := yyvsp14 -1 yyvsp108 := yyvsp108 -1 if yyvsp112 >= yyvsc112 then debug ("GEYACC") std.error.put_line ("Resize yyvs112") end yyvsc112 := yyvsc112 + yyInitial_yyvs_size yyvs112 := yyspecial_routines112.aliased_resized_area (yyvs112, yyvsc112) end yyspecial_routines112.force (yyvs112, yyval112, yyvsp112) end end yy_do_action_177 --|#line "eiffel.y" local yyval113: detachable SELECT_CLAUSE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp113 := yyvsp113 + 1 if yyvsp113 >= yyvsc113 then debug ("GEYACC") std.error.put_line ("Resize yyvs113") end yyvsc113 := yyvsc113 + yyInitial_yyvs_size yyvs113 := yyspecial_routines113.aliased_resized_area (yyvs113, yyvsc113) end yyspecial_routines113.force (yyvs113, yyval113, yyvsp113) end end yy_do_action_178 --|#line "eiffel.y" local yyval113: detachable SELECT_CLAUSE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval113 := yyvs113.item (yyvsp113) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines113.force (yyvs113, yyval113, yyvsp113) end end yy_do_action_179 --|#line "eiffel.y" local yyval113: detachable SELECT_CLAUSE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval113 := ast_factory.new_select_clause_as (Void, yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp113 := yyvsp113 + 1 yyvsp14 := yyvsp14 -1 if yyvsp113 >= yyvsc113 then debug ("GEYACC") std.error.put_line ("Resize yyvs113") end yyvsc113 := yyvsc113 + yyInitial_yyvs_size yyvs113 := yyspecial_routines113.aliased_resized_area (yyvs113, yyvsc113) end yyspecial_routines113.force (yyvs113, yyval113, yyvsp113) end end yy_do_action_180 --|#line "eiffel.y" local yyval113: detachable SELECT_CLAUSE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval113 := ast_factory.new_select_clause_as (yyvs108.item (yyvsp108), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp113 := yyvsp113 + 1 yyvsp14 := yyvsp14 -1 yyvsp108 := yyvsp108 -1 if yyvsp113 >= yyvsc113 then debug ("GEYACC") std.error.put_line ("Resize yyvs113") end yyvsc113 := yyvsc113 + yyInitial_yyvs_size yyvs113 := yyspecial_routines113.aliased_resized_area (yyvs113, yyvsc113) end yyspecial_routines113.force (yyvs113, yyval113, yyvsp113) end end yy_do_action_181 --|#line "eiffel.y" local yyval132: detachable FORMAL_ARGU_DEC_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- Per ECMA, this should be rejected. For now we only raise -- a warning. And on the compiler side, we will simply ignore them altogether. if has_syntax_warning then report_one_warning (create {SYNTAX_WARNING}.make (token_line (yyvs4.item (yyvsp4 - 1)), token_column (yyvs4.item (yyvsp4 - 1)), filename, locale.translation_in_context (once "Empty formal argument list is not allowed", once "parser.eiffel.warning"))) end yyval132 := ast_factory.new_formal_argu_dec_list_as (Void, yyvs4.item (yyvsp4 - 1), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp132 := yyvsp132 + 1 yyvsp4 := yyvsp4 -2 if yyvsp132 >= yyvsc132 then debug ("GEYACC") std.error.put_line ("Resize yyvs132") end yyvsc132 := yyvsc132 + yyInitial_yyvs_size yyvs132 := yyspecial_routines132.aliased_resized_area (yyvs132, yyvsc132) end yyspecial_routines132.force (yyvs132, yyval132, yyvsp132) end end yy_do_action_182 --|#line "eiffel.y" local yyval132: detachable FORMAL_ARGU_DEC_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval132 := ast_factory.new_formal_argu_dec_list_as (yyvs129.item (yyvsp129), yyvs4.item (yyvsp4 - 1), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp132 := yyvsp132 + 1 yyvsp4 := yyvsp4 -2 yyvsp1 := yyvsp1 -2 yyvsp129 := yyvsp129 -1 if yyvsp132 >= yyvsc132 then debug ("GEYACC") std.error.put_line ("Resize yyvs132") end yyvsc132 := yyvsc132 + yyInitial_yyvs_size yyvs132 := yyspecial_routines132.aliased_resized_area (yyvs132, yyvsc132) end yyspecial_routines132.force (yyvs132, yyval132, yyvsp132) end end yy_do_action_183 --|#line "eiffel.y" local yyval129: detachable TYPE_DEC_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs91.item (yyvsp91) as v then yyval129 := ast_factory.new_eiffel_list_type_dec_as (v, counter_value + 1) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp129 := yyvsp129 + 1 yyvsp91 := yyvsp91 -1 if yyvsp129 >= yyvsc129 then debug ("GEYACC") std.error.put_line ("Resize yyvs129") end yyvsc129 := yyvsc129 + yyInitial_yyvs_size yyvs129 := yyspecial_routines129.aliased_resized_area (yyvs129, yyvsc129) end yyspecial_routines129.force (yyvs129, yyval129, yyvsp129) end end yy_do_action_184 --|#line "eiffel.y" local yyval129: detachable TYPE_DEC_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval129 := yyvs129.item (yyvsp129) if attached yyval129 as l_list and then attached yyvs91.item (yyvsp91) as l_val then l_list.reverse_extend (l_val) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp91 := yyvsp91 -1 yyvsp1 := yyvsp1 -1 yyspecial_routines129.force (yyvs129, yyval129, yyvsp129) end end yy_do_action_185 --|#line "eiffel.y" local yyval91: detachable TYPE_DEC_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval91 := ast_factory.new_type_dec_as (yyvs22.item (yyvsp22), yyvs88.item (yyvsp88), yyvs4.item (yyvsp4 - 1)) if attached yyvs22.item (yyvsp22) as list and then attached list.id_list as identifiers then add_scope_arguments (identifiers) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 6 yyvsp91 := yyvsp91 + 1 yyvsp1 := yyvsp1 -2 yyvsp22 := yyvsp22 -1 yyvsp4 := yyvsp4 -2 yyvsp88 := yyvsp88 -1 if yyvsp91 >= yyvsc91 then debug ("GEYACC") std.error.put_line ("Resize yyvs91") end yyvsc91 := yyvsc91 + yyInitial_yyvs_size yyvs91 := yyspecial_routines91.aliased_resized_area (yyvs91, yyvsc91) end yyspecial_routines91.force (yyvs91, yyval91, yyvsp91) end end yy_do_action_186 --|#line "eiffel.y" local yyval130: detachable LIST_DEC_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs92.item (yyvsp92) as v then yyval130 := ast_factory.new_eiffel_list_list_dec_as (v, counter_value + 1) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp130 := yyvsp130 + 1 yyvsp92 := yyvsp92 -1 if yyvsp130 >= yyvsc130 then debug ("GEYACC") std.error.put_line ("Resize yyvs130") end yyvsc130 := yyvsc130 + yyInitial_yyvs_size yyvs130 := yyspecial_routines130.aliased_resized_area (yyvs130, yyvsc130) end yyspecial_routines130.force (yyvs130, yyval130, yyvsp130) end end yy_do_action_187 --|#line "eiffel.y" local yyval130: detachable LIST_DEC_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval130 := yyvs130.item (yyvsp130) if attached yyval130 as l_list and then attached yyvs92.item (yyvsp92) as l_val then l_list.reverse_extend (l_val) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp92 := yyvsp92 -1 yyvsp1 := yyvsp1 -1 yyspecial_routines130.force (yyvs130, yyval130, yyvsp130) end end yy_do_action_188 --|#line "eiffel.y" local yyval92: detachable LIST_DEC_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if not is_type_inference_supported then raise_error end yyval92 := ast_factory.new_list_dec_as (yyvs22.item (yyvsp22)) if attached yyvs22.item (yyvsp22) as list and then attached list.id_list as identifiers then add_scope_locals (identifiers) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp92 := yyvsp92 + 1 yyvsp1 := yyvsp1 -2 yyvsp22 := yyvsp22 -1 yyvsp4 := yyvsp4 -1 if yyvsp92 >= yyvsc92 then debug ("GEYACC") std.error.put_line ("Resize yyvs92") end yyvsc92 := yyvsc92 + yyInitial_yyvs_size yyvs92 := yyspecial_routines92.aliased_resized_area (yyvs92, yyvsc92) end yyspecial_routines92.force (yyvs92, yyval92, yyvsp92) end end yy_do_action_189 --|#line "eiffel.y" local yyval92: detachable LIST_DEC_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval92 := ast_factory.new_type_dec_as (yyvs22.item (yyvsp22), yyvs88.item (yyvsp88), yyvs4.item (yyvsp4 - 1)) if attached yyvs22.item (yyvsp22) as list and then attached list.id_list as identifiers then add_scope_locals (identifiers) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 6 yyvsp92 := yyvsp92 + 1 yyvsp1 := yyvsp1 -2 yyvsp22 := yyvsp22 -1 yyvsp4 := yyvsp4 -2 yyvsp88 := yyvsp88 -1 if yyvsp92 >= yyvsc92 then debug ("GEYACC") std.error.put_line ("Resize yyvs92") end yyvsc92 := yyvsc92 + yyInitial_yyvs_size yyvs92 := yyspecial_routines92.aliased_resized_area (yyvs92, yyvsc92) end yyspecial_routines92.force (yyvs92, yyval92, yyvsp92) end end yy_do_action_190 --|#line "eiffel.y" local yyval22: detachable IDENTIFIER_LIST do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs2.item (yyvsp2) as v then yyval22 := ast_factory.new_identifier_list (v.name_id, counter_value + 1) if attached yyval22 as l_list then ast_factory.reverse_extend_identifier (l_list, v) end end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp22 := yyvsp22 + 1 yyvsp2 := yyvsp2 -1 if yyvsp22 >= yyvsc22 then debug ("GEYACC") std.error.put_line ("Resize yyvs22") end yyvsc22 := yyvsc22 + yyInitial_yyvs_size yyvs22 := yyspecial_routines22.aliased_resized_area (yyvs22, yyvsc22) end yyspecial_routines22.force (yyvs22, yyval22, yyvsp22) end end yy_do_action_191 --|#line "eiffel.y" local yyval22: detachable IDENTIFIER_LIST do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval22 := yyvs22.item (yyvsp22) if attached yyval22 as l_list and then attached yyvs2.item (yyvsp2) as l_val then l_list.reverse_extend (l_val.name_id) ast_factory.reverse_extend_identifier (l_list, l_val) ast_factory.reverse_extend_identifier_separator (l_list, yyvs4.item (yyvsp4)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp2 := yyvsp2 -1 yyvsp4 := yyvsp4 -1 yyvsp1 := yyvsp1 -1 yyspecial_routines22.force (yyvs22, yyval22, yyvsp22) end end yy_do_action_192 --|#line "eiffel.y" local yyval22: detachable IDENTIFIER_LIST do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval22 := ast_factory.new_identifier_list (0, 0) if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp22 := yyvsp22 + 1 if yyvsp22 >= yyvsc22 then debug ("GEYACC") std.error.put_line ("Resize yyvs22") end yyvsc22 := yyvsc22 + yyInitial_yyvs_size yyvs22 := yyspecial_routines22.aliased_resized_area (yyvs22, yyvsc22) end yyspecial_routines22.force (yyvs22, yyval22, yyvsp22) end end yy_do_action_193 --|#line "eiffel.y" local yyval22: detachable IDENTIFIER_LIST do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval22 := yyvs22.item (yyvsp22) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp1 := yyvsp1 -2 yyspecial_routines22.force (yyvs22, yyval22, yyvsp22) end end yy_do_action_194 --|#line "eiffel.y" local yyval83: detachable ROUTINE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs21.item (yyvsp21) as l_pair then temp_string_as1 := l_pair.second temp_keyword_as := l_pair.first else temp_string_as1 := Void temp_keyword_as := Void end if attached yyvs19.item (yyvsp19) as l_rescue then yyval83 := ast_factory.new_routine_as (temp_string_as1, yyvs80.item (yyvsp80), yyvs131.item (yyvsp131), yyvs82.item (yyvsp82), yyvs48.item (yyvsp48), l_rescue.second, yyvs14.item (yyvsp14), once_manifest_string_counter_value, fbody_pos, temp_keyword_as, l_rescue.first, object_test_locals, has_non_object_call, has_non_object_call_in_assertion, has_unqualified_call_in_assertion) else yyval83 := ast_factory.new_routine_as (temp_string_as1, yyvs80.item (yyvsp80), yyvs131.item (yyvsp131), yyvs82.item (yyvsp82), yyvs48.item (yyvsp48), Void, yyvs14.item (yyvsp14), once_manifest_string_counter_value, fbody_pos, temp_keyword_as, Void, object_test_locals, has_non_object_call, has_non_object_call_in_assertion, has_unqualified_call_in_assertion) end reset_feature_frame object_test_locals := Void leave_scope -- For local variables. if yy_parsing_status >= yyContinue then yyssp := yyssp - 9 yyvsp83 := yyvsp83 -1 yyvsp21 := yyvsp21 -1 yyvsp80 := yyvsp80 -1 yyvsp131 := yyvsp131 -1 yyvsp82 := yyvsp82 -1 yyvsp48 := yyvsp48 -1 yyvsp19 := yyvsp19 -1 yyvsp14 := yyvsp14 -1 yyspecial_routines83.force (yyvs83, yyval83, yyvsp83) end end yy_do_action_195 --|#line "eiffel.y" local yyval83: detachable ROUTINE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end set_fbody_pos (position) if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp83 := yyvsp83 + 1 if yyvsp83 >= yyvsc83 then debug ("GEYACC") std.error.put_line ("Resize yyvs83") end yyvsc83 := yyvsc83 + yyInitial_yyvs_size yyvs83 := yyspecial_routines83.aliased_resized_area (yyvs83, yyvsc83) end yyspecial_routines83.force (yyvs83, yyval83, yyvsp83) end end yy_do_action_196 --|#line "eiffel.y" local yyval83: detachable ROUTINE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- Start a scope for local variables. enter_scope if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp83 := yyvsp83 + 1 if yyvsp83 >= yyvsc83 then debug ("GEYACC") std.error.put_line ("Resize yyvs83") end yyvsc83 := yyvsc83 + yyInitial_yyvs_size yyvs83 := yyspecial_routines83.aliased_resized_area (yyvs83, yyvsc83) end yyspecial_routines83.force (yyvs83, yyval83, yyvsp83) end end yy_do_action_197 --|#line "eiffel.y" local yyval82: detachable ROUT_BODY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval82 := yyvs67.item (yyvsp67) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp82 := yyvsp82 + 1 yyvsp67 := yyvsp67 -1 if yyvsp82 >= yyvsc82 then debug ("GEYACC") std.error.put_line ("Resize yyvs82") end yyvsc82 := yyvsc82 + yyInitial_yyvs_size yyvs82 := yyspecial_routines82.aliased_resized_area (yyvs82, yyvsc82) end yyspecial_routines82.force (yyvs82, yyval82, yyvsp82) end end yy_do_action_198 --|#line "eiffel.y" local yyval82: detachable ROUT_BODY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval82 := yyvs52.item (yyvsp52) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp82 := yyvsp82 + 1 yyvsp52 := yyvsp52 -1 if yyvsp82 >= yyvsc82 then debug ("GEYACC") std.error.put_line ("Resize yyvs82") end yyvsc82 := yyvsc82 + yyInitial_yyvs_size yyvs82 := yyspecial_routines82.aliased_resized_area (yyvs82, yyvsc82) end yyspecial_routines82.force (yyvs82, yyval82, yyvsp82) end end yy_do_action_199 --|#line "eiffel.y" local yyval82: detachable ROUT_BODY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval82 := yyvs12.item (yyvsp12) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp82 := yyvsp82 + 1 yyvsp12 := yyvsp12 -1 if yyvsp82 >= yyvsc82 then debug ("GEYACC") std.error.put_line ("Resize yyvs82") end yyvsc82 := yyvsc82 + yyInitial_yyvs_size yyvs82 := yyspecial_routines82.aliased_resized_area (yyvs82, yyvsc82) end yyspecial_routines82.force (yyvs82, yyval82, yyvsp82) end end yy_do_action_200 --|#line "eiffel.y" local yyval52: detachable EXTERNAL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs53.item (yyvsp53) as l_language and then l_language.is_built_in then if attached yyvs21.item (yyvsp21) as l_name then yyval52 := ast_factory.new_built_in_as (l_language, l_name.second, yyvs14.item (yyvsp14), l_name.first) else yyval52 := ast_factory.new_built_in_as (l_language, Void, yyvs14.item (yyvsp14), Void) end elseif attached yyvs21.item (yyvsp21) as l_name then yyval52 := ast_factory.new_external_as (yyvs53.item (yyvsp53), l_name.second, yyvs14.item (yyvsp14), l_name.first) else yyval52 := ast_factory.new_external_as (yyvs53.item (yyvsp53), Void, yyvs14.item (yyvsp14), Void) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp52 := yyvsp52 + 1 yyvsp14 := yyvsp14 -1 yyvsp53 := yyvsp53 -1 yyvsp21 := yyvsp21 -1 if yyvsp52 >= yyvsc52 then debug ("GEYACC") std.error.put_line ("Resize yyvs52") end yyvsc52 := yyvsc52 + yyInitial_yyvs_size yyvs52 := yyspecial_routines52.aliased_resized_area (yyvs52, yyvsc52) end yyspecial_routines52.force (yyvs52, yyval52, yyvsp52) end end yy_do_action_201 --|#line "eiffel.y" local yyval53: detachable EXTERNAL_LANG_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval53 := ast_factory.new_external_lang_as (yyvs16.item (yyvsp16)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp53 := yyvsp53 + 1 yyvsp16 := yyvsp16 -1 if yyvsp53 >= yyvsc53 then debug ("GEYACC") std.error.put_line ("Resize yyvs53") end yyvsc53 := yyvsc53 + yyInitial_yyvs_size yyvs53 := yyspecial_routines53.aliased_resized_area (yyvs53, yyvsc53) end yyspecial_routines53.force (yyvs53, yyval53, yyvsp53) end end yy_do_action_202 --|#line "eiffel.y" local yyval21: detachable PAIR [KEYWORD_AS, STRING_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp21 := yyvsp21 + 1 if yyvsp21 >= yyvsc21 then debug ("GEYACC") std.error.put_line ("Resize yyvs21") end yyvsc21 := yyvsc21 + yyInitial_yyvs_size yyvs21 := yyspecial_routines21.aliased_resized_area (yyvs21, yyvsc21) end yyspecial_routines21.force (yyvs21, yyval21, yyvsp21) end end yy_do_action_203 --|#line "eiffel.y" local yyval21: detachable PAIR [KEYWORD_AS, STRING_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval21 := ast_factory.new_keyword_string_pair (yyvs14.item (yyvsp14), yyvs16.item (yyvsp16)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp21 := yyvsp21 + 1 yyvsp14 := yyvsp14 -1 yyvsp16 := yyvsp16 -1 if yyvsp21 >= yyvsc21 then debug ("GEYACC") std.error.put_line ("Resize yyvs21") end yyvsc21 := yyvsc21 + yyInitial_yyvs_size yyvs21 := yyspecial_routines21.aliased_resized_area (yyvs21, yyvsc21) end yyspecial_routines21.force (yyvs21, yyval21, yyvsp21) end end yy_do_action_204 --|#line "eiffel.y" local yyval67: detachable INTERNAL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval67 := ast_factory.new_do_as (yyvs118.item (yyvsp118), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp67 := yyvsp67 + 1 yyvsp14 := yyvsp14 -1 yyvsp118 := yyvsp118 -1 if yyvsp67 >= yyvsc67 then debug ("GEYACC") std.error.put_line ("Resize yyvs67") end yyvsc67 := yyvsc67 + yyInitial_yyvs_size yyvs67 := yyspecial_routines67.aliased_resized_area (yyvs67, yyvsc67) end yyspecial_routines67.force (yyvs67, yyval67, yyvsp67) end end yy_do_action_205 --|#line "eiffel.y" local yyval67: detachable INTERNAL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval67 := ast_factory.new_once_as (yyvs14.item (yyvsp14), yyvs126.item (yyvsp126), yyvs118.item (yyvsp118)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp67 := yyvsp67 + 1 yyvsp14 := yyvsp14 -1 yyvsp126 := yyvsp126 -1 yyvsp118 := yyvsp118 -1 if yyvsp67 >= yyvsc67 then debug ("GEYACC") std.error.put_line ("Resize yyvs67") end yyvsc67 := yyvsc67 + yyInitial_yyvs_size yyvs67 := yyspecial_routines67.aliased_resized_area (yyvs67, yyvsc67) end yyspecial_routines67.force (yyvs67, yyval67, yyvsp67) end end yy_do_action_206 --|#line "eiffel.y" local yyval67: detachable INTERNAL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval67 := ast_factory.new_attribute_as (yyvs118.item (yyvsp118), extract_keyword (yyvs15.item (yyvsp15))) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp67 := yyvsp67 + 1 yyvsp15 := yyvsp15 -1 yyvsp118 := yyvsp118 -1 if yyvsp67 >= yyvsc67 then debug ("GEYACC") std.error.put_line ("Resize yyvs67") end yyvsc67 := yyvsc67 + yyInitial_yyvs_size yyvs67 := yyspecial_routines67.aliased_resized_area (yyvs67, yyvsc67) end yyspecial_routines67.force (yyvs67, yyval67, yyvsp67) end end yy_do_action_207 --|#line "eiffel.y" local yyval131: detachable LOCAL_DEC_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp131 := yyvsp131 + 1 if yyvsp131 >= yyvsc131 then debug ("GEYACC") std.error.put_line ("Resize yyvs131") end yyvsc131 := yyvsc131 + yyInitial_yyvs_size yyvs131 := yyspecial_routines131.aliased_resized_area (yyvs131, yyvsc131) end yyspecial_routines131.force (yyvs131, yyval131, yyvsp131) end end yy_do_action_208 --|#line "eiffel.y" local yyval131: detachable LOCAL_DEC_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval131 := ast_factory.new_local_dec_list_as (ast_factory.new_eiffel_list_type_dec_as (Void, 0), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp131 := yyvsp131 + 1 yyvsp14 := yyvsp14 -1 if yyvsp131 >= yyvsc131 then debug ("GEYACC") std.error.put_line ("Resize yyvs131") end yyvsc131 := yyvsc131 + yyInitial_yyvs_size yyvs131 := yyspecial_routines131.aliased_resized_area (yyvs131, yyvsc131) end yyspecial_routines131.force (yyvs131, yyval131, yyvsp131) end end yy_do_action_209 --|#line "eiffel.y" local yyval131: detachable LOCAL_DEC_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval131 := ast_factory.new_local_dec_list_as (yyvs130.item (yyvsp130), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp131 := yyvsp131 + 1 yyvsp14 := yyvsp14 -1 yyvsp1 := yyvsp1 -2 yyvsp130 := yyvsp130 -1 if yyvsp131 >= yyvsc131 then debug ("GEYACC") std.error.put_line ("Resize yyvs131") end yyvsc131 := yyvsc131 + yyInitial_yyvs_size yyvs131 := yyspecial_routines131.aliased_resized_area (yyvs131, yyvsc131) end yyspecial_routines131.force (yyvs131, yyval131, yyvsp131) end end yy_do_action_210 --|#line "eiffel.y" local yyval118: detachable EIFFEL_LIST [INSTRUCTION_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp118 := yyvsp118 + 1 yyvsp1 := yyvsp1 -1 if yyvsp118 >= yyvsc118 then debug ("GEYACC") std.error.put_line ("Resize yyvs118") end yyvsc118 := yyvsc118 + yyInitial_yyvs_size yyvs118 := yyspecial_routines118.aliased_resized_area (yyvs118, yyvsc118) end yyspecial_routines118.force (yyvs118, yyval118, yyvsp118) end end yy_do_action_211 --|#line "eiffel.y" local yyval118: detachable EIFFEL_LIST [INSTRUCTION_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval118 := yyvs118.item (yyvsp118) if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp1 := yyvsp1 -3 yyspecial_routines118.force (yyvs118, yyval118, yyvsp118) end end yy_do_action_212 --|#line "eiffel.y" local yyval118: detachable EIFFEL_LIST [INSTRUCTION_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs65.item (yyvsp65) as v then yyval118 := ast_factory.new_eiffel_list_instruction_as (v, counter_value + 1) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp118 := yyvsp118 + 1 yyvsp65 := yyvsp65 -1 if yyvsp118 >= yyvsc118 then debug ("GEYACC") std.error.put_line ("Resize yyvs118") end yyvsc118 := yyvsc118 + yyInitial_yyvs_size yyvs118 := yyspecial_routines118.aliased_resized_area (yyvs118, yyvsc118) end yyspecial_routines118.force (yyvs118, yyval118, yyvsp118) end end yy_do_action_213 --|#line "eiffel.y" local yyval118: detachable EIFFEL_LIST [INSTRUCTION_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval118 := yyvs118.item (yyvsp118) if attached yyval118 as l_list and then attached yyvs65.item (yyvsp65) as l_val then l_list.reverse_extend (l_val) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp65 := yyvsp65 -1 yyvsp1 := yyvsp1 -1 yyspecial_routines118.force (yyvs118, yyval118, yyvsp118) end end yy_do_action_214 --|#line "eiffel.y" local yyval65: detachable INSTRUCTION_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs65.item (yyvsp65) as l_instructions then yyval65 := l_instructions l_instructions.set_line_pragma (last_line_pragma) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp1 := yyvsp1 -1 yyspecial_routines65.force (yyvs65, yyval65, yyvsp65) end end yy_do_action_215 --|#line "eiffel.y" local yyval1: detachable ANY do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp1 := yyvsp1 + 1 if yyvsp1 >= yyvsc1 then debug ("GEYACC") std.error.put_line ("Resize yyvs1") end yyvsc1 := yyvsc1 + yyInitial_yyvs_size yyvs1 := yyspecial_routines1.aliased_resized_area (yyvs1, yyvsc1) end yyspecial_routines1.force (yyvs1, yyval1, yyvsp1) end end yy_do_action_216 --|#line "eiffel.y" local yyval1: detachable ANY do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp4 := yyvsp4 -1 yyspecial_routines1.force (yyvs1, yyval1, yyvsp1) end end yy_do_action_217 --|#line "eiffel.y" local yyval65: detachable INSTRUCTION_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval65 := yyvs43.item (yyvsp43) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp65 := yyvsp65 + 1 yyvsp43 := yyvsp43 -1 if yyvsp65 >= yyvsc65 then debug ("GEYACC") std.error.put_line ("Resize yyvs65") end yyvsc65 := yyvsc65 + yyInitial_yyvs_size yyvs65 := yyspecial_routines65.aliased_resized_area (yyvs65, yyvsc65) end yyspecial_routines65.force (yyvs65, yyval65, yyvsp65) end end yy_do_action_218 --|#line "eiffel.y" local yyval65: detachable INSTRUCTION_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval65 := ast_factory.new_instr_call_as (yyvs35.item (yyvsp35)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp65 := yyvsp65 + 1 yyvsp35 := yyvsp35 -1 if yyvsp65 >= yyvsc65 then debug ("GEYACC") std.error.put_line ("Resize yyvs65") end yyvsc65 := yyvsc65 + yyInitial_yyvs_size yyvs65 := yyspecial_routines65.aliased_resized_area (yyvs65, yyvsc65) end yyspecial_routines65.force (yyvs65, yyval65, yyvsp65) end end yy_do_action_219 --|#line "eiffel.y" local yyval65: detachable INSTRUCTION_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval65 := ast_factory.new_assigner_call_as (ast_factory.new_expr_call_as (yyvs73.item (yyvsp73)), yyvs50.item (yyvsp50), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp65 := yyvsp65 + 1 yyvsp73 := yyvsp73 -1 yyvsp4 := yyvsp4 -1 yyvsp50 := yyvsp50 -1 if yyvsp65 >= yyvsc65 then debug ("GEYACC") std.error.put_line ("Resize yyvs65") end yyvsc65 := yyvsc65 + yyInitial_yyvs_size yyvs65 := yyspecial_routines65.aliased_resized_area (yyvs65, yyvsc65) end yyspecial_routines65.force (yyvs65, yyval65, yyvsp65) end end yy_do_action_220 --|#line "eiffel.y" local yyval65: detachable INSTRUCTION_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval65 := ast_factory.new_assigner_call_as (yyvs77.item (yyvsp77), yyvs50.item (yyvsp50), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp65 := yyvsp65 + 1 yyvsp77 := yyvsp77 -1 yyvsp4 := yyvsp4 -1 yyvsp50 := yyvsp50 -1 if yyvsp65 >= yyvsc65 then debug ("GEYACC") std.error.put_line ("Resize yyvs65") end yyvsc65 := yyvsc65 + yyInitial_yyvs_size yyvs65 := yyspecial_routines65.aliased_resized_area (yyvs65, yyvsc65) end yyspecial_routines65.force (yyvs65, yyval65, yyvsp65) end end yy_do_action_221 --|#line "eiffel.y" local yyval65: detachable INSTRUCTION_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval65 := ast_factory.new_assigner_call_as (yyvs51.item (yyvsp51), yyvs50.item (yyvsp50), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp65 := yyvsp65 + 1 yyvsp51 := yyvsp51 -1 yyvsp4 := yyvsp4 -1 yyvsp50 := yyvsp50 -1 if yyvsp65 >= yyvsc65 then debug ("GEYACC") std.error.put_line ("Resize yyvs65") end yyvsc65 := yyvsc65 + yyInitial_yyvs_size yyvs65 := yyspecial_routines65.aliased_resized_area (yyvs65, yyvsc65) end yyspecial_routines65.force (yyvs65, yyval65, yyvsp65) end end yy_do_action_222 --|#line "eiffel.y" local yyval65: detachable INSTRUCTION_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval65 := ast_factory.new_assigner_call_as (yyvs51.item (yyvsp51), yyvs50.item (yyvsp50), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp65 := yyvsp65 + 1 yyvsp51 := yyvsp51 -1 yyvsp4 := yyvsp4 -1 yyvsp50 := yyvsp50 -1 if yyvsp65 >= yyvsc65 then debug ("GEYACC") std.error.put_line ("Resize yyvs65") end yyvsc65 := yyvsc65 + yyInitial_yyvs_size yyvs65 := yyspecial_routines65.aliased_resized_area (yyvs65, yyvsc65) end yyspecial_routines65.force (yyvs65, yyval65, yyvsp65) end end yy_do_action_223 --|#line "eiffel.y" local yyval65: detachable INSTRUCTION_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval65 := yyvs30.item (yyvsp30) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp65 := yyvsp65 + 1 yyvsp30 := yyvsp30 -1 if yyvsp65 >= yyvsc65 then debug ("GEYACC") std.error.put_line ("Resize yyvs65") end yyvsc65 := yyvsc65 + yyInitial_yyvs_size yyvs65 := yyspecial_routines65.aliased_resized_area (yyvs65, yyvsc65) end yyspecial_routines65.force (yyvs65, yyval65, yyvsp65) end end yy_do_action_224 --|#line "eiffel.y" local yyval65: detachable INSTRUCTION_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval65 := yyvs81.item (yyvsp81) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp65 := yyvsp65 + 1 yyvsp81 := yyvsp81 -1 if yyvsp65 >= yyvsc65 then debug ("GEYACC") std.error.put_line ("Resize yyvs65") end yyvsc65 := yyvsc65 + yyInitial_yyvs_size yyvs65 := yyspecial_routines65.aliased_resized_area (yyvs65, yyvsc65) end yyspecial_routines65.force (yyvs65, yyval65, yyvsp65) end end yy_do_action_225 --|#line "eiffel.y" local yyval65: detachable INSTRUCTION_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval65 := yyvs60.item (yyvsp60) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp65 := yyvsp65 + 1 yyvsp60 := yyvsp60 -1 if yyvsp65 >= yyvsc65 then debug ("GEYACC") std.error.put_line ("Resize yyvs65") end yyvsc65 := yyvsc65 + yyInitial_yyvs_size yyvs65 := yyspecial_routines65.aliased_resized_area (yyvs65, yyvsc65) end yyspecial_routines65.force (yyvs65, yyval65, yyvsp65) end end yy_do_action_226 --|#line "eiffel.y" local yyval65: detachable INSTRUCTION_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval65 := yyvs71.item (yyvsp71) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp65 := yyvsp65 + 1 yyvsp71 := yyvsp71 -1 if yyvsp65 >= yyvsc65 then debug ("GEYACC") std.error.put_line ("Resize yyvs65") end yyvsc65 := yyvsc65 + yyInitial_yyvs_size yyvs65 := yyspecial_routines65.aliased_resized_area (yyvs65, yyvsc65) end yyspecial_routines65.force (yyvs65, yyval65, yyvsp65) end end yy_do_action_227 --|#line "eiffel.y" local yyval65: detachable INSTRUCTION_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval65 := yyvs63.item (yyvsp63) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp65 := yyvsp65 + 1 yyvsp63 := yyvsp63 -1 if yyvsp65 >= yyvsc65 then debug ("GEYACC") std.error.put_line ("Resize yyvs65") end yyvsc65 := yyvsc65 + yyInitial_yyvs_size yyvs65 := yyspecial_routines65.aliased_resized_area (yyvs65, yyvsc65) end yyspecial_routines65.force (yyvs65, yyval65, yyvsp65) end end yy_do_action_228 --|#line "eiffel.y" local yyval65: detachable INSTRUCTION_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval65 := yyvs45.item (yyvsp45) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp65 := yyvsp65 + 1 yyvsp45 := yyvsp45 -1 if yyvsp65 >= yyvsc65 then debug ("GEYACC") std.error.put_line ("Resize yyvs65") end yyvsc65 := yyvsc65 + yyInitial_yyvs_size yyvs65 := yyspecial_routines65.aliased_resized_area (yyvs65, yyvsc65) end yyspecial_routines65.force (yyvs65, yyval65, yyvsp65) end end yy_do_action_229 --|#line "eiffel.y" local yyval65: detachable INSTRUCTION_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval65 := yyvs38.item (yyvsp38) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp65 := yyvsp65 + 1 yyvsp38 := yyvsp38 -1 if yyvsp65 >= yyvsc65 then debug ("GEYACC") std.error.put_line ("Resize yyvs65") end yyvsc65 := yyvsc65 + yyInitial_yyvs_size yyvs65 := yyspecial_routines65.aliased_resized_area (yyvs65, yyvsc65) end yyspecial_routines65.force (yyvs65, yyval65, yyvsp65) end end yy_do_action_230 --|#line "eiffel.y" local yyval65: detachable INSTRUCTION_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval65 := yyvs59.item (yyvsp59) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp65 := yyvsp65 + 1 yyvsp59 := yyvsp59 -1 if yyvsp65 >= yyvsc65 then debug ("GEYACC") std.error.put_line ("Resize yyvs65") end yyvsc65 := yyvsc65 + yyInitial_yyvs_size yyvs65 := yyspecial_routines65.aliased_resized_area (yyvs65, yyvsc65) end yyspecial_routines65.force (yyvs65, yyval65, yyvsp65) end end yy_do_action_231 --|#line "eiffel.y" local yyval65: detachable INSTRUCTION_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval65 := yyvs85.item (yyvsp85) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp65 := yyvsp65 + 1 yyvsp85 := yyvsp85 -1 if yyvsp65 >= yyvsc65 then debug ("GEYACC") std.error.put_line ("Resize yyvs65") end yyvsc65 := yyvsc65 + yyInitial_yyvs_size yyvs65 := yyspecial_routines65.aliased_resized_area (yyvs65, yyvsc65) end yyspecial_routines65.force (yyvs65, yyval65, yyvsp65) end end yy_do_action_232 --|#line "eiffel.y" local yyval65: detachable INSTRUCTION_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval65 := yyvs9.item (yyvsp9) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp65 := yyvsp65 + 1 yyvsp9 := yyvsp9 -1 if yyvsp65 >= yyvsc65 then debug ("GEYACC") std.error.put_line ("Resize yyvs65") end yyvsc65 := yyvsc65 + yyInitial_yyvs_size yyvs65 := yyspecial_routines65.aliased_resized_area (yyvs65, yyvsc65) end yyspecial_routines65.force (yyvs65, yyval65, yyvsp65) end end yy_do_action_233 --|#line "eiffel.y" local yyval80: detachable REQUIRE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp80 := yyvsp80 + 1 if yyvsp80 >= yyvsc80 then debug ("GEYACC") std.error.put_line ("Resize yyvs80") end yyvsc80 := yyvsc80 + yyInitial_yyvs_size yyvs80 := yyspecial_routines80.aliased_resized_area (yyvs80, yyvsc80) end yyspecial_routines80.force (yyvs80, yyval80, yyvsp80) end end yy_do_action_234 --|#line "eiffel.y" local yyval80: detachable REQUIRE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end set_id_level (Normal_level) yyval80 := ast_factory.new_require_as (yyvs127.item (yyvsp127), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp14 := yyvsp14 -1 yyvsp127 := yyvsp127 -1 yyspecial_routines80.force (yyvs80, yyval80, yyvsp80) end end yy_do_action_235 --|#line "eiffel.y" local yyval80: detachable REQUIRE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end set_id_level (Precondition_level) if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp80 := yyvsp80 + 1 if yyvsp80 >= yyvsc80 then debug ("GEYACC") std.error.put_line ("Resize yyvs80") end yyvsc80 := yyvsc80 + yyInitial_yyvs_size yyvs80 := yyspecial_routines80.aliased_resized_area (yyvs80, yyvsc80) end yyspecial_routines80.force (yyvs80, yyval80, yyvsp80) end end yy_do_action_236 --|#line "eiffel.y" local yyval80: detachable REQUIRE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end set_id_level (Normal_level) yyval80 := ast_factory.new_require_else_as (yyvs127.item (yyvsp127), yyvs14.item (yyvsp14 - 1), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp14 := yyvsp14 -2 yyvsp127 := yyvsp127 -1 yyspecial_routines80.force (yyvs80, yyval80, yyvsp80) end end yy_do_action_237 --|#line "eiffel.y" local yyval80: detachable REQUIRE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end set_id_level (Precondition_level) if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp80 := yyvsp80 + 1 if yyvsp80 >= yyvsc80 then debug ("GEYACC") std.error.put_line ("Resize yyvs80") end yyvsc80 := yyvsc80 + yyInitial_yyvs_size yyvs80 := yyspecial_routines80.aliased_resized_area (yyvs80, yyvsc80) end yyspecial_routines80.force (yyvs80, yyval80, yyvsp80) end end yy_do_action_238 --|#line "eiffel.y" local yyval48: detachable ENSURE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp48 := yyvsp48 + 1 if yyvsp48 >= yyvsc48 then debug ("GEYACC") std.error.put_line ("Resize yyvs48") end yyvsc48 := yyvsc48 + yyInitial_yyvs_size yyvs48 := yyspecial_routines48.aliased_resized_area (yyvs48, yyvsc48) end yyspecial_routines48.force (yyvs48, yyval48, yyvsp48) end end yy_do_action_239 --|#line "eiffel.y" local yyval48: detachable ENSURE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end set_id_level (Normal_level) yyval48 := ast_factory.new_ensure_as (yyvs127.item (yyvsp127), is_class_feature, yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp14 := yyvsp14 -1 yyvsp127 := yyvsp127 -1 yyspecial_routines48.force (yyvs48, yyval48, yyvsp48) end end yy_do_action_240 --|#line "eiffel.y" local yyval48: detachable ENSURE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end set_id_level (Postcondition_level) if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp48 := yyvsp48 + 1 if yyvsp48 >= yyvsc48 then debug ("GEYACC") std.error.put_line ("Resize yyvs48") end yyvsc48 := yyvsc48 + yyInitial_yyvs_size yyvs48 := yyspecial_routines48.aliased_resized_area (yyvs48, yyvsc48) end yyspecial_routines48.force (yyvs48, yyval48, yyvsp48) end end yy_do_action_241 --|#line "eiffel.y" local yyval48: detachable ENSURE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end set_id_level (Normal_level) yyval48 := ast_factory.new_ensure_then_as (yyvs127.item (yyvsp127), is_class_feature, yyvs14.item (yyvsp14 - 1), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp14 := yyvsp14 -2 yyvsp127 := yyvsp127 -1 yyspecial_routines48.force (yyvs48, yyval48, yyvsp48) end end yy_do_action_242 --|#line "eiffel.y" local yyval48: detachable ENSURE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end set_id_level (Postcondition_level) if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp48 := yyvsp48 + 1 if yyvsp48 >= yyvsc48 then debug ("GEYACC") std.error.put_line ("Resize yyvs48") end yyvsc48 := yyvsc48 + yyInitial_yyvs_size yyvs48 := yyspecial_routines48.aliased_resized_area (yyvs48, yyvsc48) end yyspecial_routines48.force (yyvs48, yyval48, yyvsp48) end end yy_do_action_243 --|#line "eiffel.y" local yyval127: detachable EIFFEL_LIST [TAGGED_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp127 := yyvsp127 + 1 if yyvsp127 >= yyvsc127 then debug ("GEYACC") std.error.put_line ("Resize yyvs127") end yyvsc127 := yyvsc127 + yyInitial_yyvs_size yyvs127 := yyspecial_routines127.aliased_resized_area (yyvs127, yyvsc127) end yyspecial_routines127.force (yyvs127, yyval127, yyvsp127) end end yy_do_action_244 --|#line "eiffel.y" local yyval127: detachable EIFFEL_LIST [TAGGED_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs127.item (yyvsp127) as l_list then if l_list.is_empty then yyval127 := Void else yyval127 := l_list end end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp1 := yyvsp1 -2 yyspecial_routines127.force (yyvs127, yyval127, yyvsp127) end end yy_do_action_245 --|#line "eiffel.y" local yyval127: detachable EIFFEL_LIST [TAGGED_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- Special list treatment here as we do not want Void -- element in Assertion_list. if attached yyvs86.item (yyvsp86) as l_val then yyval127 := ast_factory.new_eiffel_list_tagged_as (counter_value + 1) if attached yyval127 as l_list then l_list.back_extend (l_val) end else yyval127 := ast_factory.new_eiffel_list_tagged_as (counter_value) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp127 := yyvsp127 + 1 yyvsp86 := yyvsp86 -1 if yyvsp127 >= yyvsc127 then debug ("GEYACC") std.error.put_line ("Resize yyvs127") end yyvsc127 := yyvsc127 + yyInitial_yyvs_size yyvs127 := yyspecial_routines127.aliased_resized_area (yyvs127, yyvsc127) end yyspecial_routines127.force (yyvs127, yyval127, yyvsp127) end end yy_do_action_246 --|#line "eiffel.y" local yyval127: detachable EIFFEL_LIST [TAGGED_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval127 := yyvs127.item (yyvsp127) if attached yyval127 as l_list and then attached yyvs86.item (yyvsp86) as l_val then l_list.back_extend (l_val) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp127 := yyvsp127 -1 yyvsp86 := yyvsp86 -1 yyspecial_routines127.force (yyvs127, yyval127, yyvsp127) end end yy_do_action_247 --|#line "eiffel.y" local yyval127: detachable EIFFEL_LIST [TAGGED_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- Only increment counter when clause is not Void. if yyvs86.item (yyvsp86) /= Void then increment_counter end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp127 := yyvsp127 + 1 if yyvsp127 >= yyvsc127 then debug ("GEYACC") std.error.put_line ("Resize yyvs127") end yyvsc127 := yyvsc127 + yyInitial_yyvs_size yyvs127 := yyspecial_routines127.aliased_resized_area (yyvs127, yyvsc127) end yyspecial_routines127.force (yyvs127, yyval127, yyvsp127) end end yy_do_action_248 --|#line "eiffel.y" local yyval86: detachable TAGGED_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval86 := ast_factory.new_tagged_as (Void, yyvs50.item (yyvsp50), Void, Void) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp86 := yyvsp86 + 1 yyvsp50 := yyvsp50 -1 yyvsp4 := yyvsp4 -1 if yyvsp86 >= yyvsc86 then debug ("GEYACC") std.error.put_line ("Resize yyvs86") end yyvsc86 := yyvsc86 + yyInitial_yyvs_size yyvs86 := yyspecial_routines86.aliased_resized_area (yyvs86, yyvsc86) end yyspecial_routines86.force (yyvs86, yyval86, yyvsp86) end end yy_do_action_249 --|#line "eiffel.y" local yyval86: detachable TAGGED_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if id_level = Postcondition_level then yyval86 := ast_factory.new_tagged_as (Void, Void, yyvs14.item (yyvsp14), Void) set_is_class_feature (True) else raise_error end if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp86 := yyvsp86 + 1 yyvsp14 := yyvsp14 -1 yyvsp4 := yyvsp4 -1 if yyvsp86 >= yyvsc86 then debug ("GEYACC") std.error.put_line ("Resize yyvs86") end yyvsc86 := yyvsc86 + yyInitial_yyvs_size yyvs86 := yyspecial_routines86.aliased_resized_area (yyvs86, yyvsc86) end yyspecial_routines86.force (yyvs86, yyval86, yyvsp86) end end yy_do_action_250 --|#line "eiffel.y" local yyval86: detachable TAGGED_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval86 := ast_factory.new_tagged_as (yyvs2.item (yyvsp2), yyvs50.item (yyvsp50), Void, yyvs4.item (yyvsp4 - 1)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp86 := yyvsp86 + 1 yyvsp2 := yyvsp2 -1 yyvsp4 := yyvsp4 -2 yyvsp50 := yyvsp50 -1 if yyvsp86 >= yyvsc86 then debug ("GEYACC") std.error.put_line ("Resize yyvs86") end yyvsc86 := yyvsc86 + yyInitial_yyvs_size yyvs86 := yyspecial_routines86.aliased_resized_area (yyvs86, yyvsc86) end yyspecial_routines86.force (yyvs86, yyval86, yyvsp86) end end yy_do_action_251 --|#line "eiffel.y" local yyval86: detachable TAGGED_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if id_level = Postcondition_level then yyval86 := ast_factory.new_tagged_as (yyvs2.item (yyvsp2), Void, yyvs14.item (yyvsp14), yyvs4.item (yyvsp4 - 1)) set_is_class_feature (True) else raise_error end if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp86 := yyvsp86 + 1 yyvsp2 := yyvsp2 -1 yyvsp4 := yyvsp4 -2 yyvsp14 := yyvsp14 -1 if yyvsp86 >= yyvsc86 then debug ("GEYACC") std.error.put_line ("Resize yyvs86") end yyvsc86 := yyvsc86 + yyInitial_yyvs_size yyvs86 := yyspecial_routines86.aliased_resized_area (yyvs86, yyvsc86) end yyspecial_routines86.force (yyvs86, yyval86, yyvsp86) end end yy_do_action_252 --|#line "eiffel.y" local yyval86: detachable TAGGED_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- Always create an object here for roundtrip parser. -- This "fake" assertion will be filtered out later. yyval86 := ast_factory.new_tagged_as (yyvs2.item (yyvsp2), Void, Void, yyvs4.item (yyvsp4 - 1)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp86 := yyvsp86 + 1 yyvsp2 := yyvsp2 -1 yyvsp4 := yyvsp4 -2 if yyvsp86 >= yyvsc86 then debug ("GEYACC") std.error.put_line ("Resize yyvs86") end yyvsc86 := yyvsc86 + yyInitial_yyvs_size yyvs86 := yyspecial_routines86.aliased_resized_area (yyvs86, yyvsc86) end yyspecial_routines86.force (yyvs86, yyval86, yyvsp86) end end yy_do_action_253 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_254 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_255 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_256 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_257 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if not is_ignoring_attachment_marks and then attached yyval88 as l_type then l_type.set_attachment_mark (extract_keyword (yyvs15.item (yyvsp15)), False, True) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp15 := yyvsp15 -1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_258 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if not is_ignoring_attachment_marks and then attached yyval88 as l_type then l_type.set_attachment_mark (extract_keyword (yyvs15.item (yyvsp15)), True, False) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp15 := yyvsp15 -1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_259 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if not is_ignoring_variance_mark and then attached yyval88 as l_type then l_type.set_variance_mark (yyvs14.item (yyvsp14), True, False) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp14 := yyvsp14 -1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_260 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if not is_ignoring_variance_mark and then attached yyval88 as l_type then l_type.set_variance_mark (yyvs14.item (yyvsp14), False, True) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp14 := yyvsp14 -1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_261 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if attached yyval88 as l_type then l_type.set_separate_mark (yyvs14.item (yyvsp14)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp14 := yyvsp14 -1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_262 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if not is_ignoring_attachment_marks and then attached yyval88 as l_type then l_type.set_attachment_mark (extract_keyword (yyvs15.item (yyvsp15)), False, True) end if attached yyval88 as l_type then l_type.set_separate_mark (yyvs14.item (yyvsp14)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp15 := yyvsp15 -1 yyvsp14 := yyvsp14 -1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_263 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if not is_ignoring_attachment_marks and then attached yyval88 as l_type then l_type.set_attachment_mark (extract_keyword (yyvs15.item (yyvsp15)), True, False) end if attached yyval88 as l_type then l_type.set_separate_mark (yyvs14.item (yyvsp14)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp15 := yyvsp15 -1 yyvsp14 := yyvsp14 -1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_264 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if not is_ignoring_variance_mark and then attached yyval88 as l_type then l_type.set_variance_mark (yyvs14.item (yyvsp14), True, False) end if not is_ignoring_attachment_marks and then attached yyval88 as l_type then l_type.set_attachment_mark (extract_keyword (yyvs15.item (yyvsp15)), False, True) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp14 := yyvsp14 -1 yyvsp15 := yyvsp15 -1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_265 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if not is_ignoring_variance_mark and then attached yyval88 as l_type then l_type.set_variance_mark (yyvs14.item (yyvsp14), True, False) end if not is_ignoring_attachment_marks and then attached yyval88 as l_type then l_type.set_attachment_mark (extract_keyword (yyvs15.item (yyvsp15)), True, False) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp14 := yyvsp14 -1 yyvsp15 := yyvsp15 -1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_266 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if not is_ignoring_variance_mark and then attached yyval88 as l_type then l_type.set_variance_mark (yyvs14.item (yyvsp14 - 1), True, False) end if attached yyval88 as l_type then l_type.set_separate_mark (yyvs14.item (yyvsp14)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp14 := yyvsp14 -2 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_267 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if not is_ignoring_variance_mark and then attached yyval88 as l_type then l_type.set_variance_mark (yyvs14.item (yyvsp14 - 1), True, False) end if not is_ignoring_attachment_marks and then attached yyval88 as l_type then l_type.set_attachment_mark (extract_keyword (yyvs15.item (yyvsp15)), False, True) end if attached yyval88 as l_type then l_type.set_separate_mark (yyvs14.item (yyvsp14)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp14 := yyvsp14 -2 yyvsp15 := yyvsp15 -1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_268 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if not is_ignoring_variance_mark and then attached yyval88 as l_type then l_type.set_variance_mark (yyvs14.item (yyvsp14 - 1), True, False) end if not is_ignoring_attachment_marks and then attached yyval88 as l_type then l_type.set_attachment_mark (extract_keyword (yyvs15.item (yyvsp15)), True, False) end if attached yyval88 as l_type then l_type.set_separate_mark (yyvs14.item (yyvsp14)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp14 := yyvsp14 -2 yyvsp15 := yyvsp15 -1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_269 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if not is_ignoring_variance_mark and then attached yyval88 as l_type then l_type.set_variance_mark (yyvs14.item (yyvsp14), False, True) end if not is_ignoring_attachment_marks and then attached yyval88 as l_type then l_type.set_attachment_mark (extract_keyword (yyvs15.item (yyvsp15)), False, True) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp14 := yyvsp14 -1 yyvsp15 := yyvsp15 -1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_270 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if not is_ignoring_variance_mark and then attached yyval88 as l_type then l_type.set_variance_mark (yyvs14.item (yyvsp14), False, True) end if not is_ignoring_attachment_marks and then attached yyval88 as l_type then l_type.set_attachment_mark (extract_keyword (yyvs15.item (yyvsp15)), True, False) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp14 := yyvsp14 -1 yyvsp15 := yyvsp15 -1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_271 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if not is_ignoring_variance_mark and then attached yyval88 as l_type then l_type.set_variance_mark (yyvs14.item (yyvsp14 - 1), False, True) end if attached yyval88 as l_type then l_type.set_separate_mark (yyvs14.item (yyvsp14)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp14 := yyvsp14 -2 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_272 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if not is_ignoring_variance_mark and then attached yyval88 as l_type then l_type.set_variance_mark (yyvs14.item (yyvsp14 - 1), False, True) end if not is_ignoring_attachment_marks and then attached yyval88 as l_type then l_type.set_attachment_mark (extract_keyword (yyvs15.item (yyvsp15)), False, True) end if attached yyval88 as l_type then l_type.set_separate_mark (yyvs14.item (yyvsp14)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp14 := yyvsp14 -2 yyvsp15 := yyvsp15 -1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_273 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if not is_ignoring_variance_mark and then attached yyval88 as l_type then l_type.set_variance_mark (yyvs14.item (yyvsp14 - 1), False, True) end if not is_ignoring_attachment_marks and then attached yyval88 as l_type then l_type.set_attachment_mark (extract_keyword (yyvs15.item (yyvsp15)), True, False) end if attached yyval88 as l_type then l_type.set_separate_mark (yyvs14.item (yyvsp14)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp14 := yyvsp14 -2 yyvsp15 := yyvsp15 -1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_274 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_275 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_276 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := new_class_type (yyvs2.item (yyvsp2), yyvs128.item (yyvsp128)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp88 := yyvsp88 + 1 yyvsp2 := yyvsp2 -1 yyvsp128 := yyvsp128 -1 if yyvsp88 >= yyvsc88 then debug ("GEYACC") std.error.put_line ("Resize yyvs88") end yyvsc88 := yyvsc88 + yyInitial_yyvs_size yyvs88 := yyspecial_routines88.aliased_resized_area (yyvs88, yyvsc88) end yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_277 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_278 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if not is_ignoring_attachment_marks and then attached yyval88 as l_type then l_type.set_attachment_mark (extract_keyword (yyvs15.item (yyvsp15)), True, False) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp15 := yyvsp15 -1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_279 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if not is_ignoring_attachment_marks and then attached yyval88 as l_type then l_type.set_attachment_mark (extract_keyword (yyvs15.item (yyvsp15)), False, True) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp15 := yyvsp15 -1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_280 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if not is_ignoring_variance_mark and then attached yyval88 as l_type then l_type.set_variance_mark (yyvs14.item (yyvsp14), True, False) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp14 := yyvsp14 -1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_281 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if not is_ignoring_variance_mark and then attached yyval88 as l_type then l_type.set_variance_mark (yyvs14.item (yyvsp14), False, True) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp14 := yyvsp14 -1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_282 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if attached yyval88 as l_type then l_type.set_separate_mark (yyvs14.item (yyvsp14)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp14 := yyvsp14 -1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_283 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if not is_ignoring_attachment_marks and then attached yyval88 as l_type then l_type.set_attachment_mark (extract_keyword (yyvs15.item (yyvsp15)), True, False) end if attached yyval88 as l_type then l_type.set_separate_mark (yyvs14.item (yyvsp14)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp15 := yyvsp15 -1 yyvsp14 := yyvsp14 -1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_284 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if not is_ignoring_attachment_marks and then attached yyval88 as l_type then l_type.set_attachment_mark (extract_keyword (yyvs15.item (yyvsp15)), False, True) end if attached yyval88 as l_type then l_type.set_separate_mark (yyvs14.item (yyvsp14)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp15 := yyvsp15 -1 yyvsp14 := yyvsp14 -1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_285 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if not is_ignoring_variance_mark and then attached yyval88 as l_type then l_type.set_variance_mark (yyvs14.item (yyvsp14), True, False) end if not is_ignoring_attachment_marks and then attached yyval88 as l_type then l_type.set_attachment_mark (extract_keyword (yyvs15.item (yyvsp15)), True, False) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp14 := yyvsp14 -1 yyvsp15 := yyvsp15 -1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_286 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if not is_ignoring_variance_mark and then attached yyval88 as l_type then l_type.set_variance_mark (yyvs14.item (yyvsp14), True, False) end if not is_ignoring_attachment_marks and then attached yyval88 as l_type then l_type.set_attachment_mark (extract_keyword (yyvs15.item (yyvsp15)), False, True) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp14 := yyvsp14 -1 yyvsp15 := yyvsp15 -1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_287 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if not is_ignoring_variance_mark and then attached yyval88 as l_type then l_type.set_variance_mark (yyvs14.item (yyvsp14 - 1), True, False) end if attached yyval88 as l_type then l_type.set_separate_mark (yyvs14.item (yyvsp14)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp14 := yyvsp14 -2 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_288 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if not is_ignoring_variance_mark and then attached yyval88 as l_type then l_type.set_variance_mark (yyvs14.item (yyvsp14 - 1), True, False) end if not is_ignoring_attachment_marks and then attached yyval88 as l_type then l_type.set_attachment_mark (extract_keyword (yyvs15.item (yyvsp15)), True, False) end if attached yyval88 as l_type then l_type.set_separate_mark (yyvs14.item (yyvsp14)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp14 := yyvsp14 -2 yyvsp15 := yyvsp15 -1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_289 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if not is_ignoring_variance_mark and then attached yyval88 as l_type then l_type.set_variance_mark (yyvs14.item (yyvsp14 - 1), True, False) end if not is_ignoring_attachment_marks and then attached yyval88 as l_type then l_type.set_attachment_mark (extract_keyword (yyvs15.item (yyvsp15)), False, True) end if attached yyval88 as l_type then l_type.set_separate_mark (yyvs14.item (yyvsp14)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp14 := yyvsp14 -2 yyvsp15 := yyvsp15 -1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_290 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if not is_ignoring_variance_mark and then attached yyval88 as l_type then l_type.set_variance_mark (yyvs14.item (yyvsp14), False, True) end if not is_ignoring_attachment_marks and then attached yyval88 as l_type then l_type.set_attachment_mark (extract_keyword (yyvs15.item (yyvsp15)), True, False) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp14 := yyvsp14 -1 yyvsp15 := yyvsp15 -1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_291 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if not is_ignoring_variance_mark and then attached yyval88 as l_type then l_type.set_variance_mark (yyvs14.item (yyvsp14), False, True) end if not is_ignoring_attachment_marks and then attached yyval88 as l_type then l_type.set_attachment_mark (extract_keyword (yyvs15.item (yyvsp15)), False, True) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp14 := yyvsp14 -1 yyvsp15 := yyvsp15 -1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_292 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if not is_ignoring_variance_mark and then attached yyval88 as l_type then l_type.set_variance_mark (yyvs14.item (yyvsp14 - 1), False, True) end if attached yyval88 as l_type then l_type.set_separate_mark (yyvs14.item (yyvsp14)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp14 := yyvsp14 -2 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_293 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if not is_ignoring_variance_mark and then attached yyval88 as l_type then l_type.set_variance_mark (yyvs14.item (yyvsp14 - 1), False, True) end if not is_ignoring_attachment_marks and then attached yyval88 as l_type then l_type.set_attachment_mark (extract_keyword (yyvs15.item (yyvsp15)), True, False) end if attached yyval88 as l_type then l_type.set_separate_mark (yyvs14.item (yyvsp14)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp14 := yyvsp14 -2 yyvsp15 := yyvsp15 -1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_294 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if not is_ignoring_variance_mark and then attached yyval88 as l_type then l_type.set_variance_mark (yyvs14.item (yyvsp14 - 1), False, True) end if not is_ignoring_attachment_marks and then attached yyval88 as l_type then l_type.set_attachment_mark (extract_keyword (yyvs15.item (yyvsp15)), False, True) end if attached yyval88 as l_type then l_type.set_separate_mark (yyvs14.item (yyvsp14)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp14 := yyvsp14 -2 yyvsp15 := yyvsp15 -1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_295 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_296 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs89.item (yyvsp89) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp88 := yyvsp88 + 1 yyvsp89 := yyvsp89 -1 if yyvsp88 >= yyvsc88 then debug ("GEYACC") std.error.put_line ("Resize yyvs88") end yyvsc88 := yyvsc88 + yyInitial_yyvs_size yyvs88 := yyspecial_routines88.aliased_resized_area (yyvs88, yyvsc88) end yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_297 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := ast_factory.new_like_id_as (yyvs2.item (yyvsp2), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp88 := yyvsp88 + 1 yyvsp14 := yyvsp14 -1 yyvsp2 := yyvsp2 -1 if yyvsp88 >= yyvsc88 then debug ("GEYACC") std.error.put_line ("Resize yyvs88") end yyvsc88 := yyvsc88 + yyInitial_yyvs_size yyvs88 := yyspecial_routines88.aliased_resized_area (yyvs88, yyvsc88) end yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_298 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := ast_factory.new_like_current_as (yyvs11.item (yyvsp11), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp88 := yyvsp88 + 1 yyvsp14 := yyvsp14 -1 yyvsp11 := yyvsp11 -1 if yyvsp88 >= yyvsc88 then debug ("GEYACC") std.error.put_line ("Resize yyvs88") end yyvsc88 := yyvsc88 + yyInitial_yyvs_size yyvs88 := yyspecial_routines88.aliased_resized_area (yyvs88, yyvsc88) end yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_299 --|#line "eiffel.y" local yyval89: detachable QUALIFIED_ANCHORED_TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval89 := ast_factory.new_qualified_anchored_type (yyvs88.item (yyvsp88), yyvs4.item (yyvsp4), yyvs2.item (yyvsp2)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp89 := yyvsp89 + 1 yyvsp88 := yyvsp88 -1 yyvsp4 := yyvsp4 -1 yyvsp2 := yyvsp2 -1 if yyvsp89 >= yyvsc89 then debug ("GEYACC") std.error.put_line ("Resize yyvs89") end yyvsc89 := yyvsc89 + yyInitial_yyvs_size yyvs89 := yyspecial_routines89.aliased_resized_area (yyvs89, yyvsc89) end yyspecial_routines89.force (yyvs89, yyval89, yyvsp89) end end yy_do_action_300 --|#line "eiffel.y" local yyval89: detachable QUALIFIED_ANCHORED_TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval89 := ast_factory.new_qualified_anchored_type_with_type (yyvs14.item (yyvsp14), yyvs88.item (yyvsp88), yyvs4.item (yyvsp4), yyvs2.item (yyvsp2)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp89 := yyvsp89 + 1 yyvsp14 := yyvsp14 -1 yyvsp88 := yyvsp88 -1 yyvsp4 := yyvsp4 -1 yyvsp2 := yyvsp2 -1 if yyvsp89 >= yyvsc89 then debug ("GEYACC") std.error.put_line ("Resize yyvs89") end yyvsc89 := yyvsc89 + yyInitial_yyvs_size yyvs89 := yyspecial_routines89.aliased_resized_area (yyvs89, yyvsc89) end yyspecial_routines89.force (yyvs89, yyval89, yyvsp89) end end yy_do_action_301 --|#line "eiffel.y" local yyval89: detachable QUALIFIED_ANCHORED_TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval89 := yyvs89.item (yyvsp89) if attached yyval89 as q and attached yyvs2.item (yyvsp2) as l_id then q.extend (yyvs4.item (yyvsp4), l_id) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp4 := yyvsp4 -1 yyvsp2 := yyvsp2 -1 yyspecial_routines89.force (yyvs89, yyval89, yyvsp89) end end yy_do_action_302 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) ast_factory.set_expanded_class_type (yyval88, True, yyvs14.item (yyvsp14)) if has_syntax_warning then report_one_warning (create {SYNTAX_WARNING}.make (token_line (yyvs14.item (yyvsp14)), token_column (yyvs14.item (yyvsp14)), filename, locale.translation_in_context (once "Make an expanded version of the base class associated with this type.", once "parser.eiffel.warning"))) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp14 := yyvsp14 -1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_303 --|#line "eiffel.y" local yyval128: detachable TYPE_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp128 := yyvsp128 + 1 if yyvsp128 >= yyvsc128 then debug ("GEYACC") std.error.put_line ("Resize yyvs128") end yyvsc128 := yyvsc128 + yyInitial_yyvs_size yyvs128 := yyspecial_routines128.aliased_resized_area (yyvs128, yyvsc128) end yyspecial_routines128.force (yyvs128, yyval128, yyvsp128) end end yy_do_action_304 --|#line "eiffel.y" local yyval128: detachable TYPE_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval128 := yyvs128.item (yyvsp128) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines128.force (yyvs128, yyval128, yyvsp128) end end yy_do_action_305 --|#line "eiffel.y" local yyval128: detachable TYPE_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs128.item (yyvsp128) as l_list then yyval128 := l_list l_list.set_positions (yyvs4.item (yyvsp4 - 1), yyvs4.item (yyvsp4)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp4 := yyvsp4 -2 yyspecial_routines128.force (yyvs128, yyval128, yyvsp128) end end yy_do_action_306 --|#line "eiffel.y" local yyval128: detachable TYPE_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- Per ECMA, this should be rejected. For now we only raise -- a warning. And on the compiler side, we will simply ignore them altogether. if has_syntax_warning then report_one_warning (create {SYNTAX_WARNING}.make (token_line (yyvs4.item (yyvsp4 - 1)), token_column (yyvs4.item (yyvsp4 - 1)), filename, locale.translation_in_context (once "Empty Type_list is not allowed and will be discarded.", once "parser.eiffel.warning"))) end if attached ast_factory.new_eiffel_list_type (Void, 0) as l_list then yyval128 := l_list l_list.set_positions (yyvs4.item (yyvsp4 - 1), yyvs4.item (yyvsp4)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp128 := yyvsp128 + 1 yyvsp4 := yyvsp4 -2 if yyvsp128 >= yyvsc128 then debug ("GEYACC") std.error.put_line ("Resize yyvs128") end yyvsc128 := yyvsc128 + yyInitial_yyvs_size yyvs128 := yyspecial_routines128.aliased_resized_area (yyvs128, yyvsc128) end yyspecial_routines128.force (yyvs128, yyval128, yyvsp128) end end yy_do_action_307 --|#line "eiffel.y" local yyval128: detachable TYPE_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval128 := yyvs128.item (yyvsp128) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp1 := yyvsp1 -2 yyspecial_routines128.force (yyvs128, yyval128, yyvsp128) end end yy_do_action_308 --|#line "eiffel.y" local yyval128: detachable TYPE_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs88.item (yyvsp88) as v then yyval128 := ast_factory.new_eiffel_list_type (v, counter_value + 1) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp128 := yyvsp128 + 1 yyvsp88 := yyvsp88 -1 if yyvsp128 >= yyvsc128 then debug ("GEYACC") std.error.put_line ("Resize yyvs128") end yyvsc128 := yyvsc128 + yyInitial_yyvs_size yyvs128 := yyspecial_routines128.aliased_resized_area (yyvs128, yyvsc128) end yyspecial_routines128.force (yyvs128, yyval128, yyvsp128) end end yy_do_action_309 --|#line "eiffel.y" local yyval128: detachable TYPE_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval128 := yyvs128.item (yyvsp128) if attached yyval128 as l_list and then attached yyvs88.item (yyvsp88) as l_val then l_list.reverse_extend (l_val) ast_factory.reverse_extend_separator (l_list, yyvs4.item (yyvsp4)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp88 := yyvsp88 -1 yyvsp4 := yyvsp4 -1 yyvsp1 := yyvsp1 -1 yyspecial_routines128.force (yyvs128, yyval128, yyvsp128) end end yy_do_action_310 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := ast_factory.new_class_type_as (yyvs2.item (yyvsp2), Void) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp88 := yyvsp88 + 1 yyvsp2 := yyvsp2 -1 if yyvsp88 >= yyvsc88 then debug ("GEYACC") std.error.put_line ("Resize yyvs88") end yyvsc88 := yyvsc88 + yyInitial_yyvs_size yyvs88 := yyspecial_routines88.aliased_resized_area (yyvs88, yyvsc88) end yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_311 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- Per ECMA, this should be rejected. For now we only raise -- a warning. And on the compiler side, we will simply ignore them altogether. if has_syntax_warning then report_one_warning (create {SYNTAX_WARNING}.make (token_line (yyvs4.item (yyvsp4 - 1)), token_column (yyvs4.item (yyvsp4 - 1)), filename, locale.translation_in_context (once "Empty Type_list is not allowed and will be discarded.", once "parser.eiffel.warning"))) end if attached ast_factory.new_eiffel_list_type (Void, 0) as l_type_list then l_type_list.set_positions (yyvs4.item (yyvsp4 - 1), yyvs4.item (yyvsp4)) yyval88 := ast_factory.new_class_type_as (yyvs2.item (yyvsp2), l_type_list) else yyval88 := ast_factory.new_class_type_as (yyvs2.item (yyvsp2), Void) end remove_counter remove_counter2 if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp88 := yyvsp88 + 1 yyvsp2 := yyvsp2 -1 yyvsp1 := yyvsp1 -2 yyvsp4 := yyvsp4 -2 if yyvsp88 >= yyvsc88 then debug ("GEYACC") std.error.put_line ("Resize yyvs88") end yyvsc88 := yyvsc88 + yyInitial_yyvs_size yyvs88 := yyspecial_routines88.aliased_resized_area (yyvs88, yyvsc88) end yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_312 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs128.item (yyvsp128) as l_list then l_list.set_positions (yyvs4.item (yyvsp4), last_rsqure.item) end yyval88 := ast_factory.new_class_type_as (yyvs2.item (yyvsp2), yyvs128.item (yyvsp128)) last_rsqure.remove remove_counter remove_counter2 if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp88 := yyvsp88 + 1 yyvsp2 := yyvsp2 -1 yyvsp1 := yyvsp1 -2 yyvsp4 := yyvsp4 -1 yyvsp128 := yyvsp128 -1 if yyvsp88 >= yyvsc88 then debug ("GEYACC") std.error.put_line ("Resize yyvs88") end yyvsc88 := yyvsc88 + yyInitial_yyvs_size yyvs88 := yyspecial_routines88.aliased_resized_area (yyvs88, yyvsc88) end yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_313 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := ast_factory.new_named_tuple_type_as ( yyvs2.item (yyvsp2), ast_factory.new_formal_argu_dec_list_as (yyvs129.item (yyvsp129), yyvs4.item (yyvsp4), last_rsqure.item)) last_rsqure.remove remove_counter remove_counter2 if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp88 := yyvsp88 + 1 yyvsp2 := yyvsp2 -1 yyvsp1 := yyvsp1 -2 yyvsp4 := yyvsp4 -1 yyvsp129 := yyvsp129 -1 if yyvsp88 >= yyvsc88 then debug ("GEYACC") std.error.put_line ("Resize yyvs88") end yyvsc88 := yyvsc88 + yyInitial_yyvs_size yyvs88 := yyspecial_routines88.aliased_resized_area (yyvs88, yyvsc88) end yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_314 --|#line "eiffel.y" local yyval128: detachable TYPE_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs88.item (yyvsp88) as v then yyval128 := ast_factory.new_eiffel_list_type (v, counter_value + 1) end last_rsqure.force (yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp128 := yyvsp128 + 1 yyvsp88 := yyvsp88 -1 yyvsp4 := yyvsp4 -1 if yyvsp128 >= yyvsc128 then debug ("GEYACC") std.error.put_line ("Resize yyvs128") end yyvsc128 := yyvsc128 + yyInitial_yyvs_size yyvs128 := yyspecial_routines128.aliased_resized_area (yyvs128, yyvsc128) end yyspecial_routines128.force (yyvs128, yyval128, yyvsp128) end end yy_do_action_315 --|#line "eiffel.y" local yyval128: detachable TYPE_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval128 := yyvs128.item (yyvsp128) if attached yyval128 as l_list and then attached yyvs2.item (yyvsp2) as l_val and then attached new_class_type (l_val, Void) as l_class_type then l_val.to_upper l_list.reverse_extend (l_class_type) ast_factory.reverse_extend_separator (l_list, yyvs4.item (yyvsp4)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp2 := yyvsp2 -1 yyvsp4 := yyvsp4 -1 yyvsp1 := yyvsp1 -1 yyspecial_routines128.force (yyvs128, yyval128, yyvsp128) end end yy_do_action_316 --|#line "eiffel.y" local yyval128: detachable TYPE_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval128 := yyvs128.item (yyvsp128) if attached yyval128 as l_list and then attached yyvs88.item (yyvsp88) as l_val then l_list.reverse_extend (l_val) ast_factory.reverse_extend_separator (l_list, yyvs4.item (yyvsp4)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp88 := yyvsp88 -1 yyvsp4 := yyvsp4 -1 yyvsp1 := yyvsp1 -1 yyspecial_routines128.force (yyvs128, yyval128, yyvsp128) end end yy_do_action_317 --|#line "eiffel.y" local yyval129: detachable TYPE_DEC_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs2.item (yyvsp2) as l_name then l_name.to_lower if attached ast_factory.new_identifier_list (l_name.name_id, counter_value + 1) as l_list and then attached ast_factory.new_type_dec_as (l_list, yyvs88.item (yyvsp88), yyvs4.item (yyvsp4 - 1)) as l_type_dec_as then ast_factory.reverse_extend_identifier (l_list, l_name) yyval129 := ast_factory.new_eiffel_list_type_dec_as (l_type_dec_as, counter2_value + 1) end end last_rsqure.force (yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp129 := yyvsp129 + 1 yyvsp2 := yyvsp2 -1 yyvsp4 := yyvsp4 -2 yyvsp88 := yyvsp88 -1 if yyvsp129 >= yyvsc129 then debug ("GEYACC") std.error.put_line ("Resize yyvs129") end yyvsc129 := yyvsc129 + yyInitial_yyvs_size yyvs129 := yyspecial_routines129.aliased_resized_area (yyvs129, yyvsc129) end yyspecial_routines129.force (yyvs129, yyval129, yyvsp129) end end yy_do_action_318 --|#line "eiffel.y" local yyval129: detachable TYPE_DEC_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval129 := yyvs129.item (yyvsp129) if attached yyval129 as l_named_list and then not l_named_list.is_empty and then attached yyvs2.item (yyvsp2) as l_name and then attached l_named_list.reversed_first.id_list as l_list then l_name.to_lower l_list.reverse_extend (l_name.name_id) ast_factory.reverse_extend_identifier (l_list, l_name) ast_factory.reverse_extend_identifier_separator (l_list, yyvs4.item (yyvsp4)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp2 := yyvsp2 -1 yyvsp4 := yyvsp4 -1 yyvsp1 := yyvsp1 -1 yyspecial_routines129.force (yyvs129, yyval129, yyvsp129) end end yy_do_action_319 --|#line "eiffel.y" local yyval129: detachable TYPE_DEC_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end remove_counter yyval129 := yyvs129.item (yyvsp129) if attached yyval129 as l_named_list and then attached yyvs2.item (yyvsp2) as l_name and then attached yyvs88.item (yyvsp88) then l_name.to_lower if attached ast_factory.new_identifier_list (l_name.name_id, counter_value + 1) as l_list and then attached ast_factory.new_type_dec_as (l_list, yyvs88.item (yyvsp88), yyvs4.item (yyvsp4 - 1)) as l_type_dec_as then ast_factory.reverse_extend_identifier (l_list, l_name) l_named_list.reverse_extend (l_type_dec_as) end end if yy_parsing_status >= yyContinue then yyssp := yyssp - 7 yyvsp2 := yyvsp2 -1 yyvsp4 := yyvsp4 -2 yyvsp88 := yyvsp88 -1 yyvsp1 := yyvsp1 -2 yyspecial_routines129.force (yyvs129, yyval129, yyvsp129) end end yy_do_action_320 --|#line "eiffel.y" local yyval114: detachable FORMAL_GENERIC_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- $$ := Void set_formal_generics_end_positions (True) if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp114 := yyvsp114 + 1 if yyvsp114 >= yyvsc114 then debug ("GEYACC") std.error.put_line ("Resize yyvs114") end yyvsc114 := yyvsc114 + yyInitial_yyvs_size yyvs114 := yyspecial_routines114.aliased_resized_area (yyvs114, yyvsc114) end yyspecial_routines114.force (yyvs114, yyval114, yyvsp114) end end yy_do_action_321 --|#line "eiffel.y" local yyval114: detachable FORMAL_GENERIC_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- Per ECMA, this should be rejected. For now we only raise -- a warning. And on the compiler side, we will simply ignore them altogether. if has_syntax_warning then report_one_warning (create {SYNTAX_WARNING}.make (token_line (yyvs4.item (yyvsp4 - 1)), token_column (yyvs4.item (yyvsp4 - 1)), filename, locale.translation_in_context (once "Empty Formal_generic_list is not allowed and will be discarded.", once "parser.eiffel.warning"))) end set_formal_generics_end_positions (True) yyval114 := ast_factory.new_eiffel_list_formal_dec_as (Void, 0) if attached yyval114 as l_formals then l_formals.set_squre_symbols (yyvs4.item (yyvsp4 - 1), yyvs4.item (yyvsp4)) end if is_once and then attached (create {SYNTAX_ERROR}.make (token_line (yyvs4.item (yyvsp4 - 1)), token_column (yyvs4.item (yyvsp4 - 1)), filename, locale.translation_in_context ("A once class may not have formal generic parameters.", "compiler.parser"))) as e then e.set_associated_class (current_class) error_handler.insert_error (e) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp114 := yyvsp114 + 1 yyvsp4 := yyvsp4 -2 if yyvsp114 >= yyvsc114 then debug ("GEYACC") std.error.put_line ("Resize yyvs114") end yyvsc114 := yyvsc114 + yyInitial_yyvs_size yyvs114 := yyspecial_routines114.aliased_resized_area (yyvs114, yyvsc114) end yyspecial_routines114.force (yyvs114, yyval114, yyvsp114) end end yy_do_action_322 --|#line "eiffel.y" local yyval114: detachable FORMAL_GENERIC_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end set_formal_generics_end_positions (False) yyval114 := yyvs114.item (yyvsp114) if attached yyval114 as l_formals then l_formals.transform_class_types_to_formals_and_record_suppliers (ast_factory, suppliers, formal_parameters) l_formals.set_squre_symbols (yyvs4.item (yyvsp4 - 1), yyvs4.item (yyvsp4)) end if is_once and then attached (create {SYNTAX_ERROR}.make (token_line (yyvs4.item (yyvsp4 - 1)), token_column (yyvs4.item (yyvsp4 - 1)), filename, locale.translation_in_context ("A once class may not have formal generic parameters.", "compiler.parser"))) as e then e.set_associated_class (current_class) error_handler.insert_error (e) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 7 yyvsp4 := yyvsp4 -2 yyvsp1 := yyvsp1 -4 yyspecial_routines114.force (yyvs114, yyval114, yyvsp114) end end yy_do_action_323 --|#line "eiffel.y" local yyval114: detachable FORMAL_GENERIC_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs58.item (yyvsp58) as v then yyval114 := ast_factory.new_eiffel_list_formal_dec_as (v, counter_value + 1) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp114 := yyvsp114 + 1 yyvsp58 := yyvsp58 -1 if yyvsp114 >= yyvsc114 then debug ("GEYACC") std.error.put_line ("Resize yyvs114") end yyvsc114 := yyvsc114 + yyInitial_yyvs_size yyvs114 := yyspecial_routines114.aliased_resized_area (yyvs114, yyvsc114) end yyspecial_routines114.force (yyvs114, yyval114, yyvsp114) end end yy_do_action_324 --|#line "eiffel.y" local yyval114: detachable FORMAL_GENERIC_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval114 := yyvs114.item (yyvsp114) if attached yyval114 as l_list and then attached yyvs58.item (yyvsp58) as l_val then l_list.reverse_extend (l_val) ast_factory.reverse_extend_separator (l_list, yyvs4.item (yyvsp4)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp58 := yyvsp58 -1 yyvsp4 := yyvsp4 -1 yyvsp1 := yyvsp1 -1 yyspecial_routines114.force (yyvs114, yyval114, yyvsp114) end end yy_do_action_325 --|#line "eiffel.y" local yyval57: detachable FORMAL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs2.item (yyvsp2) as l_id and then {PREDEFINED_NAMES}.none_class_name_id = l_id.name_id then -- Trigger an error when constraint is NONE. -- Needs to be done manually since current test for -- checking that "$2" is not a class name -- will fail for NONE, whereas before there were some -- syntactic conflict since "NONE" was a keyword and -- therefore not part of TE_ID. raise_error else yyval57 := ast_factory.new_formal_as (yyvs2.item (yyvsp2), True, False, False, yyvs14.item (yyvsp14)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp57 := yyvsp57 + 1 yyvsp14 := yyvsp14 -1 yyvsp2 := yyvsp2 -1 if yyvsp57 >= yyvsc57 then debug ("GEYACC") std.error.put_line ("Resize yyvs57") end yyvsc57 := yyvsc57 + yyInitial_yyvs_size yyvs57 := yyspecial_routines57.aliased_resized_area (yyvs57, yyvsc57) end yyspecial_routines57.force (yyvs57, yyval57, yyvsp57) end end yy_do_action_326 --|#line "eiffel.y" local yyval57: detachable FORMAL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs2.item (yyvsp2) as l_id and then {PREDEFINED_NAMES}.none_class_name_id = l_id.name_id then -- Trigger an error when constraint is NONE. -- Needs to be done manually since current test for -- checking that "$2" is not a class name -- will fail for NONE, whereas before there were some -- syntactic conflict since "NONE" was a keyword and -- therefore not part of TE_ID. raise_error else yyval57 := ast_factory.new_formal_as (yyvs2.item (yyvsp2), False, True, False, yyvs14.item (yyvsp14)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp57 := yyvsp57 + 1 yyvsp14 := yyvsp14 -1 yyvsp2 := yyvsp2 -1 if yyvsp57 >= yyvsc57 then debug ("GEYACC") std.error.put_line ("Resize yyvs57") end yyvsc57 := yyvsc57 + yyInitial_yyvs_size yyvs57 := yyspecial_routines57.aliased_resized_area (yyvs57, yyvsc57) end yyspecial_routines57.force (yyvs57, yyval57, yyvsp57) end end yy_do_action_327 --|#line "eiffel.y" local yyval57: detachable FORMAL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs2.item (yyvsp2) as l_id and then {PREDEFINED_NAMES}.none_class_name_id = l_id.name_id then -- Trigger an error when constraint is NONE. -- Needs to be done manually since current test for -- checking that "$1" is not a class name -- will fail for NONE, whereas before there were some -- syntactic conflict since "NONE" was a keyword and -- therefore not part of TE_ID. raise_error else yyval57 := ast_factory.new_formal_as (yyvs2.item (yyvsp2), False, False, True, yyvs14.item (yyvsp14)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp57 := yyvsp57 + 1 yyvsp14 := yyvsp14 -1 yyvsp2 := yyvsp2 -1 if yyvsp57 >= yyvsc57 then debug ("GEYACC") std.error.put_line ("Resize yyvs57") end yyvsc57 := yyvsc57 + yyInitial_yyvs_size yyvs57 := yyspecial_routines57.aliased_resized_area (yyvs57, yyvsc57) end yyspecial_routines57.force (yyvs57, yyval57, yyvsp57) end end yy_do_action_328 --|#line "eiffel.y" local yyval57: detachable FORMAL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs2.item (yyvsp2) as l_id and then {PREDEFINED_NAMES}.none_class_name_id = l_id.name_id then -- Trigger an error when constraint is NONE. -- Needs to be done manually since current test for -- checking that "$1" is not a class name -- will fail for NONE, whereas before there were some -- syntactic conflict since "NONE" was a keyword and -- therefore not part of TE_ID. raise_error else yyval57 := ast_factory.new_formal_as (yyvs2.item (yyvsp2), False, False, False, Void) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp57 := yyvsp57 + 1 yyvsp2 := yyvsp2 -1 if yyvsp57 >= yyvsc57 then debug ("GEYACC") std.error.put_line ("Resize yyvs57") end yyvsc57 := yyvsc57 + yyInitial_yyvs_size yyvs57 := yyspecial_routines57.aliased_resized_area (yyvs57, yyvsc57) end yyspecial_routines57.force (yyvs57, yyval57, yyvsp57) end end yy_do_action_329 --|#line "eiffel.y" local yyval58: detachable FORMAL_DEC_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs133.item (yyvsp133) as l_constraint then if attached l_constraint.creation_constrain as l_creation_constraint then yyval58 := ast_factory.new_formal_dec_as (yyvs57.item (yyvsp57), l_constraint.type, l_creation_constraint.feature_list, l_constraint.constrain_symbol, l_creation_constraint.create_keyword, l_creation_constraint.end_keyword) else yyval58 := ast_factory.new_formal_dec_as (yyvs57.item (yyvsp57), l_constraint.type, Void, l_constraint.constrain_symbol, Void, Void) end else yyval58 := ast_factory.new_formal_dec_as (yyvs57.item (yyvsp57), Void, Void, Void, Void, Void) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp57 := yyvsp57 -1 yyvsp133 := yyvsp133 -1 yyspecial_routines58.force (yyvs58, yyval58, yyvsp58) end end yy_do_action_330 --|#line "eiffel.y" local yyval58: detachable FORMAL_DEC_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs57.item (yyvsp57) as l_formal then -- Needs to be done here, in case current formal is used in -- Constraint. formal_parameters.extend (l_formal) l_formal.set_position (formal_parameters.count) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp58 := yyvsp58 + 1 if yyvsp58 >= yyvsc58 then debug ("GEYACC") std.error.put_line ("Resize yyvs58") end yyvsc58 := yyvsc58 + yyInitial_yyvs_size yyvs58 := yyspecial_routines58.aliased_resized_area (yyvs58, yyvsc58) end yyspecial_routines58.force (yyvs58, yyval58, yyvsp58) end end yy_do_action_331 --|#line "eiffel.y" local yyval133: detachable CONSTRAINT_TRIPLE do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp133 := yyvsp133 + 1 if yyvsp133 >= yyvsc133 then debug ("GEYACC") std.error.put_line ("Resize yyvs133") end yyvsc133 := yyvsc133 + yyInitial_yyvs_size yyvs133 := yyspecial_routines133.aliased_resized_area (yyvs133, yyvsc133) end yyspecial_routines133.force (yyvs133, yyval133, yyvsp133) end end yy_do_action_332 --|#line "eiffel.y" local yyval133: detachable CONSTRAINT_TRIPLE do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- We do not want Void items in this list. if attached yyvs135.item (yyvsp135) as l_val and then attached ast_factory.new_eiffel_list_constraining_type_as (1) as l_list then l_list.back_extend (l_val) yyval133 := ast_factory.new_constraint_triple (yyvs4.item (yyvsp4), l_list, yyvs110.item (yyvsp110)) else yyval133 := ast_factory.new_constraint_triple (yyvs4.item (yyvsp4), Void, yyvs110.item (yyvsp110)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp133 := yyvsp133 + 1 yyvsp4 := yyvsp4 -1 yyvsp135 := yyvsp135 -1 yyvsp110 := yyvsp110 -1 if yyvsp133 >= yyvsc133 then debug ("GEYACC") std.error.put_line ("Resize yyvs133") end yyvsc133 := yyvsc133 + yyInitial_yyvs_size yyvs133 := yyspecial_routines133.aliased_resized_area (yyvs133, yyvsc133) end yyspecial_routines133.force (yyvs133, yyval133, yyvsp133) end end yy_do_action_333 --|#line "eiffel.y" local yyval133: detachable CONSTRAINT_TRIPLE do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval133 := ast_factory.new_constraint_triple (yyvs4.item (yyvsp4 - 2), yyvs134.item (yyvsp134), yyvs110.item (yyvsp110)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 7 yyvsp133 := yyvsp133 + 1 yyvsp4 := yyvsp4 -3 yyvsp1 := yyvsp1 -2 yyvsp134 := yyvsp134 -1 yyvsp110 := yyvsp110 -1 if yyvsp133 >= yyvsc133 then debug ("GEYACC") std.error.put_line ("Resize yyvs133") end yyvsc133 := yyvsc133 + yyInitial_yyvs_size yyvs133 := yyspecial_routines133.aliased_resized_area (yyvs133, yyvsc133) end yyspecial_routines133.force (yyvs133, yyval133, yyvsp133) end end yy_do_action_334 --|#line "eiffel.y" local yyval135: detachable CONSTRAINING_TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval135 := ast_factory.new_constraining_type (yyvs88.item (yyvsp88), yyvs124.item (yyvsp124), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp135 := yyvsp135 -1 yyvsp88 := yyvsp88 -1 yyvsp124 := yyvsp124 -1 yyvsp14 := yyvsp14 -1 yyspecial_routines135.force (yyvs135, yyval135, yyvsp135) end end yy_do_action_335 --|#line "eiffel.y" local yyval135: detachable CONSTRAINING_TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end is_constraint_renaming := True if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp135 := yyvsp135 + 1 if yyvsp135 >= yyvsc135 then debug ("GEYACC") std.error.put_line ("Resize yyvs135") end yyvsc135 := yyvsc135 + yyInitial_yyvs_size yyvs135 := yyspecial_routines135.aliased_resized_area (yyvs135, yyvsc135) end yyspecial_routines135.force (yyvs135, yyval135, yyvsp135) end end yy_do_action_336 --|#line "eiffel.y" local yyval135: detachable CONSTRAINING_TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end is_constraint_renaming := False if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp135 := yyvsp135 + 1 if yyvsp135 >= yyvsc135 then debug ("GEYACC") std.error.put_line ("Resize yyvs135") end yyvsc135 := yyvsc135 + yyInitial_yyvs_size yyvs135 := yyspecial_routines135.aliased_resized_area (yyvs135, yyvsc135) end yyspecial_routines135.force (yyvs135, yyval135, yyvsp135) end end yy_do_action_337 --|#line "eiffel.y" local yyval135: detachable CONSTRAINING_TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval135 := ast_factory.new_constraining_type (yyvs88.item (yyvsp88), Void, Void) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp135 := yyvsp135 + 1 yyvsp88 := yyvsp88 -1 if yyvsp135 >= yyvsc135 then debug ("GEYACC") std.error.put_line ("Resize yyvs135") end yyvsc135 := yyvsc135 + yyInitial_yyvs_size yyvs135 := yyspecial_routines135.aliased_resized_area (yyvs135, yyvsc135) end yyspecial_routines135.force (yyvs135, yyval135, yyvsp135) end end yy_do_action_338 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if attached yyvs88.item (yyvsp88) as l_type and then l_type.has_anchor then report_one_error (ast_factory.new_vtgc1_error (token_line (l_type), token_column (l_type), filename, l_type)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_339 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs88.item (yyvsp88) as l_type then report_one_error (ast_factory.new_vtgc1_error (token_line (l_type), token_column (l_type), filename, l_type)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_340 --|#line "eiffel.y" local yyval134: detachable CONSTRAINT_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- Special list treatment here as we do not want Void -- element in Assertion_list. if attached yyvs135.item (yyvsp135) as l_val then yyval134 := ast_factory.new_eiffel_list_constraining_type_as (counter_value + 1) if attached yyval134 as l_list then l_list.back_extend (l_val) end else yyval134 := ast_factory.new_eiffel_list_constraining_type_as (counter_value) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp134 := yyvsp134 + 1 yyvsp135 := yyvsp135 -1 if yyvsp134 >= yyvsc134 then debug ("GEYACC") std.error.put_line ("Resize yyvs134") end yyvsc134 := yyvsc134 + yyInitial_yyvs_size yyvs134 := yyspecial_routines134.aliased_resized_area (yyvs134, yyvsc134) end yyspecial_routines134.force (yyvs134, yyval134, yyvsp134) end end yy_do_action_341 --|#line "eiffel.y" local yyval134: detachable CONSTRAINT_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval134 := yyvs134.item (yyvsp134) if attached yyval134 as l_list and then attached yyvs135.item (yyvsp135) as l_val then l_list.back_extend (l_val) ast_factory.reverse_extend_separator (l_list, yyvs4.item (yyvsp4)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp134 := yyvsp134 -1 yyvsp135 := yyvsp135 -1 yyvsp4 := yyvsp4 -1 yyspecial_routines134.force (yyvs134, yyval134, yyvsp134) end end yy_do_action_342 --|#line "eiffel.y" local yyval134: detachable CONSTRAINT_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- Only increment counter when clause is not Void. if yyvs135.item (yyvsp135) /= Void then increment_counter end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp134 := yyvsp134 + 1 if yyvsp134 >= yyvsc134 then debug ("GEYACC") std.error.put_line ("Resize yyvs134") end yyvsc134 := yyvsc134 + yyInitial_yyvs_size yyvs134 := yyspecial_routines134.aliased_resized_area (yyvs134, yyvsc134) end yyspecial_routines134.force (yyvs134, yyval134, yyvsp134) end end yy_do_action_343 --|#line "eiffel.y" local yyval110: detachable CREATION_CONSTRAIN_TRIPLE do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp110 := yyvsp110 + 1 if yyvsp110 >= yyvsc110 then debug ("GEYACC") std.error.put_line ("Resize yyvs110") end yyvsc110 := yyvsc110 + yyInitial_yyvs_size yyvs110 := yyspecial_routines110.aliased_resized_area (yyvs110, yyvsc110) end yyspecial_routines110.force (yyvs110, yyval110, yyvsp110) end end yy_do_action_344 --|#line "eiffel.y" local yyval110: detachable CREATION_CONSTRAIN_TRIPLE do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval110 := ast_factory.new_creation_constrain_triple (yyvs108.item (yyvsp108), yyvs14.item (yyvsp14 - 1), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp110 := yyvsp110 + 1 yyvsp14 := yyvsp14 -2 yyvsp108 := yyvsp108 -1 if yyvsp110 >= yyvsc110 then debug ("GEYACC") std.error.put_line ("Resize yyvs110") end yyvsc110 := yyvsc110 + yyInitial_yyvs_size yyvs110 := yyspecial_routines110.aliased_resized_area (yyvs110, yyvsc110) end yyspecial_routines110.force (yyvs110, yyval110, yyvsp110) end end yy_do_action_345 --|#line "eiffel.y" local yyval60: detachable IF_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval60 := ast_factory.new_if_as (yyvs50.item (yyvsp50), yyvs118.item (yyvsp118), Void, Void, yyvs14.item (yyvsp14), yyvs14.item (yyvsp14 - 2), yyvs14.item (yyvsp14 - 1), Void) if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp60 := yyvsp60 + 1 yyvsp14 := yyvsp14 -3 yyvsp50 := yyvsp50 -1 yyvsp118 := yyvsp118 -1 if yyvsp60 >= yyvsc60 then debug ("GEYACC") std.error.put_line ("Resize yyvs60") end yyvsc60 := yyvsc60 + yyInitial_yyvs_size yyvs60 := yyspecial_routines60.aliased_resized_area (yyvs60, yyvsc60) end yyspecial_routines60.force (yyvs60, yyval60, yyvsp60) end end yy_do_action_346 --|#line "eiffel.y" local yyval60: detachable IF_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval60 := ast_factory.new_if_as (yyvs50.item (yyvsp50), yyvs118.item (yyvsp118 - 1), Void, yyvs118.item (yyvsp118), yyvs14.item (yyvsp14), yyvs14.item (yyvsp14 - 3), yyvs14.item (yyvsp14 - 2), yyvs14.item (yyvsp14 - 1)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 7 yyvsp60 := yyvsp60 + 1 yyvsp14 := yyvsp14 -4 yyvsp50 := yyvsp50 -1 yyvsp118 := yyvsp118 -2 if yyvsp60 >= yyvsc60 then debug ("GEYACC") std.error.put_line ("Resize yyvs60") end yyvsc60 := yyvsc60 + yyInitial_yyvs_size yyvs60 := yyspecial_routines60.aliased_resized_area (yyvs60, yyvsc60) end yyspecial_routines60.force (yyvs60, yyval60, yyvsp60) end end yy_do_action_347 --|#line "eiffel.y" local yyval60: detachable IF_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval60 := ast_factory.new_if_as (yyvs50.item (yyvsp50), yyvs118.item (yyvsp118), yyvs100.item (yyvsp100), Void, yyvs14.item (yyvsp14), yyvs14.item (yyvsp14 - 2), yyvs14.item (yyvsp14 - 1), Void) if yy_parsing_status >= yyContinue then yyssp := yyssp - 6 yyvsp60 := yyvsp60 + 1 yyvsp14 := yyvsp14 -3 yyvsp50 := yyvsp50 -1 yyvsp118 := yyvsp118 -1 yyvsp100 := yyvsp100 -1 if yyvsp60 >= yyvsc60 then debug ("GEYACC") std.error.put_line ("Resize yyvs60") end yyvsc60 := yyvsc60 + yyInitial_yyvs_size yyvs60 := yyspecial_routines60.aliased_resized_area (yyvs60, yyvsc60) end yyspecial_routines60.force (yyvs60, yyval60, yyvsp60) end end yy_do_action_348 --|#line "eiffel.y" local yyval60: detachable IF_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval60 := ast_factory.new_if_as (yyvs50.item (yyvsp50), yyvs118.item (yyvsp118 - 1), yyvs100.item (yyvsp100), yyvs118.item (yyvsp118), yyvs14.item (yyvsp14), yyvs14.item (yyvsp14 - 3), yyvs14.item (yyvsp14 - 2), yyvs14.item (yyvsp14 - 1)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 8 yyvsp60 := yyvsp60 + 1 yyvsp14 := yyvsp14 -4 yyvsp50 := yyvsp50 -1 yyvsp118 := yyvsp118 -2 yyvsp100 := yyvsp100 -1 if yyvsp60 >= yyvsc60 then debug ("GEYACC") std.error.put_line ("Resize yyvs60") end yyvsc60 := yyvsc60 + yyInitial_yyvs_size yyvs60 := yyspecial_routines60.aliased_resized_area (yyvs60, yyvsc60) end yyspecial_routines60.force (yyvs60, yyval60, yyvsp60) end end yy_do_action_349 --|#line "eiffel.y" local yyval100: detachable EIFFEL_LIST [ELSIF_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval100 := yyvs100.item (yyvsp100) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp1 := yyvsp1 -2 yyspecial_routines100.force (yyvs100, yyval100, yyvsp100) end end yy_do_action_350 --|#line "eiffel.y" local yyval100: detachable EIFFEL_LIST [ELSIF_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs46.item (yyvsp46) as v then yyval100 := ast_factory.new_eiffel_list_elseif_as (v, counter_value + 1) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp100 := yyvsp100 + 1 yyvsp46 := yyvsp46 -1 if yyvsp100 >= yyvsc100 then debug ("GEYACC") std.error.put_line ("Resize yyvs100") end yyvsc100 := yyvsc100 + yyInitial_yyvs_size yyvs100 := yyspecial_routines100.aliased_resized_area (yyvs100, yyvsc100) end yyspecial_routines100.force (yyvs100, yyval100, yyvsp100) end end yy_do_action_351 --|#line "eiffel.y" local yyval100: detachable EIFFEL_LIST [ELSIF_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval100 := yyvs100.item (yyvsp100) if attached yyval100 as l_list and then attached yyvs46.item (yyvsp46) as l_val then l_list.reverse_extend (l_val) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp46 := yyvsp46 -1 yyvsp1 := yyvsp1 -1 yyspecial_routines100.force (yyvs100, yyval100, yyvsp100) end end yy_do_action_352 --|#line "eiffel.y" local yyval46: detachable ELSIF_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval46 := ast_factory.new_elseif_as (yyvs50.item (yyvsp50), yyvs118.item (yyvsp118), yyvs14.item (yyvsp14 - 1), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp46 := yyvsp46 + 1 yyvsp14 := yyvsp14 -2 yyvsp50 := yyvsp50 -1 yyvsp118 := yyvsp118 -1 if yyvsp46 >= yyvsc46 then debug ("GEYACC") std.error.put_line ("Resize yyvs46") end yyvsc46 := yyvsc46 + yyInitial_yyvs_size yyvs46 := yyspecial_routines46.aliased_resized_area (yyvs46, yyvsc46) end yyspecial_routines46.force (yyvs46, yyval46, yyvsp46) end end yy_do_action_353 --|#line "eiffel.y" local yyval63: detachable INSPECT_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval63 := ast_factory.new_inspect_as (yyvs50.item (yyvsp50), yyvs96.item (yyvsp96), Void, yyvs14.item (yyvsp14), yyvs14.item (yyvsp14 - 1), Void) if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp63 := yyvsp63 + 1 yyvsp14 := yyvsp14 -2 yyvsp50 := yyvsp50 -1 yyvsp96 := yyvsp96 -1 if yyvsp63 >= yyvsc63 then debug ("GEYACC") std.error.put_line ("Resize yyvs63") end yyvsc63 := yyvsc63 + yyInitial_yyvs_size yyvs63 := yyspecial_routines63.aliased_resized_area (yyvs63, yyvsc63) end yyspecial_routines63.force (yyvs63, yyval63, yyvsp63) end end yy_do_action_354 --|#line "eiffel.y" local yyval63: detachable INSPECT_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yyvs118.item (yyvsp118) /= Void then yyval63 := ast_factory.new_inspect_as (yyvs50.item (yyvsp50), yyvs96.item (yyvsp96), yyvs118.item (yyvsp118), yyvs14.item (yyvsp14), yyvs14.item (yyvsp14 - 2), yyvs14.item (yyvsp14 - 1)) else yyval63 := ast_factory.new_inspect_as (yyvs50.item (yyvsp50), yyvs96.item (yyvsp96), ast_factory.new_eiffel_list_instruction_as (Void, 0), yyvs14.item (yyvsp14), yyvs14.item (yyvsp14 - 2), yyvs14.item (yyvsp14 - 1)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 6 yyvsp63 := yyvsp63 + 1 yyvsp14 := yyvsp14 -3 yyvsp50 := yyvsp50 -1 yyvsp96 := yyvsp96 -1 yyvsp118 := yyvsp118 -1 if yyvsp63 >= yyvsc63 then debug ("GEYACC") std.error.put_line ("Resize yyvs63") end yyvsc63 := yyvsc63 + yyInitial_yyvs_size yyvs63 := yyspecial_routines63.aliased_resized_area (yyvs63, yyvsc63) end yyspecial_routines63.force (yyvs63, yyval63, yyvsp63) end end yy_do_action_355 --|#line "eiffel.y" local yyval96: detachable EIFFEL_LIST [CASE_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp96 := yyvsp96 + 1 if yyvsp96 >= yyvsc96 then debug ("GEYACC") std.error.put_line ("Resize yyvs96") end yyvsc96 := yyvsc96 + yyInitial_yyvs_size yyvs96 := yyspecial_routines96.aliased_resized_area (yyvs96, yyvsc96) end yyspecial_routines96.force (yyvs96, yyval96, yyvsp96) end end yy_do_action_356 --|#line "eiffel.y" local yyval96: detachable EIFFEL_LIST [CASE_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval96 := yyvs96.item (yyvsp96) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp1 := yyvsp1 -2 yyspecial_routines96.force (yyvs96, yyval96, yyvsp96) end end yy_do_action_357 --|#line "eiffel.y" local yyval96: detachable EIFFEL_LIST [CASE_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs36.item (yyvsp36) as v then yyval96 := ast_factory.new_eiffel_list_case_as (v, counter_value + 1) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp96 := yyvsp96 + 1 yyvsp36 := yyvsp36 -1 if yyvsp96 >= yyvsc96 then debug ("GEYACC") std.error.put_line ("Resize yyvs96") end yyvsc96 := yyvsc96 + yyInitial_yyvs_size yyvs96 := yyspecial_routines96.aliased_resized_area (yyvs96, yyvsc96) end yyspecial_routines96.force (yyvs96, yyval96, yyvsp96) end end yy_do_action_358 --|#line "eiffel.y" local yyval96: detachable EIFFEL_LIST [CASE_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval96 := yyvs96.item (yyvsp96) if attached yyval96 as l_list and then attached yyvs36.item (yyvsp36) as l_val then l_list.reverse_extend (l_val) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp36 := yyvsp36 -1 yyvsp1 := yyvsp1 -1 yyspecial_routines96.force (yyvs96, yyval96, yyvsp96) end end yy_do_action_359 --|#line "eiffel.y" local yyval36: detachable CASE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval36 := ast_factory.new_case_as (yyvs119.item (yyvsp119), yyvs118.item (yyvsp118), yyvs14.item (yyvsp14 - 1), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 6 yyvsp36 := yyvsp36 + 1 yyvsp14 := yyvsp14 -2 yyvsp1 := yyvsp1 -2 yyvsp119 := yyvsp119 -1 yyvsp118 := yyvsp118 -1 if yyvsp36 >= yyvsc36 then debug ("GEYACC") std.error.put_line ("Resize yyvs36") end yyvsc36 := yyvsc36 + yyInitial_yyvs_size yyvs36 := yyspecial_routines36.aliased_resized_area (yyvs36, yyvsc36) end yyspecial_routines36.force (yyvs36, yyval36, yyvsp36) end end yy_do_action_360 --|#line "eiffel.y" local yyval119: detachable EIFFEL_LIST [INTERVAL_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs68.item (yyvsp68) as v then yyval119 := ast_factory.new_eiffel_list_interval_as (v, counter_value + 1) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp119 := yyvsp119 + 1 yyvsp68 := yyvsp68 -1 if yyvsp119 >= yyvsc119 then debug ("GEYACC") std.error.put_line ("Resize yyvs119") end yyvsc119 := yyvsc119 + yyInitial_yyvs_size yyvs119 := yyspecial_routines119.aliased_resized_area (yyvs119, yyvsc119) end yyspecial_routines119.force (yyvs119, yyval119, yyvsp119) end end yy_do_action_361 --|#line "eiffel.y" local yyval119: detachable EIFFEL_LIST [INTERVAL_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval119 := yyvs119.item (yyvsp119) if attached yyval119 as l_list and then attached yyvs68.item (yyvsp68) as l_val then l_list.reverse_extend (l_val) ast_factory.reverse_extend_separator (l_list, yyvs4.item (yyvsp4)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp68 := yyvsp68 -1 yyvsp4 := yyvsp4 -1 yyvsp1 := yyvsp1 -1 yyspecial_routines119.force (yyvs119, yyval119, yyvsp119) end end yy_do_action_362 --|#line "eiffel.y" local yyval68: detachable INTERVAL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval68 := ast_factory.new_interval_as (yyvs66.item (yyvsp66), Void, Void) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp68 := yyvsp68 + 1 yyvsp66 := yyvsp66 -1 if yyvsp68 >= yyvsc68 then debug ("GEYACC") std.error.put_line ("Resize yyvs68") end yyvsc68 := yyvsc68 + yyInitial_yyvs_size yyvs68 := yyspecial_routines68.aliased_resized_area (yyvs68, yyvsc68) end yyspecial_routines68.force (yyvs68, yyval68, yyvsp68) end end yy_do_action_363 --|#line "eiffel.y" local yyval68: detachable INTERVAL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval68 := ast_factory.new_interval_as (yyvs66.item (yyvsp66 - 1), yyvs66.item (yyvsp66), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp68 := yyvsp68 + 1 yyvsp66 := yyvsp66 -2 yyvsp4 := yyvsp4 -1 if yyvsp68 >= yyvsc68 then debug ("GEYACC") std.error.put_line ("Resize yyvs68") end yyvsc68 := yyvsc68 + yyInitial_yyvs_size yyvs68 := yyspecial_routines68.aliased_resized_area (yyvs68, yyvsc68) end yyspecial_routines68.force (yyvs68, yyval68, yyvsp68) end end yy_do_action_364 --|#line "eiffel.y" local yyval68: detachable INTERVAL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval68 := ast_factory.new_interval_as (yyvs3.item (yyvsp3), Void, Void) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp68 := yyvsp68 + 1 yyvsp3 := yyvsp3 -1 if yyvsp68 >= yyvsc68 then debug ("GEYACC") std.error.put_line ("Resize yyvs68") end yyvsc68 := yyvsc68 + yyInitial_yyvs_size yyvs68 := yyspecial_routines68.aliased_resized_area (yyvs68, yyvsc68) end yyspecial_routines68.force (yyvs68, yyval68, yyvsp68) end end yy_do_action_365 --|#line "eiffel.y" local yyval68: detachable INTERVAL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval68 := ast_factory.new_interval_as (yyvs3.item (yyvsp3 - 1), yyvs3.item (yyvsp3), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp68 := yyvsp68 + 1 yyvsp3 := yyvsp3 -2 yyvsp4 := yyvsp4 -1 if yyvsp68 >= yyvsc68 then debug ("GEYACC") std.error.put_line ("Resize yyvs68") end yyvsc68 := yyvsc68 + yyInitial_yyvs_size yyvs68 := yyspecial_routines68.aliased_resized_area (yyvs68, yyvsc68) end yyspecial_routines68.force (yyvs68, yyval68, yyvsp68) end end yy_do_action_366 --|#line "eiffel.y" local yyval68: detachable INTERVAL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval68 := ast_factory.new_interval_as (yyvs2.item (yyvsp2), Void, Void) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp68 := yyvsp68 + 1 yyvsp2 := yyvsp2 -1 if yyvsp68 >= yyvsc68 then debug ("GEYACC") std.error.put_line ("Resize yyvs68") end yyvsc68 := yyvsc68 + yyInitial_yyvs_size yyvs68 := yyspecial_routines68.aliased_resized_area (yyvs68, yyvsc68) end yyspecial_routines68.force (yyvs68, yyval68, yyvsp68) end end yy_do_action_367 --|#line "eiffel.y" local yyval68: detachable INTERVAL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval68 := ast_factory.new_interval_as (yyvs2.item (yyvsp2 - 1), yyvs2.item (yyvsp2), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp68 := yyvsp68 + 1 yyvsp2 := yyvsp2 -2 yyvsp4 := yyvsp4 -1 if yyvsp68 >= yyvsc68 then debug ("GEYACC") std.error.put_line ("Resize yyvs68") end yyvsc68 := yyvsc68 + yyInitial_yyvs_size yyvs68 := yyspecial_routines68.aliased_resized_area (yyvs68, yyvsc68) end yyspecial_routines68.force (yyvs68, yyval68, yyvsp68) end end yy_do_action_368 --|#line "eiffel.y" local yyval68: detachable INTERVAL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval68 := ast_factory.new_interval_as (yyvs2.item (yyvsp2), yyvs66.item (yyvsp66), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp68 := yyvsp68 + 1 yyvsp2 := yyvsp2 -1 yyvsp4 := yyvsp4 -1 yyvsp66 := yyvsp66 -1 if yyvsp68 >= yyvsc68 then debug ("GEYACC") std.error.put_line ("Resize yyvs68") end yyvsc68 := yyvsc68 + yyInitial_yyvs_size yyvs68 := yyspecial_routines68.aliased_resized_area (yyvs68, yyvsc68) end yyspecial_routines68.force (yyvs68, yyval68, yyvsp68) end end yy_do_action_369 --|#line "eiffel.y" local yyval68: detachable INTERVAL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval68 := ast_factory.new_interval_as (yyvs66.item (yyvsp66), yyvs2.item (yyvsp2), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp68 := yyvsp68 + 1 yyvsp66 := yyvsp66 -1 yyvsp4 := yyvsp4 -1 yyvsp2 := yyvsp2 -1 if yyvsp68 >= yyvsc68 then debug ("GEYACC") std.error.put_line ("Resize yyvs68") end yyvsc68 := yyvsc68 + yyInitial_yyvs_size yyvs68 := yyspecial_routines68.aliased_resized_area (yyvs68, yyvsc68) end yyspecial_routines68.force (yyvs68, yyval68, yyvsp68) end end yy_do_action_370 --|#line "eiffel.y" local yyval68: detachable INTERVAL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval68 := ast_factory.new_interval_as (yyvs2.item (yyvsp2), yyvs3.item (yyvsp3), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp68 := yyvsp68 + 1 yyvsp2 := yyvsp2 -1 yyvsp4 := yyvsp4 -1 yyvsp3 := yyvsp3 -1 if yyvsp68 >= yyvsc68 then debug ("GEYACC") std.error.put_line ("Resize yyvs68") end yyvsc68 := yyvsc68 + yyInitial_yyvs_size yyvs68 := yyspecial_routines68.aliased_resized_area (yyvs68, yyvsc68) end yyspecial_routines68.force (yyvs68, yyval68, yyvsp68) end end yy_do_action_371 --|#line "eiffel.y" local yyval68: detachable INTERVAL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval68 := ast_factory.new_interval_as (yyvs3.item (yyvsp3), yyvs2.item (yyvsp2), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp68 := yyvsp68 + 1 yyvsp3 := yyvsp3 -1 yyvsp4 := yyvsp4 -1 yyvsp2 := yyvsp2 -1 if yyvsp68 >= yyvsc68 then debug ("GEYACC") std.error.put_line ("Resize yyvs68") end yyvsc68 := yyvsc68 + yyInitial_yyvs_size yyvs68 := yyspecial_routines68.aliased_resized_area (yyvs68, yyvsc68) end yyspecial_routines68.force (yyvs68, yyval68, yyvsp68) end end yy_do_action_372 --|#line "eiffel.y" local yyval68: detachable INTERVAL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval68 := ast_factory.new_interval_as (yyvs77.item (yyvsp77), Void, Void) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp68 := yyvsp68 + 1 yyvsp77 := yyvsp77 -1 if yyvsp68 >= yyvsc68 then debug ("GEYACC") std.error.put_line ("Resize yyvs68") end yyvsc68 := yyvsc68 + yyInitial_yyvs_size yyvs68 := yyspecial_routines68.aliased_resized_area (yyvs68, yyvsc68) end yyspecial_routines68.force (yyvs68, yyval68, yyvsp68) end end yy_do_action_373 --|#line "eiffel.y" local yyval68: detachable INTERVAL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval68 := ast_factory.new_interval_as (yyvs77.item (yyvsp77), yyvs2.item (yyvsp2), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp68 := yyvsp68 + 1 yyvsp77 := yyvsp77 -1 yyvsp4 := yyvsp4 -1 yyvsp2 := yyvsp2 -1 if yyvsp68 >= yyvsc68 then debug ("GEYACC") std.error.put_line ("Resize yyvs68") end yyvsc68 := yyvsc68 + yyInitial_yyvs_size yyvs68 := yyspecial_routines68.aliased_resized_area (yyvs68, yyvsc68) end yyspecial_routines68.force (yyvs68, yyval68, yyvsp68) end end yy_do_action_374 --|#line "eiffel.y" local yyval68: detachable INTERVAL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval68 := ast_factory.new_interval_as (yyvs2.item (yyvsp2), yyvs77.item (yyvsp77), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp68 := yyvsp68 + 1 yyvsp2 := yyvsp2 -1 yyvsp4 := yyvsp4 -1 yyvsp77 := yyvsp77 -1 if yyvsp68 >= yyvsc68 then debug ("GEYACC") std.error.put_line ("Resize yyvs68") end yyvsc68 := yyvsc68 + yyInitial_yyvs_size yyvs68 := yyspecial_routines68.aliased_resized_area (yyvs68, yyvsc68) end yyspecial_routines68.force (yyvs68, yyval68, yyvsp68) end end yy_do_action_375 --|#line "eiffel.y" local yyval68: detachable INTERVAL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval68 := ast_factory.new_interval_as (yyvs77.item (yyvsp77 - 1), yyvs77.item (yyvsp77), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp68 := yyvsp68 + 1 yyvsp77 := yyvsp77 -2 yyvsp4 := yyvsp4 -1 if yyvsp68 >= yyvsc68 then debug ("GEYACC") std.error.put_line ("Resize yyvs68") end yyvsc68 := yyvsc68 + yyInitial_yyvs_size yyvs68 := yyspecial_routines68.aliased_resized_area (yyvs68, yyvsc68) end yyspecial_routines68.force (yyvs68, yyval68, yyvsp68) end end yy_do_action_376 --|#line "eiffel.y" local yyval68: detachable INTERVAL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval68 := ast_factory.new_interval_as (yyvs77.item (yyvsp77), yyvs66.item (yyvsp66), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp68 := yyvsp68 + 1 yyvsp77 := yyvsp77 -1 yyvsp4 := yyvsp4 -1 yyvsp66 := yyvsp66 -1 if yyvsp68 >= yyvsc68 then debug ("GEYACC") std.error.put_line ("Resize yyvs68") end yyvsc68 := yyvsc68 + yyInitial_yyvs_size yyvs68 := yyspecial_routines68.aliased_resized_area (yyvs68, yyvsc68) end yyspecial_routines68.force (yyvs68, yyval68, yyvsp68) end end yy_do_action_377 --|#line "eiffel.y" local yyval68: detachable INTERVAL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval68 := ast_factory.new_interval_as (yyvs66.item (yyvsp66), yyvs77.item (yyvsp77), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp68 := yyvsp68 + 1 yyvsp66 := yyvsp66 -1 yyvsp4 := yyvsp4 -1 yyvsp77 := yyvsp77 -1 if yyvsp68 >= yyvsc68 then debug ("GEYACC") std.error.put_line ("Resize yyvs68") end yyvsc68 := yyvsc68 + yyInitial_yyvs_size yyvs68 := yyspecial_routines68.aliased_resized_area (yyvs68, yyvsc68) end yyspecial_routines68.force (yyvs68, yyval68, yyvsp68) end end yy_do_action_378 --|#line "eiffel.y" local yyval68: detachable INTERVAL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval68 := ast_factory.new_interval_as (yyvs77.item (yyvsp77), yyvs3.item (yyvsp3), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp68 := yyvsp68 + 1 yyvsp77 := yyvsp77 -1 yyvsp4 := yyvsp4 -1 yyvsp3 := yyvsp3 -1 if yyvsp68 >= yyvsc68 then debug ("GEYACC") std.error.put_line ("Resize yyvs68") end yyvsc68 := yyvsc68 + yyInitial_yyvs_size yyvs68 := yyspecial_routines68.aliased_resized_area (yyvs68, yyvsc68) end yyspecial_routines68.force (yyvs68, yyval68, yyvsp68) end end yy_do_action_379 --|#line "eiffel.y" local yyval68: detachable INTERVAL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval68 := ast_factory.new_interval_as (yyvs3.item (yyvsp3), yyvs77.item (yyvsp77), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp68 := yyvsp68 + 1 yyvsp3 := yyvsp3 -1 yyvsp4 := yyvsp4 -1 yyvsp77 := yyvsp77 -1 if yyvsp68 >= yyvsc68 then debug ("GEYACC") std.error.put_line ("Resize yyvs68") end yyvsc68 := yyvsc68 + yyInitial_yyvs_size yyvs68 := yyspecial_routines68.aliased_resized_area (yyvs68, yyvsc68) end yyspecial_routines68.force (yyvs68, yyval68, yyvsp68) end end yy_do_action_380 --|#line "eiffel.y" local yyval71: detachable LOOP_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if has_syntax_warning then report_one_warning (create {SYNTAX_WARNING}.make (token_line (yyvs93.item (yyvsp93)), token_column (yyvs93.item (yyvsp93)), filename, locale.translation_in_context (once "Loop variant should appear just before the end keyword of the loop.", once "parser.eiffel.warning"))) end if attached yyvs23.item (yyvsp23) as l_invariant_pair then yyval71 := ast_factory.new_loop_as (Void, yyvs118.item (yyvsp118 - 1), l_invariant_pair.second, yyvs93.item (yyvsp93), yyvs50.item (yyvsp50), yyvs118.item (yyvsp118), yyvs14.item (yyvsp14), yyvs14.item (yyvsp14 - 3), l_invariant_pair.first, yyvs14.item (yyvsp14 - 2), yyvs14.item (yyvsp14 - 1), Void, Void) else yyval71 := ast_factory.new_loop_as (Void, yyvs118.item (yyvsp118 - 1), Void, yyvs93.item (yyvsp93), yyvs50.item (yyvsp50), yyvs118.item (yyvsp118), yyvs14.item (yyvsp14), yyvs14.item (yyvsp14 - 3), Void, yyvs14.item (yyvsp14 - 2), yyvs14.item (yyvsp14 - 1), Void, Void) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 9 yyvsp71 := yyvsp71 + 1 yyvsp14 := yyvsp14 -4 yyvsp118 := yyvsp118 -2 yyvsp23 := yyvsp23 -1 yyvsp93 := yyvsp93 -1 yyvsp50 := yyvsp50 -1 if yyvsp71 >= yyvsc71 then debug ("GEYACC") std.error.put_line ("Resize yyvs71") end yyvsc71 := yyvsc71 + yyInitial_yyvs_size yyvs71 := yyspecial_routines71.aliased_resized_area (yyvs71, yyvsc71) end yyspecial_routines71.force (yyvs71, yyval71, yyvsp71) end end yy_do_action_381 --|#line "eiffel.y" local yyval71: detachable LOOP_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs23.item (yyvsp23) as l_invariant_pair then yyval71 := ast_factory.new_loop_as (Void, yyvs118.item (yyvsp118 - 1), l_invariant_pair.second, yyvs93.item (yyvsp93), yyvs50.item (yyvsp50), yyvs118.item (yyvsp118), yyvs14.item (yyvsp14), yyvs14.item (yyvsp14 - 3), l_invariant_pair.first, yyvs14.item (yyvsp14 - 2), yyvs14.item (yyvsp14 - 1), Void, Void) else yyval71 := ast_factory.new_loop_as (Void, yyvs118.item (yyvsp118 - 1), Void, yyvs93.item (yyvsp93), yyvs50.item (yyvsp50), yyvs118.item (yyvsp118), yyvs14.item (yyvsp14), yyvs14.item (yyvsp14 - 3), Void, yyvs14.item (yyvsp14 - 2), yyvs14.item (yyvsp14 - 1), Void, Void) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 9 yyvsp71 := yyvsp71 + 1 yyvsp14 := yyvsp14 -4 yyvsp118 := yyvsp118 -2 yyvsp23 := yyvsp23 -1 yyvsp50 := yyvsp50 -1 yyvsp93 := yyvsp93 -1 if yyvsp71 >= yyvsc71 then debug ("GEYACC") std.error.put_line ("Resize yyvs71") end yyvsc71 := yyvsc71 + yyInitial_yyvs_size yyvs71 := yyspecial_routines71.aliased_resized_area (yyvs71, yyvsc71) end yyspecial_routines71.force (yyvs71, yyval71, yyvsp71) end end yy_do_action_382 --|#line "eiffel.y" local yyval71: detachable LOOP_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs23.item (yyvsp23) as l_invariant_pair then if attached yyvs24.item (yyvsp24) as l_until_pair then yyval71 := ast_factory.new_loop_as (yyvs117.item (yyvsp117), yyvs118.item (yyvsp118 - 1), l_invariant_pair.second, yyvs93.item (yyvsp93), l_until_pair.second, yyvs118.item (yyvsp118), yyvs14.item (yyvsp14), yyvs14.item (yyvsp14 - 2), l_invariant_pair.first, l_until_pair.first, yyvs14.item (yyvsp14 - 1), Void, Void) else yyval71 := ast_factory.new_loop_as (yyvs117.item (yyvsp117), yyvs118.item (yyvsp118 - 1), l_invariant_pair.second, yyvs93.item (yyvsp93), Void, yyvs118.item (yyvsp118), yyvs14.item (yyvsp14), yyvs14.item (yyvsp14 - 2), l_invariant_pair.first, Void, yyvs14.item (yyvsp14 - 1), Void, Void) end else if attached yyvs24.item (yyvsp24) as l_until_pair then yyval71 := ast_factory.new_loop_as (yyvs117.item (yyvsp117), yyvs118.item (yyvsp118 - 1), Void, yyvs93.item (yyvsp93), l_until_pair.second, yyvs118.item (yyvsp118), yyvs14.item (yyvsp14), yyvs14.item (yyvsp14 - 2), Void, l_until_pair.first, yyvs14.item (yyvsp14 - 1), Void, Void) else yyval71 := ast_factory.new_loop_as (yyvs117.item (yyvsp117), yyvs118.item (yyvsp118 - 1), Void, yyvs93.item (yyvsp93), Void, yyvs118.item (yyvsp118), yyvs14.item (yyvsp14), yyvs14.item (yyvsp14 - 2), Void, Void, yyvs14.item (yyvsp14 - 1), Void, Void) end end leave_scope if yy_parsing_status >= yyContinue then yyssp := yyssp - 9 yyvsp71 := yyvsp71 + 1 yyvsp117 := yyvsp117 -1 yyvsp14 := yyvsp14 -3 yyvsp118 := yyvsp118 -2 yyvsp23 := yyvsp23 -1 yyvsp24 := yyvsp24 -1 yyvsp93 := yyvsp93 -1 if yyvsp71 >= yyvsc71 then debug ("GEYACC") std.error.put_line ("Resize yyvs71") end yyvsc71 := yyvsc71 + yyInitial_yyvs_size yyvs71 := yyspecial_routines71.aliased_resized_area (yyvs71, yyvsc71) end yyspecial_routines71.force (yyvs71, yyval71, yyvsp71) end end yy_do_action_383 --|#line "eiffel.y" local yyval71: detachable LOOP_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs23.item (yyvsp23) as l_invariant_pair then if attached yyvs24.item (yyvsp24) as l_until_pair then yyval71 := ast_factory.new_loop_as (yyvs117.item (yyvsp117), Void, l_invariant_pair.second, yyvs93.item (yyvsp93), l_until_pair.second, yyvs118.item (yyvsp118), yyvs14.item (yyvsp14), Void, l_invariant_pair.first, l_until_pair.first, yyvs14.item (yyvsp14 - 1), Void, Void) else yyval71 := ast_factory.new_loop_as (yyvs117.item (yyvsp117), Void, l_invariant_pair.second, yyvs93.item (yyvsp93), Void, yyvs118.item (yyvsp118), yyvs14.item (yyvsp14), Void, l_invariant_pair.first, Void, yyvs14.item (yyvsp14 - 1), Void, Void) end else if attached yyvs24.item (yyvsp24) as l_until_pair then yyval71 := ast_factory.new_loop_as (yyvs117.item (yyvsp117), Void, Void, yyvs93.item (yyvsp93), l_until_pair.second, yyvs118.item (yyvsp118), yyvs14.item (yyvsp14), Void, Void, l_until_pair.first, yyvs14.item (yyvsp14 - 1), Void, Void) else yyval71 := ast_factory.new_loop_as (yyvs117.item (yyvsp117), Void, Void, yyvs93.item (yyvsp93), Void, yyvs118.item (yyvsp118), yyvs14.item (yyvsp14), Void, Void, Void, yyvs14.item (yyvsp14 - 1), Void, Void) end end leave_scope if yy_parsing_status >= yyContinue then yyssp := yyssp - 7 yyvsp71 := yyvsp71 + 1 yyvsp117 := yyvsp117 -1 yyvsp23 := yyvsp23 -1 yyvsp24 := yyvsp24 -1 yyvsp14 := yyvsp14 -2 yyvsp118 := yyvsp118 -1 yyvsp93 := yyvsp93 -1 if yyvsp71 >= yyvsc71 then debug ("GEYACC") std.error.put_line ("Resize yyvs71") end yyvsc71 := yyvsc71 + yyInitial_yyvs_size yyvs71 := yyspecial_routines71.aliased_resized_area (yyvs71, yyvsc71) end yyspecial_routines71.force (yyvs71, yyval71, yyvsp71) end end yy_do_action_384 --|#line "eiffel.y" local yyval71: detachable LOOP_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end insert_supplier ("ITERABLE", yyvs2.item (yyvsp2)) insert_supplier ("ITERATION_CURSOR", yyvs2.item (yyvsp2)) yyval71 := ast_factory.new_loop_as (ast_factory.new_symbolic_iteration_as (yyvs2.item (yyvsp2), yyvs4.item (yyvsp4 - 1), yyvs50.item (yyvsp50), yyvs4.item (yyvsp4)), Void, Void, Void, Void, yyvs118.item (yyvsp118), Void, Void, Void, Void, Void, extract_symbol (yyvs6.item (yyvsp6 - 1)), extract_symbol (yyvs6.item (yyvsp6))) leave_scope if yy_parsing_status >= yyContinue then yyssp := yyssp - 8 yyvsp6 := yyvsp6 -2 yyvsp2 := yyvsp2 -1 yyvsp4 := yyvsp4 -2 yyvsp50 := yyvsp50 -1 yyvsp118 := yyvsp118 -1 yyspecial_routines71.force (yyvs71, yyval71, yyvsp71) end end yy_do_action_385 --|#line "eiffel.y" local yyval71: detachable LOOP_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end enter_scope; add_scope_iteration (yyvs2.item (yyvsp2)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp71 := yyvsp71 + 1 if yyvsp71 >= yyvsc71 then debug ("GEYACC") std.error.put_line ("Resize yyvs71") end yyvsc71 := yyvsc71 + yyInitial_yyvs_size yyvs71 := yyspecial_routines71.aliased_resized_area (yyvs71, yyvsc71) end yyspecial_routines71.force (yyvs71, yyval71, yyvsp71) end end yy_do_action_386 --|#line "eiffel.y" local yyval70: detachable LOOP_EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs23.item (yyvsp23) as l_invariant_pair then if attached yyvs24.item (yyvsp24) as l_until_pair then yyval70 := ast_factory.new_loop_expr_as (yyvs117.item (yyvsp117), l_invariant_pair.first, l_invariant_pair.second, l_until_pair.first, l_until_pair.second, yyvs14.item (yyvsp14 - 1), Void, True, yyvs50.item (yyvsp50), yyvs93.item (yyvsp93), yyvs14.item (yyvsp14)) else yyval70 := ast_factory.new_loop_expr_as (yyvs117.item (yyvsp117), l_invariant_pair.first, l_invariant_pair.second, Void, Void, yyvs14.item (yyvsp14 - 1), Void, True, yyvs50.item (yyvsp50), yyvs93.item (yyvsp93), yyvs14.item (yyvsp14)) end else if attached yyvs24.item (yyvsp24) as l_until_pair then yyval70 := ast_factory.new_loop_expr_as (yyvs117.item (yyvsp117), Void, Void, l_until_pair.first, l_until_pair.second, yyvs14.item (yyvsp14 - 1), Void, True, yyvs50.item (yyvsp50), yyvs93.item (yyvsp93), yyvs14.item (yyvsp14)) else yyval70 := ast_factory.new_loop_expr_as (yyvs117.item (yyvsp117), Void, Void, Void, Void, yyvs14.item (yyvsp14 - 1), Void, True, yyvs50.item (yyvsp50), yyvs93.item (yyvsp93), yyvs14.item (yyvsp14)) end end leave_scope if yy_parsing_status >= yyContinue then yyssp := yyssp - 7 yyvsp70 := yyvsp70 + 1 yyvsp117 := yyvsp117 -1 yyvsp23 := yyvsp23 -1 yyvsp24 := yyvsp24 -1 yyvsp14 := yyvsp14 -2 yyvsp50 := yyvsp50 -1 yyvsp93 := yyvsp93 -1 if yyvsp70 >= yyvsc70 then debug ("GEYACC") std.error.put_line ("Resize yyvs70") end yyvsc70 := yyvsc70 + yyInitial_yyvs_size yyvs70 := yyspecial_routines70.aliased_resized_area (yyvs70, yyvsc70) end yyspecial_routines70.force (yyvs70, yyval70, yyvsp70) end end yy_do_action_387 --|#line "eiffel.y" local yyval70: detachable LOOP_EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs23.item (yyvsp23) as l_invariant_pair then if attached yyvs24.item (yyvsp24) as l_until_pair then yyval70 := ast_factory.new_loop_expr_as (yyvs117.item (yyvsp117), l_invariant_pair.first, l_invariant_pair.second, l_until_pair.first, l_until_pair.second, extract_keyword (yyvs15.item (yyvsp15)), Void, False, yyvs50.item (yyvsp50), yyvs93.item (yyvsp93), yyvs14.item (yyvsp14)) else yyval70 := ast_factory.new_loop_expr_as (yyvs117.item (yyvsp117), l_invariant_pair.first, l_invariant_pair.second, Void, Void, extract_keyword (yyvs15.item (yyvsp15)), Void, False, yyvs50.item (yyvsp50), yyvs93.item (yyvsp93), yyvs14.item (yyvsp14)) end else if attached yyvs24.item (yyvsp24) as l_until_pair then yyval70 := ast_factory.new_loop_expr_as (yyvs117.item (yyvsp117), Void, Void, l_until_pair.first, l_until_pair.second, extract_keyword (yyvs15.item (yyvsp15)), Void, False, yyvs50.item (yyvsp50), yyvs93.item (yyvsp93), yyvs14.item (yyvsp14)) else yyval70 := ast_factory.new_loop_expr_as (yyvs117.item (yyvsp117), Void, Void, Void, Void, extract_keyword (yyvs15.item (yyvsp15)), Void, False, yyvs50.item (yyvsp50), yyvs93.item (yyvsp93), yyvs14.item (yyvsp14)) end end leave_scope if yy_parsing_status >= yyContinue then yyssp := yyssp - 7 yyvsp70 := yyvsp70 + 1 yyvsp117 := yyvsp117 -1 yyvsp23 := yyvsp23 -1 yyvsp24 := yyvsp24 -1 yyvsp15 := yyvsp15 -1 yyvsp50 := yyvsp50 -1 yyvsp93 := yyvsp93 -1 yyvsp14 := yyvsp14 -1 if yyvsp70 >= yyvsc70 then debug ("GEYACC") std.error.put_line ("Resize yyvs70") end yyvsc70 := yyvsc70 + yyInitial_yyvs_size yyvs70 := yyspecial_routines70.aliased_resized_area (yyvs70, yyvsc70) end yyspecial_routines70.force (yyvs70, yyval70, yyvsp70) end end yy_do_action_388 --|#line "eiffel.y" local yyval70: detachable LOOP_EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end insert_supplier ("ITERABLE", yyvs2.item (yyvsp2)) insert_supplier ("ITERATION_CURSOR", yyvs2.item (yyvsp2)) yyval70 := ast_factory.new_loop_expr_as (ast_factory.new_symbolic_iteration_as (yyvs2.item (yyvsp2), yyvs4.item (yyvsp4 - 1), yyvs50.item (yyvsp50 - 1), yyvs4.item (yyvsp4)), Void, Void, Void, Void, Void, extract_symbol (yyvs6.item (yyvsp6)), True, yyvs50.item (yyvsp50), Void, Void) leave_scope if yy_parsing_status >= yyContinue then yyssp := yyssp - 7 yyvsp6 := yyvsp6 -1 yyvsp2 := yyvsp2 -1 yyvsp4 := yyvsp4 -2 yyvsp50 := yyvsp50 -2 yyspecial_routines70.force (yyvs70, yyval70, yyvsp70) end end yy_do_action_389 --|#line "eiffel.y" local yyval70: detachable LOOP_EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end enter_scope; add_scope_iteration (yyvs2.item (yyvsp2)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp70 := yyvsp70 + 1 if yyvsp70 >= yyvsc70 then debug ("GEYACC") std.error.put_line ("Resize yyvs70") end yyvsc70 := yyvsc70 + yyInitial_yyvs_size yyvs70 := yyspecial_routines70.aliased_resized_area (yyvs70, yyvsc70) end yyspecial_routines70.force (yyvs70, yyval70, yyvsp70) end end yy_do_action_390 --|#line "eiffel.y" local yyval70: detachable LOOP_EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end insert_supplier ("ITERABLE", yyvs2.item (yyvsp2)) insert_supplier ("ITERATION_CURSOR", yyvs2.item (yyvsp2)) yyval70 := ast_factory.new_loop_expr_as (ast_factory.new_symbolic_iteration_as (yyvs2.item (yyvsp2), yyvs4.item (yyvsp4 - 1), yyvs50.item (yyvsp50 - 1), yyvs4.item (yyvsp4)), Void, Void, Void, Void, Void, extract_symbol (yyvs6.item (yyvsp6)), False, yyvs50.item (yyvsp50), Void, Void) leave_scope if yy_parsing_status >= yyContinue then yyssp := yyssp - 7 yyvsp6 := yyvsp6 -1 yyvsp2 := yyvsp2 -1 yyvsp4 := yyvsp4 -2 yyvsp50 := yyvsp50 -2 yyspecial_routines70.force (yyvs70, yyval70, yyvsp70) end end yy_do_action_391 --|#line "eiffel.y" local yyval70: detachable LOOP_EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end enter_scope; add_scope_iteration (yyvs2.item (yyvsp2)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp70 := yyvsp70 + 1 if yyvsp70 >= yyvsc70 then debug ("GEYACC") std.error.put_line ("Resize yyvs70") end yyvsc70 := yyvsc70 + yyInitial_yyvs_size yyvs70 := yyspecial_routines70.aliased_resized_area (yyvs70, yyvsc70) end yyspecial_routines70.force (yyvs70, yyval70, yyvsp70) end end yy_do_action_392 --|#line "eiffel.y" local yyval117: detachable ITERATION_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end insert_supplier ("ITERABLE", yyvs2.item (yyvsp2)) insert_supplier ("ITERATION_CURSOR", yyvs2.item (yyvsp2)) yyval117 := ast_factory.new_iteration_as (extract_keyword (yyvs15.item (yyvsp15)), yyvs50.item (yyvsp50), yyvs14.item (yyvsp14), yyvs2.item (yyvsp2), not is_explicit_iteration_cursor) enter_scope add_scope_iteration (yyvs2.item (yyvsp2)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp117 := yyvsp117 + 1 yyvsp15 := yyvsp15 -1 yyvsp50 := yyvsp50 -1 yyvsp14 := yyvsp14 -1 yyvsp2 := yyvsp2 -1 if yyvsp117 >= yyvsc117 then debug ("GEYACC") std.error.put_line ("Resize yyvs117") end yyvsc117 := yyvsc117 + yyInitial_yyvs_size yyvs117 := yyspecial_routines117.aliased_resized_area (yyvs117, yyvsc117) end yyspecial_routines117.force (yyvs117, yyval117, yyvsp117) end end yy_do_action_393 --|#line "eiffel.y" local yyval117: detachable ITERATION_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end insert_supplier ("ITERABLE", yyvs2.item (yyvsp2)) insert_supplier ("ITERATION_CURSOR", yyvs2.item (yyvsp2)) yyval117 := ast_factory.new_iteration_as (extract_keyword (yyvs15.item (yyvsp15 - 1)), yyvs50.item (yyvsp50), extract_keyword (yyvs15.item (yyvsp15)), yyvs2.item (yyvsp2), True) report_deprecated_use_of_keyword_is (extract_keyword (yyvs15.item (yyvsp15))) enter_scope add_scope_iteration (yyvs2.item (yyvsp2)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp117 := yyvsp117 + 1 yyvsp15 := yyvsp15 -2 yyvsp50 := yyvsp50 -1 yyvsp2 := yyvsp2 -1 if yyvsp117 >= yyvsc117 then debug ("GEYACC") std.error.put_line ("Resize yyvs117") end yyvsc117 := yyvsc117 + yyInitial_yyvs_size yyvs117 := yyspecial_routines117.aliased_resized_area (yyvs117, yyvsc117) end yyspecial_routines117.force (yyvs117, yyval117, yyvsp117) end end yy_do_action_394 --|#line "eiffel.y" local yyval23: detachable PAIR [KEYWORD_AS, detachable EIFFEL_LIST [TAGGED_AS]] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp23 := yyvsp23 + 1 if yyvsp23 >= yyvsc23 then debug ("GEYACC") std.error.put_line ("Resize yyvs23") end yyvsc23 := yyvsc23 + yyInitial_yyvs_size yyvs23 := yyspecial_routines23.aliased_resized_area (yyvs23, yyvsc23) end yyspecial_routines23.force (yyvs23, yyval23, yyvsp23) end end yy_do_action_395 --|#line "eiffel.y" local yyval23: detachable PAIR [KEYWORD_AS, detachable EIFFEL_LIST [TAGGED_AS]] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval23 := ast_factory.new_invariant_pair (yyvs14.item (yyvsp14), yyvs127.item (yyvsp127)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp23 := yyvsp23 + 1 yyvsp14 := yyvsp14 -1 yyvsp127 := yyvsp127 -1 if yyvsp23 >= yyvsc23 then debug ("GEYACC") std.error.put_line ("Resize yyvs23") end yyvsc23 := yyvsc23 + yyInitial_yyvs_size yyvs23 := yyspecial_routines23.aliased_resized_area (yyvs23, yyvsc23) end yyspecial_routines23.force (yyvs23, yyval23, yyvsp23) end end yy_do_action_396 --|#line "eiffel.y" local yyval69: detachable INVARIANT_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp69 := yyvsp69 + 1 if yyvsp69 >= yyvsc69 then debug ("GEYACC") std.error.put_line ("Resize yyvs69") end yyvsc69 := yyvsc69 + yyInitial_yyvs_size yyvs69 := yyspecial_routines69.aliased_resized_area (yyvs69, yyvsc69) end yyspecial_routines69.force (yyvs69, yyval69, yyvsp69) end end yy_do_action_397 --|#line "eiffel.y" local yyval69: detachable INVARIANT_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end set_id_level (Normal_level) yyval69 := ast_factory.new_invariant_as (yyvs127.item (yyvsp127), once_manifest_string_counter_value, yyvs14.item (yyvsp14), object_test_locals) reset_feature_frame object_test_locals := Void if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp14 := yyvsp14 -1 yyvsp127 := yyvsp127 -1 yyspecial_routines69.force (yyvs69, yyval69, yyvsp69) end end yy_do_action_398 --|#line "eiffel.y" local yyval69: detachable INVARIANT_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end set_id_level (Invariant_level) if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp69 := yyvsp69 + 1 if yyvsp69 >= yyvsc69 then debug ("GEYACC") std.error.put_line ("Resize yyvs69") end yyvsc69 := yyvsc69 + yyInitial_yyvs_size yyvs69 := yyspecial_routines69.aliased_resized_area (yyvs69, yyvsc69) end yyspecial_routines69.force (yyvs69, yyval69, yyvsp69) end end yy_do_action_399 --|#line "eiffel.y" local yyval24: detachable PAIR [KEYWORD_AS, EXPR_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp24 := yyvsp24 + 1 if yyvsp24 >= yyvsc24 then debug ("GEYACC") std.error.put_line ("Resize yyvs24") end yyvsc24 := yyvsc24 + yyInitial_yyvs_size yyvs24 := yyspecial_routines24.aliased_resized_area (yyvs24, yyvsc24) end yyspecial_routines24.force (yyvs24, yyval24, yyvsp24) end end yy_do_action_400 --|#line "eiffel.y" local yyval24: detachable PAIR [KEYWORD_AS, EXPR_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval24 := ast_factory.new_exit_condition_pair (yyvs14.item (yyvsp14), yyvs50.item (yyvsp50)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp24 := yyvsp24 + 1 yyvsp14 := yyvsp14 -1 yyvsp50 := yyvsp50 -1 if yyvsp24 >= yyvsc24 then debug ("GEYACC") std.error.put_line ("Resize yyvs24") end yyvsc24 := yyvsc24 + yyInitial_yyvs_size yyvs24 := yyspecial_routines24.aliased_resized_area (yyvs24, yyvsc24) end yyspecial_routines24.force (yyvs24, yyval24, yyvsp24) end end yy_do_action_401 --|#line "eiffel.y" local yyval93: detachable VARIANT_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp93 := yyvsp93 + 1 if yyvsp93 >= yyvsc93 then debug ("GEYACC") std.error.put_line ("Resize yyvs93") end yyvsc93 := yyvsc93 + yyInitial_yyvs_size yyvs93 := yyspecial_routines93.aliased_resized_area (yyvs93, yyvsc93) end yyspecial_routines93.force (yyvs93, yyval93, yyvsp93) end end yy_do_action_402 --|#line "eiffel.y" local yyval93: detachable VARIANT_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval93 := yyvs93.item (yyvsp93) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines93.force (yyvs93, yyval93, yyvsp93) end end yy_do_action_403 --|#line "eiffel.y" local yyval93: detachable VARIANT_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval93 := ast_factory.new_variant_as (yyvs2.item (yyvsp2), yyvs50.item (yyvsp50), yyvs14.item (yyvsp14), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp93 := yyvsp93 + 1 yyvsp14 := yyvsp14 -1 yyvsp2 := yyvsp2 -1 yyvsp4 := yyvsp4 -1 yyvsp50 := yyvsp50 -1 if yyvsp93 >= yyvsc93 then debug ("GEYACC") std.error.put_line ("Resize yyvs93") end yyvsc93 := yyvsc93 + yyInitial_yyvs_size yyvs93 := yyspecial_routines93.aliased_resized_area (yyvs93, yyvsc93) end yyspecial_routines93.force (yyvs93, yyval93, yyvsp93) end end yy_do_action_404 --|#line "eiffel.y" local yyval93: detachable VARIANT_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval93 := ast_factory.new_variant_as (Void, yyvs50.item (yyvsp50), yyvs14.item (yyvsp14), Void) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp93 := yyvsp93 + 1 yyvsp14 := yyvsp14 -1 yyvsp50 := yyvsp50 -1 if yyvsp93 >= yyvsc93 then debug ("GEYACC") std.error.put_line ("Resize yyvs93") end yyvsc93 := yyvsc93 + yyInitial_yyvs_size yyvs93 := yyspecial_routines93.aliased_resized_area (yyvs93, yyvsc93) end yyspecial_routines93.force (yyvs93, yyval93, yyvsp93) end end yy_do_action_405 --|#line "eiffel.y" local yyval45: detachable DEBUG_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval45 := ast_factory.new_debug_as (yyvs126.item (yyvsp126), yyvs118.item (yyvsp118), yyvs14.item (yyvsp14 - 1), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp45 := yyvsp45 + 1 yyvsp14 := yyvsp14 -2 yyvsp126 := yyvsp126 -1 yyvsp118 := yyvsp118 -1 if yyvsp45 >= yyvsc45 then debug ("GEYACC") std.error.put_line ("Resize yyvs45") end yyvsc45 := yyvsc45 + yyInitial_yyvs_size yyvs45 := yyspecial_routines45.aliased_resized_area (yyvs45, yyvsc45) end yyspecial_routines45.force (yyvs45, yyval45, yyvsp45) end end yy_do_action_406 --|#line "eiffel.y" local yyval126: detachable KEY_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp126 := yyvsp126 + 1 if yyvsp126 >= yyvsc126 then debug ("GEYACC") std.error.put_line ("Resize yyvs126") end yyvsc126 := yyvsc126 + yyInitial_yyvs_size yyvs126 := yyspecial_routines126.aliased_resized_area (yyvs126, yyvsc126) end yyspecial_routines126.force (yyvs126, yyval126, yyvsp126) end end yy_do_action_407 --|#line "eiffel.y" local yyval126: detachable KEY_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- Per ECMA, this should be rejected. For now we only raise -- a warning. And on the compiler side, we will simply ignore them altogether. if has_syntax_warning then report_one_warning (create {SYNTAX_WARNING}.make (token_line (yyvs4.item (yyvsp4 - 1)), token_column (yyvs4.item (yyvsp4 - 1)), filename, locale.translation_in_context (once "Empty key list is not allowed", once "parser.eiffel.warning"))) end yyval126 := ast_factory.new_key_list_as (Void, yyvs4.item (yyvsp4 - 1), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp126 := yyvsp126 + 1 yyvsp4 := yyvsp4 -2 if yyvsp126 >= yyvsc126 then debug ("GEYACC") std.error.put_line ("Resize yyvs126") end yyvsc126 := yyvsc126 + yyInitial_yyvs_size yyvs126 := yyspecial_routines126.aliased_resized_area (yyvs126, yyvsc126) end yyspecial_routines126.force (yyvs126, yyval126, yyvsp126) end end yy_do_action_408 --|#line "eiffel.y" local yyval126: detachable KEY_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval126 := ast_factory.new_key_list_as (yyvs125.item (yyvsp125), yyvs4.item (yyvsp4 - 1), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp126 := yyvsp126 + 1 yyvsp4 := yyvsp4 -2 yyvsp1 := yyvsp1 -2 yyvsp125 := yyvsp125 -1 if yyvsp126 >= yyvsc126 then debug ("GEYACC") std.error.put_line ("Resize yyvs126") end yyvsc126 := yyvsc126 + yyInitial_yyvs_size yyvs126 := yyspecial_routines126.aliased_resized_area (yyvs126, yyvsc126) end yyspecial_routines126.force (yyvs126, yyval126, yyvsp126) end end yy_do_action_409 --|#line "eiffel.y" local yyval125: detachable EIFFEL_LIST [STRING_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs16.item (yyvsp16) as v then yyval125 := ast_factory.new_eiffel_list_string_as (v, counter_value + 1) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp125 := yyvsp125 + 1 yyvsp16 := yyvsp16 -1 if yyvsp125 >= yyvsc125 then debug ("GEYACC") std.error.put_line ("Resize yyvs125") end yyvsc125 := yyvsc125 + yyInitial_yyvs_size yyvs125 := yyspecial_routines125.aliased_resized_area (yyvs125, yyvsc125) end yyspecial_routines125.force (yyvs125, yyval125, yyvsp125) end end yy_do_action_410 --|#line "eiffel.y" local yyval125: detachable EIFFEL_LIST [STRING_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval125 := yyvs125.item (yyvsp125) if attached yyval125 as l_list and then attached yyvs16.item (yyvsp16) as l_val then l_list.reverse_extend (l_val) ast_factory.reverse_extend_separator (l_list, yyvs4.item (yyvsp4)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp16 := yyvsp16 -1 yyvsp4 := yyvsp4 -1 yyvsp1 := yyvsp1 -1 yyspecial_routines125.force (yyvs125, yyval125, yyvsp125) end end yy_do_action_411 --|#line "eiffel.y" local yyval19: detachable PAIR [KEYWORD_AS, EIFFEL_LIST [INSTRUCTION_AS]] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp19 := yyvsp19 + 1 if yyvsp19 >= yyvsc19 then debug ("GEYACC") std.error.put_line ("Resize yyvs19") end yyvsc19 := yyvsc19 + yyInitial_yyvs_size yyvs19 := yyspecial_routines19.aliased_resized_area (yyvs19, yyvsc19) end yyspecial_routines19.force (yyvs19, yyval19, yyvsp19) end end yy_do_action_412 --|#line "eiffel.y" local yyval19: detachable PAIR [KEYWORD_AS, EIFFEL_LIST [INSTRUCTION_AS]] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yyvs118.item (yyvsp118) = Void then yyval19 := ast_factory.new_keyword_instruction_list_pair (yyvs14.item (yyvsp14), ast_factory.new_eiffel_list_instruction_as (Void, 0)) else yyval19 := ast_factory.new_keyword_instruction_list_pair (yyvs14.item (yyvsp14), yyvs118.item (yyvsp118)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp19 := yyvsp19 + 1 yyvsp14 := yyvsp14 -1 yyvsp118 := yyvsp118 -1 if yyvsp19 >= yyvsc19 then debug ("GEYACC") std.error.put_line ("Resize yyvs19") end yyvsc19 := yyvsc19 + yyInitial_yyvs_size yyvs19 := yyspecial_routines19.aliased_resized_area (yyvs19, yyvsc19) end yyspecial_routines19.force (yyvs19, yyval19, yyvsp19) end end yy_do_action_413 --|#line "eiffel.y" local yyval30: detachable ASSIGN_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval30 := ast_factory.new_assign_as (ast_factory.new_access_id_as (yyvs2.item (yyvsp2), Void), yyvs50.item (yyvsp50), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp30 := yyvsp30 + 1 yyvsp2 := yyvsp2 -1 yyvsp4 := yyvsp4 -1 yyvsp50 := yyvsp50 -1 if yyvsp30 >= yyvsc30 then debug ("GEYACC") std.error.put_line ("Resize yyvs30") end yyvsc30 := yyvsc30 + yyInitial_yyvs_size yyvs30 := yyspecial_routines30.aliased_resized_area (yyvs30, yyvsc30) end yyspecial_routines30.force (yyvs30, yyval30, yyvsp30) end end yy_do_action_414 --|#line "eiffel.y" local yyval30: detachable ASSIGN_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval30 := ast_factory.new_assign_as (yyvs8.item (yyvsp8), yyvs50.item (yyvsp50), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp30 := yyvsp30 + 1 yyvsp8 := yyvsp8 -1 yyvsp4 := yyvsp4 -1 yyvsp50 := yyvsp50 -1 if yyvsp30 >= yyvsc30 then debug ("GEYACC") std.error.put_line ("Resize yyvs30") end yyvsc30 := yyvsc30 + yyInitial_yyvs_size yyvs30 := yyspecial_routines30.aliased_resized_area (yyvs30, yyvsc30) end yyspecial_routines30.force (yyvs30, yyval30, yyvsp30) end end yy_do_action_415 --|#line "eiffel.y" local yyval81: detachable REVERSE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval81 := ast_factory.new_reverse_as (ast_factory.new_access_id_as (yyvs2.item (yyvsp2), Void), yyvs50.item (yyvsp50), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp81 := yyvsp81 + 1 yyvsp2 := yyvsp2 -1 yyvsp4 := yyvsp4 -1 yyvsp50 := yyvsp50 -1 if yyvsp81 >= yyvsc81 then debug ("GEYACC") std.error.put_line ("Resize yyvs81") end yyvsc81 := yyvsc81 + yyInitial_yyvs_size yyvs81 := yyspecial_routines81.aliased_resized_area (yyvs81, yyvsc81) end yyspecial_routines81.force (yyvs81, yyval81, yyvsp81) end end yy_do_action_416 --|#line "eiffel.y" local yyval81: detachable REVERSE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval81 := ast_factory.new_reverse_as (yyvs8.item (yyvsp8), yyvs50.item (yyvsp50), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp81 := yyvsp81 + 1 yyvsp8 := yyvsp8 -1 yyvsp4 := yyvsp4 -1 yyvsp50 := yyvsp50 -1 if yyvsp81 >= yyvsc81 then debug ("GEYACC") std.error.put_line ("Resize yyvs81") end yyvsc81 := yyvsc81 + yyInitial_yyvs_size yyvs81 := yyspecial_routines81.aliased_resized_area (yyvs81, yyvsc81) end yyspecial_routines81.force (yyvs81, yyval81, yyvsp81) end end yy_do_action_417 --|#line "eiffel.y" local yyval99: detachable EIFFEL_LIST [CREATE_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp99 := yyvsp99 + 1 if yyvsp99 >= yyvsc99 then debug ("GEYACC") std.error.put_line ("Resize yyvs99") end yyvsc99 := yyvsc99 + yyInitial_yyvs_size yyvs99 := yyspecial_routines99.aliased_resized_area (yyvs99, yyvsc99) end yyspecial_routines99.force (yyvs99, yyval99, yyvsp99) end end yy_do_action_418 --|#line "eiffel.y" local yyval99: detachable EIFFEL_LIST [CREATE_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval99 := yyvs99.item (yyvsp99) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp1 := yyvsp1 -2 yyspecial_routines99.force (yyvs99, yyval99, yyvsp99) end end yy_do_action_419 --|#line "eiffel.y" local yyval99: detachable EIFFEL_LIST [CREATE_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs42.item (yyvsp42) as v then yyval99 := ast_factory.new_eiffel_list_create_as (v, counter_value + 1) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp99 := yyvsp99 + 1 yyvsp42 := yyvsp42 -1 if yyvsp99 >= yyvsc99 then debug ("GEYACC") std.error.put_line ("Resize yyvs99") end yyvsc99 := yyvsc99 + yyInitial_yyvs_size yyvs99 := yyspecial_routines99.aliased_resized_area (yyvs99, yyvsc99) end yyspecial_routines99.force (yyvs99, yyval99, yyvsp99) end end yy_do_action_420 --|#line "eiffel.y" local yyval99: detachable EIFFEL_LIST [CREATE_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval99 := yyvs99.item (yyvsp99) if attached yyval99 as l_list and then attached yyvs42.item (yyvsp42) as l_val then l_list.reverse_extend (l_val) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp42 := yyvsp42 -1 yyvsp1 := yyvsp1 -1 yyspecial_routines99.force (yyvs99, yyval99, yyvsp99) end end yy_do_action_421 --|#line "eiffel.y" local yyval42: detachable CREATE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval42 := ast_factory.new_create_as (Void, Void, yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp42 := yyvsp42 + 1 yyvsp14 := yyvsp14 -1 if yyvsp42 >= yyvsc42 then debug ("GEYACC") std.error.put_line ("Resize yyvs42") end yyvsc42 := yyvsc42 + yyInitial_yyvs_size yyvs42 := yyspecial_routines42.aliased_resized_area (yyvs42, yyvsc42) end yyspecial_routines42.force (yyvs42, yyval42, yyvsp42) end end yy_do_action_422 --|#line "eiffel.y" local yyval42: detachable CREATE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval42 := ast_factory.new_create_as (yyvs39.item (yyvsp39), yyvs108.item (yyvsp108), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp42 := yyvsp42 + 1 yyvsp14 := yyvsp14 -1 yyvsp39 := yyvsp39 -1 yyvsp108 := yyvsp108 -1 if yyvsp42 >= yyvsc42 then debug ("GEYACC") std.error.put_line ("Resize yyvs42") end yyvsc42 := yyvsc42 + yyInitial_yyvs_size yyvs42 := yyspecial_routines42.aliased_resized_area (yyvs42, yyvsc42) end yyspecial_routines42.force (yyvs42, yyval42, yyvsp42) end end yy_do_action_423 --|#line "eiffel.y" local yyval42: detachable CREATE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval42 := ast_factory.new_create_as (ast_factory.new_client_as (yyvs115.item (yyvsp115)), Void, yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp42 := yyvsp42 + 1 yyvsp14 := yyvsp14 -1 yyvsp115 := yyvsp115 -1 if yyvsp42 >= yyvsc42 then debug ("GEYACC") std.error.put_line ("Resize yyvs42") end yyvsc42 := yyvsc42 + yyInitial_yyvs_size yyvs42 := yyspecial_routines42.aliased_resized_area (yyvs42, yyvsc42) end yyspecial_routines42.force (yyvs42, yyval42, yyvsp42) end end yy_do_action_424 --|#line "eiffel.y" local yyval42: detachable CREATE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval42 := ast_factory.new_create_as (Void, Void, yyvs14.item (yyvsp14)) if has_syntax_warning then report_one_warning (create {SYNTAX_WARNING}.make (token_line (yyvs14.item (yyvsp14)), token_column (yyvs14.item (yyvsp14)), filename, locale.translation_in_context (once "Use keyword `create` instead.", once "parser.eiffel.warning"))) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp42 := yyvsp42 + 1 yyvsp14 := yyvsp14 -1 if yyvsp42 >= yyvsc42 then debug ("GEYACC") std.error.put_line ("Resize yyvs42") end yyvsc42 := yyvsc42 + yyInitial_yyvs_size yyvs42 := yyspecial_routines42.aliased_resized_area (yyvs42, yyvsc42) end yyspecial_routines42.force (yyvs42, yyval42, yyvsp42) end end yy_do_action_425 --|#line "eiffel.y" local yyval42: detachable CREATE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval42 := ast_factory.new_create_as (yyvs39.item (yyvsp39), yyvs108.item (yyvsp108), yyvs14.item (yyvsp14)) if has_syntax_warning then report_one_warning (create {SYNTAX_WARNING}.make (token_line (yyvs14.item (yyvsp14)), token_column (yyvs14.item (yyvsp14)), filename, locale.translation_in_context (once "Use keyword `create` instead.", once "parser.eiffel.warning"))) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp42 := yyvsp42 + 1 yyvsp14 := yyvsp14 -1 yyvsp39 := yyvsp39 -1 yyvsp108 := yyvsp108 -1 if yyvsp42 >= yyvsc42 then debug ("GEYACC") std.error.put_line ("Resize yyvs42") end yyvsc42 := yyvsc42 + yyInitial_yyvs_size yyvs42 := yyspecial_routines42.aliased_resized_area (yyvs42, yyvsc42) end yyspecial_routines42.force (yyvs42, yyval42, yyvsp42) end end yy_do_action_426 --|#line "eiffel.y" local yyval42: detachable CREATE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval42 := ast_factory.new_create_as (ast_factory.new_client_as (yyvs115.item (yyvsp115)), Void, yyvs14.item (yyvsp14)) if has_syntax_warning then report_one_warning (create {SYNTAX_WARNING}.make (token_line (yyvs14.item (yyvsp14)), token_column (yyvs14.item (yyvsp14)), filename, locale.translation_in_context (once "Use keyword `create` instead.", once "parser.eiffel.warning"))) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp42 := yyvsp42 + 1 yyvsp14 := yyvsp14 -1 yyvsp115 := yyvsp115 -1 if yyvsp42 >= yyvsc42 then debug ("GEYACC") std.error.put_line ("Resize yyvs42") end yyvsc42 := yyvsc42 + yyInitial_yyvs_size yyvs42 := yyspecial_routines42.aliased_resized_area (yyvs42, yyvsc42) end yyspecial_routines42.force (yyvs42, yyval42, yyvsp42) end end yy_do_action_427 --|#line "eiffel.y" local yyval84: detachable ROUTINE_CREATION_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end inspect id_level when Precondition_level, Postcondition_level then set_has_unqualified_call_in_assertion (True) else -- Nothing to do. end yyval84 := ast_factory.new_inline_agent_creation_as ( ast_factory.new_body_as (yyvs132.item (yyvsp132), Void, Void, yyvs83.item (yyvsp83), Void, Void, Void, Void), yyvs121.item (yyvsp121), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 6 yyvsp84 := yyvsp84 -1 yyvsp14 := yyvsp14 -1 yyvsp132 := yyvsp132 -1 yyvsp83 := yyvsp83 -1 yyvsp121 := yyvsp121 -1 yyspecial_routines84.force (yyvs84, yyval84, yyvsp84) end end yy_do_action_428 --|#line "eiffel.y" local yyval84: detachable ROUTINE_CREATION_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end add_feature_frame if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp84 := yyvsp84 + 1 if yyvsp84 >= yyvsc84 then debug ("GEYACC") std.error.put_line ("Resize yyvs84") end yyvsc84 := yyvsc84 + yyInitial_yyvs_size yyvs84 := yyspecial_routines84.aliased_resized_area (yyvs84, yyvsc84) end yyspecial_routines84.force (yyvs84, yyval84, yyvsp84) end end yy_do_action_429 --|#line "eiffel.y" local yyval84: detachable ROUTINE_CREATION_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end remove_feature_frame if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp84 := yyvsp84 + 1 if yyvsp84 >= yyvsc84 then debug ("GEYACC") std.error.put_line ("Resize yyvs84") end yyvsc84 := yyvsc84 + yyInitial_yyvs_size yyvs84 := yyspecial_routines84.aliased_resized_area (yyvs84, yyvsc84) end yyspecial_routines84.force (yyvs84, yyval84, yyvsp84) end end yy_do_action_430 --|#line "eiffel.y" local yyval84: detachable ROUTINE_CREATION_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end inspect id_level when Precondition_level, Postcondition_level then set_has_unqualified_call_in_assertion (True) else -- Nothing to do. end yyval84 := ast_factory.new_inline_agent_creation_as ( ast_factory.new_body_as (yyvs132.item (yyvsp132), yyvs88.item (yyvsp88), Void, yyvs83.item (yyvsp83), yyvs4.item (yyvsp4), Void, Void, Void), yyvs121.item (yyvsp121), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 8 yyvsp84 := yyvsp84 -1 yyvsp14 := yyvsp14 -1 yyvsp132 := yyvsp132 -1 yyvsp4 := yyvsp4 -1 yyvsp88 := yyvsp88 -1 yyvsp83 := yyvsp83 -1 yyvsp121 := yyvsp121 -1 yyspecial_routines84.force (yyvs84, yyval84, yyvsp84) end end yy_do_action_431 --|#line "eiffel.y" local yyval84: detachable ROUTINE_CREATION_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end add_feature_frame if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp84 := yyvsp84 + 1 if yyvsp84 >= yyvsc84 then debug ("GEYACC") std.error.put_line ("Resize yyvs84") end yyvsc84 := yyvsc84 + yyInitial_yyvs_size yyvs84 := yyspecial_routines84.aliased_resized_area (yyvs84, yyvsc84) end yyspecial_routines84.force (yyvs84, yyval84, yyvsp84) end end yy_do_action_432 --|#line "eiffel.y" local yyval84: detachable ROUTINE_CREATION_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end remove_feature_frame if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp84 := yyvsp84 + 1 if yyvsp84 >= yyvsc84 then debug ("GEYACC") std.error.put_line ("Resize yyvs84") end yyvsc84 := yyvsc84 + yyInitial_yyvs_size yyvs84 := yyspecial_routines84.aliased_resized_area (yyvs84, yyvsc84) end yyspecial_routines84.force (yyvs84, yyval84, yyvsp84) end end yy_do_action_433 --|#line "eiffel.y" local yyval84: detachable ROUTINE_CREATION_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end inspect id_level when Precondition_level, Postcondition_level then set_has_unqualified_call_in_assertion (True) else -- Nothing to do. end yyval84 := ast_factory.new_agent_routine_creation_as ( Void, yyvs2.item (yyvsp2), yyvs121.item (yyvsp121), False, yyvs14.item (yyvsp14), Void) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp84 := yyvsp84 + 1 yyvsp14 := yyvsp14 -1 yyvsp2 := yyvsp2 -1 yyvsp121 := yyvsp121 -1 if yyvsp84 >= yyvsc84 then debug ("GEYACC") std.error.put_line ("Resize yyvs84") end yyvsc84 := yyvsc84 + yyInitial_yyvs_size yyvs84 := yyspecial_routines84.aliased_resized_area (yyvs84, yyvsc84) end yyspecial_routines84.force (yyvs84, yyval84, yyvsp84) end end yy_do_action_434 --|#line "eiffel.y" local yyval84: detachable ROUTINE_CREATION_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs25.item (yyvsp25) as l_target then yyval84 := ast_factory.new_agent_routine_creation_as (l_target.operand, yyvs2.item (yyvsp2), yyvs121.item (yyvsp121), True, yyvs14.item (yyvsp14), yyvs4.item (yyvsp4)) if attached yyval84 as l_agent then l_agent.set_lparan_symbol (l_target.lparan_symbol) l_agent.set_rparan_symbol (l_target.rparan_symbol) end else yyval84 := ast_factory.new_agent_routine_creation_as (Void, yyvs2.item (yyvsp2), yyvs121.item (yyvsp121), True, yyvs14.item (yyvsp14), yyvs4.item (yyvsp4)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp84 := yyvsp84 + 1 yyvsp14 := yyvsp14 -1 yyvsp25 := yyvsp25 -1 yyvsp4 := yyvsp4 -1 yyvsp2 := yyvsp2 -1 yyvsp121 := yyvsp121 -1 if yyvsp84 >= yyvsc84 then debug ("GEYACC") std.error.put_line ("Resize yyvs84") end yyvsc84 := yyvsc84 + yyInitial_yyvs_size yyvs84 := yyspecial_routines84.aliased_resized_area (yyvs84, yyvsc84) end yyspecial_routines84.force (yyvs84, yyval84, yyvsp84) end end yy_do_action_435 --|#line "eiffel.y" local yyval132: detachable FORMAL_ARGU_DEC_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp132 := yyvsp132 + 1 if yyvsp132 >= yyvsc132 then debug ("GEYACC") std.error.put_line ("Resize yyvs132") end yyvsc132 := yyvsc132 + yyInitial_yyvs_size yyvs132 := yyspecial_routines132.aliased_resized_area (yyvs132, yyvsc132) end yyspecial_routines132.force (yyvs132, yyval132, yyvsp132) end end yy_do_action_436 --|#line "eiffel.y" local yyval132: detachable FORMAL_ARGU_DEC_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval132 := yyvs132.item (yyvsp132) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines132.force (yyvs132, yyval132, yyvsp132) end end yy_do_action_437 --|#line "eiffel.y" local yyval25: detachable AGENT_TARGET_TRIPLE do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end inspect id_level when Precondition_level, Postcondition_level then set_has_unqualified_call_in_assertion (True) else -- Nothing to do. end yyval25 := ast_factory.new_agent_target_triple (Void, Void, ast_factory.new_operand_as (Void, ast_factory.new_expr_call_as (ast_factory.new_access_id_as (yyvs2.item (yyvsp2), Void)))) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp25 := yyvsp25 + 1 yyvsp2 := yyvsp2 -1 if yyvsp25 >= yyvsc25 then debug ("GEYACC") std.error.put_line ("Resize yyvs25") end yyvsc25 := yyvsc25 + yyInitial_yyvs_size yyvs25 := yyspecial_routines25.aliased_resized_area (yyvs25, yyvsc25) end yyspecial_routines25.force (yyvs25, yyval25, yyvsp25) end end yy_do_action_438 --|#line "eiffel.y" local yyval25: detachable AGENT_TARGET_TRIPLE do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval25 := ast_factory.new_agent_target_triple (yyvs4.item (yyvsp4 - 1), yyvs4.item (yyvsp4), ast_factory.new_operand_as (Void, yyvs50.item (yyvsp50))) if yy_parsing_status >= yyContinue then yyssp := yyssp - 7 yyvsp25 := yyvsp25 + 1 yyvsp4 := yyvsp4 -2 yyvsp1 := yyvsp1 -4 yyvsp50 := yyvsp50 -1 if yyvsp25 >= yyvsc25 then debug ("GEYACC") std.error.put_line ("Resize yyvs25") end yyvsc25 := yyvsc25 + yyInitial_yyvs_size yyvs25 := yyspecial_routines25.aliased_resized_area (yyvs25, yyvsc25) end yyspecial_routines25.force (yyvs25, yyval25, yyvsp25) end end yy_do_action_439 --|#line "eiffel.y" local yyval25: detachable AGENT_TARGET_TRIPLE do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval25 := ast_factory.new_agent_target_triple (Void, Void, ast_factory.new_operand_as (Void, yyvs8.item (yyvsp8))) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp25 := yyvsp25 + 1 yyvsp8 := yyvsp8 -1 if yyvsp25 >= yyvsc25 then debug ("GEYACC") std.error.put_line ("Resize yyvs25") end yyvsc25 := yyvsc25 + yyInitial_yyvs_size yyvs25 := yyspecial_routines25.aliased_resized_area (yyvs25, yyvsc25) end yyspecial_routines25.force (yyvs25, yyval25, yyvsp25) end end yy_do_action_440 --|#line "eiffel.y" local yyval25: detachable AGENT_TARGET_TRIPLE do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end inspect id_level when Precondition_level, Postcondition_level then set_has_unqualified_call_in_assertion (True) else -- Nothing to do. end yyval25 := ast_factory.new_agent_target_triple (Void, Void, ast_factory.new_operand_as (Void, yyvs11.item (yyvsp11))) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp25 := yyvsp25 + 1 yyvsp11 := yyvsp11 -1 if yyvsp25 >= yyvsc25 then debug ("GEYACC") std.error.put_line ("Resize yyvs25") end yyvsc25 := yyvsc25 + yyInitial_yyvs_size yyvs25 := yyspecial_routines25.aliased_resized_area (yyvs25, yyvsc25) end yyspecial_routines25.force (yyvs25, yyval25, yyvsp25) end end yy_do_action_441 --|#line "eiffel.y" local yyval25: detachable AGENT_TARGET_TRIPLE do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval25 := ast_factory.new_agent_target_triple (Void, Void, ast_factory.new_operand_as (yyvs88.item (yyvsp88), Void)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp25 := yyvsp25 + 1 yyvsp88 := yyvsp88 -1 if yyvsp25 >= yyvsc25 then debug ("GEYACC") std.error.put_line ("Resize yyvs25") end yyvsc25 := yyvsc25 + yyInitial_yyvs_size yyvs25 := yyspecial_routines25.aliased_resized_area (yyvs25, yyvsc25) end yyspecial_routines25.force (yyvs25, yyval25, yyvsp25) end end yy_do_action_442 --|#line "eiffel.y" local yyval25: detachable AGENT_TARGET_TRIPLE do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached ast_factory.new_operand_as (Void, Void) as l_temp_operand_as then l_temp_operand_as.set_question_mark_symbol (yyvs4.item (yyvsp4)) yyval25 := ast_factory.new_agent_target_triple (Void, Void, l_temp_operand_as) else yyval25 := ast_factory.new_agent_target_triple (Void, Void, Void) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp25 := yyvsp25 + 1 yyvsp4 := yyvsp4 -1 if yyvsp25 >= yyvsc25 then debug ("GEYACC") std.error.put_line ("Resize yyvs25") end yyvsc25 := yyvsc25 + yyInitial_yyvs_size yyvs25 := yyspecial_routines25.aliased_resized_area (yyvs25, yyvsc25) end yyspecial_routines25.force (yyvs25, yyval25, yyvsp25) end end yy_do_action_443 --|#line "eiffel.y" local yyval121: detachable DELAYED_ACTUAL_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp121 := yyvsp121 + 1 if yyvsp121 >= yyvsc121 then debug ("GEYACC") std.error.put_line ("Resize yyvs121") end yyvsc121 := yyvsc121 + yyInitial_yyvs_size yyvs121 := yyspecial_routines121.aliased_resized_area (yyvs121, yyvsc121) end yyspecial_routines121.force (yyvs121, yyval121, yyvsp121) end end yy_do_action_444 --|#line "eiffel.y" local yyval121: detachable DELAYED_ACTUAL_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- Per ECMA, this should be rejected. For now we only raise -- a warning. And on the compiler side, we will simply ignore them altogether. if has_syntax_warning then report_one_warning (create {SYNTAX_WARNING}.make (token_line (yyvs4.item (yyvsp4 - 1)), token_column (yyvs4.item (yyvsp4 - 1)), filename, locale.translation_in_context (once "Empty agent actual list is not allowed", once "parser.eiffel.warning"))) end yyval121 := ast_factory.new_delayed_actual_list_as (Void, yyvs4.item (yyvsp4 - 1), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp121 := yyvsp121 + 1 yyvsp4 := yyvsp4 -2 if yyvsp121 >= yyvsc121 then debug ("GEYACC") std.error.put_line ("Resize yyvs121") end yyvsc121 := yyvsc121 + yyInitial_yyvs_size yyvs121 := yyspecial_routines121.aliased_resized_area (yyvs121, yyvsc121) end yyspecial_routines121.force (yyvs121, yyval121, yyvsp121) end end yy_do_action_445 --|#line "eiffel.y" local yyval121: detachable DELAYED_ACTUAL_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval121 := ast_factory.new_delayed_actual_list_as (yyvs120.item (yyvsp120), yyvs4.item (yyvsp4 - 1), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp121 := yyvsp121 + 1 yyvsp4 := yyvsp4 -2 yyvsp1 := yyvsp1 -2 yyvsp120 := yyvsp120 -1 if yyvsp121 >= yyvsc121 then debug ("GEYACC") std.error.put_line ("Resize yyvs121") end yyvsc121 := yyvsc121 + yyInitial_yyvs_size yyvs121 := yyspecial_routines121.aliased_resized_area (yyvs121, yyvsc121) end yyspecial_routines121.force (yyvs121, yyval121, yyvsp121) end end yy_do_action_446 --|#line "eiffel.y" local yyval120: detachable EIFFEL_LIST [OPERAND_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs74.item (yyvsp74) as v then yyval120 := ast_factory.new_eiffel_list_operand_as (v, counter_value + 1) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp120 := yyvsp120 + 1 yyvsp74 := yyvsp74 -1 if yyvsp120 >= yyvsc120 then debug ("GEYACC") std.error.put_line ("Resize yyvs120") end yyvsc120 := yyvsc120 + yyInitial_yyvs_size yyvs120 := yyspecial_routines120.aliased_resized_area (yyvs120, yyvsc120) end yyspecial_routines120.force (yyvs120, yyval120, yyvsp120) end end yy_do_action_447 --|#line "eiffel.y" local yyval120: detachable EIFFEL_LIST [OPERAND_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval120 := yyvs120.item (yyvsp120) if attached yyval120 as l_list and then attached yyvs74.item (yyvsp74) as l_val then l_list.reverse_extend (l_val) ast_factory.reverse_extend_separator (l_list, yyvs4.item (yyvsp4)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp74 := yyvsp74 -1 yyvsp4 := yyvsp4 -1 yyvsp1 := yyvsp1 -1 yyspecial_routines120.force (yyvs120, yyval120, yyvsp120) end end yy_do_action_448 --|#line "eiffel.y" local yyval74: detachable OPERAND_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval74 := ast_factory.new_operand_as (Void, Void) if attached yyval74 as l_actual then l_actual.set_question_mark_symbol (yyvs4.item (yyvsp4)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp74 := yyvsp74 + 1 yyvsp4 := yyvsp4 -1 if yyvsp74 >= yyvsc74 then debug ("GEYACC") std.error.put_line ("Resize yyvs74") end yyvsc74 := yyvsc74 + yyInitial_yyvs_size yyvs74 := yyspecial_routines74.aliased_resized_area (yyvs74, yyvsc74) end yyspecial_routines74.force (yyvs74, yyval74, yyvsp74) end end yy_do_action_449 --|#line "eiffel.y" local yyval74: detachable OPERAND_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval74 := ast_factory.new_operand_as (yyvs88.item (yyvsp88), Void) if attached yyval74 as l_actual then l_actual.set_question_mark_symbol (yyvs4.item (yyvsp4)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp74 := yyvsp74 + 1 yyvsp88 := yyvsp88 -1 yyvsp4 := yyvsp4 -1 if yyvsp74 >= yyvsc74 then debug ("GEYACC") std.error.put_line ("Resize yyvs74") end yyvsc74 := yyvsc74 + yyInitial_yyvs_size yyvs74 := yyspecial_routines74.aliased_resized_area (yyvs74, yyvsc74) end yyspecial_routines74.force (yyvs74, yyval74, yyvsp74) end end yy_do_action_450 --|#line "eiffel.y" local yyval74: detachable OPERAND_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval74 := ast_factory.new_operand_as (Void, yyvs50.item (yyvsp50)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp74 := yyvsp74 + 1 yyvsp50 := yyvsp50 -1 if yyvsp74 >= yyvsc74 then debug ("GEYACC") std.error.put_line ("Resize yyvs74") end yyvsc74 := yyvsc74 + yyInitial_yyvs_size yyvs74 := yyspecial_routines74.aliased_resized_area (yyvs74, yyvsc74) end yyspecial_routines74.force (yyvs74, yyval74, yyvsp74) end end yy_do_action_451 --|#line "eiffel.y" local yyval43: detachable CREATION_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval43 := ast_factory.new_creation_as (yyvs34.item (yyvsp34), Void, yyvs26.item (yyvsp26), yyvs28.item (yyvsp28), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp43 := yyvsp43 + 1 yyvsp14 := yyvsp14 -1 yyvsp34 := yyvsp34 -1 yyvsp26 := yyvsp26 -1 yyvsp28 := yyvsp28 -1 if yyvsp43 >= yyvsc43 then debug ("GEYACC") std.error.put_line ("Resize yyvs43") end yyvsc43 := yyvsc43 + yyInitial_yyvs_size yyvs43 := yyspecial_routines43.aliased_resized_area (yyvs43, yyvsc43) end yyspecial_routines43.force (yyvs43, yyval43, yyvsp43) end end yy_do_action_452 --|#line "eiffel.y" local yyval43: detachable CREATION_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval43 := ast_factory.new_creation_as (yyvs34.item (yyvsp34), yyvs88.item (yyvsp88), yyvs26.item (yyvsp26), yyvs28.item (yyvsp28), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp43 := yyvsp43 + 1 yyvsp14 := yyvsp14 -1 yyvsp34 := yyvsp34 -1 yyvsp88 := yyvsp88 -1 yyvsp26 := yyvsp26 -1 yyvsp28 := yyvsp28 -1 if yyvsp43 >= yyvsc43 then debug ("GEYACC") std.error.put_line ("Resize yyvs43") end yyvsc43 := yyvsc43 + yyInitial_yyvs_size yyvs43 := yyspecial_routines43.aliased_resized_area (yyvs43, yyvsc43) end yyspecial_routines43.force (yyvs43, yyval43, yyvsp43) end end yy_do_action_453 --|#line "eiffel.y" local yyval44: detachable CREATION_EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval44 := ast_factory.new_creation_expr_as (yyvs34.item (yyvsp34), yyvs88.item (yyvsp88), yyvs28.item (yyvsp28), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp44 := yyvsp44 + 1 yyvsp14 := yyvsp14 -1 yyvsp34 := yyvsp34 -1 yyvsp88 := yyvsp88 -1 yyvsp28 := yyvsp28 -1 if yyvsp44 >= yyvsc44 then debug ("GEYACC") std.error.put_line ("Resize yyvs44") end yyvsc44 := yyvsc44 + yyInitial_yyvs_size yyvs44 := yyspecial_routines44.aliased_resized_area (yyvs44, yyvsc44) end yyspecial_routines44.force (yyvs44, yyval44, yyvsp44) end end yy_do_action_454 --|#line "eiffel.y" local yyval34: BOOLEAN do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval34 := True if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp34 := yyvsp34 + 1 if yyvsp34 >= yyvsc34 then debug ("GEYACC") std.error.put_line ("Resize yyvs34") end yyvsc34 := yyvsc34 + yyInitial_yyvs_size yyvs34 := yyspecial_routines34.aliased_resized_area (yyvs34, yyvsc34) end yyspecial_routines34.force (yyvs34, yyval34, yyvsp34) end end yy_do_action_455 --|#line "eiffel.y" local yyval34: BOOLEAN do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval34 := True if attached yyvs2.item (yyvsp2) as l_id then if {PREDEFINED_NAMES}.none_class_name_id = l_id.name_id then yyval34 := False else report_one_error (create {SYNTAX_ERROR}.make (token_line (yyvs2.item (yyvsp2)), token_column (yyvs2.item (yyvsp2)), filename, locale.translation_in_context ("Passive regions should use type specifier %"NONE%".", once "parser.eiffel.error"))) end end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp34 := yyvsp34 + 1 yyvsp4 := yyvsp4 -2 yyvsp2 := yyvsp2 -1 if yyvsp34 >= yyvsc34 then debug ("GEYACC") std.error.put_line ("Resize yyvs34") end yyvsc34 := yyvsc34 + yyInitial_yyvs_size yyvs34 := yyspecial_routines34.aliased_resized_area (yyvs34, yyvsc34) end yyspecial_routines34.force (yyvs34, yyval34, yyvsp34) end end yy_do_action_456 --|#line "eiffel.y" local yyval26: detachable ACCESS_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval26 := ast_factory.new_access_id_as (yyvs2.item (yyvsp2), Void) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp26 := yyvsp26 + 1 yyvsp2 := yyvsp2 -1 if yyvsp26 >= yyvsc26 then debug ("GEYACC") std.error.put_line ("Resize yyvs26") end yyvsc26 := yyvsc26 + yyInitial_yyvs_size yyvs26 := yyspecial_routines26.aliased_resized_area (yyvs26, yyvsc26) end yyspecial_routines26.force (yyvs26, yyval26, yyvsp26) end end yy_do_action_457 --|#line "eiffel.y" local yyval26: detachable ACCESS_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval26 := yyvs8.item (yyvsp8) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp26 := yyvsp26 + 1 yyvsp8 := yyvsp8 -1 if yyvsp26 >= yyvsc26 then debug ("GEYACC") std.error.put_line ("Resize yyvs26") end yyvsc26 := yyvsc26 + yyInitial_yyvs_size yyvs26 := yyspecial_routines26.aliased_resized_area (yyvs26, yyvsc26) end yyspecial_routines26.force (yyvs26, yyval26, yyvsp26) end end yy_do_action_458 --|#line "eiffel.y" local yyval28: detachable ACCESS_INV_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp28 := yyvsp28 + 1 if yyvsp28 >= yyvsc28 then debug ("GEYACC") std.error.put_line ("Resize yyvs28") end yyvsc28 := yyvsc28 + yyInitial_yyvs_size yyvs28 := yyspecial_routines28.aliased_resized_area (yyvs28, yyvsc28) end yyspecial_routines28.force (yyvs28, yyval28, yyvsp28) end end yy_do_action_459 --|#line "eiffel.y" local yyval28: detachable ACCESS_INV_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval28 := ast_factory.new_access_inv_as (yyvs2.item (yyvsp2), yyvs105.item (yyvsp105), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp28 := yyvsp28 + 1 yyvsp4 := yyvsp4 -1 yyvsp2 := yyvsp2 -1 yyvsp105 := yyvsp105 -1 if yyvsp28 >= yyvsc28 then debug ("GEYACC") std.error.put_line ("Resize yyvs28") end yyvsc28 := yyvsc28 + yyInitial_yyvs_size yyvs28 := yyspecial_routines28.aliased_resized_area (yyvs28, yyvsc28) end yyspecial_routines28.force (yyvs28, yyval28, yyvsp28) end end yy_do_action_460 --|#line "eiffel.y" local yyval35: detachable CALL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval35 := yyvs26.item (yyvsp26) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp35 := yyvsp35 + 1 yyvsp26 := yyvsp26 -1 if yyvsp35 >= yyvsc35 then debug ("GEYACC") std.error.put_line ("Resize yyvs35") end yyvsc35 := yyvsc35 + yyInitial_yyvs_size yyvs35 := yyspecial_routines35.aliased_resized_area (yyvs35, yyvsc35) end yyspecial_routines35.force (yyvs35, yyval35, yyvsp35) end end yy_do_action_461 --|#line "eiffel.y" local yyval35: detachable CALL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval35 := yyvs76.item (yyvsp76) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp35 := yyvsp35 + 1 yyvsp76 := yyvsp76 -1 if yyvsp35 >= yyvsc35 then debug ("GEYACC") std.error.put_line ("Resize yyvs35") end yyvsc35 := yyvsc35 + yyInitial_yyvs_size yyvs35 := yyspecial_routines35.aliased_resized_area (yyvs35, yyvsc35) end yyspecial_routines35.force (yyvs35, yyval35, yyvsp35) end end yy_do_action_462 --|#line "eiffel.y" local yyval35: detachable CALL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval35 := yyvs77.item (yyvsp77) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp35 := yyvsp35 + 1 yyvsp77 := yyvsp77 -1 if yyvsp35 >= yyvsc35 then debug ("GEYACC") std.error.put_line ("Resize yyvs35") end yyvsc35 := yyvsc35 + yyInitial_yyvs_size yyvs35 := yyspecial_routines35.aliased_resized_area (yyvs35, yyvsc35) end yyspecial_routines35.force (yyvs35, yyval35, yyvsp35) end end yy_do_action_463 --|#line "eiffel.y" local yyval35: detachable CALL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval35 := yyvs73.item (yyvsp73) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp35 := yyvsp35 + 1 yyvsp73 := yyvsp73 -1 if yyvsp35 >= yyvsc35 then debug ("GEYACC") std.error.put_line ("Resize yyvs35") end yyvsc35 := yyvsc35 + yyInitial_yyvs_size yyvs35 := yyspecial_routines35.aliased_resized_area (yyvs35, yyvsc35) end yyspecial_routines35.force (yyvs35, yyval35, yyvsp35) end end yy_do_action_464 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if syntax_version = obsolete_syntax then yyval50 := ast_factory.new_un_free_as (extract_id_from_symbol (yyvs6.item (yyvsp6)), ast_factory.new_expr_call_as (ast_factory.new_access_id_as (yyvs2.item (yyvsp2), Void))) if has_syntax_warning then report_one_warning (create {SYNTAX_WARNING}.make (token_line (extract_id_from_symbol (yyvs6.item (yyvsp6))), token_column (extract_id_from_symbol (yyvs6.item (yyvsp6))), filename, locale.translation_in_context (once "Obsolete operator notation `@` is used. Replace it with a contemporary operator (if available) or an unfolded form of feature call.", once "parser.eiffel.warning"))) end else yyval50 := ast_factory.new_predecessor_as (yyvs2.item (yyvsp2), extract_symbol (yyvs6.item (yyvsp6))) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp50 := yyvsp50 + 1 yyvsp6 := yyvsp6 -1 yyvsp2 := yyvsp2 -1 if yyvsp50 >= yyvsc50 then debug ("GEYACC") std.error.put_line ("Resize yyvs50") end yyvsc50 := yyvsc50 + yyInitial_yyvs_size yyvs50 := yyspecial_routines50.aliased_resized_area (yyvs50, yyvsc50) end yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_465 --|#line "eiffel.y" local yyval38: detachable CHECK_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval38 := ast_factory.new_check_as (yyvs127.item (yyvsp127), yyvs14.item (yyvsp14 - 1), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp38 := yyvsp38 + 1 yyvsp14 := yyvsp14 -2 yyvsp127 := yyvsp127 -1 if yyvsp38 >= yyvsc38 then debug ("GEYACC") std.error.put_line ("Resize yyvs38") end yyvsc38 := yyvsc38 + yyInitial_yyvs_size yyvs38 := yyspecial_routines38.aliased_resized_area (yyvs38, yyvsc38) end yyspecial_routines38.force (yyvs38, yyval38, yyvsp38) end end yy_do_action_466 --|#line "eiffel.y" local yyval59: detachable GUARD_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval59 := ast_factory.new_guard_as (yyvs14.item (yyvsp14 - 2), yyvs127.item (yyvsp127), yyvs14.item (yyvsp14 - 1), yyvs118.item (yyvsp118), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp59 := yyvsp59 + 1 yyvsp14 := yyvsp14 -3 yyvsp127 := yyvsp127 -1 yyvsp118 := yyvsp118 -1 if yyvsp59 >= yyvsc59 then debug ("GEYACC") std.error.put_line ("Resize yyvs59") end yyvsc59 := yyvsc59 + yyInitial_yyvs_size yyvs59 := yyspecial_routines59.aliased_resized_area (yyvs59, yyvsc59) end yyspecial_routines59.force (yyvs59, yyval59, yyvsp59) end end yy_do_action_467 --|#line "eiffel.y" local yyval85: detachable SEPARATE_INSTRUCTION_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval85 := ast_factory.new_separate_instruction_as (yyvs14.item (yyvsp14 - 2), yyvs109.item (yyvsp109), yyvs14.item (yyvsp14 - 1), yyvs118.item (yyvsp118), yyvs14.item (yyvsp14)) leave_scope if yy_parsing_status >= yyContinue then yyssp := yyssp - 8 yyvsp14 := yyvsp14 -3 yyvsp1 := yyvsp1 -2 yyvsp109 := yyvsp109 -1 yyvsp118 := yyvsp118 -1 yyspecial_routines85.force (yyvs85, yyval85, yyvsp85) end end yy_do_action_468 --|#line "eiffel.y" local yyval85: detachable SEPARATE_INSTRUCTION_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end enter_scope if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp85 := yyvsp85 + 1 if yyvsp85 >= yyvsc85 then debug ("GEYACC") std.error.put_line ("Resize yyvs85") end yyvsc85 := yyvsc85 + yyInitial_yyvs_size yyvs85 := yyspecial_routines85.aliased_resized_area (yyvs85, yyvsc85) end yyspecial_routines85.force (yyvs85, yyval85, yyvsp85) end end yy_do_action_469 --|#line "eiffel.y" local yyval72: detachable NAMED_EXPRESSION_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval72 := ast_factory.new_named_expression_as (yyvs50.item (yyvsp50), yyvs14.item (yyvsp14), yyvs2.item (yyvsp2)) add_scope_separate (yyvs2.item (yyvsp2)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp72 := yyvsp72 + 1 yyvsp50 := yyvsp50 -1 yyvsp14 := yyvsp14 -1 yyvsp2 := yyvsp2 -1 if yyvsp72 >= yyvsc72 then debug ("GEYACC") std.error.put_line ("Resize yyvs72") end yyvsc72 := yyvsc72 + yyInitial_yyvs_size yyvs72 := yyspecial_routines72.aliased_resized_area (yyvs72, yyvsc72) end yyspecial_routines72.force (yyvs72, yyval72, yyvsp72) end end yy_do_action_470 --|#line "eiffel.y" local yyval109: detachable EIFFEL_LIST [NAMED_EXPRESSION_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs72.item (yyvsp72) as v then yyval109 := ast_factory.new_eiffel_list_named_expression_as (v, counter_value + 1) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp109 := yyvsp109 + 1 yyvsp72 := yyvsp72 -1 if yyvsp109 >= yyvsc109 then debug ("GEYACC") std.error.put_line ("Resize yyvs109") end yyvsc109 := yyvsc109 + yyInitial_yyvs_size yyvs109 := yyspecial_routines109.aliased_resized_area (yyvs109, yyvsc109) end yyspecial_routines109.force (yyvs109, yyval109, yyvsp109) end end yy_do_action_471 --|#line "eiffel.y" local yyval109: detachable EIFFEL_LIST [NAMED_EXPRESSION_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval109 := yyvs109.item (yyvsp109) if attached yyval109 as l_list and then attached yyvs72.item (yyvsp72) as l_val then l_list.reverse_extend (l_val) ast_factory.reverse_extend_separator (l_list, yyvs4.item (yyvsp4)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp72 := yyvsp72 -1 yyvsp4 := yyvsp4 -1 yyvsp1 := yyvsp1 -1 yyspecial_routines109.force (yyvs109, yyval109, yyvsp109) end end yy_do_action_472 --|#line "eiffel.y" local yyval88: detachable TYPE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval88 := yyvs88.item (yyvsp88) if attached yyval88 as l_type then l_type.set_lcurly_symbol (yyvs4.item (yyvsp4 - 1)) l_type.set_rcurly_symbol (yyvs4.item (yyvsp4)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp4 := yyvsp4 -2 yyspecial_routines88.force (yyvs88, yyval88, yyvsp88) end end yy_do_action_473 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval50 := yyvs66.item (yyvsp66) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp50 := yyvsp50 + 1 yyvsp66 := yyvsp66 -1 if yyvsp50 >= yyvsc50 then debug ("GEYACC") std.error.put_line ("Resize yyvs50") end yyvsc50 := yyvsc50 + yyInitial_yyvs_size yyvs50 := yyspecial_routines50.aliased_resized_area (yyvs50, yyvsc50) end yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_474 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval50 := yyvs78.item (yyvsp78) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp50 := yyvsp50 + 1 yyvsp78 := yyvsp78 -1 if yyvsp50 >= yyvsc50 then debug ("GEYACC") std.error.put_line ("Resize yyvs50") end yyvsc50 := yyvsc50 + yyInitial_yyvs_size yyvs50 := yyspecial_routines50.aliased_resized_area (yyvs50, yyvsc50) end yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_475 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval50 := yyvs50.item (yyvsp50) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_476 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval50 := ast_factory.new_bin_tilde_as (yyvs50.item (yyvsp50 - 1), yyvs50.item (yyvsp50), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp50 := yyvsp50 -1 yyvsp4 := yyvsp4 -1 yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_477 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval50 := ast_factory.new_bin_not_tilde_as (yyvs50.item (yyvsp50 - 1), yyvs50.item (yyvsp50), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp50 := yyvsp50 -1 yyvsp4 := yyvsp4 -1 yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_478 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval50 := ast_factory.new_bin_eq_as (yyvs50.item (yyvsp50 - 1), yyvs50.item (yyvsp50), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp50 := yyvsp50 -1 yyvsp4 := yyvsp4 -1 yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_479 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval50 := ast_factory.new_bin_ne_as (yyvs50.item (yyvsp50 - 1), yyvs50.item (yyvsp50), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp50 := yyvsp50 -1 yyvsp4 := yyvsp4 -1 yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_480 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval50 := yyvs32.item (yyvsp32) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp50 := yyvsp50 + 1 yyvsp32 := yyvsp32 -1 if yyvsp50 >= yyvsc50 then debug ("GEYACC") std.error.put_line ("Resize yyvs50") end yyvsc50 := yyvsc50 + yyInitial_yyvs_size yyvs50 := yyspecial_routines50.aliased_resized_area (yyvs50, yyvsc50) end yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_481 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end check_object_test_expression (yyvs50.item (yyvsp50)) yyval50 := ast_factory.new_object_test_as (extract_keyword (yyvs15.item (yyvsp15)), Void, yyvs50.item (yyvsp50), Void, Void) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp15 := yyvsp15 -1 yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_482 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end check_object_test_expression (yyvs50.item (yyvsp50)) yyval50 := ast_factory.new_object_test_as (extract_keyword (yyvs15.item (yyvsp15)), Void, yyvs50.item (yyvsp50), yyvs14.item (yyvsp14), yyvs2.item (yyvsp2)) add_scope_test (yyvs2.item (yyvsp2)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp15 := yyvsp15 -1 yyvsp14 := yyvsp14 -1 yyvsp2 := yyvsp2 -1 yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_483 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs88.item (yyvsp88) as l_type then l_type.set_lcurly_symbol (yyvs4.item (yyvsp4 - 1)) l_type.set_rcurly_symbol (yyvs4.item (yyvsp4)) end yyval50 := ast_factory.new_object_test_as (extract_keyword (yyvs15.item (yyvsp15)), yyvs88.item (yyvsp88), yyvs50.item (yyvsp50), Void, Void) if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp15 := yyvsp15 -1 yyvsp4 := yyvsp4 -2 yyvsp88 := yyvsp88 -1 yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_484 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs88.item (yyvsp88) as l_type then l_type.set_lcurly_symbol (yyvs4.item (yyvsp4 - 1)) l_type.set_rcurly_symbol (yyvs4.item (yyvsp4)) end yyval50 := ast_factory.new_object_test_as (extract_keyword (yyvs15.item (yyvsp15)), yyvs88.item (yyvsp88), yyvs50.item (yyvsp50), yyvs14.item (yyvsp14), yyvs2.item (yyvsp2)) if attached yyvs2.item (yyvsp2) as l_name and attached yyvs88.item (yyvsp88) as l_type then insert_object_test_locals ([l_name, l_type]) end add_scope_test (yyvs2.item (yyvsp2)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 7 yyvsp15 := yyvsp15 -1 yyvsp4 := yyvsp4 -2 yyvsp88 := yyvsp88 -1 yyvsp14 := yyvsp14 -1 yyvsp2 := yyvsp2 -1 yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_485 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval50 := ast_factory.new_old_syntax_object_test_as (yyvs4.item (yyvsp4 - 2), yyvs2.item (yyvsp2), yyvs88.item (yyvsp88), yyvs50.item (yyvsp50)) if attached yyvs2.item (yyvsp2) as l_name and attached yyvs88.item (yyvsp88) as l_type then insert_object_test_locals ([l_name, l_type]) end if has_syntax_warning then report_one_warning (create {SYNTAX_WARNING}.make (token_line (yyvs4.item (yyvsp4 - 2)), token_column (yyvs4.item (yyvsp4 - 2)), filename, locale.translation_in_context (once "Use the following syntax for object test: `attached {T} exp as x`.", once "parser.eiffel.warning"))) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 6 yyvsp4 := yyvsp4 -3 yyvsp2 := yyvsp2 -1 yyvsp88 := yyvsp88 -1 yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_486 --|#line "eiffel.y" local yyval32: detachable BINARY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval32 := ast_factory.new_bin_plus_as (yyvs50.item (yyvsp50 - 1), yyvs50.item (yyvsp50), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp32 := yyvsp32 + 1 yyvsp50 := yyvsp50 -2 yyvsp4 := yyvsp4 -1 if yyvsp32 >= yyvsc32 then debug ("GEYACC") std.error.put_line ("Resize yyvs32") end yyvsc32 := yyvsc32 + yyInitial_yyvs_size yyvs32 := yyspecial_routines32.aliased_resized_area (yyvs32, yyvsc32) end yyspecial_routines32.force (yyvs32, yyval32, yyvsp32) end end yy_do_action_487 --|#line "eiffel.y" local yyval32: detachable BINARY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval32 := ast_factory.new_bin_minus_as (yyvs50.item (yyvsp50 - 1), yyvs50.item (yyvsp50), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp32 := yyvsp32 + 1 yyvsp50 := yyvsp50 -2 yyvsp4 := yyvsp4 -1 if yyvsp32 >= yyvsc32 then debug ("GEYACC") std.error.put_line ("Resize yyvs32") end yyvsc32 := yyvsc32 + yyInitial_yyvs_size yyvs32 := yyspecial_routines32.aliased_resized_area (yyvs32, yyvsc32) end yyspecial_routines32.force (yyvs32, yyval32, yyvsp32) end end yy_do_action_488 --|#line "eiffel.y" local yyval32: detachable BINARY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval32 := ast_factory.new_bin_star_as (yyvs50.item (yyvsp50 - 1), yyvs50.item (yyvsp50), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp32 := yyvsp32 + 1 yyvsp50 := yyvsp50 -2 yyvsp4 := yyvsp4 -1 if yyvsp32 >= yyvsc32 then debug ("GEYACC") std.error.put_line ("Resize yyvs32") end yyvsc32 := yyvsc32 + yyInitial_yyvs_size yyvs32 := yyspecial_routines32.aliased_resized_area (yyvs32, yyvsc32) end yyspecial_routines32.force (yyvs32, yyval32, yyvsp32) end end yy_do_action_489 --|#line "eiffel.y" local yyval32: detachable BINARY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval32 := ast_factory.new_bin_slash_as (yyvs50.item (yyvsp50 - 1), yyvs50.item (yyvsp50), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp32 := yyvsp32 + 1 yyvsp50 := yyvsp50 -2 yyvsp4 := yyvsp4 -1 if yyvsp32 >= yyvsc32 then debug ("GEYACC") std.error.put_line ("Resize yyvs32") end yyvsc32 := yyvsc32 + yyInitial_yyvs_size yyvs32 := yyspecial_routines32.aliased_resized_area (yyvs32, yyvsc32) end yyspecial_routines32.force (yyvs32, yyval32, yyvsp32) end end yy_do_action_490 --|#line "eiffel.y" local yyval32: detachable BINARY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval32 := ast_factory.new_bin_mod_as (yyvs50.item (yyvsp50 - 1), yyvs50.item (yyvsp50), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp32 := yyvsp32 + 1 yyvsp50 := yyvsp50 -2 yyvsp4 := yyvsp4 -1 if yyvsp32 >= yyvsc32 then debug ("GEYACC") std.error.put_line ("Resize yyvs32") end yyvsc32 := yyvsc32 + yyInitial_yyvs_size yyvs32 := yyspecial_routines32.aliased_resized_area (yyvs32, yyvsc32) end yyspecial_routines32.force (yyvs32, yyval32, yyvsp32) end end yy_do_action_491 --|#line "eiffel.y" local yyval32: detachable BINARY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval32 := ast_factory.new_bin_div_as (yyvs50.item (yyvsp50 - 1), yyvs50.item (yyvsp50), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp32 := yyvsp32 + 1 yyvsp50 := yyvsp50 -2 yyvsp4 := yyvsp4 -1 if yyvsp32 >= yyvsc32 then debug ("GEYACC") std.error.put_line ("Resize yyvs32") end yyvsc32 := yyvsc32 + yyInitial_yyvs_size yyvs32 := yyspecial_routines32.aliased_resized_area (yyvs32, yyvsc32) end yyspecial_routines32.force (yyvs32, yyval32, yyvsp32) end end yy_do_action_492 --|#line "eiffel.y" local yyval32: detachable BINARY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval32 := ast_factory.new_bin_power_as (yyvs50.item (yyvsp50 - 1), yyvs50.item (yyvsp50), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp32 := yyvsp32 + 1 yyvsp50 := yyvsp50 -2 yyvsp4 := yyvsp4 -1 if yyvsp32 >= yyvsc32 then debug ("GEYACC") std.error.put_line ("Resize yyvs32") end yyvsc32 := yyvsc32 + yyInitial_yyvs_size yyvs32 := yyspecial_routines32.aliased_resized_area (yyvs32, yyvsc32) end yyspecial_routines32.force (yyvs32, yyval32, yyvsp32) end end yy_do_action_493 --|#line "eiffel.y" local yyval32: detachable BINARY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval32 := ast_factory.new_bin_and_as (yyvs50.item (yyvsp50 - 1), yyvs50.item (yyvsp50), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp32 := yyvsp32 + 1 yyvsp50 := yyvsp50 -2 yyvsp14 := yyvsp14 -1 if yyvsp32 >= yyvsc32 then debug ("GEYACC") std.error.put_line ("Resize yyvs32") end yyvsc32 := yyvsc32 + yyInitial_yyvs_size yyvs32 := yyspecial_routines32.aliased_resized_area (yyvs32, yyvsc32) end yyspecial_routines32.force (yyvs32, yyval32, yyvsp32) end end yy_do_action_494 --|#line "eiffel.y" local yyval32: detachable BINARY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval32 := ast_factory.new_bin_free_as (yyvs50.item (yyvsp50 - 1), yyvs2.item (yyvsp2), yyvs50.item (yyvsp50)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp32 := yyvsp32 + 1 yyvsp50 := yyvsp50 -2 yyvsp2 := yyvsp2 -1 if yyvsp32 >= yyvsc32 then debug ("GEYACC") std.error.put_line ("Resize yyvs32") end yyvsc32 := yyvsc32 + yyInitial_yyvs_size yyvs32 := yyspecial_routines32.aliased_resized_area (yyvs32, yyvsc32) end yyspecial_routines32.force (yyvs32, yyval32, yyvsp32) end end yy_do_action_495 --|#line "eiffel.y" local yyval32: detachable BINARY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval32 := ast_factory.new_bin_and_then_as (yyvs50.item (yyvsp50 - 1), yyvs50.item (yyvsp50), yyvs14.item (yyvsp14 - 1), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp32 := yyvsp32 + 1 yyvsp50 := yyvsp50 -2 yyvsp14 := yyvsp14 -2 if yyvsp32 >= yyvsc32 then debug ("GEYACC") std.error.put_line ("Resize yyvs32") end yyvsc32 := yyvsc32 + yyInitial_yyvs_size yyvs32 := yyspecial_routines32.aliased_resized_area (yyvs32, yyvsc32) end yyspecial_routines32.force (yyvs32, yyval32, yyvsp32) end end yy_do_action_496 --|#line "eiffel.y" local yyval32: detachable BINARY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval32 := ast_factory.new_bin_free_as (yyvs50.item (yyvsp50 - 1), yyvs2.item (yyvsp2), yyvs50.item (yyvsp50)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp32 := yyvsp32 + 1 yyvsp50 := yyvsp50 -2 yyvsp2 := yyvsp2 -1 if yyvsp32 >= yyvsc32 then debug ("GEYACC") std.error.put_line ("Resize yyvs32") end yyvsc32 := yyvsc32 + yyInitial_yyvs_size yyvs32 := yyspecial_routines32.aliased_resized_area (yyvs32, yyvsc32) end yyspecial_routines32.force (yyvs32, yyval32, yyvsp32) end end yy_do_action_497 --|#line "eiffel.y" local yyval32: detachable BINARY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval32 := ast_factory.new_bin_or_as (yyvs50.item (yyvsp50 - 1), yyvs50.item (yyvsp50), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp32 := yyvsp32 + 1 yyvsp50 := yyvsp50 -2 yyvsp14 := yyvsp14 -1 if yyvsp32 >= yyvsc32 then debug ("GEYACC") std.error.put_line ("Resize yyvs32") end yyvsc32 := yyvsc32 + yyInitial_yyvs_size yyvs32 := yyspecial_routines32.aliased_resized_area (yyvs32, yyvsc32) end yyspecial_routines32.force (yyvs32, yyval32, yyvsp32) end end yy_do_action_498 --|#line "eiffel.y" local yyval32: detachable BINARY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval32 := ast_factory.new_bin_free_as (yyvs50.item (yyvsp50 - 1), yyvs2.item (yyvsp2), yyvs50.item (yyvsp50)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp32 := yyvsp32 + 1 yyvsp50 := yyvsp50 -2 yyvsp2 := yyvsp2 -1 if yyvsp32 >= yyvsc32 then debug ("GEYACC") std.error.put_line ("Resize yyvs32") end yyvsc32 := yyvsc32 + yyInitial_yyvs_size yyvs32 := yyspecial_routines32.aliased_resized_area (yyvs32, yyvsc32) end yyspecial_routines32.force (yyvs32, yyval32, yyvsp32) end end yy_do_action_499 --|#line "eiffel.y" local yyval32: detachable BINARY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval32 := ast_factory.new_bin_or_else_as (yyvs50.item (yyvsp50 - 1), yyvs50.item (yyvsp50),yyvs14.item (yyvsp14 - 1), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp32 := yyvsp32 + 1 yyvsp50 := yyvsp50 -2 yyvsp14 := yyvsp14 -2 if yyvsp32 >= yyvsc32 then debug ("GEYACC") std.error.put_line ("Resize yyvs32") end yyvsc32 := yyvsc32 + yyInitial_yyvs_size yyvs32 := yyspecial_routines32.aliased_resized_area (yyvs32, yyvsc32) end yyspecial_routines32.force (yyvs32, yyval32, yyvsp32) end end yy_do_action_500 --|#line "eiffel.y" local yyval32: detachable BINARY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval32 := ast_factory.new_bin_free_as (yyvs50.item (yyvsp50 - 1), yyvs2.item (yyvsp2), yyvs50.item (yyvsp50)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp32 := yyvsp32 + 1 yyvsp50 := yyvsp50 -2 yyvsp2 := yyvsp2 -1 if yyvsp32 >= yyvsc32 then debug ("GEYACC") std.error.put_line ("Resize yyvs32") end yyvsc32 := yyvsc32 + yyInitial_yyvs_size yyvs32 := yyspecial_routines32.aliased_resized_area (yyvs32, yyvsc32) end yyspecial_routines32.force (yyvs32, yyval32, yyvsp32) end end yy_do_action_501 --|#line "eiffel.y" local yyval32: detachable BINARY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval32 := ast_factory.new_bin_implies_as (yyvs50.item (yyvsp50 - 1), yyvs50.item (yyvsp50), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp32 := yyvsp32 + 1 yyvsp50 := yyvsp50 -2 yyvsp14 := yyvsp14 -1 if yyvsp32 >= yyvsc32 then debug ("GEYACC") std.error.put_line ("Resize yyvs32") end yyvsc32 := yyvsc32 + yyInitial_yyvs_size yyvs32 := yyspecial_routines32.aliased_resized_area (yyvs32, yyvsc32) end yyspecial_routines32.force (yyvs32, yyval32, yyvsp32) end end yy_do_action_502 --|#line "eiffel.y" local yyval32: detachable BINARY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval32 := ast_factory.new_bin_free_as (yyvs50.item (yyvsp50 - 1), yyvs2.item (yyvsp2), yyvs50.item (yyvsp50)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp32 := yyvsp32 + 1 yyvsp50 := yyvsp50 -2 yyvsp2 := yyvsp2 -1 if yyvsp32 >= yyvsc32 then debug ("GEYACC") std.error.put_line ("Resize yyvs32") end yyvsc32 := yyvsc32 + yyInitial_yyvs_size yyvs32 := yyspecial_routines32.aliased_resized_area (yyvs32, yyvsc32) end yyspecial_routines32.force (yyvs32, yyval32, yyvsp32) end end yy_do_action_503 --|#line "eiffel.y" local yyval32: detachable BINARY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval32 := ast_factory.new_bin_xor_as (yyvs50.item (yyvsp50 - 1), yyvs50.item (yyvsp50), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp32 := yyvsp32 + 1 yyvsp50 := yyvsp50 -2 yyvsp14 := yyvsp14 -1 if yyvsp32 >= yyvsc32 then debug ("GEYACC") std.error.put_line ("Resize yyvs32") end yyvsc32 := yyvsc32 + yyInitial_yyvs_size yyvs32 := yyspecial_routines32.aliased_resized_area (yyvs32, yyvsc32) end yyspecial_routines32.force (yyvs32, yyval32, yyvsp32) end end yy_do_action_504 --|#line "eiffel.y" local yyval32: detachable BINARY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval32 := ast_factory.new_bin_free_as (yyvs50.item (yyvsp50 - 1), yyvs2.item (yyvsp2), yyvs50.item (yyvsp50)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp32 := yyvsp32 + 1 yyvsp50 := yyvsp50 -2 yyvsp2 := yyvsp2 -1 if yyvsp32 >= yyvsc32 then debug ("GEYACC") std.error.put_line ("Resize yyvs32") end yyvsc32 := yyvsc32 + yyInitial_yyvs_size yyvs32 := yyspecial_routines32.aliased_resized_area (yyvs32, yyvsc32) end yyspecial_routines32.force (yyvs32, yyval32, yyvsp32) end end yy_do_action_505 --|#line "eiffel.y" local yyval32: detachable BINARY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval32 := ast_factory.new_bin_ge_as (yyvs50.item (yyvsp50 - 1), yyvs50.item (yyvsp50), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp32 := yyvsp32 + 1 yyvsp50 := yyvsp50 -2 yyvsp4 := yyvsp4 -1 if yyvsp32 >= yyvsc32 then debug ("GEYACC") std.error.put_line ("Resize yyvs32") end yyvsc32 := yyvsc32 + yyInitial_yyvs_size yyvs32 := yyspecial_routines32.aliased_resized_area (yyvs32, yyvsc32) end yyspecial_routines32.force (yyvs32, yyval32, yyvsp32) end end yy_do_action_506 --|#line "eiffel.y" local yyval32: detachable BINARY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval32 := ast_factory.new_bin_gt_as (yyvs50.item (yyvsp50 - 1), yyvs50.item (yyvsp50), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp32 := yyvsp32 + 1 yyvsp50 := yyvsp50 -2 yyvsp4 := yyvsp4 -1 if yyvsp32 >= yyvsc32 then debug ("GEYACC") std.error.put_line ("Resize yyvs32") end yyvsc32 := yyvsc32 + yyInitial_yyvs_size yyvs32 := yyspecial_routines32.aliased_resized_area (yyvs32, yyvsc32) end yyspecial_routines32.force (yyvs32, yyval32, yyvsp32) end end yy_do_action_507 --|#line "eiffel.y" local yyval32: detachable BINARY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval32 := ast_factory.new_bin_le_as (yyvs50.item (yyvsp50 - 1), yyvs50.item (yyvsp50), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp32 := yyvsp32 + 1 yyvsp50 := yyvsp50 -2 yyvsp4 := yyvsp4 -1 if yyvsp32 >= yyvsc32 then debug ("GEYACC") std.error.put_line ("Resize yyvs32") end yyvsc32 := yyvsc32 + yyInitial_yyvs_size yyvs32 := yyspecial_routines32.aliased_resized_area (yyvs32, yyvsc32) end yyspecial_routines32.force (yyvs32, yyval32, yyvsp32) end end yy_do_action_508 --|#line "eiffel.y" local yyval32: detachable BINARY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval32 := ast_factory.new_bin_lt_as (yyvs50.item (yyvsp50 - 1), yyvs50.item (yyvsp50), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp32 := yyvsp32 + 1 yyvsp50 := yyvsp50 -2 yyvsp4 := yyvsp4 -1 if yyvsp32 >= yyvsc32 then debug ("GEYACC") std.error.put_line ("Resize yyvs32") end yyvsc32 := yyvsc32 + yyInitial_yyvs_size yyvs32 := yyspecial_routines32.aliased_resized_area (yyvs32, yyvsc32) end yyspecial_routines32.force (yyvs32, yyval32, yyvsp32) end end yy_do_action_509 --|#line "eiffel.y" local yyval32: detachable BINARY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs2.item (yyvsp2) as l_free then l_free.to_lower end yyval32 := ast_factory.new_bin_free_as (yyvs50.item (yyvsp50 - 1), yyvs2.item (yyvsp2), yyvs50.item (yyvsp50)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp32 := yyvsp32 + 1 yyvsp50 := yyvsp50 -2 yyvsp2 := yyvsp2 -1 if yyvsp32 >= yyvsc32 then debug ("GEYACC") std.error.put_line ("Resize yyvs32") end yyvsc32 := yyvsc32 + yyInitial_yyvs_size yyvs32 := yyspecial_routines32.aliased_resized_area (yyvs32, yyvsc32) end yyspecial_routines32.force (yyvs32, yyval32, yyvsp32) end end yy_do_action_510 --|#line "eiffel.y" local yyval32: detachable BINARY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached extract_id_from_symbol (yyvs6.item (yyvsp6)) as operator then if syntax_version /= obsolete_syntax and then has_syntax_warning then report_one_warning (create {SYNTAX_WARNING}.make (token_line (operator), token_column (operator), filename, locale.translation_in_context (once "Obsolete operator notation `@` is used. Replace it with a contemporary operator (if available) or an unfolded form of feature call.", once "parser.eiffel.warning"))) end yyval32 := ast_factory.new_bin_free_as (yyvs50.item (yyvsp50 - 1), operator, yyvs50.item (yyvsp50)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp32 := yyvsp32 + 1 yyvsp50 := yyvsp50 -2 yyvsp6 := yyvsp6 -1 if yyvsp32 >= yyvsc32 then debug ("GEYACC") std.error.put_line ("Resize yyvs32") end yyvsc32 := yyvsc32 + yyInitial_yyvs_size yyvs32 := yyspecial_routines32.aliased_resized_area (yyvs32, yyvsc32) end yyspecial_routines32.force (yyvs32, yyval32, yyvsp32) end end yy_do_action_511 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval50 := yyvs13.item (yyvsp13) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp50 := yyvsp50 + 1 yyvsp13 := yyvsp13 -1 if yyvsp50 >= yyvsc50 then debug ("GEYACC") std.error.put_line ("Resize yyvs50") end yyvsc50 := yyvsc50 + yyInitial_yyvs_size yyvs50 := yyspecial_routines50.aliased_resized_area (yyvs50, yyvsc50) end yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_512 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval50 := yyvs29.item (yyvsp29) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp50 := yyvsp50 + 1 yyvsp29 := yyvsp29 -1 if yyvsp50 >= yyvsc50 then debug ("GEYACC") std.error.put_line ("Resize yyvs50") end yyvsc50 := yyvsc50 + yyInitial_yyvs_size yyvs50 := yyspecial_routines50.aliased_resized_area (yyvs50, yyvsc50) end yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_513 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval50 := yyvs84.item (yyvsp84) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp50 := yyvsp50 + 1 yyvsp84 := yyvsp84 -1 if yyvsp50 >= yyvsc50 then debug ("GEYACC") std.error.put_line ("Resize yyvs50") end yyvsc50 := yyvsc50 + yyInitial_yyvs_size yyvs50 := yyspecial_routines50.aliased_resized_area (yyvs50, yyvsc50) end yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_514 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval50 := ast_factory.new_un_old_as (yyvs50.item (yyvsp50), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp14 := yyvsp14 -1 yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_515 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval50 := ast_factory.new_un_strip_as (yyvs22.item (yyvsp22), yyvs14.item (yyvsp14), yyvs4.item (yyvsp4 - 1), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp50 := yyvsp50 + 1 yyvsp14 := yyvsp14 -1 yyvsp4 := yyvsp4 -2 yyvsp22 := yyvsp22 -1 if yyvsp50 >= yyvsc50 then debug ("GEYACC") std.error.put_line ("Resize yyvs50") end yyvsc50 := yyvsc50 + yyInitial_yyvs_size yyvs50 := yyspecial_routines50.aliased_resized_area (yyvs50, yyvsc50) end yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_516 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end inspect id_level when Precondition_level, Postcondition_level then set_has_unqualified_call_in_assertion (True) else -- Nothing to do. end yyval50 := ast_factory.new_address_as (yyvs94.item (yyvsp94), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp50 := yyvsp50 + 1 yyvsp4 := yyvsp4 -1 yyvsp94 := yyvsp94 -1 if yyvsp50 >= yyvsc50 then debug ("GEYACC") std.error.put_line ("Resize yyvs50") end yyvsc50 := yyvsc50 + yyInitial_yyvs_size yyvs50 := yyspecial_routines50.aliased_resized_area (yyvs50, yyvsc50) end yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_517 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end inspect id_level when Precondition_level, Postcondition_level then set_has_unqualified_call_in_assertion (True) else -- Nothing to do. end yyval50 := ast_factory.new_address_current_as (yyvs11.item (yyvsp11), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp50 := yyvsp50 + 1 yyvsp4 := yyvsp4 -1 yyvsp11 := yyvsp11 -1 if yyvsp50 >= yyvsc50 then debug ("GEYACC") std.error.put_line ("Resize yyvs50") end yyvsc50 := yyvsc50 + yyInitial_yyvs_size yyvs50 := yyspecial_routines50.aliased_resized_area (yyvs50, yyvsc50) end yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_518 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval50 := ast_factory.new_address_result_as (yyvs8.item (yyvsp8), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp50 := yyvsp50 + 1 yyvsp4 := yyvsp4 -1 yyvsp8 := yyvsp8 -1 if yyvsp50 >= yyvsc50 then debug ("GEYACC") std.error.put_line ("Resize yyvs50") end yyvsc50 := yyvsc50 + yyInitial_yyvs_size yyvs50 := yyspecial_routines50.aliased_resized_area (yyvs50, yyvsc50) end yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_519 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval50 := yyvs50.item (yyvsp50) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_520 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval50 := ast_factory.new_expr_call_as (yyvs35.item (yyvsp35)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp50 := yyvsp50 + 1 yyvsp35 := yyvsp35 -1 if yyvsp50 >= yyvsc50 then debug ("GEYACC") std.error.put_line ("Resize yyvs50") end yyvsc50 := yyvsc50 + yyInitial_yyvs_size yyvs50 := yyspecial_routines50.aliased_resized_area (yyvs50, yyvsc50) end yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_521 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval50 := yyvs51.item (yyvsp51) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp50 := yyvsp50 + 1 yyvsp51 := yyvsp51 -1 if yyvsp50 >= yyvsc50 then debug ("GEYACC") std.error.put_line ("Resize yyvs50") end yyvsc50 := yyvsc50 + yyInitial_yyvs_size yyvs50 := yyspecial_routines50.aliased_resized_area (yyvs50, yyvsc50) end yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_522 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval50 := yyvs51.item (yyvsp51) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp50 := yyvsp50 + 1 yyvsp51 := yyvsp51 -1 if yyvsp50 >= yyvsc50 then debug ("GEYACC") std.error.put_line ("Resize yyvs50") end yyvsc50 := yyvsc50 + yyInitial_yyvs_size yyvs50 := yyspecial_routines50.aliased_resized_area (yyvs50, yyvsc50) end yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_523 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval50 := ast_factory.new_un_minus_as (yyvs50.item (yyvsp50), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp4 := yyvsp4 -1 yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_524 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval50 := ast_factory.new_un_plus_as (yyvs50.item (yyvsp50), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp4 := yyvsp4 -1 yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_525 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval50 := ast_factory.new_un_not_as (yyvs50.item (yyvsp50), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp14 := yyvsp14 -1 yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_526 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval50 := ast_factory.new_un_free_as (yyvs2.item (yyvsp2), yyvs50.item (yyvsp50)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp2 := yyvsp2 -1 yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_527 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs2.item (yyvsp2) as l_free then l_free.to_lower end yyval50 := ast_factory.new_un_free_as (yyvs2.item (yyvsp2), yyvs50.item (yyvsp50)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp2 := yyvsp2 -1 yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_528 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval50 := yyvs61.item (yyvsp61) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp50 := yyvsp50 + 1 yyvsp61 := yyvsp61 -1 if yyvsp50 >= yyvsc50 then debug ("GEYACC") std.error.put_line ("Resize yyvs50") end yyvsc50 := yyvsc50 + yyInitial_yyvs_size yyvs50 := yyspecial_routines50.aliased_resized_area (yyvs50, yyvsc50) end yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_529 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval50 := yyvs64.item (yyvsp64) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp50 := yyvsp50 + 1 yyvsp64 := yyvsp64 -1 if yyvsp50 >= yyvsc50 then debug ("GEYACC") std.error.put_line ("Resize yyvs50") end yyvsc50 := yyvsc50 + yyInitial_yyvs_size yyvs50 := yyspecial_routines50.aliased_resized_area (yyvs50, yyvsc50) end yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_530 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval50 := ast_factory.new_type_expr_as (yyvs88.item (yyvsp88)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp50 := yyvsp50 + 1 yyvsp88 := yyvsp88 -1 if yyvsp50 >= yyvsc50 then debug ("GEYACC") std.error.put_line ("Resize yyvs50") end yyvsc50 := yyvsc50 + yyInitial_yyvs_size yyvs50 := yyspecial_routines50.aliased_resized_area (yyvs50, yyvsc50) end yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_531 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval50 := yyvs66.item (yyvsp66) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp50 := yyvsp50 + 1 yyvsp66 := yyvsp66 -1 if yyvsp50 >= yyvsc50 then debug ("GEYACC") std.error.put_line ("Resize yyvs50") end yyvsc50 := yyvsc50 + yyInitial_yyvs_size yyvs50 := yyspecial_routines50.aliased_resized_area (yyvs50, yyvsc50) end yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_532 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval50 := yyvs78.item (yyvsp78) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp50 := yyvsp50 + 1 yyvsp78 := yyvsp78 -1 if yyvsp50 >= yyvsc50 then debug ("GEYACC") std.error.put_line ("Resize yyvs50") end yyvsc50 := yyvsc50 + yyInitial_yyvs_size yyvs50 := yyspecial_routines50.aliased_resized_area (yyvs50, yyvsc50) end yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_533 --|#line "eiffel.y" local yyval51: detachable BRACKET_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval51 := ast_factory.new_bracket_as (yyvs50.item (yyvsp50), yyvs104.item (yyvsp104), yyvs4.item (yyvsp4 - 1), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 6 yyvsp51 := yyvsp51 + 1 yyvsp50 := yyvsp50 -1 yyvsp4 := yyvsp4 -2 yyvsp1 := yyvsp1 -2 yyvsp104 := yyvsp104 -1 if yyvsp51 >= yyvsc51 then debug ("GEYACC") std.error.put_line ("Resize yyvs51") end yyvsc51 := yyvsc51 + yyInitial_yyvs_size yyvs51 := yyspecial_routines51.aliased_resized_area (yyvs51, yyvsc51) end yyspecial_routines51.force (yyvs51, yyval51, yyvsp51) end end yy_do_action_534 --|#line "eiffel.y" local yyval51: detachable BRACKET_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval51 := ast_factory.new_bracket_as (yyvs51.item (yyvsp51), yyvs104.item (yyvsp104), yyvs4.item (yyvsp4 - 1), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 6 yyvsp4 := yyvsp4 -2 yyvsp1 := yyvsp1 -2 yyvsp104 := yyvsp104 -1 yyspecial_routines51.force (yyvs51, yyval51, yyvsp51) end end yy_do_action_535 --|#line "eiffel.y" local yyval51: detachable BRACKET_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval51 := ast_factory.new_bracket_as (ast_factory.new_expr_call_as (yyvs35.item (yyvsp35)), yyvs104.item (yyvsp104), yyvs4.item (yyvsp4 - 1), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 6 yyvsp51 := yyvsp51 + 1 yyvsp35 := yyvsp35 -1 yyvsp4 := yyvsp4 -2 yyvsp1 := yyvsp1 -2 yyvsp104 := yyvsp104 -1 if yyvsp51 >= yyvsc51 then debug ("GEYACC") std.error.put_line ("Resize yyvs51") end yyvsc51 := yyvsc51 + yyInitial_yyvs_size yyvs51 := yyspecial_routines51.aliased_resized_area (yyvs51, yyvsc51) end yyspecial_routines51.force (yyvs51, yyval51, yyvsp51) end end yy_do_action_536 --|#line "eiffel.y" local yyval51: detachable BRACKET_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval51 := ast_factory.new_bracket_as (yyvs51.item (yyvsp51), yyvs104.item (yyvsp104), yyvs4.item (yyvsp4 - 1), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 6 yyvsp4 := yyvsp4 -2 yyvsp1 := yyvsp1 -2 yyvsp104 := yyvsp104 -1 yyspecial_routines51.force (yyvs51, yyval51, yyvsp51) end end yy_do_action_537 --|#line "eiffel.y" local yyval73: detachable NESTED_EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval73 := ast_factory.new_nested_expr_as (ast_factory.new_expr_call_as (yyvs73.item (yyvsp73)), yyvs27.item (yyvsp27), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp4 := yyvsp4 -1 yyvsp27 := yyvsp27 -1 yyspecial_routines73.force (yyvs73, yyval73, yyvsp73) end end yy_do_action_538 --|#line "eiffel.y" local yyval73: detachable NESTED_EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end inspect id_level when Precondition_level, Postcondition_level then set_has_unqualified_call_in_assertion (True) else -- Nothing to do. end yyval73 := ast_factory.new_nested_expr_as (yyvs11.item (yyvsp11), yyvs27.item (yyvsp27), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp73 := yyvsp73 + 1 yyvsp11 := yyvsp11 -1 yyvsp4 := yyvsp4 -1 yyvsp27 := yyvsp27 -1 if yyvsp73 >= yyvsc73 then debug ("GEYACC") std.error.put_line ("Resize yyvs73") end yyvsc73 := yyvsc73 + yyInitial_yyvs_size yyvs73 := yyspecial_routines73.aliased_resized_area (yyvs73, yyvsc73) end yyspecial_routines73.force (yyvs73, yyval73, yyvsp73) end end yy_do_action_539 --|#line "eiffel.y" local yyval73: detachable NESTED_EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval73 := ast_factory.new_nested_expr_as (yyvs8.item (yyvsp8), yyvs27.item (yyvsp27), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp73 := yyvsp73 + 1 yyvsp8 := yyvsp8 -1 yyvsp4 := yyvsp4 -1 yyvsp27 := yyvsp27 -1 if yyvsp73 >= yyvsc73 then debug ("GEYACC") std.error.put_line ("Resize yyvs73") end yyvsc73 := yyvsc73 + yyInitial_yyvs_size yyvs73 := yyspecial_routines73.aliased_resized_area (yyvs73, yyvsc73) end yyspecial_routines73.force (yyvs73, yyval73, yyvsp73) end end yy_do_action_540 --|#line "eiffel.y" local yyval73: detachable NESTED_EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval73 := ast_factory.new_nested_expr_as (ast_factory.new_paran_as (yyvs50.item (yyvsp50), yyvs4.item (yyvsp4 - 2), yyvs4.item (yyvsp4 - 1)), yyvs27.item (yyvsp27), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp73 := yyvsp73 + 1 yyvsp4 := yyvsp4 -3 yyvsp50 := yyvsp50 -1 yyvsp27 := yyvsp27 -1 if yyvsp73 >= yyvsc73 then debug ("GEYACC") std.error.put_line ("Resize yyvs73") end yyvsc73 := yyvsc73 + yyInitial_yyvs_size yyvs73 := yyspecial_routines73.aliased_resized_area (yyvs73, yyvsc73) end yyspecial_routines73.force (yyvs73, yyval73, yyvsp73) end end yy_do_action_541 --|#line "eiffel.y" local yyval73: detachable NESTED_EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval73 := ast_factory.new_nested_expr_as (ast_factory.new_expr_call_as (yyvs26.item (yyvsp26)), yyvs27.item (yyvsp27), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp73 := yyvsp73 + 1 yyvsp26 := yyvsp26 -1 yyvsp4 := yyvsp4 -1 yyvsp27 := yyvsp27 -1 if yyvsp73 >= yyvsc73 then debug ("GEYACC") std.error.put_line ("Resize yyvs73") end yyvsc73 := yyvsc73 + yyInitial_yyvs_size yyvs73 := yyspecial_routines73.aliased_resized_area (yyvs73, yyvsc73) end yyspecial_routines73.force (yyvs73, yyval73, yyvsp73) end end yy_do_action_542 --|#line "eiffel.y" local yyval73: detachable NESTED_EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval73 := ast_factory.new_nested_expr_as (ast_factory.new_expr_call_as (yyvs76.item (yyvsp76)), yyvs27.item (yyvsp27), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp73 := yyvsp73 + 1 yyvsp76 := yyvsp76 -1 yyvsp4 := yyvsp4 -1 yyvsp27 := yyvsp27 -1 if yyvsp73 >= yyvsc73 then debug ("GEYACC") std.error.put_line ("Resize yyvs73") end yyvsc73 := yyvsc73 + yyInitial_yyvs_size yyvs73 := yyspecial_routines73.aliased_resized_area (yyvs73, yyvsc73) end yyspecial_routines73.force (yyvs73, yyval73, yyvsp73) end end yy_do_action_543 --|#line "eiffel.y" local yyval73: detachable NESTED_EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval73 := ast_factory.new_nested_expr_as (yyvs77.item (yyvsp77), yyvs27.item (yyvsp27), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp73 := yyvsp73 + 1 yyvsp77 := yyvsp77 -1 yyvsp4 := yyvsp4 -1 yyvsp27 := yyvsp27 -1 if yyvsp73 >= yyvsc73 then debug ("GEYACC") std.error.put_line ("Resize yyvs73") end yyvsc73 := yyvsc73 + yyInitial_yyvs_size yyvs73 := yyspecial_routines73.aliased_resized_area (yyvs73, yyvsc73) end yyspecial_routines73.force (yyvs73, yyval73, yyvsp73) end end yy_do_action_544 --|#line "eiffel.y" local yyval73: detachable NESTED_EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval73 := ast_factory.new_nested_expr_as (yyvs51.item (yyvsp51), yyvs27.item (yyvsp27), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp73 := yyvsp73 + 1 yyvsp51 := yyvsp51 -1 yyvsp4 := yyvsp4 -1 yyvsp27 := yyvsp27 -1 if yyvsp73 >= yyvsc73 then debug ("GEYACC") std.error.put_line ("Resize yyvs73") end yyvsc73 := yyvsc73 + yyInitial_yyvs_size yyvs73 := yyspecial_routines73.aliased_resized_area (yyvs73, yyvsc73) end yyspecial_routines73.force (yyvs73, yyval73, yyvsp73) end end yy_do_action_545 --|#line "eiffel.y" local yyval73: detachable NESTED_EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval73 := ast_factory.new_nested_expr_as (yyvs51.item (yyvsp51), yyvs27.item (yyvsp27), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp73 := yyvsp73 + 1 yyvsp51 := yyvsp51 -1 yyvsp4 := yyvsp4 -1 yyvsp27 := yyvsp27 -1 if yyvsp73 >= yyvsc73 then debug ("GEYACC") std.error.put_line ("Resize yyvs73") end yyvsc73 := yyvsc73 + yyInitial_yyvs_size yyvs73 := yyspecial_routines73.aliased_resized_area (yyvs73, yyvsc73) end yyspecial_routines73.force (yyvs73, yyval73, yyvsp73) end end yy_do_action_546 --|#line "eiffel.y" local yyval73: detachable NESTED_EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval73 := ast_factory.new_nested_expr_as (yyvs50.item (yyvsp50), yyvs27.item (yyvsp27), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp73 := yyvsp73 + 1 yyvsp50 := yyvsp50 -1 yyvsp4 := yyvsp4 -1 yyvsp27 := yyvsp27 -1 if yyvsp73 >= yyvsc73 then debug ("GEYACC") std.error.put_line ("Resize yyvs73") end yyvsc73 := yyvsc73 + yyInitial_yyvs_size yyvs73 := yyspecial_routines73.aliased_resized_area (yyvs73, yyvsc73) end yyspecial_routines73.force (yyvs73, yyval73, yyvsp73) end end yy_do_action_547 --|#line "eiffel.y" local yyval76: detachable PRECURSOR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end inspect id_level when Precondition_level, Postcondition_level then set_has_unqualified_call_in_assertion (True) else -- Nothing to do. end yyval76 := ast_factory.new_precursor_as (yyvs14.item (yyvsp14), Void, yyvs105.item (yyvsp105)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp76 := yyvsp76 + 1 yyvsp14 := yyvsp14 -1 yyvsp105 := yyvsp105 -1 if yyvsp76 >= yyvsc76 then debug ("GEYACC") std.error.put_line ("Resize yyvs76") end yyvsc76 := yyvsc76 + yyInitial_yyvs_size yyvs76 := yyspecial_routines76.aliased_resized_area (yyvs76, yyvsc76) end yyspecial_routines76.force (yyvs76, yyval76, yyvsp76) end end yy_do_action_548 --|#line "eiffel.y" local yyval76: detachable PRECURSOR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end inspect id_level when Precondition_level, Postcondition_level then set_has_unqualified_call_in_assertion (True) else -- Nothing to do. end if attached ast_factory.new_class_type_as (yyvs2.item (yyvsp2), Void) as l_temp_class_type_as then l_temp_class_type_as.set_lcurly_symbol (yyvs4.item (yyvsp4 - 1)) l_temp_class_type_as.set_rcurly_symbol (yyvs4.item (yyvsp4)) yyval76 := ast_factory.new_precursor_as (yyvs14.item (yyvsp14), l_temp_class_type_as, yyvs105.item (yyvsp105)) else yyval76 := ast_factory.new_precursor_as (yyvs14.item (yyvsp14), Void, yyvs105.item (yyvsp105)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp76 := yyvsp76 + 1 yyvsp14 := yyvsp14 -1 yyvsp4 := yyvsp4 -2 yyvsp2 := yyvsp2 -1 yyvsp105 := yyvsp105 -1 if yyvsp76 >= yyvsc76 then debug ("GEYACC") std.error.put_line ("Resize yyvs76") end yyvsc76 := yyvsc76 + yyInitial_yyvs_size yyvs76 := yyspecial_routines76.aliased_resized_area (yyvs76, yyvsc76) end yyspecial_routines76.force (yyvs76, yyval76, yyvsp76) end end yy_do_action_549 --|#line "eiffel.y" local yyval77: detachable STATIC_ACCESS_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end inspect id_level when Precondition_level, Postcondition_level then set_has_non_object_call_in_assertion (True) else set_has_non_object_call (True) end yyval77 := yyvs77.item (yyvsp77) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines77.force (yyvs77, yyval77, yyvsp77) end end yy_do_action_550 --|#line "eiffel.y" local yyval77: detachable STATIC_ACCESS_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end inspect id_level when Precondition_level, Postcondition_level then set_has_non_object_call_in_assertion (True) else set_has_non_object_call (True) end yyval77 := yyvs77.item (yyvsp77) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines77.force (yyvs77, yyval77, yyvsp77) end end yy_do_action_551 --|#line "eiffel.y" local yyval77: detachable STATIC_ACCESS_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval77 := ast_factory.new_static_access_as (yyvs88.item (yyvsp88), yyvs2.item (yyvsp2), yyvs105.item (yyvsp105), Void, yyvs4.item (yyvsp4)); if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp77 := yyvsp77 + 1 yyvsp88 := yyvsp88 -1 yyvsp4 := yyvsp4 -1 yyvsp2 := yyvsp2 -1 yyvsp105 := yyvsp105 -1 if yyvsp77 >= yyvsc77 then debug ("GEYACC") std.error.put_line ("Resize yyvs77") end yyvsc77 := yyvsc77 + yyInitial_yyvs_size yyvs77 := yyspecial_routines77.aliased_resized_area (yyvs77, yyvsc77) end yyspecial_routines77.force (yyvs77, yyval77, yyvsp77) end end yy_do_action_552 --|#line "eiffel.y" local yyval77: detachable STATIC_ACCESS_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval77 := ast_factory.new_static_access_as (yyvs88.item (yyvsp88), yyvs2.item (yyvsp2), yyvs105.item (yyvsp105), yyvs14.item (yyvsp14), yyvs4.item (yyvsp4)); if has_syntax_warning then report_one_warning (create {SYNTAX_WARNING}.make (token_line (yyvs14.item (yyvsp14)), token_column (yyvs14.item (yyvsp14)), filename, locale.translation_in_context (once "Remove the `feature` keyword.", once "parser.eiffel.warning"))) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp77 := yyvsp77 + 1 yyvsp14 := yyvsp14 -1 yyvsp88 := yyvsp88 -1 yyvsp4 := yyvsp4 -1 yyvsp2 := yyvsp2 -1 yyvsp105 := yyvsp105 -1 if yyvsp77 >= yyvsc77 then debug ("GEYACC") std.error.put_line ("Resize yyvs77") end yyvsc77 := yyvsc77 + yyInitial_yyvs_size yyvs77 := yyspecial_routines77.aliased_resized_area (yyvs77, yyvsc77) end yyspecial_routines77.force (yyvs77, yyval77, yyvsp77) end end yy_do_action_553 --|#line "eiffel.y" local yyval26: detachable ACCESS_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end inspect id_level when Normal_level then yyval26 := ast_factory.new_access_id_as (yyvs2.item (yyvsp2), yyvs105.item (yyvsp105)) when Precondition_level, Postcondition_level then set_has_unqualified_call_in_assertion (True) yyval26 := ast_factory.new_access_assert_as (yyvs2.item (yyvsp2), yyvs105.item (yyvsp105)) when Invariant_level then yyval26 := ast_factory.new_access_inv_as (yyvs2.item (yyvsp2), yyvs105.item (yyvsp105), Void) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp26 := yyvsp26 + 1 yyvsp2 := yyvsp2 -1 yyvsp105 := yyvsp105 -1 if yyvsp26 >= yyvsc26 then debug ("GEYACC") std.error.put_line ("Resize yyvs26") end yyvsc26 := yyvsc26 + yyInitial_yyvs_size yyvs26 := yyspecial_routines26.aliased_resized_area (yyvs26, yyvsc26) end yyspecial_routines26.force (yyvs26, yyval26, yyvsp26) end end yy_do_action_554 --|#line "eiffel.y" local yyval27: detachable ACCESS_FEAT_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval27 := ast_factory.new_access_feat_as (yyvs2.item (yyvsp2), yyvs105.item (yyvsp105)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp27 := yyvsp27 + 1 yyvsp2 := yyvsp2 -1 yyvsp105 := yyvsp105 -1 if yyvsp27 >= yyvsc27 then debug ("GEYACC") std.error.put_line ("Resize yyvs27") end yyvsc27 := yyvsc27 + yyInitial_yyvs_size yyvs27 := yyspecial_routines27.aliased_resized_area (yyvs27, yyvsc27) end yyspecial_routines27.force (yyvs27, yyval27, yyvsp27) end end yy_do_action_555 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval50 := yyvs31.item (yyvsp31) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp50 := yyvsp50 + 1 yyvsp31 := yyvsp31 -1 if yyvsp50 >= yyvsc50 then debug ("GEYACC") std.error.put_line ("Resize yyvs50") end yyvsc50 := yyvsc50 + yyInitial_yyvs_size yyvs50 := yyspecial_routines50.aliased_resized_area (yyvs50, yyvsc50) end yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_556 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval50 := yyvs50.item (yyvsp50) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_557 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval50 := yyvs87.item (yyvsp87) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp50 := yyvsp50 + 1 yyvsp87 := yyvsp87 -1 if yyvsp50 >= yyvsc50 then debug ("GEYACC") std.error.put_line ("Resize yyvs50") end yyvsc50 := yyvsc50 + yyInitial_yyvs_size yyvs50 := yyspecial_routines50.aliased_resized_area (yyvs50, yyvsc50) end yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_558 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end inspect id_level when Precondition_level, Postcondition_level then set_has_unqualified_call_in_assertion (True) else -- Nothing to do. end yyval50 := yyvs11.item (yyvsp11) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp50 := yyvsp50 + 1 yyvsp11 := yyvsp11 -1 if yyvsp50 >= yyvsc50 then debug ("GEYACC") std.error.put_line ("Resize yyvs50") end yyvsc50 := yyvsc50 + yyInitial_yyvs_size yyvs50 := yyspecial_routines50.aliased_resized_area (yyvs50, yyvsc50) end yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_559 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval50 := yyvs8.item (yyvsp8) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp50 := yyvsp50 + 1 yyvsp8 := yyvsp8 -1 if yyvsp50 >= yyvsc50 then debug ("GEYACC") std.error.put_line ("Resize yyvs50") end yyvsc50 := yyvsc50 + yyInitial_yyvs_size yyvs50 := yyspecial_routines50.aliased_resized_area (yyvs50, yyvsc50) end yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_560 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval50 := ast_factory.new_paran_as (yyvs50.item (yyvsp50), yyvs4.item (yyvsp4 - 1), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp4 := yyvsp4 -2 yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_561 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval50 := yyvs44.item (yyvsp44) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp50 := yyvsp50 + 1 yyvsp44 := yyvsp44 -1 if yyvsp50 >= yyvsc50 then debug ("GEYACC") std.error.put_line ("Resize yyvs50") end yyvsc50 := yyvsc50 + yyInitial_yyvs_size yyvs50 := yyspecial_routines50.aliased_resized_area (yyvs50, yyvsc50) end yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_562 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval50 := yyvs70.item (yyvsp70) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp50 := yyvsp50 + 1 yyvsp70 := yyvsp70 -1 if yyvsp50 >= yyvsc50 then debug ("GEYACC") std.error.put_line ("Resize yyvs50") end yyvsc50 := yyvsc50 + yyInitial_yyvs_size yyvs50 := yyspecial_routines50.aliased_resized_area (yyvs50, yyvsc50) end yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_563 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval50 := yyvs50.item (yyvsp50) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_564 --|#line "eiffel.y" local yyval105: detachable PARAMETER_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp105 := yyvsp105 + 1 if yyvsp105 >= yyvsc105 then debug ("GEYACC") std.error.put_line ("Resize yyvs105") end yyvsc105 := yyvsc105 + yyInitial_yyvs_size yyvs105 := yyspecial_routines105.aliased_resized_area (yyvs105, yyvsc105) end yyspecial_routines105.force (yyvs105, yyval105, yyvsp105) end end yy_do_action_565 --|#line "eiffel.y" local yyval105: detachable PARAMETER_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- Per ECMA, this should be rejected. For now we only raise -- a warning. And on the compiler side, we will simply ignore them altogether. if has_syntax_warning then report_one_warning (create {SYNTAX_WARNING}.make (token_line (yyvs4.item (yyvsp4 - 1)), token_column (yyvs4.item (yyvsp4 - 1)), filename, locale.translation_in_context (once "Empty parameter list are not allowed", once "parser.eiffel.warning"))) end yyval105 := ast_factory.new_parameter_list_as (Void, yyvs4.item (yyvsp4 - 1), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp105 := yyvsp105 + 1 yyvsp4 := yyvsp4 -2 if yyvsp105 >= yyvsc105 then debug ("GEYACC") std.error.put_line ("Resize yyvs105") end yyvsc105 := yyvsc105 + yyInitial_yyvs_size yyvs105 := yyspecial_routines105.aliased_resized_area (yyvs105, yyvsc105) end yyspecial_routines105.force (yyvs105, yyval105, yyvsp105) end end yy_do_action_566 --|#line "eiffel.y" local yyval105: detachable PARAMETER_LIST_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval105 := ast_factory.new_parameter_list_as (yyvs104.item (yyvsp104), yyvs4.item (yyvsp4 - 1), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp105 := yyvsp105 + 1 yyvsp4 := yyvsp4 -2 yyvsp1 := yyvsp1 -2 yyvsp104 := yyvsp104 -1 if yyvsp105 >= yyvsc105 then debug ("GEYACC") std.error.put_line ("Resize yyvs105") end yyvsc105 := yyvsc105 + yyInitial_yyvs_size yyvs105 := yyspecial_routines105.aliased_resized_area (yyvs105, yyvsc105) end yyspecial_routines105.force (yyvs105, yyval105, yyvsp105) end end yy_do_action_567 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval50 := yyvs50.item (yyvsp50) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_568 --|#line "eiffel.y" local yyval50: detachable EXPR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval50 := ast_factory.new_expr_address_as (yyvs50.item (yyvsp50), yyvs4.item (yyvsp4 - 2), yyvs4.item (yyvsp4 - 1), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp4 := yyvsp4 -3 yyspecial_routines50.force (yyvs50, yyval50, yyvsp50) end end yy_do_action_569 --|#line "eiffel.y" local yyval104: detachable EIFFEL_LIST [EXPR_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs50.item (yyvsp50) as v then yyval104 := ast_factory.new_eiffel_list_expr_as (v, counter_value + 1) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp104 := yyvsp104 + 1 yyvsp50 := yyvsp50 -1 if yyvsp104 >= yyvsc104 then debug ("GEYACC") std.error.put_line ("Resize yyvs104") end yyvsc104 := yyvsc104 + yyInitial_yyvs_size yyvs104 := yyspecial_routines104.aliased_resized_area (yyvs104, yyvsc104) end yyspecial_routines104.force (yyvs104, yyval104, yyvsp104) end end yy_do_action_570 --|#line "eiffel.y" local yyval104: detachable EIFFEL_LIST [EXPR_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval104 := yyvs104.item (yyvsp104) if attached yyval104 as l_list and then attached yyvs50.item (yyvsp50) as l_val then l_list.reverse_extend (l_val) ast_factory.reverse_extend_separator (l_list, yyvs4.item (yyvsp4)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp50 := yyvsp50 -1 yyvsp4 := yyvsp4 -1 yyvsp1 := yyvsp1 -1 yyspecial_routines104.force (yyvs104, yyval104, yyvsp104) end end yy_do_action_571 --|#line "eiffel.y" local yyval104: detachable EIFFEL_LIST [EXPR_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs50.item (yyvsp50) as v then yyval104 := ast_factory.new_eiffel_list_expr_as (v, counter_value + 1) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp104 := yyvsp104 + 1 yyvsp50 := yyvsp50 -1 if yyvsp104 >= yyvsc104 then debug ("GEYACC") std.error.put_line ("Resize yyvs104") end yyvsc104 := yyvsc104 + yyInitial_yyvs_size yyvs104 := yyspecial_routines104.aliased_resized_area (yyvs104, yyvsc104) end yyspecial_routines104.force (yyvs104, yyval104, yyvsp104) end end yy_do_action_572 --|#line "eiffel.y" local yyval104: detachable EIFFEL_LIST [EXPR_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval104 := yyvs104.item (yyvsp104) if attached yyval104 as l_list and then attached yyvs50.item (yyvsp50) as l_val then l_list.reverse_extend (l_val) ast_factory.reverse_extend_separator (l_list, yyvs4.item (yyvsp4)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp50 := yyvsp50 -1 yyvsp4 := yyvsp4 -1 yyvsp1 := yyvsp1 -1 yyspecial_routines104.force (yyvs104, yyval104, yyvsp104) end end yy_do_action_573 --|#line "eiffel.y" local yyval2: detachable ID_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval2 := yyvs2.item (yyvsp2) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_574 --|#line "eiffel.y" local yyval2: detachable ID_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval2 := yyvs2.item (yyvsp2); if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_575 --|#line "eiffel.y" local yyval2: detachable ID_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs2.item (yyvsp2) as l_id then l_id.to_upper yyval2 := l_id end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_576 --|#line "eiffel.y" local yyval2: detachable ID_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- Keyword used as identifier yyval2 := extract_id (yyvs15.item (yyvsp15)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp2 := yyvsp2 + 1 yyvsp15 := yyvsp15 -1 if yyvsp2 >= yyvsc2 then debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.aliased_resized_area (yyvs2, yyvsc2) end yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_577 --|#line "eiffel.y" local yyval2: detachable ID_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- Keyword used as identifier yyval2 := extract_id (yyvs15.item (yyvsp15)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp2 := yyvsp2 + 1 yyvsp15 := yyvsp15 -1 if yyvsp2 >= yyvsc2 then debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.aliased_resized_area (yyvs2, yyvsc2) end yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_578 --|#line "eiffel.y" local yyval2: detachable ID_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- Keyword used as identifier yyval2 := extract_id (yyvs15.item (yyvsp15)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp2 := yyvsp2 + 1 yyvsp15 := yyvsp15 -1 if yyvsp2 >= yyvsc2 then debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.aliased_resized_area (yyvs2, yyvsc2) end yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_579 --|#line "eiffel.y" local yyval2: detachable ID_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- Keyword used as identifier yyval2 := extract_id (yyvs15.item (yyvsp15)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp2 := yyvsp2 + 1 yyvsp15 := yyvsp15 -1 if yyvsp2 >= yyvsc2 then debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.aliased_resized_area (yyvs2, yyvsc2) end yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_580 --|#line "eiffel.y" local yyval2: detachable ID_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- Keyword used as identifier yyval2 := extract_id (yyvs15.item (yyvsp15)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp2 := yyvsp2 + 1 yyvsp15 := yyvsp15 -1 if yyvsp2 >= yyvsc2 then debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.aliased_resized_area (yyvs2, yyvsc2) end yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_581 --|#line "eiffel.y" local yyval2: detachable ID_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- Keyword used as identifier yyval2 := extract_id (yyvs15.item (yyvsp15)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp2 := yyvsp2 + 1 yyvsp15 := yyvsp15 -1 if yyvsp2 >= yyvsc2 then debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.aliased_resized_area (yyvs2, yyvsc2) end yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_582 --|#line "eiffel.y" local yyval2: detachable ID_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs2.item (yyvsp2) as l_tuple then l_tuple.to_upper yyval2 := l_tuple end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_583 --|#line "eiffel.y" local yyval2: detachable ID_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs2.item (yyvsp2) as l_id then l_id.to_lower yyval2 := l_id end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_584 --|#line "eiffel.y" local yyval2: detachable ID_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs2.item (yyvsp2) as l_tuple then l_tuple.to_lower yyval2 := l_tuple end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_585 --|#line "eiffel.y" local yyval2: detachable ID_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- Keyword used as identifier yyval2 := extract_id (yyvs15.item (yyvsp15)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp2 := yyvsp2 + 1 yyvsp15 := yyvsp15 -1 if yyvsp2 >= yyvsc2 then debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.aliased_resized_area (yyvs2, yyvsc2) end yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_586 --|#line "eiffel.y" local yyval2: detachable ID_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- Keyword used as identifier yyval2 := extract_id (yyvs15.item (yyvsp15)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp2 := yyvsp2 + 1 yyvsp15 := yyvsp15 -1 if yyvsp2 >= yyvsc2 then debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.aliased_resized_area (yyvs2, yyvsc2) end yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_587 --|#line "eiffel.y" local yyval2: detachable ID_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- Keyword used as identifier yyval2 := extract_id (yyvs15.item (yyvsp15)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp2 := yyvsp2 + 1 yyvsp15 := yyvsp15 -1 if yyvsp2 >= yyvsc2 then debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.aliased_resized_area (yyvs2, yyvsc2) end yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_588 --|#line "eiffel.y" local yyval2: detachable ID_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end -- Keyword used as identifier yyval2 := extract_id (yyvs15.item (yyvsp15)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp2 := yyvsp2 + 1 yyvsp15 := yyvsp15 -1 if yyvsp2 >= yyvsc2 then debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.aliased_resized_area (yyvs2, yyvsc2) end yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_589 --|#line "eiffel.y" local yyval61: detachable IF_EXPRESSION_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval61 := ast_factory.new_if_expression_as (yyvs50.item (yyvsp50 - 2), yyvs50.item (yyvsp50 - 1), Void, yyvs50.item (yyvsp50), yyvs14.item (yyvsp14), yyvs14.item (yyvsp14 - 3), yyvs14.item (yyvsp14 - 2), yyvs14.item (yyvsp14 - 1)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 7 yyvsp61 := yyvsp61 + 1 yyvsp14 := yyvsp14 -4 yyvsp50 := yyvsp50 -3 if yyvsp61 >= yyvsc61 then debug ("GEYACC") std.error.put_line ("Resize yyvs61") end yyvsc61 := yyvsc61 + yyInitial_yyvs_size yyvs61 := yyspecial_routines61.aliased_resized_area (yyvs61, yyvsc61) end yyspecial_routines61.force (yyvs61, yyval61, yyvsp61) end end yy_do_action_590 --|#line "eiffel.y" local yyval61: detachable IF_EXPRESSION_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval61 := ast_factory.new_if_expression_as (yyvs50.item (yyvsp50 - 2), yyvs50.item (yyvsp50 - 1), yyvs101.item (yyvsp101), yyvs50.item (yyvsp50), yyvs14.item (yyvsp14), yyvs14.item (yyvsp14 - 3), yyvs14.item (yyvsp14 - 2), yyvs14.item (yyvsp14 - 1)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 8 yyvsp61 := yyvsp61 + 1 yyvsp14 := yyvsp14 -4 yyvsp50 := yyvsp50 -3 yyvsp101 := yyvsp101 -1 if yyvsp61 >= yyvsc61 then debug ("GEYACC") std.error.put_line ("Resize yyvs61") end yyvsc61 := yyvsc61 + yyInitial_yyvs_size yyvs61 := yyspecial_routines61.aliased_resized_area (yyvs61, yyvsc61) end yyspecial_routines61.force (yyvs61, yyval61, yyvsp61) end end yy_do_action_591 --|#line "eiffel.y" local yyval101: detachable EIFFEL_LIST [ELSIF_EXPRESSION_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval101 := yyvs101.item (yyvsp101) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp1 := yyvsp1 -2 yyspecial_routines101.force (yyvs101, yyval101, yyvsp101) end end yy_do_action_592 --|#line "eiffel.y" local yyval101: detachable EIFFEL_LIST [ELSIF_EXPRESSION_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs47.item (yyvsp47) as v then yyval101 := ast_factory.new_eiffel_list_elseif_expression_as (v, counter_value + 1) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp101 := yyvsp101 + 1 yyvsp47 := yyvsp47 -1 if yyvsp101 >= yyvsc101 then debug ("GEYACC") std.error.put_line ("Resize yyvs101") end yyvsc101 := yyvsc101 + yyInitial_yyvs_size yyvs101 := yyspecial_routines101.aliased_resized_area (yyvs101, yyvsc101) end yyspecial_routines101.force (yyvs101, yyval101, yyvsp101) end end yy_do_action_593 --|#line "eiffel.y" local yyval101: detachable EIFFEL_LIST [ELSIF_EXPRESSION_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval101 := yyvs101.item (yyvsp101) if attached yyval101 as l_list and then attached yyvs47.item (yyvsp47) as l_val then l_list.reverse_extend (l_val) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp47 := yyvsp47 -1 yyvsp1 := yyvsp1 -1 yyspecial_routines101.force (yyvs101, yyval101, yyvsp101) end end yy_do_action_594 --|#line "eiffel.y" local yyval47: detachable ELSIF_EXPRESSION_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval47 := ast_factory.new_elseif_expression_as (yyvs50.item (yyvsp50 - 1), yyvs50.item (yyvsp50), yyvs14.item (yyvsp14 - 1), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp47 := yyvsp47 + 1 yyvsp14 := yyvsp14 -2 yyvsp50 := yyvsp50 -2 if yyvsp47 >= yyvsc47 then debug ("GEYACC") std.error.put_line ("Resize yyvs47") end yyvsc47 := yyvsc47 + yyInitial_yyvs_size yyvs47 := yyspecial_routines47.aliased_resized_area (yyvs47, yyvsc47) end yyspecial_routines47.force (yyvs47, yyval47, yyvsp47) end end yy_do_action_595 --|#line "eiffel.y" local yyval64: detachable INSPECT_EXPRESSION_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval64 := ast_factory.new_inspect_expression_as (yyvs50.item (yyvsp50), yyvs97.item (yyvsp97), Void, yyvs14.item (yyvsp14), yyvs14.item (yyvsp14 - 1), Void) if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp64 := yyvsp64 + 1 yyvsp14 := yyvsp14 -2 yyvsp50 := yyvsp50 -1 yyvsp97 := yyvsp97 -1 if yyvsp64 >= yyvsc64 then debug ("GEYACC") std.error.put_line ("Resize yyvs64") end yyvsc64 := yyvsc64 + yyInitial_yyvs_size yyvs64 := yyspecial_routines64.aliased_resized_area (yyvs64, yyvsc64) end yyspecial_routines64.force (yyvs64, yyval64, yyvsp64) end end yy_do_action_596 --|#line "eiffel.y" local yyval64: detachable INSPECT_EXPRESSION_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval64 := ast_factory.new_inspect_expression_as (yyvs50.item (yyvsp50 - 1), yyvs97.item (yyvsp97), yyvs50.item (yyvsp50), yyvs14.item (yyvsp14), yyvs14.item (yyvsp14 - 2), yyvs14.item (yyvsp14 - 1)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 6 yyvsp64 := yyvsp64 + 1 yyvsp14 := yyvsp14 -3 yyvsp50 := yyvsp50 -2 yyvsp97 := yyvsp97 -1 if yyvsp64 >= yyvsc64 then debug ("GEYACC") std.error.put_line ("Resize yyvs64") end yyvsc64 := yyvsc64 + yyInitial_yyvs_size yyvs64 := yyspecial_routines64.aliased_resized_area (yyvs64, yyvsc64) end yyspecial_routines64.force (yyvs64, yyval64, yyvsp64) end end yy_do_action_597 --|#line "eiffel.y" local yyval97: detachable EIFFEL_LIST [CASE_EXPRESSION_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp97 := yyvsp97 + 1 if yyvsp97 >= yyvsc97 then debug ("GEYACC") std.error.put_line ("Resize yyvs97") end yyvsc97 := yyvsc97 + yyInitial_yyvs_size yyvs97 := yyspecial_routines97.aliased_resized_area (yyvs97, yyvsc97) end yyspecial_routines97.force (yyvs97, yyval97, yyvsp97) end end yy_do_action_598 --|#line "eiffel.y" local yyval97: detachable EIFFEL_LIST [CASE_EXPRESSION_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval97 := yyvs97.item (yyvsp97) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp1 := yyvsp1 -2 yyspecial_routines97.force (yyvs97, yyval97, yyvsp97) end end yy_do_action_599 --|#line "eiffel.y" local yyval97: detachable EIFFEL_LIST [CASE_EXPRESSION_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs37.item (yyvsp37) as v then yyval97 := ast_factory.new_eiffel_list_case_expression_as (v, counter_value + 1) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp97 := yyvsp97 + 1 yyvsp37 := yyvsp37 -1 if yyvsp97 >= yyvsc97 then debug ("GEYACC") std.error.put_line ("Resize yyvs97") end yyvsc97 := yyvsc97 + yyInitial_yyvs_size yyvs97 := yyspecial_routines97.aliased_resized_area (yyvs97, yyvsc97) end yyspecial_routines97.force (yyvs97, yyval97, yyvsp97) end end yy_do_action_600 --|#line "eiffel.y" local yyval97: detachable EIFFEL_LIST [CASE_EXPRESSION_AS] do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval97 := yyvs97.item (yyvsp97) if attached yyval97 as l_list and then attached yyvs37.item (yyvsp37) as l_val then l_list.reverse_extend (l_val) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp37 := yyvsp37 -1 yyvsp1 := yyvsp1 -1 yyspecial_routines97.force (yyvs97, yyval97, yyvsp97) end end yy_do_action_601 --|#line "eiffel.y" local yyval37: detachable CASE_EXPRESSION_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval37 := ast_factory.new_case_expression_as (yyvs119.item (yyvsp119), yyvs50.item (yyvsp50), yyvs14.item (yyvsp14 - 1), yyvs14.item (yyvsp14)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 6 yyvsp37 := yyvsp37 + 1 yyvsp14 := yyvsp14 -2 yyvsp1 := yyvsp1 -2 yyvsp119 := yyvsp119 -1 yyvsp50 := yyvsp50 -1 if yyvsp37 >= yyvsc37 then debug ("GEYACC") std.error.put_line ("Resize yyvs37") end yyvsc37 := yyvsc37 + yyInitial_yyvs_size yyvs37 := yyspecial_routines37.aliased_resized_area (yyvs37, yyvsc37) end yyspecial_routines37.force (yyvs37, yyval37, yyvsp37) end end yy_do_action_602 --|#line "eiffel.y" local yyval31: detachable ATOMIC_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval31 := yyvs7.item (yyvsp7) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp31 := yyvsp31 + 1 yyvsp7 := yyvsp7 -1 if yyvsp31 >= yyvsc31 then debug ("GEYACC") std.error.put_line ("Resize yyvs31") end yyvsc31 := yyvsc31 + yyInitial_yyvs_size yyvs31 := yyspecial_routines31.aliased_resized_area (yyvs31, yyvsc31) end yyspecial_routines31.force (yyvs31, yyval31, yyvsp31) end end yy_do_action_603 --|#line "eiffel.y" local yyval31: detachable ATOMIC_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval31 := yyvs3.item (yyvsp3) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp31 := yyvsp31 + 1 yyvsp3 := yyvsp3 -1 if yyvsp31 >= yyvsc31 then debug ("GEYACC") std.error.put_line ("Resize yyvs31") end yyvsc31 := yyvsc31 + yyInitial_yyvs_size yyvs31 := yyspecial_routines31.aliased_resized_area (yyvs31, yyvsc31) end yyspecial_routines31.force (yyvs31, yyval31, yyvsp31) end end yy_do_action_604 --|#line "eiffel.y" local yyval31: detachable ATOMIC_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval31 := yyvs66.item (yyvsp66) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp31 := yyvsp31 + 1 yyvsp66 := yyvsp66 -1 if yyvsp31 >= yyvsc31 then debug ("GEYACC") std.error.put_line ("Resize yyvs31") end yyvsc31 := yyvsc31 + yyInitial_yyvs_size yyvs31 := yyspecial_routines31.aliased_resized_area (yyvs31, yyvsc31) end yyspecial_routines31.force (yyvs31, yyval31, yyvsp31) end end yy_do_action_605 --|#line "eiffel.y" local yyval31: detachable ATOMIC_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval31 := yyvs66.item (yyvsp66) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp31 := yyvsp31 + 1 yyvsp66 := yyvsp66 -1 if yyvsp31 >= yyvsc31 then debug ("GEYACC") std.error.put_line ("Resize yyvs31") end yyvsc31 := yyvsc31 + yyInitial_yyvs_size yyvs31 := yyspecial_routines31.aliased_resized_area (yyvs31, yyvsc31) end yyspecial_routines31.force (yyvs31, yyval31, yyvsp31) end end yy_do_action_606 --|#line "eiffel.y" local yyval31: detachable ATOMIC_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval31 := yyvs78.item (yyvsp78) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp31 := yyvsp31 + 1 yyvsp78 := yyvsp78 -1 if yyvsp31 >= yyvsc31 then debug ("GEYACC") std.error.put_line ("Resize yyvs31") end yyvsc31 := yyvsc31 + yyInitial_yyvs_size yyvs31 := yyspecial_routines31.aliased_resized_area (yyvs31, yyvsc31) end yyspecial_routines31.force (yyvs31, yyval31, yyvsp31) end end yy_do_action_607 --|#line "eiffel.y" local yyval31: detachable ATOMIC_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval31 := yyvs78.item (yyvsp78) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp31 := yyvsp31 + 1 yyvsp78 := yyvsp78 -1 if yyvsp31 >= yyvsc31 then debug ("GEYACC") std.error.put_line ("Resize yyvs31") end yyvsc31 := yyvsc31 + yyInitial_yyvs_size yyvs31 := yyspecial_routines31.aliased_resized_area (yyvs31, yyvsc31) end yyspecial_routines31.force (yyvs31, yyval31, yyvsp31) end end yy_do_action_608 --|#line "eiffel.y" local yyval31: detachable ATOMIC_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval31 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp31 := yyvsp31 + 1 yyvsp16 := yyvsp16 -1 if yyvsp31 >= yyvsc31 then debug ("GEYACC") std.error.put_line ("Resize yyvs31") end yyvsc31 := yyvsc31 + yyInitial_yyvs_size yyvs31 := yyspecial_routines31.aliased_resized_area (yyvs31, yyvsc31) end yyspecial_routines31.force (yyvs31, yyval31, yyvsp31) end end yy_do_action_609 --|#line "eiffel.y" local yyval31: detachable ATOMIC_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval31 := yyvs7.item (yyvsp7) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp31 := yyvsp31 + 1 yyvsp7 := yyvsp7 -1 if yyvsp31 >= yyvsc31 then debug ("GEYACC") std.error.put_line ("Resize yyvs31") end yyvsc31 := yyvsc31 + yyInitial_yyvs_size yyvs31 := yyspecial_routines31.aliased_resized_area (yyvs31, yyvsc31) end yyspecial_routines31.force (yyvs31, yyval31, yyvsp31) end end yy_do_action_610 --|#line "eiffel.y" local yyval31: detachable ATOMIC_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval31 := yyvs3.item (yyvsp3) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp31 := yyvsp31 + 1 yyvsp3 := yyvsp3 -1 if yyvsp31 >= yyvsc31 then debug ("GEYACC") std.error.put_line ("Resize yyvs31") end yyvsc31 := yyvsc31 + yyInitial_yyvs_size yyvs31 := yyspecial_routines31.aliased_resized_area (yyvs31, yyvsc31) end yyspecial_routines31.force (yyvs31, yyval31, yyvsp31) end end yy_do_action_611 --|#line "eiffel.y" local yyval31: detachable ATOMIC_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval31 := yyvs66.item (yyvsp66) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp31 := yyvsp31 + 1 yyvsp66 := yyvsp66 -1 if yyvsp31 >= yyvsc31 then debug ("GEYACC") std.error.put_line ("Resize yyvs31") end yyvsc31 := yyvsc31 + yyInitial_yyvs_size yyvs31 := yyspecial_routines31.aliased_resized_area (yyvs31, yyvsc31) end yyspecial_routines31.force (yyvs31, yyval31, yyvsp31) end end yy_do_action_612 --|#line "eiffel.y" local yyval31: detachable ATOMIC_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval31 := yyvs78.item (yyvsp78) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp31 := yyvsp31 + 1 yyvsp78 := yyvsp78 -1 if yyvsp31 >= yyvsc31 then debug ("GEYACC") std.error.put_line ("Resize yyvs31") end yyvsc31 := yyvsc31 + yyInitial_yyvs_size yyvs31 := yyspecial_routines31.aliased_resized_area (yyvs31, yyvsc31) end yyspecial_routines31.force (yyvs31, yyval31, yyvsp31) end end yy_do_action_613 --|#line "eiffel.y" local yyval31: detachable ATOMIC_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval31 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp31 := yyvsp31 + 1 yyvsp16 := yyvsp16 -1 if yyvsp31 >= yyvsc31 then debug ("GEYACC") std.error.put_line ("Resize yyvs31") end yyvsc31 := yyvsc31 + yyInitial_yyvs_size yyvs31 := yyspecial_routines31.aliased_resized_area (yyvs31, yyvsc31) end yyspecial_routines31.force (yyvs31, yyval31, yyvsp31) end end yy_do_action_614 --|#line "eiffel.y" local yyval31: detachable ATOMIC_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval31 := yyvs7.item (yyvsp7) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp31 := yyvsp31 + 1 yyvsp7 := yyvsp7 -1 if yyvsp31 >= yyvsc31 then debug ("GEYACC") std.error.put_line ("Resize yyvs31") end yyvsc31 := yyvsc31 + yyInitial_yyvs_size yyvs31 := yyspecial_routines31.aliased_resized_area (yyvs31, yyvsc31) end yyspecial_routines31.force (yyvs31, yyval31, yyvsp31) end end yy_do_action_615 --|#line "eiffel.y" local yyval31: detachable ATOMIC_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval31 := yyvs66.item (yyvsp66) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp31 := yyvsp31 + 1 yyvsp66 := yyvsp66 -1 if yyvsp31 >= yyvsc31 then debug ("GEYACC") std.error.put_line ("Resize yyvs31") end yyvsc31 := yyvsc31 + yyInitial_yyvs_size yyvs31 := yyspecial_routines31.aliased_resized_area (yyvs31, yyvsc31) end yyspecial_routines31.force (yyvs31, yyval31, yyvsp31) end end yy_do_action_616 --|#line "eiffel.y" local yyval31: detachable ATOMIC_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval31 := yyvs66.item (yyvsp66) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp31 := yyvsp31 + 1 yyvsp66 := yyvsp66 -1 if yyvsp31 >= yyvsc31 then debug ("GEYACC") std.error.put_line ("Resize yyvs31") end yyvsc31 := yyvsc31 + yyInitial_yyvs_size yyvs31 := yyspecial_routines31.aliased_resized_area (yyvs31, yyvsc31) end yyspecial_routines31.force (yyvs31, yyval31, yyvsp31) end end yy_do_action_617 --|#line "eiffel.y" local yyval31: detachable ATOMIC_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval31 := yyvs78.item (yyvsp78) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp31 := yyvsp31 + 1 yyvsp78 := yyvsp78 -1 if yyvsp31 >= yyvsc31 then debug ("GEYACC") std.error.put_line ("Resize yyvs31") end yyvsc31 := yyvsc31 + yyInitial_yyvs_size yyvs31 := yyspecial_routines31.aliased_resized_area (yyvs31, yyvsc31) end yyspecial_routines31.force (yyvs31, yyval31, yyvsp31) end end yy_do_action_618 --|#line "eiffel.y" local yyval31: detachable ATOMIC_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval31 := yyvs78.item (yyvsp78) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp31 := yyvsp31 + 1 yyvsp78 := yyvsp78 -1 if yyvsp31 >= yyvsc31 then debug ("GEYACC") std.error.put_line ("Resize yyvs31") end yyvsc31 := yyvsc31 + yyInitial_yyvs_size yyvs31 := yyspecial_routines31.aliased_resized_area (yyvs31, yyvsc31) end yyspecial_routines31.force (yyvs31, yyval31, yyvsp31) end end yy_do_action_619 --|#line "eiffel.y" local yyval31: detachable ATOMIC_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval31 := yyvs3.item (yyvsp3) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp31 := yyvsp31 + 1 yyvsp3 := yyvsp3 -1 if yyvsp31 >= yyvsc31 then debug ("GEYACC") std.error.put_line ("Resize yyvs31") end yyvsc31 := yyvsc31 + yyInitial_yyvs_size yyvs31 := yyspecial_routines31.aliased_resized_area (yyvs31, yyvsc31) end yyspecial_routines31.force (yyvs31, yyval31, yyvsp31) end end yy_do_action_620 --|#line "eiffel.y" local yyval31: detachable ATOMIC_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval31 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp31 := yyvsp31 + 1 yyvsp16 := yyvsp16 -1 if yyvsp31 >= yyvsc31 then debug ("GEYACC") std.error.put_line ("Resize yyvs31") end yyvsc31 := yyvsc31 + yyInitial_yyvs_size yyvs31 := yyspecial_routines31.aliased_resized_area (yyvs31, yyvsc31) end yyspecial_routines31.force (yyvs31, yyval31, yyvsp31) end end yy_do_action_621 --|#line "eiffel.y" local yyval31: detachable ATOMIC_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end if attached yyvs16.item (yyvsp16) as l_string then l_string.set_is_once_string (True) l_string.set_once_string_keyword (yyvs14.item (yyvsp14)) end increment_once_manifest_string_counter yyval31 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp31 := yyvsp31 + 1 yyvsp14 := yyvsp14 -1 yyvsp16 := yyvsp16 -1 if yyvsp31 >= yyvsc31 then debug ("GEYACC") std.error.put_line ("Resize yyvs31") end yyvsc31 := yyvsc31 + yyInitial_yyvs_size yyvs31 := yyspecial_routines31.aliased_resized_area (yyvs31, yyvsc31) end yyspecial_routines31.force (yyvs31, yyval31, yyvsp31) end end yy_do_action_622 --|#line "eiffel.y" local yyval7: detachable BOOL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval7 := yyvs7.item (yyvsp7) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines7.force (yyvs7, yyval7, yyvsp7) end end yy_do_action_623 --|#line "eiffel.y" local yyval7: detachable BOOL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval7 := yyvs7.item (yyvsp7) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines7.force (yyvs7, yyval7, yyvsp7) end end yy_do_action_624 --|#line "eiffel.y" local yyval3: detachable CHAR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval3 := yyvs3.item (yyvsp3) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines3.force (yyvs3, yyval3, yyvsp3) end end yy_do_action_625 --|#line "eiffel.y" local yyval3: detachable CHAR_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval3 := ast_factory.new_typed_char_as (yyvs88.item (yyvsp88), yyvs3.item (yyvsp3)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp88 := yyvsp88 -1 yyspecial_routines3.force (yyvs3, yyval3, yyvsp3) end end yy_do_action_626 --|#line "eiffel.y" local yyval66: detachable INTEGER_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval66 := yyvs66.item (yyvsp66) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines66.force (yyvs66, yyval66, yyvsp66) end end yy_do_action_627 --|#line "eiffel.y" local yyval66: detachable INTEGER_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval66 := yyvs66.item (yyvsp66) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines66.force (yyvs66, yyval66, yyvsp66) end end yy_do_action_628 --|#line "eiffel.y" local yyval66: detachable INTEGER_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval66 := yyvs66.item (yyvsp66) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines66.force (yyvs66, yyval66, yyvsp66) end end yy_do_action_629 --|#line "eiffel.y" local yyval66: detachable INTEGER_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval66 := ast_factory.new_integer_value (Current, '+', Void, token_buffer, yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp66 := yyvsp66 + 1 yyvsp4 := yyvsp4 -1 yyvsp1 := yyvsp1 -1 if yyvsp66 >= yyvsc66 then debug ("GEYACC") std.error.put_line ("Resize yyvs66") end yyvsc66 := yyvsc66 + yyInitial_yyvs_size yyvs66 := yyspecial_routines66.aliased_resized_area (yyvs66, yyvsc66) end yyspecial_routines66.force (yyvs66, yyval66, yyvsp66) end end yy_do_action_630 --|#line "eiffel.y" local yyval66: detachable INTEGER_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval66 := ast_factory.new_integer_value (Current, '-', Void, token_buffer, yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp66 := yyvsp66 + 1 yyvsp4 := yyvsp4 -1 yyvsp1 := yyvsp1 -1 if yyvsp66 >= yyvsc66 then debug ("GEYACC") std.error.put_line ("Resize yyvs66") end yyvsc66 := yyvsc66 + yyInitial_yyvs_size yyvs66 := yyspecial_routines66.aliased_resized_area (yyvs66, yyvsc66) end yyspecial_routines66.force (yyvs66, yyval66, yyvsp66) end end yy_do_action_631 --|#line "eiffel.y" local yyval66: detachable INTEGER_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval66 := ast_factory.new_integer_value (Current, '%U', Void, token_buffer, Void) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp66 := yyvsp66 + 1 yyvsp1 := yyvsp1 -1 if yyvsp66 >= yyvsc66 then debug ("GEYACC") std.error.put_line ("Resize yyvs66") end yyvsc66 := yyvsc66 + yyInitial_yyvs_size yyvs66 := yyspecial_routines66.aliased_resized_area (yyvs66, yyvsc66) end yyspecial_routines66.force (yyvs66, yyval66, yyvsp66) end end yy_do_action_632 --|#line "eiffel.y" local yyval66: detachable INTEGER_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval66 := yyvs66.item (yyvsp66) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines66.force (yyvs66, yyval66, yyvsp66) end end yy_do_action_633 --|#line "eiffel.y" local yyval66: detachable INTEGER_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval66 := yyvs66.item (yyvsp66) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines66.force (yyvs66, yyval66, yyvsp66) end end yy_do_action_634 --|#line "eiffel.y" local yyval66: detachable INTEGER_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval66 := ast_factory.new_integer_value (Current, '%U', yyvs88.item (yyvsp88), token_buffer, Void) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp66 := yyvsp66 + 1 yyvsp88 := yyvsp88 -1 yyvsp1 := yyvsp1 -1 if yyvsp66 >= yyvsc66 then debug ("GEYACC") std.error.put_line ("Resize yyvs66") end yyvsc66 := yyvsc66 + yyInitial_yyvs_size yyvs66 := yyspecial_routines66.aliased_resized_area (yyvs66, yyvsc66) end yyspecial_routines66.force (yyvs66, yyval66, yyvsp66) end end yy_do_action_635 --|#line "eiffel.y" local yyval66: detachable INTEGER_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval66 := ast_factory.new_integer_value (Current, '+', yyvs88.item (yyvsp88), token_buffer, yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp66 := yyvsp66 + 1 yyvsp88 := yyvsp88 -1 yyvsp4 := yyvsp4 -1 yyvsp1 := yyvsp1 -1 if yyvsp66 >= yyvsc66 then debug ("GEYACC") std.error.put_line ("Resize yyvs66") end yyvsc66 := yyvsc66 + yyInitial_yyvs_size yyvs66 := yyspecial_routines66.aliased_resized_area (yyvs66, yyvsc66) end yyspecial_routines66.force (yyvs66, yyval66, yyvsp66) end end yy_do_action_636 --|#line "eiffel.y" local yyval66: detachable INTEGER_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval66 := ast_factory.new_integer_value (Current, '-', yyvs88.item (yyvsp88), token_buffer, yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp66 := yyvsp66 + 1 yyvsp88 := yyvsp88 -1 yyvsp4 := yyvsp4 -1 yyvsp1 := yyvsp1 -1 if yyvsp66 >= yyvsc66 then debug ("GEYACC") std.error.put_line ("Resize yyvs66") end yyvsc66 := yyvsc66 + yyInitial_yyvs_size yyvs66 := yyspecial_routines66.aliased_resized_area (yyvs66, yyvsc66) end yyspecial_routines66.force (yyvs66, yyval66, yyvsp66) end end yy_do_action_637 --|#line "eiffel.y" local yyval78: detachable REAL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval78 := yyvs78.item (yyvsp78) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines78.force (yyvs78, yyval78, yyvsp78) end end yy_do_action_638 --|#line "eiffel.y" local yyval78: detachable REAL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval78 := yyvs78.item (yyvsp78) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines78.force (yyvs78, yyval78, yyvsp78) end end yy_do_action_639 --|#line "eiffel.y" local yyval78: detachable REAL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval78 := yyvs78.item (yyvsp78) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines78.force (yyvs78, yyval78, yyvsp78) end end yy_do_action_640 --|#line "eiffel.y" local yyval78: detachable REAL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval78 := ast_factory.new_real_value (Current, False, '%U', Void, token_buffer, Void) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp78 := yyvsp78 + 1 yyvsp1 := yyvsp1 -1 if yyvsp78 >= yyvsc78 then debug ("GEYACC") std.error.put_line ("Resize yyvs78") end yyvsc78 := yyvsc78 + yyInitial_yyvs_size yyvs78 := yyspecial_routines78.aliased_resized_area (yyvs78, yyvsc78) end yyspecial_routines78.force (yyvs78, yyval78, yyvsp78) end end yy_do_action_641 --|#line "eiffel.y" local yyval78: detachable REAL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval78 := ast_factory.new_real_value (Current, True, '+', Void, token_buffer, yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp78 := yyvsp78 + 1 yyvsp4 := yyvsp4 -1 yyvsp1 := yyvsp1 -1 if yyvsp78 >= yyvsc78 then debug ("GEYACC") std.error.put_line ("Resize yyvs78") end yyvsc78 := yyvsc78 + yyInitial_yyvs_size yyvs78 := yyspecial_routines78.aliased_resized_area (yyvs78, yyvsc78) end yyspecial_routines78.force (yyvs78, yyval78, yyvsp78) end end yy_do_action_642 --|#line "eiffel.y" local yyval78: detachable REAL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval78 := ast_factory.new_real_value (Current, True, '-', Void, token_buffer, yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp78 := yyvsp78 + 1 yyvsp4 := yyvsp4 -1 yyvsp1 := yyvsp1 -1 if yyvsp78 >= yyvsc78 then debug ("GEYACC") std.error.put_line ("Resize yyvs78") end yyvsc78 := yyvsc78 + yyInitial_yyvs_size yyvs78 := yyspecial_routines78.aliased_resized_area (yyvs78, yyvsc78) end yyspecial_routines78.force (yyvs78, yyval78, yyvsp78) end end yy_do_action_643 --|#line "eiffel.y" local yyval78: detachable REAL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval78 := yyvs78.item (yyvsp78) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines78.force (yyvs78, yyval78, yyvsp78) end end yy_do_action_644 --|#line "eiffel.y" local yyval78: detachable REAL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval78 := yyvs78.item (yyvsp78) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines78.force (yyvs78, yyval78, yyvsp78) end end yy_do_action_645 --|#line "eiffel.y" local yyval78: detachable REAL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval78 := ast_factory.new_real_value (Current, False, '%U', yyvs88.item (yyvsp88), token_buffer, Void) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp78 := yyvsp78 + 1 yyvsp88 := yyvsp88 -1 yyvsp1 := yyvsp1 -1 if yyvsp78 >= yyvsc78 then debug ("GEYACC") std.error.put_line ("Resize yyvs78") end yyvsc78 := yyvsc78 + yyInitial_yyvs_size yyvs78 := yyspecial_routines78.aliased_resized_area (yyvs78, yyvsc78) end yyspecial_routines78.force (yyvs78, yyval78, yyvsp78) end end yy_do_action_646 --|#line "eiffel.y" local yyval78: detachable REAL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval78 := ast_factory.new_real_value (Current, True, '+', yyvs88.item (yyvsp88), token_buffer, yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp78 := yyvsp78 + 1 yyvsp88 := yyvsp88 -1 yyvsp4 := yyvsp4 -1 yyvsp1 := yyvsp1 -1 if yyvsp78 >= yyvsc78 then debug ("GEYACC") std.error.put_line ("Resize yyvs78") end yyvsc78 := yyvsc78 + yyInitial_yyvs_size yyvs78 := yyspecial_routines78.aliased_resized_area (yyvs78, yyvsc78) end yyspecial_routines78.force (yyvs78, yyval78, yyvsp78) end end yy_do_action_647 --|#line "eiffel.y" local yyval78: detachable REAL_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval78 := ast_factory.new_real_value (Current, True, '-', yyvs88.item (yyvsp88), token_buffer, yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp78 := yyvsp78 + 1 yyvsp88 := yyvsp88 -1 yyvsp4 := yyvsp4 -1 yyvsp1 := yyvsp1 -1 if yyvsp78 >= yyvsc78 then debug ("GEYACC") std.error.put_line ("Resize yyvs78") end yyvsc78 := yyvsc78 + yyInitial_yyvs_size yyvs78 := yyspecial_routines78.aliased_resized_area (yyvs78, yyvsc78) end yyspecial_routines78.force (yyvs78, yyval78, yyvsp78) end end yy_do_action_648 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_649 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_650 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_651 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_652 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_653 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if attached yyval16 as l_string then l_string.set_type (yyvs88.item (yyvsp88)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp88 := yyvsp88 -1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_654 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_655 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_656 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_657 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_658 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_659 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_660 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_661 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_662 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_663 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_664 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_665 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_666 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_667 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_668 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_669 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_670 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_671 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_672 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_673 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_674 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_675 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_676 --|#line "eiffel.y" local yyval16: detachable STRING_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval16 := yyvs16.item (yyvsp16) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines16.force (yyvs16, yyval16, yyvsp16) end end yy_do_action_677 --|#line "eiffel.y" local yyval29: detachable ARRAY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval29 := ast_factory.new_array_as (ast_factory.new_eiffel_list_expr_as (Void, 0), yyvs4.item (yyvsp4 - 1), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp29 := yyvsp29 + 1 yyvsp4 := yyvsp4 -2 if yyvsp29 >= yyvsc29 then debug ("GEYACC") std.error.put_line ("Resize yyvs29") end yyvsc29 := yyvsc29 + yyInitial_yyvs_size yyvs29 := yyspecial_routines29.aliased_resized_area (yyvs29, yyvsc29) end yyspecial_routines29.force (yyvs29, yyval29, yyvsp29) end end yy_do_action_678 --|#line "eiffel.y" local yyval29: detachable ARRAY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval29 := ast_factory.new_array_as (ast_factory.new_eiffel_list_expr_as (Void, 0), yyvs4.item (yyvsp4 - 1), yyvs4.item (yyvsp4)) if attached yyval29 as a then a.set_type (yyvs88.item (yyvsp88)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp29 := yyvsp29 + 1 yyvsp88 := yyvsp88 -1 yyvsp4 := yyvsp4 -2 if yyvsp29 >= yyvsc29 then debug ("GEYACC") std.error.put_line ("Resize yyvs29") end yyvsc29 := yyvsc29 + yyInitial_yyvs_size yyvs29 := yyspecial_routines29.aliased_resized_area (yyvs29, yyvsc29) end yyspecial_routines29.force (yyvs29, yyval29, yyvsp29) end end yy_do_action_679 --|#line "eiffel.y" local yyval29: detachable ARRAY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval29 := ast_factory.new_array_as (yyvs104.item (yyvsp104), yyvs4.item (yyvsp4 - 1), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp29 := yyvsp29 + 1 yyvsp4 := yyvsp4 -2 yyvsp1 := yyvsp1 -2 yyvsp104 := yyvsp104 -1 if yyvsp29 >= yyvsc29 then debug ("GEYACC") std.error.put_line ("Resize yyvs29") end yyvsc29 := yyvsc29 + yyInitial_yyvs_size yyvs29 := yyspecial_routines29.aliased_resized_area (yyvs29, yyvsc29) end yyspecial_routines29.force (yyvs29, yyval29, yyvsp29) end end yy_do_action_680 --|#line "eiffel.y" local yyval29: detachable ARRAY_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval29 := ast_factory.new_array_as (yyvs104.item (yyvsp104), yyvs4.item (yyvsp4 - 1), yyvs4.item (yyvsp4)) if attached yyval29 as a then a.set_type (yyvs88.item (yyvsp88)) end if yy_parsing_status >= yyContinue then yyssp := yyssp - 6 yyvsp29 := yyvsp29 + 1 yyvsp88 := yyvsp88 -1 yyvsp4 := yyvsp4 -2 yyvsp1 := yyvsp1 -2 yyvsp104 := yyvsp104 -1 if yyvsp29 >= yyvsc29 then debug ("GEYACC") std.error.put_line ("Resize yyvs29") end yyvsc29 := yyvsc29 + yyInitial_yyvs_size yyvs29 := yyspecial_routines29.aliased_resized_area (yyvs29, yyvsc29) end yyspecial_routines29.force (yyvs29, yyval29, yyvsp29) end end yy_do_action_681 --|#line "eiffel.y" local yyval87: detachable TUPLE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval87 := ast_factory.new_tuple_as (ast_factory.new_eiffel_list_expr_as (Void, 0), yyvs4.item (yyvsp4 - 1), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp87 := yyvsp87 + 1 yyvsp4 := yyvsp4 -2 if yyvsp87 >= yyvsc87 then debug ("GEYACC") std.error.put_line ("Resize yyvs87") end yyvsc87 := yyvsc87 + yyInitial_yyvs_size yyvs87 := yyspecial_routines87.aliased_resized_area (yyvs87, yyvsc87) end yyspecial_routines87.force (yyvs87, yyval87, yyvsp87) end end yy_do_action_682 --|#line "eiffel.y" local yyval87: detachable TUPLE_AS do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end yyval87 := ast_factory.new_tuple_as (yyvs104.item (yyvsp104), yyvs4.item (yyvsp4 - 1), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp87 := yyvsp87 + 1 yyvsp4 := yyvsp4 -2 yyvsp1 := yyvsp1 -2 yyvsp104 := yyvsp104 -1 if yyvsp87 >= yyvsc87 then debug ("GEYACC") std.error.put_line ("Resize yyvs87") end yyvsc87 := yyvsc87 + yyInitial_yyvs_size yyvs87 := yyspecial_routines87.aliased_resized_area (yyvs87, yyvsc87) end yyspecial_routines87.force (yyvs87, yyval87, yyvsp87) end end yy_do_action_683 --|#line "eiffel.y" local yyval1: detachable ANY do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end add_counter if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp1 := yyvsp1 + 1 if yyvsp1 >= yyvsc1 then debug ("GEYACC") std.error.put_line ("Resize yyvs1") end yyvsc1 := yyvsc1 + yyInitial_yyvs_size yyvs1 := yyspecial_routines1.aliased_resized_area (yyvs1, yyvsc1) end yyspecial_routines1.force (yyvs1, yyval1, yyvsp1) end end yy_do_action_684 --|#line "eiffel.y" local yyval1: detachable ANY do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end add_counter if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp1 := yyvsp1 + 1 if yyvsp1 >= yyvsc1 then debug ("GEYACC") std.error.put_line ("Resize yyvs1") end yyvsc1 := yyvsc1 + yyInitial_yyvs_size yyvs1 := yyspecial_routines1.aliased_resized_area (yyvs1, yyvsc1) end yyspecial_routines1.force (yyvs1, yyval1, yyvsp1) end end yy_do_action_685 --|#line "eiffel.y" local yyval1: detachable ANY do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end add_counter2 if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp1 := yyvsp1 + 1 if yyvsp1 >= yyvsc1 then debug ("GEYACC") std.error.put_line ("Resize yyvs1") end yyvsc1 := yyvsc1 + yyInitial_yyvs_size yyvs1 := yyspecial_routines1.aliased_resized_area (yyvs1, yyvsc1) end yyspecial_routines1.force (yyvs1, yyval1, yyvsp1) end end yy_do_action_686 --|#line "eiffel.y" local yyval1: detachable ANY do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end increment_counter if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp1 := yyvsp1 + 1 if yyvsp1 >= yyvsc1 then debug ("GEYACC") std.error.put_line ("Resize yyvs1") end yyvsc1 := yyvsc1 + yyInitial_yyvs_size yyvs1 := yyspecial_routines1.aliased_resized_area (yyvs1, yyvsc1) end yyspecial_routines1.force (yyvs1, yyval1, yyvsp1) end end yy_do_action_687 --|#line "eiffel.y" local yyval1: detachable ANY do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end increment_counter2 if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp1 := yyvsp1 + 1 if yyvsp1 >= yyvsc1 then debug ("GEYACC") std.error.put_line ("Resize yyvs1") end yyvsc1 := yyvsc1 + yyInitial_yyvs_size yyvs1 := yyspecial_routines1.aliased_resized_area (yyvs1, yyvsc1) end yyspecial_routines1.force (yyvs1, yyval1, yyvsp1) end end yy_do_action_688 --|#line "eiffel.y" local yyval1: detachable ANY do --|#line "eiffel.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'eiffel.y' at line ") end remove_counter if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp1 := yyvsp1 + 1 if yyvsp1 >= yyvsc1 then debug ("GEYACC") std.error.put_line ("Resize yyvs1") end yyvsc1 := yyvsc1 + yyInitial_yyvs_size yyvs1 := yyspecial_routines1.aliased_resized_area (yyvs1, yyvsc1) end yyspecial_routines1.force (yyvs1, yyval1, yyvsp1) end end yy_do_error_action (yy_act: INTEGER) -- Execute error action. do if yy_act <= 199 then yy_do_error_action_0_199 (yy_act) elseif yy_act <= 399 then yy_do_error_action_200_399 (yy_act) elseif yy_act <= 599 then yy_do_error_action_400_599 (yy_act) elseif yy_act <= 799 then yy_do_error_action_600_799 (yy_act) elseif yy_act <= 999 then yy_do_error_action_800_999 (yy_act) elseif yy_act <= 1199 then yy_do_error_action_1000_1199 (yy_act) elseif yy_act <= 1399 then yy_do_error_action_1200_1399 (yy_act) else -- Default action. report_error ("parse error") end end yy_do_error_action_0_199 (yy_act: INTEGER) -- Execute error action. do inspect yy_act else -- Default action. report_error ("parse error") end end yy_do_error_action_200_399 (yy_act: INTEGER) -- Execute error action. do inspect yy_act else -- Default action. report_error ("parse error") end end yy_do_error_action_400_599 (yy_act: INTEGER) -- Execute error action. do inspect yy_act else -- Default action. report_error ("parse error") end end yy_do_error_action_600_799 (yy_act: INTEGER) -- Execute error action. do inspect yy_act else -- Default action. report_error ("parse error") end end yy_do_error_action_800_999 (yy_act: INTEGER) -- Execute error action. do inspect yy_act else -- Default action. report_error ("parse error") end end yy_do_error_action_1000_1199 (yy_act: INTEGER) -- Execute error action. do inspect yy_act else -- Default action. report_error ("parse error") end end yy_do_error_action_1200_1399 (yy_act: INTEGER) -- Execute error action. do inspect yy_act when 1262 then -- End-of-file expected action. report_eof_expected_error else -- Default action. report_error ("parse error") end end feature {NONE} -- Table templates yytranslate_template: SPECIAL [INTEGER] -- Template for `yytranslate' local an_array: ARRAY [INTEGER] once create an_array.make_filled (0, 0, 406) yytranslate_template_1 (an_array) yytranslate_template_2 (an_array) yytranslate_template_3 (an_array) Result := yyfixed_array (an_array) end yytranslate_template_1 (an_array: ARRAY [INTEGER]) -- Fill chunk #1 of template for `yytranslate'. do yyarray_subcopy (an_array, << 0, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, yyDummy>>, 1, 200, 0) end yytranslate_template_2 (an_array: ARRAY [INTEGER]) -- Fill chunk #2 of template for `yytranslate'. do yyarray_subcopy (an_array, << 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143, 144, yyDummy>>, 1, 200, 200) end yytranslate_template_3 (an_array: ARRAY [INTEGER]) -- Fill chunk #3 of template for `yytranslate'. do yyarray_subcopy (an_array, << 145, 146, 147, 148, 149, 150, 151, yyDummy>>, 1, 7, 400) end yyr1_template: SPECIAL [INTEGER] -- Template for `yyr1' local an_array: ARRAY [INTEGER] once create an_array.make_filled (0, 0, 688) yyr1_template_1 (an_array) yyr1_template_2 (an_array) yyr1_template_3 (an_array) yyr1_template_4 (an_array) Result := yyfixed_array (an_array) end yyr1_template_1 (an_array: ARRAY [INTEGER]) -- Fill chunk #1 of template for `yyr1'. do yyarray_subcopy (an_array, << 0, 361, 361, 361, 361, 361, 361, 361, 361, 362, 366, 367, 368, 369, 370, 329, 329, 329, 329, 329, 332, 332, 332, 330, 330, 331, 331, 220, 222, 221, 221, 223, 289, 289, 289, 290, 290, 172, 172, 172, 172, 375, 376, 373, 374, 365, 365, 365, 365, 377, 377, 378, 378, 185, 185, 160, 160, 310, 310, 311, 311, 209, 209, 187, 379, 186, 186, 327, 327, 328, 328, 309, 309, 152, 152, 208, 380, 382, 316, 316, 288, 288, 287, 287, 286, 156, 156, 155, 155, 155, 155, 155, 264, 264, 264, 264, 265, 265, 265, 265, 265, 265, 265, 265, 265, 265, 265, 265, 265, 265, 265, 153, 153, 154, 154, 177, 177, 177, 177, 177, 177, 177, 177, 158, 158, 188, 188, 339, 339, 339, 339, 383, 340, 340, 242, 281, 243, 243, 243, 243, 243, 243, 342, 342, 341, 341, 254, 305, 305, 304, 304, 303, 303, 197, 210, 210, 210, 296, 296, 295, 295, 189, 189, 312, 313, 313, 314, 315, 315, 320, 320, 319, 319, 322, 322, 321, 321, 324, 324, 323, 323, 356, 356, 352, 352, 282, 354, 354, 283, 283, 161, 161, 162, 162, 258, 384, 385, 257, 257, 257, yyDummy>>, 1, 200, 0) end yyr1_template_2 (an_array: ARRAY [INTEGER]) -- Fill chunk #2 of template for `yyr1'. do yyarray_subcopy (an_array, << 206, 207, 159, 159, 234, 234, 234, 355, 355, 355, 334, 334, 335, 335, 226, 381, 381, 227, 227, 227, 227, 227, 227, 227, 227, 227, 227, 227, 227, 227, 227, 227, 227, 255, 255, 386, 255, 387, 196, 196, 388, 196, 389, 345, 345, 346, 346, 390, 267, 267, 267, 267, 267, 269, 269, 269, 272, 272, 272, 272, 272, 272, 272, 272, 272, 272, 272, 272, 272, 272, 272, 272, 272, 272, 276, 276, 273, 270, 270, 270, 270, 270, 270, 270, 270, 270, 270, 270, 270, 270, 270, 270, 270, 270, 270, 275, 275, 277, 277, 280, 280, 280, 279, 348, 348, 347, 347, 349, 350, 350, 274, 274, 274, 274, 351, 351, 351, 353, 353, 353, 325, 325, 325, 326, 326, 211, 211, 211, 211, 212, 393, 358, 358, 358, 360, 394, 395, 360, 278, 278, 359, 359, 396, 318, 318, 218, 218, 218, 218, 299, 300, 300, 194, 224, 224, 291, 291, 292, 292, 181, 336, 336, 235, 235, 235, 235, 235, 235, 235, 235, 235, 235, 235, 235, 235, 235, 235, 235, 235, 235, 238, 238, 238, 238, 238, 397, 237, 237, 237, 398, 237, 399, 333, 333, 163, 163, 236, 236, 400, 164, yyDummy>>, 1, 200, 200) end yyr1_template_3 (an_array: ARRAY [INTEGER]) -- Fill chunk #3 of template for `yyr1'. do yyarray_subcopy (an_array, << 164, 285, 285, 284, 284, 193, 344, 344, 344, 343, 343, 157, 157, 171, 171, 256, 256, 297, 297, 298, 298, 190, 190, 190, 190, 190, 190, 259, 401, 402, 259, 403, 404, 259, 259, 357, 357, 165, 165, 165, 165, 165, 165, 338, 338, 338, 337, 337, 241, 241, 241, 191, 191, 192, 179, 179, 167, 167, 169, 169, 180, 180, 180, 180, 202, 184, 213, 266, 405, 239, 317, 317, 271, 200, 200, 200, 200, 200, 200, 200, 200, 200, 200, 200, 200, 200, 176, 176, 176, 176, 176, 176, 176, 176, 176, 176, 176, 176, 176, 176, 176, 176, 176, 176, 176, 176, 176, 176, 176, 176, 176, 201, 201, 201, 201, 201, 201, 201, 201, 201, 201, 201, 201, 201, 201, 201, 201, 201, 201, 201, 203, 203, 203, 204, 204, 205, 205, 240, 240, 240, 240, 240, 240, 240, 240, 240, 240, 244, 244, 245, 245, 247, 246, 166, 168, 199, 199, 199, 199, 199, 199, 199, 199, 199, 308, 308, 308, 198, 198, 307, 307, 306, 306, 214, 214, 215, 215, 215, 215, 215, 215, 215, 216, 217, 217, 217, 217, 217, 217, 219, 219, 301, 302, 302, 195, 225, 225, 293, 293, 294, yyDummy>>, 1, 200, 400) end yyr1_template_4 (an_array: ARRAY [INTEGER]) -- Fill chunk #4 of template for `yyr1'. do yyarray_subcopy (an_array, << 294, 182, 175, 175, 175, 175, 175, 175, 175, 173, 173, 173, 173, 173, 174, 174, 174, 174, 174, 174, 174, 174, 178, 178, 183, 183, 228, 228, 228, 229, 229, 230, 231, 231, 232, 233, 233, 248, 248, 248, 250, 249, 249, 251, 251, 252, 253, 253, 260, 260, 262, 262, 262, 263, 261, 261, 261, 261, 261, 261, 261, 261, 261, 261, 261, 261, 261, 261, 261, 261, 261, 261, 261, 261, 261, 261, 261, 170, 170, 170, 170, 268, 268, 371, 363, 391, 372, 392, 364, yyDummy>>, 1, 89, 600) end yytypes1_template: SPECIAL [INTEGER] -- Template for `yytypes1' local an_array: ARRAY [INTEGER] once create an_array.make_filled (0, 0, 1264) yytypes1_template_1 (an_array) yytypes1_template_2 (an_array) yytypes1_template_3 (an_array) yytypes1_template_4 (an_array) yytypes1_template_5 (an_array) yytypes1_template_6 (an_array) yytypes1_template_7 (an_array) Result := yyfixed_array (an_array) end yytypes1_template_1 (an_array: ARRAY [INTEGER]) -- Fill chunk #1 of template for `yytypes1'. do yyarray_subcopy (an_array, << 1, 15, 15, 15, 15, 15, 15, 14, 14, 14, 14, 2, 2, 2, 116, 1, 1, 1, 1, 14, 69, 54, 1, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 15, 15, 14, 14, 14, 14, 14, 14, 14, 13, 11, 8, 7, 7, 4, 4, 4, 4, 3, 1, 1, 4, 14, 14, 2, 14, 6, 2, 4, 4, 6, 6, 26, 29, 31, 32, 7, 35, 3, 44, 50, 50, 50, 50, 50, 51, 51, 2, 61, 64, 66, 66, 66, 66, 70, 73, 76, 77, 77, 77, 78, 78, 78, 78, 84, 16, 16, 16, 16, 87, 88, 117, 15, 15, 15, 15, 15, 15, 14, 14, 14, 14, 14, 2, 2, 2, 2, 88, 88, 88, 88, 88, 88, 88, 88, 88, 89, 14, 12, 1, 1, 62, 116, 1, 62, 116, 1, 92, 130, 1, 69, 14, 2, 94, 94, 94, 108, 4, 50, 50, 4, 16, 88, 50, 50, 88, 4, 34, 11, 8, 4, 4, 25, 2, 88, 132, 132, 4, 4, 105, 4, 4, 15, 15, 15, 15, 2, 2, 2, 88, 4, 1, yyDummy>>, 1, 200, 0) end yytypes1_template_2 (an_array: ARRAY [INTEGER]) -- Fill chunk #2 of template for `yytypes1'. do yyarray_subcopy (an_array, << 11, 8, 2, 94, 4, 1, 50, 50, 4, 50, 50, 2, 50, 1, 1, 50, 1, 1, 50, 2, 2, 4, 4, 4, 6, 2, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 2, 2, 14, 2, 14, 2, 2, 14, 2, 14, 4, 4, 4, 4, 4, 105, 4, 4, 4, 4, 3, 1, 1, 4, 4, 4, 16, 14, 23, 15, 15, 14, 88, 88, 14, 88, 88, 15, 15, 14, 88, 88, 88, 88, 11, 2, 88, 88, 15, 15, 14, 88, 88, 4, 128, 128, 1, 4, 4, 14, 1, 14, 14, 14, 14, 14, 1, 4, 4, 1, 2, 62, 1, 1, 4, 4, 4, 31, 31, 7, 3, 2, 62, 66, 66, 66, 66, 66, 66, 78, 78, 78, 78, 78, 78, 16, 88, 95, 1, 1, 1, 22, 2, 127, 1, 94, 1, 4, 1, 88, 14, 15, 14, 97, 1, 14, 4, 2, 88, 4, 1, 4, 4, 121, 4, 84, 2, 4, 1, 27, 2, 27, 4, 4, 50, 104, 104, 4, 22, 1, 4, 4, 27, 1, 1, 50, 50, 50, 50, 50, 50, 50, 50, 50, 50, 50, 50, 50, 50, yyDummy>>, 1, 200, 200) end yytypes1_template_3 (an_array: ARRAY [INTEGER]) -- Fill chunk #3 of template for `yytypes1'. do yyarray_subcopy (an_array, << 50, 50, 50, 50, 50, 14, 50, 50, 50, 50, 50, 14, 50, 50, 50, 27, 1, 27, 1, 27, 27, 27, 27, 4, 1, 2, 1, 1, 1, 1, 127, 14, 24, 88, 88, 88, 88, 14, 88, 88, 14, 88, 88, 88, 88, 4, 14, 88, 88, 14, 88, 88, 88, 88, 4, 128, 1, 1, 2, 2, 2, 2, 2, 1, 1, 1, 4, 1, 116, 4, 4, 1, 4, 44, 130, 1, 4, 14, 50, 2, 86, 127, 14, 17, 18, 1, 54, 4, 2, 2, 2, 14, 14, 14, 37, 97, 50, 2, 4, 4, 28, 91, 129, 1, 2, 4, 1, 88, 14, 21, 83, 4, 4, 50, 50, 104, 105, 88, 4, 1, 1, 4, 4, 22, 50, 50, 104, 104, 50, 50, 104, 104, 104, 105, 50, 15, 14, 88, 88, 88, 88, 2, 88, 88, 88, 88, 4, 88, 128, 4, 4, 114, 116, 31, 2, 95, 1, 95, 14, 87, 4, 4, 1, 4, 4, 4, 127, 1, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 1, 1, 108, 15, 4, 4, 14, 33, 132, yyDummy>>, 1, 200, 400) end yytypes1_template_4 (an_array: ARRAY [INTEGER]) -- Fill chunk #4 of template for `yytypes1'. do yyarray_subcopy (an_array, << 50, 50, 1, 1, 1, 14, 101, 1, 105, 2, 1, 1, 22, 50, 2, 121, 4, 50, 74, 88, 120, 84, 16, 83, 84, 105, 4, 4, 1, 4, 1, 4, 4, 27, 1, 4, 4, 1, 1, 1, 1, 1, 50, 50, 4, 1, 4, 2, 88, 128, 129, 4, 1, 14, 21, 4, 95, 4, 1, 14, 88, 22, 14, 4, 50, 127, 18, 14, 14, 88, 1, 116, 54, 4, 14, 14, 14, 4, 4, 3, 2, 66, 68, 77, 88, 119, 97, 50, 14, 14, 47, 101, 105, 129, 1, 4, 1, 1, 4, 4, 1, 83, 14, 80, 121, 50, 1, 4, 50, 104, 70, 70, 4, 4, 4, 4, 4, 14, 93, 93, 93, 1, 4, 4, 4, 4, 1, 16, 21, 1, 1, 4, 4, 4, 15, 20, 83, 1, 88, 116, 2, 4, 4, 4, 4, 4, 4, 4, 1, 14, 50, 50, 1, 1, 4, 1, 1, 4, 84, 14, 80, 83, 4, 104, 50, 50, 50, 2, 14, 14, 128, 1, 88, 1, 14, 14, 14, 57, 58, 2, 114, 1, 95, 2, 15, 15, 4, 116, 116, 4, 20, 83, 3, 2, 77, 88, 3, 2, 66, 77, yyDummy>>, 1, 200, 600) end yytypes1_template_5 (an_array: ARRAY [INTEGER]) -- Fill chunk #5 of template for `yytypes1'. do yyarray_subcopy (an_array, << 2, 66, 77, 88, 1, 3, 2, 66, 77, 14, 14, 14, 101, 88, 4, 120, 121, 80, 127, 14, 131, 4, 128, 129, 4, 4, 2, 128, 2, 2, 2, 58, 4, 1, 14, 122, 10, 3, 31, 7, 40, 66, 66, 78, 78, 16, 116, 14, 1, 40, 83, 14, 119, 50, 50, 4, 127, 1, 15, 14, 14, 14, 12, 52, 67, 82, 50, 1, 4, 4, 133, 1, 1, 4, 4, 1, 1, 15, 116, 83, 116, 116, 116, 130, 118, 1, 4, 126, 53, 16, 118, 14, 48, 1, 1, 4, 88, 88, 88, 135, 114, 4, 2, 2, 75, 75, 90, 122, 122, 1, 1, 83, 1, 1, 4, 1, 118, 21, 14, 48, 14, 19, 2, 129, 1, 135, 14, 110, 4, 128, 1, 4, 14, 14, 14, 14, 14, 103, 111, 112, 113, 124, 1, 1, 116, 14, 14, 14, 14, 14, 14, 14, 14, 9, 8, 6, 30, 35, 38, 43, 45, 50, 51, 51, 59, 2, 60, 63, 65, 65, 71, 73, 77, 81, 85, 88, 117, 118, 16, 125, 48, 127, 118, 14, 4, 134, 135, 124, 108, 1, 122, 122, 108, 1, 108, 1, 108, 4, 1, 111, yyDummy>>, 1, 200, 800) end yytypes1_template_6 (an_array: ARRAY [INTEGER]) -- Fill chunk #6 of template for `yytypes1'. do yyarray_subcopy (an_array, << 111, 112, 112, 113, 113, 14, 103, 103, 99, 1, 1, 85, 50, 50, 118, 126, 34, 127, 4, 4, 2, 4, 4, 4, 4, 1, 1, 4, 4, 14, 23, 1, 4, 1, 127, 1, 1, 4, 135, 14, 2, 108, 1, 94, 108, 79, 94, 123, 4, 49, 102, 115, 112, 113, 14, 111, 14, 98, 14, 14, 42, 99, 1, 96, 1, 14, 23, 118, 8, 26, 2, 88, 14, 14, 50, 50, 4, 50, 50, 50, 50, 118, 50, 50, 118, 24, 1, 4, 4, 134, 14, 4, 1, 122, 4, 1, 4, 14, 1, 4, 1, 1, 1, 14, 56, 108, 113, 14, 112, 1, 107, 1, 39, 115, 39, 115, 1, 1, 50, 72, 109, 14, 14, 14, 36, 96, 118, 14, 93, 14, 28, 26, 118, 50, 23, 14, 125, 110, 134, 1, 1, 1, 1, 94, 2, 115, 102, 4, 14, 113, 41, 94, 98, 1, 14, 39, 55, 107, 108, 108, 99, 14, 4, 1, 118, 1, 1, 1, 14, 14, 100, 1, 50, 14, 28, 14, 4, 24, 118, 108, 108, 123, 4, 1, 14, 4, 4, 4, 1, 69, 39, 1, 1, 1, 1, 2, 1, 14, 14, 119, yyDummy>>, 1, 200, 1000) end yytypes1_template_7 (an_array: ARRAY [INTEGER]) -- Fill chunk #7 of template for `yytypes1'. do yyarray_subcopy (an_array, << 96, 118, 14, 14, 14, 46, 100, 14, 50, 71, 14, 93, 1, 4, 1, 4, 4, 116, 39, 115, 54, 106, 107, 109, 118, 1, 14, 118, 50, 1, 1, 118, 14, 118, 118, 14, 115, 98, 128, 128, 14, 1, 1, 14, 14, 14, 14, 100, 93, 118, 6, 93, 4, 4, 106, 1, 118, 118, 14, 14, 14, 4, 1, 1, 1, yyDummy>>, 1, 65, 1200) end yytypes2_template: SPECIAL [INTEGER] -- Template for `yytypes2' once Result := yyfixed_array (<< 1, 1, 1, 4, 6, 6, 6, 6, 4, 14, 2, 14, 2, 2, 14, 2, 14, 2, 2, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 2, 6, 14, 2, 14, 14, 4, 1, 4, 6, 2, 2, 1, 1, 3, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 6, 7, 7, 8, 9, 10, 11, 12, 13, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 15, 15, 15, 15, 15, 15, 15, 15, 15, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, yyDummy>>) end yydefact_template: SPECIAL [INTEGER] -- Template for `yydefact' local an_array: ARRAY [INTEGER] once create an_array.make_filled (0, 0, 1264) yydefact_template_1 (an_array) yydefact_template_2 (an_array) yydefact_template_3 (an_array) yydefact_template_4 (an_array) yydefact_template_5 (an_array) yydefact_template_6 (an_array) yydefact_template_7 (an_array) Result := yyfixed_array (an_array) end yydefact_template_1 (an_array: ARRAY [INTEGER]) -- Fill chunk #1 of template for `yydefact'. do yyarray_subcopy (an_array, << 15, 683, 683, 588, 587, 586, 585, 684, 396, 684, 0, 584, 583, 0, 49, 1, 684, 684, 684, 398, 6, 3, 0, 668, 667, 676, 675, 674, 673, 672, 671, 670, 669, 666, 665, 664, 663, 662, 661, 660, 659, 658, 657, 656, 652, 655, 651, 654, 587, 585, 0, 0, 0, 0, 454, 435, 564, 511, 558, 559, 623, 622, 0, 684, 0, 684, 624, 640, 631, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 460, 512, 555, 480, 614, 520, 619, 561, 519, 4, 475, 563, 556, 521, 522, 564, 528, 529, 615, 473, 531, 616, 562, 463, 461, 462, 550, 549, 617, 474, 532, 618, 513, 620, 650, 648, 649, 557, 530, 394, 581, 580, 579, 578, 577, 576, 0, 0, 0, 0, 0, 582, 575, 303, 684, 2, 254, 253, 274, 275, 277, 256, 295, 255, 296, 50, 51, 0, 51, 73, 688, 0, 686, 688, 43, 686, 688, 0, 684, 0, 684, 82, 80, 78, 688, 0, 481, 0, 0, 621, 0, 684, 0, 0, 0, 0, 440, 439, 442, 684, 0, 443, 441, 436, 428, 0, 684, 547, 0, 0, 588, 587, 586, 585, 584, 583, 0, 0, 677, 0, yyDummy>>, 1, 200, 0) end yydefact_template_2 (an_array: ARRAY [INTEGER]) -- Fill chunk #2 of template for `yydefact'. do yyarray_subcopy (an_array, << 517, 518, 84, 516, 681, 0, 0, 514, 684, 526, 525, 464, 527, 642, 630, 523, 641, 629, 524, 0, 0, 0, 684, 684, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 684, 0, 684, 0, 553, 0, 0, 0, 684, 625, 645, 634, 0, 0, 0, 653, 684, 399, 580, 579, 0, 279, 257, 0, 278, 258, 580, 579, 0, 281, 260, 282, 261, 298, 297, 0, 302, 580, 579, 0, 280, 259, 684, 304, 276, 685, 0, 0, 52, 46, 53, 54, 0, 51, 51, 45, 74, 686, 18, 0, 688, 684, 16, 34, 0, 0, 32, 38, 609, 610, 37, 688, 611, 626, 627, 628, 632, 633, 612, 637, 638, 639, 643, 644, 613, 0, 73, 0, 684, 8, 688, 190, 397, 0, 81, 0, 686, 76, 0, 0, 0, 0, 0, 0, 0, 0, 0, 458, 181, 684, 0, 684, 433, 0, 55, 0, 565, 0, 538, 564, 539, 0, 472, 571, 688, 688, 560, 0, 0, 0, 0, 541, 0, 0, 510, 509, 492, 491, 490, 489, 488, 487, 486, 505, 507, 506, 508, 478, yyDummy>>, 1, 200, 200) end yydefact_template_3 (an_array: ARRAY [INTEGER]) -- Fill chunk #3 of template for `yydefact'. do yyarray_subcopy (an_array, << 479, 477, 476, 496, 494, 0, 493, 504, 503, 500, 498, 0, 497, 502, 501, 546, 0, 544, 0, 545, 537, 542, 543, 678, 0, 564, 647, 636, 646, 635, 395, 0, 0, 284, 262, 283, 263, 0, 291, 269, 0, 290, 270, 292, 271, 0, 0, 286, 264, 0, 285, 265, 287, 266, 306, 0, 0, 0, 299, 301, 320, 574, 573, 48, 47, 684, 43, 28, 24, 686, 43, 27, 30, 0, 187, 73, 686, 73, 73, 564, 247, 688, 92, 686, 688, 0, 113, 472, 482, 393, 392, 0, 595, 684, 686, 688, 684, 564, 455, 0, 453, 686, 688, 0, 443, 444, 0, 431, 0, 195, 429, 564, 0, 569, 567, 688, 554, 0, 686, 0, 0, 0, 515, 688, 0, 0, 688, 688, 495, 499, 688, 688, 688, 551, 400, 0, 0, 294, 272, 293, 273, 300, 289, 267, 288, 268, 305, 308, 688, 0, 684, 202, 26, 35, 37, 31, 43, 73, 44, 0, 0, 188, 0, 249, 248, 73, 0, 244, 90, 89, 95, 91, 110, 109, 108, 107, 106, 105, 104, 103, 102, 101, 100, 94, 93, 99, 98, 97, 96, 88, 87, 0, 111, 79, 114, 0, 684, 15, 77, 113, yyDummy>>, 1, 200, 400) end yydefact_template_4 (an_array: ARRAY [INTEGER]) -- Fill chunk #4 of template for `yydefact'. do yyarray_subcopy (an_array, << 483, 0, 0, 0, 598, 0, 0, 0, 552, 564, 684, 0, 688, 688, 564, 434, 448, 450, 446, 530, 688, 55, 56, 233, 443, 548, 0, 686, 0, 0, 0, 679, 682, 540, 193, 391, 389, 0, 0, 0, 0, 0, 401, 401, 686, 307, 311, 575, 0, 312, 313, 321, 41, 0, 55, 686, 33, 29, 39, 44, 73, 191, 73, 252, 73, 246, 86, 112, 83, 123, 684, 55, 215, 0, 15, 0, 596, 0, 0, 364, 366, 362, 360, 372, 0, 688, 600, 0, 0, 0, 686, 688, 459, 184, 0, 182, 0, 688, 686, 449, 0, 432, 235, 196, 427, 0, 0, 566, 485, 572, 0, 0, 535, 533, 534, 536, 680, 0, 402, 0, 0, 0, 686, 0, 686, 314, 0, 203, 10, 43, 40, 189, 251, 250, 0, 20, 118, 75, 123, 55, 484, 0, 0, 0, 686, 0, 0, 0, 0, 589, 0, 0, 0, 591, 0, 0, 0, 445, 443, 237, 684, 207, 568, 570, 390, 388, 404, 564, 387, 386, 309, 0, 73, 0, 0, 0, 0, 330, 323, 328, 42, 127, 36, 124, 15, 683, 0, 55, 115, 216, 113, 121, 365, 371, 379, 0, 370, 367, 368, 374, yyDummy>>, 1, 200, 600) end yydefact_template_5 (an_array: ARRAY [INTEGER]) -- Fill chunk #5 of template for `yydefact'. do yyarray_subcopy (an_array, << 369, 363, 377, 0, 0, 378, 373, 376, 375, 0, 590, 0, 593, 73, 438, 447, 430, 684, 234, 684, 0, 0, 315, 318, 317, 687, 575, 316, 325, 326, 327, 331, 686, 688, 684, 11, 126, 603, 125, 602, 20, 604, 605, 606, 607, 608, 55, 21, 684, 20, 120, 15, 361, 601, 594, 185, 236, 684, 215, 406, 0, 215, 199, 198, 197, 238, 403, 684, 686, 0, 329, 0, 0, 0, 128, 0, 127, 683, 117, 119, 688, 116, 55, 688, 206, 684, 684, 215, 202, 201, 204, 240, 411, 0, 0, 684, 339, 338, 337, 343, 324, 322, 0, 303, 686, 73, 136, 688, 12, 684, 16, 122, 209, 0, 407, 0, 205, 200, 242, 684, 215, 0, 0, 319, 0, 0, 684, 332, 131, 135, 0, 134, 684, 684, 684, 684, 684, 169, 173, 177, 0, 147, 129, 684, 688, 22, 468, 0, 0, 215, 406, 454, 684, 232, 559, 0, 223, 218, 229, 217, 228, 0, 0, 0, 230, 564, 225, 227, 686, 215, 226, 463, 462, 224, 231, 530, 394, 688, 409, 688, 684, 239, 412, 194, 686, 688, 340, 336, 0, 0, 684, 133, 172, 0, 180, 0, 176, 150, 0, 170, yyDummy>>, 1, 200, 800) end yydefact_template_6 (an_array: ARRAY [INTEGER]) -- Fill chunk #6 of template for `yydefact'. do yyarray_subcopy (an_array, << 173, 174, 177, 178, 0, 137, 148, 169, 157, 0, 0, 684, 684, 0, 394, 215, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 214, 0, 0, 215, 399, 211, 686, 0, 241, 0, 0, 342, 0, 344, 164, 688, 0, 167, 688, 144, 0, 688, 684, 686, 688, 684, 177, 0, 138, 173, 684, 684, 421, 424, 686, 688, 0, 0, 0, 215, 0, 0, 457, 458, 456, 458, 215, 465, 416, 414, 0, 221, 222, 415, 413, 213, 219, 220, 394, 0, 0, 408, 343, 0, 334, 686, 163, 688, 686, 166, 686, 0, 143, 67, 0, 0, 149, 155, 73, 156, 0, 139, 177, 0, 13, 0, 684, 423, 684, 426, 0, 418, 0, 470, 688, 215, 353, 684, 686, 688, 684, 0, 0, 405, 451, 458, 0, 0, 399, 215, 410, 333, 341, 0, 130, 0, 0, 146, 69, 688, 152, 153, 140, 0, 159, 0, 688, 396, 64, 684, 686, 688, 422, 425, 420, 0, 686, 0, 0, 0, 0, 356, 215, 345, 0, 0, 0, 0, 452, 466, 385, 0, 401, 165, 168, 145, 686, 0, 141, 686, 0, 0, 158, 15, 65, 684, 61, 0, 58, 469, 0, 215, 354, 688, yyDummy>>, 1, 200, 1000) end yydefact_template_7 (an_array: ARRAY [INTEGER]) -- Fill chunk #7 of template for `yydefact'. do yyarray_subcopy (an_array, << 358, 0, 215, 347, 0, 686, 688, 215, 0, 215, 215, 0, 0, 68, 0, 684, 684, 0, 63, 66, 686, 688, 60, 471, 0, 0, 346, 0, 0, 0, 349, 401, 215, 0, 401, 383, 70, 160, 0, 0, 9, 684, 14, 467, 215, 348, 215, 351, 0, 0, 384, 0, 162, 0, 72, 62, 359, 352, 381, 380, 382, 161, 0, 0, 0, yyDummy>>, 1, 65, 1200) end yydefgoto_template: SPECIAL [INTEGER] -- Template for `yydefgoto' local an_array: ARRAY [INTEGER] once create an_array.make_filled (0, 0, 253) yydefgoto_template_1 (an_array) yydefgoto_template_2 (an_array) Result := yyfixed_array (an_array) end yydefgoto_template_1 (an_array: ARRAY [INTEGER]) -- Fill chunk #1 of template for `yydefgoto'. do yyarray_subcopy (an_array, << 309, 668, 597, 483, 484, 921, 735, 654, 509, 612, 379, 269, 432, 180, 80, 1069, 370, 500, 81, 956, 318, 319, 82, 838, 83, 598, 84, 175, 85, 1124, 494, 86, 958, 304, 1112, 1155, 840, 1150, 1060, 959, 87, 960, 1205, 690, 892, 1049, 513, 88, 375, 90, 91, 92, 93, 94, 863, 888, 1220, 1156, 1104, 777, 778, 964, 1144, 133, 134, 95, 966, 96, 152, 323, 149, 312, 967, 97, 968, 969, 324, 98, 99, 327, 100, 101, 864, 682, 20, 102, 970, 1119, 103, 618, 904, 905, 104, 105, 106, 107, 330, 108, 109, 333, 110, 111, 1045, 703, 973, 865, 510, 112, 113, 114, 115, 116, 589, 590, 974, 480, 117, 648, 136, 118, 137, 138, 139, 140, 141, 142, 898, 143, 144, 906, 501, 155, 718, 719, 161, 162, 163, 338, 555, 1063, 1125, 354, 495, 1152, 1057, 1008, 1061, 1170, 1206, 606, 691, 1050, 937, 1007, 376, 515, 256, 1221, 1110, 1157, 988, 1041, 992, 1044, 164, 1120, 927, 999, 1000, 1001, 1002, 1003, 1004, 551, 780, 1051, 1145, 14, 153, 150, 788, 119, 884, 977, 685, 620, 364, 835, 907, 1047, 941, 979, 887, 344, 481, 295, 296, 455, 548, 822, yyDummy>>, 1, 200, 0) end yydefgoto_template_2 (an_array: ARRAY [INTEGER]) -- Fill chunk #2 of template for `yydefgoto'. do yyarray_subcopy (an_array, << 502, 823, 156, 820, 183, 184, 870, 985, 986, 1262, 15, 345, 310, 147, 781, 876, 943, 1153, 1192, 16, 313, 339, 658, 726, 833, 148, 301, 1190, 486, 885, 672, 990, 623, 761, 760, 817, 919, 980, 566, 457, 867, 831, 925, 1038, 1089, 1209, 711, 710, 158, 366, 624, 621, 758, 1011, yyDummy>>, 1, 54, 200) end yypact_template: SPECIAL [INTEGER] -- Template for `yypact' local an_array: ARRAY [INTEGER] once create an_array.make_filled (0, 0, 1264) yypact_template_1 (an_array) yypact_template_2 (an_array) yypact_template_3 (an_array) yypact_template_4 (an_array) yypact_template_5 (an_array) yypact_template_6 (an_array) yypact_template_7 (an_array) Result := yyfixed_array (an_array) end yypact_template_1 (an_array: ARRAY [INTEGER]) -- Fill chunk #1 of template for `yypact'. do yyarray_subcopy (an_array, << 1697, 1299, 1257, -32768, -32768, -32768, -32768, 1013, 385, -32768, 2672, -32768, -32768, 2076, 64, -32768, -32768, -32768, -32768, -32768, -32768, -32768, 1523, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, 3256, 2672, 4449, 2672, 2672, 936, 672, 3001, 247, -32768, 985, 983, -32768, -32768, 2222, 970, 1012, 972, -32768, -32768, -32768, 2672, 2672, 979, 2672, 2672, 183, 2672, 3110, 2964, 183, 183, 975, -32768, -32768, -32768, -32768, 645, -32768, -32768, 642, 5420, -32768, 974, -32768, 427, 426, 813, -32768, -32768, -32768, -32768, -32768, -32768, -32768, 971, 969, 963, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, 4036, 507, -32768, 2787, 2641, -32768, -32768, -32768, 2495, 973, 1841, 450, 2351, -32768, -32768, 673, 3740, -32768, -32768, -32768, -32768, -32768, -32768, -32768, 962, -32768, 959, -32768, 844, 274, 448, 139, -32768, 183, 1167, -32768, 3823, 57, -32768, 183, 63, 183, 4622, -32768, -32768, 935, -32768, 2222, 917, 4329, 2076, -32768, 4782, 4766, 4507, 953, 450, 936, -32768, -32768, -32768, 811, 951, 490, -32768, -32768, 931, 450, 932, -32768, 183, 183, 3491, 3408, 3657, 3574, 270, 1485, 926, 925, -32768, 2672, yyDummy>>, 1, 200, 0) end yypact_template_2 (an_array: ARRAY [INTEGER]) -- Fill chunk #2 of template for `yypact'. do yyarray_subcopy (an_array, << -32768, -32768, -32768, -32768, -32768, 2672, 5373, -32768, 929, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, 912, 910, 183, -32768, -32768, 2672, 2672, 2672, 2672, 2672, 2672, 2672, 2672, 2672, 2672, 2672, 2672, 2672, 2672, 2672, 2672, 2672, 2672, 2672, 2526, 2672, 2672, 2672, 2672, 2380, 2672, 2672, 183, -32768, 183, -32768, 183, -32768, 183, 183, 183, 914, -32768, -32768, -32768, 183, 595, 593, -32768, 410, 438, -32768, -32768, 973, -32768, -32768, 973, -32768, -32768, 2059, 1687, 973, -32768, -32768, -32768, -32768, -32768, -32768, 927, -32768, 1579, 1042, 973, -32768, -32768, 888, -32768, -32768, -32768, 183, 183, -32768, -32768, -32768, -32768, 623, 844, 844, -32768, -32768, -32768, -32768, 872, -32768, -32768, -32768, -32768, 575, 555, 875, -32768, -32768, -32768, 865, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, 4186, 534, 831, -32768, -32768, -32768, 863, -32768, 2234, -32768, 788, -32768, -32768, 861, 183, 183, 183, 397, 747, 2672, 183, 890, 517, -32768, -32768, 183, 860, -32768, 2076, 634, 856, -32768, 2818, -32768, 813, -32768, 2076, -32768, 5224, -32768, -32768, 871, 855, 183, 2672, 2672, -32768, 2672, 2672, -32768, -32768, 365, 365, 365, 365, 365, 748, 748, 946, 946, 946, 946, 946, yyDummy>>, 1, 200, 200) end yypact_template_3 (an_array: ARRAY [INTEGER]) -- Fill chunk #3 of template for `yypact'. do yyarray_subcopy (an_array, << 946, 946, 946, 2223, 2223, 2672, 2223, 5244, 5244, 4221, 4221, 2672, 4221, 5009, 5009, -32768, 2672, -32768, 2672, -32768, -32768, -32768, -32768, -32768, 2672, 813, -32768, -32768, -32768, -32768, -32768, 2672, 22, -32768, -32768, -32768, -32768, 973, -32768, -32768, 973, -32768, -32768, -32768, -32768, 183, 973, -32768, -32768, 973, -32768, -32768, -32768, -32768, -32768, 859, 2076, 854, -32768, -32768, 848, -32768, -32768, -32768, -32768, -32768, 3857, -32768, -32768, -32768, 3823, -32768, -32768, 176, -32768, 539, -32768, 534, 5276, 253, 736, -32768, 5076, 1372, -32768, 1523, 19, 2672, -32768, -32768, -32768, 2672, -32768, -32768, 373, -32768, 4846, 813, -32768, 183, -32768, 840, -32768, 2672, 719, -32768, 2088, -32768, 4782, -32768, -32768, 813, 1144, 834, 5420, -32768, -32768, 835, -32768, 832, 821, 183, -32768, -32768, 5171, 5118, -32768, -32768, 2223, 4221, -32768, -32768, -32768, -32768, 5420, 2672, 2672, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, 823, -32768, 1603, 820, 653, -32768, 816, -32768, -32768, 3823, 534, -32768, 796, 2076, -32768, 183, -32768, -32768, 1942, 2234, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, 788, 781, -32768, -32768, 2076, 811, 417, -32768, 18, yyDummy>>, 1, 200, 400) end yypact_template_4 (an_array: ARRAY [INTEGER]) -- Fill chunk #4 of template for `yypact'. do yyarray_subcopy (an_array, << 782, 5038, 675, 747, -32768, 2672, 769, 698, -32768, 813, -32768, 799, -32768, 5420, 50, -32768, -32768, 5420, 798, 4009, -32768, 634, -32768, 727, 719, -32768, 2672, -32768, 780, 2672, 2672, -32768, -32768, -32768, -32768, -32768, -32768, 803, 795, 794, 789, 772, 4249, 4249, -32768, -32768, -32768, 518, 39, -32768, -32768, -32768, -32768, 4782, 634, -32768, -32768, -32768, -32768, -32768, 534, -32768, 534, -32768, 5276, -32768, -32768, -32768, -32768, 679, -32768, 634, -32768, 2076, 417, 183, -32768, 778, 774, 810, 807, 802, 751, 800, 473, -32768, -32768, 4973, 2672, 2672, 715, -32768, -32768, -32768, 183, -32768, 745, -32768, -32768, -32768, 750, -32768, 714, -32768, -32768, 5326, 2818, -32768, -32768, -32768, 2672, 2672, -32768, -32768, -32768, -32768, -32768, 2672, -32768, 728, 726, 2076, -32768, 2076, -32768, -32768, 269, -32768, -32768, 3857, -32768, -32768, -32768, -32768, 183, 797, -32768, 618, 679, 634, -32768, 506, 675, 786, -32768, 675, 746, 744, 671, -32768, 4946, 4462, 698, -32768, 2076, 717, 2088, -32768, 719, -32768, 340, 669, -32768, -32768, 5420, 5420, 5420, 240, -32768, -32768, -32768, 1930, 144, 1784, 450, 450, 450, -32768, 697, -32768, -32768, 651, -32768, -32768, 1624, 3080, 3982, 634, -32768, -32768, 632, -32768, -32768, -32768, -32768, 71, -32768, -32768, -32768, -32768, yyDummy>>, 1, 200, 600) end yypact_template_5 (an_array: ARRAY [INTEGER]) -- Fill chunk #5 of template for `yypact'. do yyarray_subcopy (an_array, << -32768, -32768, -32768, 520, 675, -32768, -32768, -32768, -32768, 2672, -32768, 2672, -32768, 534, -32768, -32768, -32768, 340, -32768, 411, 260, 2672, -32768, -32768, -32768, -32768, 695, -32768, -32768, -32768, -32768, 691, -32768, -32768, 3362, -32768, -32768, -32768, -32768, -32768, 631, -32768, -32768, -32768, -32768, -32768, 634, -32768, -32768, 631, -32768, 417, -32768, 5420, 5420, -32768, -32768, -32768, -32768, 654, 5027, -32768, -32768, -32768, -32768, 662, 5420, -32768, -32768, 1394, -32768, 269, 700, 450, -32768, 450, 651, 666, -32768, -32768, -32768, -32768, 634, -32768, -32768, 407, 680, -32768, 653, -32768, -32768, 625, 620, 627, 1784, -32768, -32768, -32768, 621, 510, -32768, -32768, 667, 673, 3337, 534, 785, -32768, -32768, -32768, 609, -32768, -32768, 1796, -32768, 5027, -32768, -32768, -32768, 3, -32768, 639, 451, -32768, 1517, 602, -32768, -32768, -32768, -32768, 450, -32768, 173, 636, 357, 181, 177, 563, 523, 479, 624, 615, -32768, 749, -32768, -32768, -32768, 2672, 2672, -32768, 654, 672, 131, -32768, 160, 183, -32768, 645, -32768, -32768, -32768, 642, 100, 85, -32768, 79, -32768, -32768, 304, -32768, -32768, 155, 130, -32768, -32768, 4161, -5, -32768, 630, -32768, 3, -32768, -32768, -32768, -32768, -32768, 629, -32768, 611, 183, -32768, -32768, -32768, 183, -32768, 183, -32768, -32768, 379, -32768, yyDummy>>, 1, 200, 800) end yypact_template_6 (an_array: ARRAY [INTEGER]) -- Fill chunk #6 of template for `yypact'. do yyarray_subcopy (an_array, << 523, -32768, 479, -32768, 610, -32768, -32768, 563, 594, 195, 609, -32768, 4739, 4402, 507, -32768, 1246, 33, 2672, 2672, 622, 2672, 2672, 2672, 2672, 1796, 618, 2672, 2672, -32768, 438, -32768, -32768, 619, -32768, 627, 613, -32768, 580, -32768, 605, -32768, 450, 604, -32768, 599, 571, -32768, 588, 290, -32768, 660, 479, 560, -32768, 523, -32768, 227, 1380, 1380, 462, -32768, 2672, 366, 355, -32768, 121, 542, -32768, 517, -32768, 189, -32768, -32768, 5420, 5420, 2672, 5420, 5420, 5420, 5420, -32768, 5420, 5420, 507, 5, 5027, -32768, 510, 1517, -32768, -32768, -32768, -32768, -32768, -32768, -32768, 183, -32768, -32768, 623, 379, -32768, -32768, 534, -32768, 511, -32768, 479, 183, -32768, 329, -32768, 216, -32768, 216, 195, -32768, 4873, 503, -32768, -32768, -32768, -32768, 364, -32768, 285, 2672, 460, -32768, -32768, 517, 492, 5065, 438, -32768, -32768, -32768, -32768, 183, -32768, 183, 183, -32768, 484, -32768, -32768, -32768, -32768, 454, 458, 235, -32768, 385, -32768, 356, 42, -32768, -32768, -32768, -32768, 183, -32768, 418, 419, 675, 355, -32768, -32768, -32768, 278, 231, 4628, 2672, -32768, -32768, -32768, 362, 157, -32768, -32768, -32768, -32768, 402, -32768, -32768, 392, 387, -32768, 417, 379, -32768, -32768, 329, -32768, -32768, 2672, -32768, -32768, -32768, yyDummy>>, 1, 200, 1000) end yypact_template_7 (an_array: ARRAY [INTEGER]) -- Fill chunk #7 of template for `yypact'. do yyarray_subcopy (an_array, << -32768, 343, -32768, -32768, 2672, 251, -32768, -32768, 4534, -32768, -32768, 305, 623, -32768, 183, -32768, -32768, 302, -32768, -32768, 311, -32768, -32768, -32768, 271, 252, -32768, 257, 4357, 231, -32768, 157, -32768, 309, 157, -32768, -32768, -32768, 239, 236, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, 194, 146, -32768, 134, -32768, 111, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, 117, 83, -32768, yyDummy>>, 1, 65, 1200) end yypgoto_template: SPECIAL [INTEGER] -- Template for `yypgoto' local an_array: ARRAY [INTEGER] once create an_array.make_filled (0, 0, 253) yypgoto_template_1 (an_array) yypgoto_template_2 (an_array) Result := yyfixed_array (an_array) end yypgoto_template_1 (an_array: ARRAY [INTEGER]) -- Fill chunk #1 of template for `yypgoto'. do yyarray_subcopy (an_array, << -279, -32768, -559, -32768, 566, -32768, 428, 277, 516, -122, -32768, -909, -983, -32768, -32768, 84, -135, -999, -32768, -32768, -432, -32768, -32768, -32768, -32768, -32768, -124, 199, -833, -32768, -32768, -125, -32768, -32768, -1017, -32768, 363, -32768, -32768, -32768, 812, -32768, -32768, -32768, -32768, -32768, -32768, -838, 716, 574, -32768, -32768, -840, -842, -32768, -32768, 1137, -32768, -32768, -32768, -32768, -32768, 841, -167, -300, 17, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -583, -111, -149, -32768, -57, -99, -32768, -32768, -14, -32768, -32768, -32768, -844, -32768, -32768, -32768, -32768, -552, -32768, -32768, -32768, -130, -148, -32768, -138, -141, -32768, -32768, -32768, -32768, -584, -32768, -42, -822, -86, -32768, -32768, -32768, -32768, -32768, 670, 52, -820, -28, -823, 994, -32768, 1014, 938, -32768, -32768, -32768, -32768, -32768, -32768, -32768, 66, -620, -61, -158, -32768, -404, 393, -32768, -46, -32768, 512, -101, -32768, -32768, -4, -32768, -118, -32768, 354, 9, 162, -32768, -161, 398, -23, -132, -32768, -91, -32768, -39, -873, -45, 616, -106, 1, 178, 76, 172, -926, 170, -954, -32768, 203, -1006, -137, -566, -299, 612, -393, -845, 109, 46, -783, 314, -468, 193, -885, -75, 138, -24, 105, -253, 486, -32768, 148, -567, 326, -508, yyDummy>>, 1, 200, 0) end yypgoto_template_2 (an_array: ARRAY [INTEGER]) -- Fill chunk #2 of template for `yypgoto'. do yyarray_subcopy (an_array, << 436, -521, -320, -32768, 553, -32768, -32768, -51, 165, -32768, -32768, -7, 505, -32768, -32768, -32768, -32768, -32768, -212, 10, 525, -32768, 368, -32768, -32768, -32768, -97, -32768, -32768, -646, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, yyDummy>>, 1, 54, 200) end yytable_template: SPECIAL [INTEGER] -- Template for `yytable' local an_array: ARRAY [INTEGER] once create an_array.make_filled (0, 0, 5455) yytable_template_1 (an_array) yytable_template_2 (an_array) yytable_template_3 (an_array) yytable_template_4 (an_array) yytable_template_5 (an_array) yytable_template_6 (an_array) yytable_template_7 (an_array) yytable_template_8 (an_array) yytable_template_9 (an_array) yytable_template_10 (an_array) yytable_template_11 (an_array) yytable_template_12 (an_array) yytable_template_13 (an_array) yytable_template_14 (an_array) yytable_template_15 (an_array) yytable_template_16 (an_array) yytable_template_17 (an_array) yytable_template_18 (an_array) yytable_template_19 (an_array) yytable_template_20 (an_array) yytable_template_21 (an_array) yytable_template_22 (an_array) yytable_template_23 (an_array) yytable_template_24 (an_array) yytable_template_25 (an_array) yytable_template_26 (an_array) yytable_template_27 (an_array) yytable_template_28 (an_array) Result := yyfixed_array (an_array) end yytable_template_1 (an_array: ARRAY [INTEGER]) -- Fill chunk #1 of template for `yytable'. do yyarray_subcopy (an_array, << 18, 346, 22, 203, 462, 326, 332, 358, 169, 151, 154, 157, 17, 335, 468, 430, 334, 13, 367, 681, 474, 852, 170, 720, 331, 173, 737, 182, 650, 321, 320, 671, 267, 187, 553, 342, 615, 701, 889, 160, 674, 649, 1114, 325, 377, 991, 897, 1085, 1053, 896, 683, 307, 1113, 1115, 372, 329, 199, -186, 205, 472, 994, 596, 996, -243, -5, 135, 557, 1030, 976, 971, 1130, 963, 181, 962, 1052, 961, -243, 673, 595, 196, 957, 202, 1024, 1264, 267, 536, 383, 736, 1022, 725, 1029, 211, 186, 978, 268, 219, 220, 328, 1106, 724, 287, 897, 536, 1021, 896, 1066, 1073, 1135, 739, -190, 476, 264, 336, -243, 197, -59, 415, 1263, 417, 261, 419, 186, 420, 421, 422, 255, 337, 297, -186, 1108, 1023, 535, 1174, 1028, 254, 146, -243, 461, 145, -25, 253, -59, 594, 594, -186, 286, 1072, 359, 535, 252, -186, 1177, 656, 347, 1149, 791, 704, 1093, 1027, 798, 801, -186, 807, 1019, 355, -59, 1261, -59, 311, 787, 259, 322, 361, 1218, 343, 1134, 160, -186, 1105, 369, 976, 971, 196, 963, 1219, 962, -243, 961, -243, 794, 799, 802, 957, 808, 824, 257, 561, 308, 563, 564, yyDummy>>, 1, 200, 0) end yytable_template_2 (an_array: ARRAY [INTEGER]) -- Fill chunk #2 of template for `yytable'. do yyarray_subcopy (an_array, << 189, 380, 308, 850, -243, 371, 371, 1260, 463, 464, -25, 1018, -25, -25, -25, 384, 385, 350, 846, 1259, 197, 681, -25, 526, 527, 65, -25, 12, 11, 499, -25, 851, -25, 12, 11, 308, 1127, 717, 371, 1158, -25, 1159, -25, -25, -243, 416, -171, 418, -25, 558, -73, 267, 683, 424, -175, 530, 1068, 531, 523, -25, -66, -66, 879, 532, 978, 827, 897, 1258, 371, 896, 371, 1059, 371, 717, 371, 371, 371, 1187, 657, -171, 1058, 425, 186, -73, -171, 882, 663, 456, -73, 186, 816, -73, -175, 1253, 1186, 186, 1252, 553, 911, 821, -57, 6, 5, 185, 4, 3, 154, 6, 5, -212, 4, 3, 565, 132, 1250, 458, 459, 326, 332, -582, 1204, 326, 332, 1026, -350, 335, -57, -582, 334, 335, 1245, 862, 334, 157, -66, -66, 331, -66, -66, -350, 331, 321, 320, 776, 1243, 321, 320, 861, 516, 303, -57, 1203, -57, 860, 503, 325, 506, 302, 1169, 325, 775, 972, 479, -151, 859, 1244, 1202, 329, 488, 489, 490, 329, 923, 1168, 497, 1240, 774, -212, 1235, 504, 858, 731, 1199, 732, -71, 733, 633, 125, 124, 123, 271, 270, -212, -212, -212, 120, -151, 343, 226, 225, yyDummy>>, 1, 200, 200) end yytable_template_3 (an_array: ARRAY [INTEGER]) -- Fill chunk #3 of template for `yytable'. do yyarray_subcopy (an_array, << 224, -151, 533, -212, -151, -71, -212, 326, 332, 328, -71, -243, -210, 328, -212, 335, 1226, 507, 334, -212, -212, -212, 622, 1154, 336, 517, 331, -243, 336, -14, -142, 321, 320, -243, -71, 1048, -71, -357, 337, 1122, 661, -243, 337, 1216, -243, 325, -599, 878, 1215, -142, -14, 203, -357, 326, 1121, -14, 881, 329, 151, 1213, -243, -599, 541, -142, 1210, 789, 255, 253, -142, 709, 492, -142, 1123, 972, 608, 254, 252, 679, 619, -14, -210, -14, -208, 554, 19, 491, 602, 554, 625, 607, -243, 325, 1198, 825, 132, -210, -210, -210, -208, 328, 747, 746, 160, 329, -208, 1197, -210, 818, 547, -210, 723, 984, -243, 264, 336, -208, 609, -210, 1185, 263, 614, 261, -210, -210, -210, -243, -243, 1184, 337, 202, -437, -208, 363, 267, 855, -419, -243, 883, 371, 306, 2, 300, 1, 652, 1182, 328, -419, 747, 746, 880, 12, 11, 305, 431, 66, 874, -419, 499, 1211, 779, 264, -419, 168, 1162, 856, 1175, 263, 727, 125, 124, 123, 271, 270, 554, 684, 1173, 120, 723, 722, 343, 326, 332, 681, 479, 1148, -419, 692, -419, 335, 670, 933, 334, 308, 326, 326, 926, 326, 308, 560, 331, yyDummy>>, 1, 200, 400) end yytable_template_4 (an_array: ARRAY [INTEGER]) -- Fill chunk #4 of template for `yytable'. do yyarray_subcopy (an_array, << 53, 217, 216, 694, 321, 320, 268, 828, 829, 830, 944, 1248, 660, 683, 1251, 1129, 792, 796, 325, 680, 805, 214, 213, 1217, 6, 5, 931, 4, 3, 935, 329, 325, 325, 1107, 325, 842, 844, 842, 844, 429, 428, 427, 426, 329, 329, 1099, 329, 669, 1238, 1239, 215, 218, 1097, 1090, 843, 326, 843, 997, 314, 1096, 839, 341, 839, 694, 1094, 1091, 981, 132, 131, 349, 1088, 922, 328, 841, 1087, 841, 789, 932, 1056, 679, 340, 1076, 945, 1054, 1039, 328, 328, 336, 328, 1037, 1032, 223, 740, 325, 222, 174, 886, 1005, 845, 1017, 845, 337, 678, 677, 779, 329, 902, 936, 903, -179, 934, 343, 983, 795, 684, 803, -154, 684, -154, 12, 11, 68, 294, 66, 928, 738, 89, 1034, 619, -335, 920, 168, 653, -154, 767, 914, -245, 508, 918, 847, 1103, 125, 124, 123, 271, 270, 554, 328, 834, 120, 901, 783, 891, 869, 877, 868, 594, 832, 793, 797, 800, 363, 806, 903, 166, 167, -154, 171, 172, 53, 819, -154, 814, 547, -154, 772, 684, 230, 229, 228, 227, 226, 225, 224, 809, 206, 207, 689, 209, 210, 429, 212, 427, 6, 5, 848, 4, 3, 734, 769, yyDummy>>, 1, 200, 600) end yytable_template_5 (an_array: ARRAY [INTEGER]) -- Fill chunk #5 of template for `yytable'. do yyarray_subcopy (an_array, << 462, 768, 759, -592, 754, 757, 813, -245, 745, -245, 743, 744, 857, 678, 677, 742, -245, 467, 741, 786, 217, 680, -417, -245, 214, 1147, 716, 875, 471, -245, 12, 11, 68, -417, 465, 707, 702, -245, -245, 715, -245, 154, 168, -417, 714, 713, -245, 475, -417, -245, 157, -245, -245, 712, 695, 186, -245, 688, 698, -245, 893, -245, -245, 675, 493, 667, 360, 482, -15, 659, 651, 632, -417, 485, -417, 903, 655, 936, 913, 915, 53, 519, 520, 644, -15, 975, 631, 909, 924, 267, -15, 935, 629, 934, 627, -183, 933, 550, -15, 932, -15, -15, 154, 549, 6, 5, -15, 4, 3, 546, 522, 521, 462, 511, 498, 505, 54, -15, 487, 989, 785, 784, 1, 476, 470, 993, 993, 995, 993, 998, 965, 466, 1043, 461, 1046, 469, 1009, 300, 454, 1143, 386, 387, 388, 389, 390, 391, 392, 393, 394, 395, 396, 397, 398, 399, 400, 401, 402, 403, 404, 406, 407, 408, 409, 410, 412, 413, 414, 445, 423, 382, 890, 381, 1020, 232, 231, 230, 229, 228, 227, 226, 225, 224, 374, 1042, -192, 373, 567, 368, 1071, 592, 365, 362, 168, 357, 556, 348, 916, 975, 351, 299, yyDummy>>, 1, 200, 800) end yytable_template_6 (an_array: ARRAY [INTEGER]) -- Fill chunk #6 of template for `yytable'. do yyarray_subcopy (an_array, << 604, 562, 298, 259, 1062, 1064, 1040, 611, 591, 258, 202, 257, 202, -7, 251, 221, 326, 132, 131, 603, 628, 208, 204, 189, 198, 188, 610, 730, 634, 982, 1255, 637, 638, 1070, 899, 639, 640, 641, 1138, 599, 679, 1100, 965, 630, 993, 461, 693, 770, 1151, 1109, 1111, 929, 665, 645, 325, 1015, 12, 11, 1014, 274, 277, 478, 1136, 987, 282, 284, 329, 1181, 293, 908, 815, 1081, 496, 128, 900, 1236, 940, 552, 939, 201, 1043, 1046, 200, 1055, 938, 514, 132, 131, 1070, 1137, 1223, 125, 124, 123, 271, 270, 1180, 524, 525, 120, 1179, 593, 1222, 1006, 763, 993, 812, 993, 328, 1254, 1146, 1247, 1160, 1237, 160, 686, 1165, 696, 697, 1171, 1200, 528, 782, 288, 1067, 700, 202, 529, 274, 277, 6, 5, 1128, 4, 3, 273, 276, 684, 1084, 1189, 281, 283, 128, 559, 292, 460, 21, 534, 1191, 849, 1016, 473, 706, 1151, 449, 1131, 1040, 666, 202, 202, 125, 124, 123, 271, 270, 917, 790, -23, 120, 721, 728, 0, 0, 0, 1126, 0, 0, 0, 1195, 0, 729, 1132, 680, 0, 22, 0, 626, 0, 12, 11, 748, 0, 0, 0, 0, 0, 753, 0, 0, 0, yyDummy>>, 1, 200, 1000) end yytable_template_7 (an_array: ARRAY [INTEGER]) -- Fill chunk #7 of template for `yytable'. do yyarray_subcopy (an_array, << 0, 0, 755, 600, 273, 276, 0, 601, 456, 456, 434, 201, 0, 436, 200, 752, 439, 442, 444, 613, 0, 0, 617, 756, 0, 0, 0, 448, 451, 453, 1164, 202, 0, 0, 22, 0, 0, 0, -23, 0, -23, -23, -23, 0, 1178, 0, 0, 771, 0, 773, -23, 642, 643, 0, -23, 0, 0, -17, -23, 0, -23, 0, 6, 5, 0, 4, 3, 0, -23, 804, -23, -23, 0, 0, 0, 0, -23, 1201, 0, 0, 0, 664, 478, 0, 0, 0, 433, -23, 0, 435, 12, 11, 438, 441, 443, 0, 0, 0, 0, -19, 0, 0, 168, 447, 450, 452, 1224, 0, 0, 0, 0, 1227, 0, 1068, 0, 0, 1231, 0, 1233, 1234, 0, 687, 0, 0, 0, 0, 0, 0, -17, 0, -17, -17, -17, 0, 0, 0, 0, 0, 872, 0, -17, 1249, 705, 0, -17, 708, 0, 0, -17, 0, -17, 0, 0, 1256, 0, 1257, 0, 871, -17, 0, -17, -17, 0, 0, 6, 5, -17, 4, 3, 0, -19, 0, -19, -19, -19, 538, 0, -17, 540, 0, 0, 0, -19, 0, 543, 910, -19, 545, 912, 0, -19, 0, -19, 894, 0, 0, 0, 0, 0, 0, yyDummy>>, 1, 200, 1200) end yytable_template_8 (an_array: ARRAY [INTEGER]) -- Fill chunk #8 of template for `yytable'. do yyarray_subcopy (an_array, << -19, 0, -19, -19, 750, 751, 0, 0, -19, 0, 0, 0, 942, 0, -85, 0, 0, 0, 0, -19, 0, 0, 514, 0, -65, -65, 764, 765, 0, 930, 0, -85, -85, 766, 0, 0, 1048, 0, 132, 131, 0, 0, 0, -85, 0, -85, 0, 0, 0, 1010, 895, 537, 0, 0, 539, 0, -85, 0, 0, -85, 542, 0, 0, 544, -85, -85, 0, 0, 130, 0, 0, 0, 617, -85, 0, -85, -85, 0, -85, 0, 0, -85, 1031, -85, 1033, -575, -85, 0, 0, 0, 1036, 0, -85, 1025, 128, -85, -85, -85, -65, -65, 0, -65, -65, 0, 0, 0, 127, -575, 0, 1035, 126, 0, 125, 124, 123, 122, 121, 0, 0, 0, 120, 0, 0, 0, 0, 853, 0, 854, 0, -575, -575, 0, 0, 0, -575, -575, 0, 866, 0, 0, -575, 0, -575, -575, 0, -575, 1092, 0, 0, 1095, 0, 0, 1098, 0, 0, 1102, -575, 1086, -575, -575, 0, 132, 131, 0, 0, 0, 1117, 12, 11, 0, -575, 0, -575, 0, 1101, 0, 0, 0, -575, -575, 0, 0, 0, 0, -575, 1116, -575, 0, -575, -575, 0, 130, 0, -575, -575, 0, 0, 159, 1140, 0, yyDummy>>, 1, 200, 1400) end yytable_template_9 (an_array: ARRAY [INTEGER]) -- Fill chunk #9 of template for `yytable'. do yyarray_subcopy (an_array, << 0, 0, 0, -575, -575, -575, -575, -575, -575, -575, -575, 0, 0, 0, 0, 0, 1139, 128, 0, 1141, 0, 1142, 0, 132, 131, 1163, 0, 0, 0, 127, 1167, 0, 0, 126, 0, 125, 124, 123, 122, 121, 0, 6, 5, 120, 4, 3, 0, 647, 131, 1166, 1183, 317, 316, 646, 0, 0, 0, 1188, 0, 0, 0, 0, 1194, 1012, 1013, 0, 0, 0, 0, 0, 68, 67, 837, 0, 0, 0, 0, 130, 0, 128, 0, 1193, 0, 0, 0, 0, 0, 1196, 0, 61, 60, 446, 0, 836, 129, 0, 0, 125, 124, 123, 271, 270, 0, 128, 1225, 120, 0, 1212, 0, 0, 1214, 1230, 0, 0, 0, 127, 0, 0, 0, 126, 0, 125, 124, 123, 122, 121, 1242, 0, 0, 120, 1229, 132, 131, 0, 1074, 1075, 0, 1077, 1078, 1079, 1080, 12, 11, 1082, 1083, 1241, 0, 2, 0, 1, 0, 47, 46, 45, 44, 43, 42, 41, 40, 39, 38, 37, 36, 35, 34, 33, 32, 31, 30, 29, 28, 27, 26, 25, 24, 23, 0, 0, 1118, 10, 0, 0, 0, 0, 0, 0, 0, 128, 0, 0, 0, 9, 1133, 0, 0, 0, 8, 0, 7, 440, yyDummy>>, 1, 200, 1600) end yytable_template_10 (an_array: ARRAY [INTEGER]) -- Fill chunk #10 of template for `yytable'. do yyarray_subcopy (an_array, << 955, 0, 79, 78, 0, 125, 124, 123, 271, 270, 0, 0, 0, 120, 0, 6, 5, 0, 4, 3, 2, 0, 1, 317, 316, 0, 0, 0, 826, 131, 0, 74, 0, 0, 0, 0, 0, 0, 69, 0, 12, 11, 0, 1172, 66, 65, 0, 0, 0, 0, 0, 0, 168, 0, 0, 0, 0, 0, 130, 0, 0, 61, 60, 954, 953, 0, 58, 0, 0, 0, 0, 0, 0, 56, 0, 129, 0, 0, 952, 0, 0, 951, 950, 0, 128, 12, 11, 0, 0, 1208, 53, 949, 948, 0, 947, 0, 127, 168, 0, 0, 126, 50, 125, 124, 123, 122, 121, 0, 946, 0, 120, 285, 1118, 0, 49, 5, 0, 4, 3, 0, 1228, 0, 0, 47, 46, 45, 44, 43, 42, 41, 40, 39, 38, 37, 36, 35, 34, 33, 32, 31, 30, 29, 28, 27, 26, 25, 24, 23, 79, 78, 0, 0, 0, 0, 0, 0, 0, 0, 0, 6, 5, 0, 4, 3, 0, 0, 0, 0, 0, 77, 76, 0, 0, 0, 647, 131, 75, 74, 73, 72, 71, 70, 0, 0, 69, 0, 12, 11, 68, 67, 66, 65, 0, 0, 64, 63, 0, 0, 62, 0, yyDummy>>, 1, 200, 1800) end yytable_template_11 (an_array: ARRAY [INTEGER]) -- Fill chunk #11 of template for `yytable'. do yyarray_subcopy (an_array, << 308, 0, 0, 0, 130, 0, 0, 61, 60, 59, 0, 0, 58, 0, 57, 0, 0, 0, 0, 56, 55, 129, 0, 0, 0, 662, 0, 54, 0, 0, 128, 0, 0, 0, 0, 0, 53, 0, 52, 0, 51, 0, 127, 0, 0, 0, 126, 50, 125, 124, 123, 122, 121, 0, 0, 0, 120, 0, 0, 0, 49, 5, 0, 48, 3, 0, 0, 0, 0, 47, 46, 45, 44, 43, 42, 41, 40, 39, 38, 37, 36, 35, 34, 33, 32, 31, 30, 29, 28, 27, 26, 25, 24, 23, 79, 78, 0, 0, 0, 0, 0, 0, 0, 132, 131, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 77, 76, 0, 0, 0, 132, 131, 75, 74, 73, 72, 71, 70, 0, 0, 69, 0, 12, 11, 68, 67, 66, 65, 0, 0, 64, 63, 0, 0, 62, 0, 0, 0, 0, 0, 130, 616, 0, 61, 60, 59, 0, 0, 58, 128, 57, 0, 0, 0, 0, 56, 55, 129, 0, 0, 0, 437, 0, 54, 0, 0, 128, 125, 124, 123, 271, 270, 53, 0, 52, 120, 51, 0, 127, 0, 0, 0, 126, 50, 125, 124, 123, 122, 121, 0, yyDummy>>, 1, 200, 2000) end yytable_template_12 (an_array: ARRAY [INTEGER]) -- Fill chunk #12 of template for `yytable'. do yyarray_subcopy (an_array, << 0, 0, 120, 0, 0, 0, 49, 5, 0, 48, 3, 0, 0, 0, 0, 47, 46, 45, 44, 43, 42, 41, 40, 39, 38, 37, 36, 35, 34, 33, 32, 31, 30, 29, 28, 27, 26, 25, 24, 23, 79, 78, 240, 239, 238, 237, 236, 235, 234, 233, 232, 231, 230, 229, 228, 227, 226, 225, 224, 0, 0, 77, 76, 0, 0, 0, 195, 194, 75, 74, 73, 72, 71, 70, 0, 0, 69, 0, 12, 11, 68, 67, 66, 65, 0, 0, 64, 63, 0, 0, 62, 0, 0, 0, 0, 0, 130, 0, 0, 61, 60, 59, 0, 0, 58, 0, 57, 0, 0, 0, 0, 56, 55, 129, 0, 0, 0, 477, 0, 54, 0, 0, 128, 0, 0, 0, 0, 0, 53, 0, 52, 0, 51, 0, 127, 0, 0, 0, 126, 50, 193, 192, 123, 191, 190, 0, 0, 0, 120, 0, 0, 0, 49, 5, 0, 48, 3, 0, 0, 0, 0, 47, 46, 45, 44, 43, 42, 41, 40, 39, 38, 37, 36, 35, 34, 33, 32, 31, 30, 29, 28, 27, 26, 25, 24, 23, 79, 78, 0, 0, 0, 0, 0, 0, 0, 132, 131, 0, 0, 0, yyDummy>>, 1, 200, 2200) end yytable_template_13 (an_array: ARRAY [INTEGER]) -- Fill chunk #13 of template for `yytable'. do yyarray_subcopy (an_array, << 0, 0, 0, 0, 0, 0, 0, 77, 76, 0, 0, 0, 0, 0, 75, 74, 73, 72, 71, 70, 0, 0, 69, 0, 12, 11, 68, 67, 66, 65, 0, 0, 64, 63, 0, 0, 62, 0, 0, 0, 0, 0, 0, 0, 0, 61, 60, 59, 0, 0, 58, 128, 57, 0, 0, 0, 0, 56, 55, 0, 0, 0, 0, 291, 0, 54, 0, 0, 411, 125, 124, 123, 290, 289, 53, 0, 52, 120, 51, 0, 0, 0, 0, 0, 0, 50, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 49, 5, 0, 48, 3, 0, 0, 0, 0, 47, 46, 45, 44, 43, 42, 41, 40, 39, 38, 37, 36, 35, 34, 33, 32, 31, 30, 29, 28, 27, 26, 25, 24, 23, 79, 78, 0, 0, 0, 0, 0, 132, 131, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 77, 76, 0, 0, 0, 0, 0, 75, 74, 73, 72, 71, 70, 0, 0, 69, 0, 12, 11, 68, 67, 66, 65, 0, 0, 64, 63, 0, 0, 62, 0, 0, 0, 0, 0, 0, 0, 0, 61, 60, 59, 0, 128, 58, 0, 57, 0, yyDummy>>, 1, 200, 2400) end yytable_template_14 (an_array: ARRAY [INTEGER]) -- Fill chunk #14 of template for `yytable'. do yyarray_subcopy (an_array, << 0, 0, 0, 56, 55, 0, 0, 280, 0, 0, 0, 54, 0, 125, 124, 123, 279, 278, 0, 0, 53, 120, 52, 0, 51, 0, 0, 0, 0, 0, 0, 50, 0, 0, 0, 0, 0, 0, 0, 405, 0, 0, 0, 0, 49, 5, 0, 48, 3, 0, 0, 0, 0, 47, 46, 45, 44, 43, 42, 41, 40, 39, 38, 37, 36, 35, 34, 33, 32, 31, 30, 29, 28, 27, 26, 25, 24, 23, 79, 78, 0, 0, 0, 0, 0, 132, 131, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 77, 76, 0, 0, 0, 0, 0, 75, 74, 73, 72, 71, 70, 0, 0, 69, 0, 12, 11, 68, 67, 66, 65, 0, 0, 64, 63, 0, 0, 62, 0, 0, 0, 0, 0, 0, 0, 0, 61, 60, 59, 0, 128, 58, 0, 57, 0, 0, 0, 0, 56, 55, 0, 0, 275, 0, 0, 0, 54, 0, 125, 124, 123, 271, 270, 0, 0, 53, 120, 52, 0, 51, 0, 0, 0, 0, 0, 0, 50, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 49, 5, 0, 48, 3, 0, 0, 0, 0, 47, yyDummy>>, 1, 200, 2600) end yytable_template_15 (an_array: ARRAY [INTEGER]) -- Fill chunk #15 of template for `yytable'. do yyarray_subcopy (an_array, << 46, 45, 44, 43, 42, 41, 40, 39, 38, 37, 36, 35, 34, 33, 32, 31, 30, 29, 28, 27, 26, 25, 24, 23, 79, 78, 0, 0, 0, 0, 0, 132, 131, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 77, 76, 0, 0, 0, 0, 0, 75, 74, 73, 72, 71, 70, 0, 0, 69, 0, 12, 11, 68, 67, 66, 65, 0, 0, 512, 63, 0, 0, 62, 0, 0, 0, 0, 0, 0, 0, 0, 61, 60, 59, 0, 128, 58, 0, 57, 0, 0, 0, 0, 56, 55, 0, 0, 272, 0, 0, 0, 54, 0, 125, 124, 123, 271, 270, 0, 0, 53, 120, 52, 0, 51, 0, 0, 0, 0, 0, 0, 50, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 49, 5, 0, 48, 3, 0, 0, 0, 0, 47, 46, 45, 44, 43, 42, 41, 40, 39, 38, 37, 36, 35, 34, 33, 32, 31, 30, 29, 28, 27, 26, 25, 24, 23, 79, 78, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 77, 76, 0, 0, 0, 0, 0, 75, 74, yyDummy>>, 1, 200, 2800) end yytable_template_16 (an_array: ARRAY [INTEGER]) -- Fill chunk #16 of template for `yytable'. do yyarray_subcopy (an_array, << 73, 72, 71, 70, 0, 0, 69, 0, 12, 11, 217, 216, 66, 65, 0, 0, 64, 63, 0, 0, 168, 0, 0, 0, 0, 0, 0, 0, 0, 61, 60, 59, 0, 0, 58, 0, 57, 0, 0, 0, 0, 56, 55, 179, 0, 12, 11, 0, 0, 54, 0, 0, 0, 0, 0, 0, 0, 168, 53, 0, 52, 0, 51, 0, 178, 0, 0, 0, 177, 50, 0, 176, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 49, 5, 0, 4, 3, 0, 0, 0, 0, 47, 46, 45, 44, 43, 42, 41, 40, 39, 38, 37, 36, 35, 34, 33, 32, 31, 30, 29, 28, 27, 26, 25, 24, 23, 79, 78, 0, 6, 5, 0, 4, 3, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 77, 76, 0, 0, 0, 0, 0, 75, 74, 73, 72, 71, 70, 0, -17, 69, 847, 12, 11, 214, 213, 66, 65, 0, 0, 64, 63, 0, 0, 168, -17, 0, 0, 0, 0, 0, -17, 0, 61, 60, 59, 0, 0, 58, -17, 57, -17, -17, 0, 0, 56, 55, -17, 0, 0, 0, 0, 0, 54, 0, 0, 0, 0, yyDummy>>, 1, 200, 3000) end yytable_template_17 (an_array: ARRAY [INTEGER]) -- Fill chunk #17 of template for `yytable'. do yyarray_subcopy (an_array, << -17, 0, 0, 0, 53, 0, 52, 0, 51, 0, 0, 0, 0, 0, 0, 50, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 49, 5, 0, 4, 3, 0, 0, 0, 0, 47, 46, 45, 44, 43, 42, 41, 40, 39, 38, 37, 36, 35, 34, 33, 32, 31, 30, 29, 28, 27, 26, 25, 24, 23, 79, 78, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 77, 76, 0, 0, 0, 0, 0, 75, 74, 73, 72, 71, 70, 0, 0, 69, 0, 12, 11, 68, 67, 66, 65, 0, 0, 64, 63, 0, 0, 165, 0, 0, 0, 0, 0, 0, 0, 0, 61, 60, 59, 0, 0, 58, 0, 57, 0, 0, 0, 0, 56, 55, 0, 0, 0, 0, 0, 0, 54, 0, 0, 0, 0, 0, 0, 0, 0, 53, 0, 52, 0, 51, 0, 0, 0, 0, 0, 0, 50, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 49, 5, 0, 48, 3, 0, 0, 0, 0, 47, 46, 45, 44, 43, 42, 41, 40, 39, 38, 37, 36, 35, 34, 33, 32, 31, yyDummy>>, 1, 200, 3200) end yytable_template_18 (an_array: ARRAY [INTEGER]) -- Fill chunk #18 of template for `yytable'. do yyarray_subcopy (an_array, << 30, 29, 28, 27, 26, 25, 24, 23, -579, 0, -132, 0, 0, -132, 0, 0, 0, 0, 873, 0, 308, -132, -132, 0, 0, 0, 0, 0, 0, 0, -579, -132, 0, 0, -132, -73, -132, 0, -73, 0, 0, 0, 0, 0, 0, 0, -73, -73, 0, 0, 0, 0, 132, 131, 0, 0, -73, -579, -579, -73, -132, -73, -132, -579, 0, -579, -579, 0, -579, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -579, 0, -579, -579, 0, 0, -73, 0, -73, 0, 0, 0, -580, 0, -579, 0, -579, 0, 0, 0, 0, 0, -579, -579, 0, 0, 0, 0, -579, 128, -579, 0, -579, -579, -580, 0, 0, -579, -579, 0, 0, 275, 0, 0, 0, 0, 0, 125, 124, 123, 271, 270, -579, -579, -579, 120, 132, 131, 0, 0, 0, -580, -580, 0, 0, 0, 0, -580, 0, -580, -580, 0, -580, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -580, 0, -580, -580, 0, 0, 0, 0, 0, 0, 0, 0, -576, 0, -580, 0, -580, 0, 0, 0, 0, 0, -580, -580, 0, 0, 0, 0, -580, 128, -580, 0, -580, -580, -576, 0, 0, -580, yyDummy>>, 1, 200, 3400) end yytable_template_19 (an_array: ARRAY [INTEGER]) -- Fill chunk #19 of template for `yytable'. do yyarray_subcopy (an_array, << -580, 0, 0, 272, 0, 0, 0, 0, 0, 125, 124, 123, 271, 270, -580, -580, -580, 120, -576, -576, 0, 0, 0, -576, -576, 0, 0, 0, 0, -576, 0, -576, -576, 0, -576, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -576, 0, -576, -576, 0, 0, 0, 0, 0, 0, 0, 0, -577, 0, -576, 0, -576, 0, 0, 0, 0, 0, -576, -576, 0, 0, 0, 0, -576, 0, -576, 0, -576, -576, -577, 0, 0, -576, -576, 0, 0, 0, 0, 0, 0, 0, 0, -576, -576, -576, -576, -576, -576, -576, -576, 0, -577, -577, 0, 0, 0, -577, -577, 0, 0, 0, 0, -577, 0, -577, -577, 0, -577, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -577, 0, -577, -577, 0, 0, 0, 0, 0, 0, 0, 0, -310, 0, -577, 0, -577, 0, 0, 0, 0, 0, -577, -577, 0, 0, 0, 0, -577, 0, -577, 0, -577, -577, -310, 0, 0, -577, -577, 0, 0, 0, 0, 0, 0, 0, 0, -577, -577, -577, -577, -577, -577, -577, -577, 0, -310, -310, 0, 0, 0, 0, -310, 0, 0, 0, 0, -310, 0, -310, -310, 0, yyDummy>>, 1, 200, 3600) end yytable_template_20 (an_array: ARRAY [INTEGER]) -- Fill chunk #20 of template for `yytable'. do yyarray_subcopy (an_array, << -310, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -310, 0, -310, -310, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -310, 0, -310, 0, 0, 0, 0, 0, -310, -310, 0, 0, 0, 0, -310, 0, -310, 0, -310, -310, 0, 0, 0, -310, -310, 317, 316, 0, 0, 0, 0, 0, 0, -310, -310, -310, -310, -310, -310, -310, -310, 0, 12, 11, 68, 67, 66, 0, 0, 0, 0, 0, 0, 0, 168, 0, 315, 0, 0, 317, 316, 0, 0, 61, 60, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 12, 11, 68, 67, 66, 0, 0, 0, 0, 0, 0, 0, 168, 0, 0, 0, 0, 0, 0, 0, 0, 61, 60, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 6, 5, 0, 4, 3, 0, 0, 0, 0, 47, 46, 45, 44, 43, 42, 41, 40, 39, 38, 37, 36, 35, 34, 33, 32, 31, 30, 29, 28, 27, 26, 25, 24, 23, 6, 5, 0, 4, 3, 0, 0, 0, 0, 47, 46, 45, 44, 43, 42, 41, 40, 39, 38, 37, 36, 35, 34, 33, 32, yyDummy>>, 1, 200, 3800) end yytable_template_21 (an_array: ARRAY [INTEGER]) -- Fill chunk #21 of template for `yytable'. do yyarray_subcopy (an_array, << 31, 30, 29, 28, 27, 26, 25, 24, 23, 317, 316, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 68, 67, 837, 0, 0, 0, 0, 0, 266, 265, 0, 0, 0, 0, 0, 0, 0, 0, 0, 61, 60, 264, 0, 836, 0, 0, 0, 263, 262, 261, 0, 0, 0, 0, 260, 266, 265, 0, 0, 0, 0, 0, 0, 0, 699, 0, 0, 0, 264, 0, 0, 0, 0, 0, 263, 262, 261, 0, 0, 0, 0, 260, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 47, 46, 45, 44, 43, 42, 41, 40, 39, 38, 37, 36, 35, 34, 33, 32, 31, 30, 29, 28, 27, 26, 25, 24, 23, 0, 0, 47, 46, 45, 44, 43, 42, 41, 40, 39, 38, 37, 36, 35, 34, 33, 32, 31, 30, 29, 28, 27, 26, 25, 24, 23, 0, 0, 47, 46, 45, 44, 43, 42, 41, 40, 39, 38, 37, 36, 35, 34, 33, 32, 31, 30, 29, 28, 27, 26, 25, 24, 23, 266, 265, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, yyDummy>>, 1, 200, 4000) end yytable_template_22 (an_array: ARRAY [INTEGER]) -- Fill chunk #22 of template for `yytable'. do yyarray_subcopy (an_array, << 0, 264, 0, 0, 0, 0, 0, 263, 262, 261, 0, 0, 0, 266, 265, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 263, 262, 261, 245, 244, 243, 242, 241, 240, 239, 238, 237, 236, 235, 234, 233, 232, 231, 230, 229, 228, 227, 226, 225, 224, 0, 250, 249, 248, 247, 246, 245, 244, 243, 242, 241, 240, 239, 238, 237, 236, 235, 234, 233, 232, 231, 230, 229, 228, 227, 226, 225, 224, 0, 0, 0, 47, 46, 45, 44, 43, 42, 41, 40, 39, 38, 37, 36, 35, 34, 33, 32, 31, 30, 29, 28, 27, 26, 25, 24, 23, 47, 46, 45, 44, 43, 42, 41, 40, 39, 38, 37, 36, 35, 34, 33, 32, 31, 30, 29, 28, 27, 26, 25, 24, 23, 250, 249, 248, 247, 246, 245, 244, 243, 242, 241, 240, 239, 238, 237, 236, 235, 234, 233, 232, 231, 230, 229, 228, 227, 226, 225, 224, 717, 250, 249, 248, 247, 246, 245, 244, 243, 242, 241, 240, 239, 238, 237, 236, 235, 234, 233, 232, 231, 230, 229, 228, 227, 226, 225, 224, 0, 0, 0, 0, 0, 0, 0, yyDummy>>, 1, 200, 4200) end yytable_template_23 (an_array: ARRAY [INTEGER]) -- Fill chunk #23 of template for `yytable'. do yyarray_subcopy (an_array, << 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 353, 250, 249, 248, 247, 246, 245, 244, 243, 242, 241, 240, 239, 238, 237, 236, 235, 234, 233, 232, 231, 230, 229, 228, 227, 226, 225, 224, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 352, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1246, 250, 249, 248, 247, 246, 245, 244, 243, 242, 241, 240, 239, 238, 237, 236, 235, 234, 233, 232, 231, 230, 229, 228, 227, 226, 225, 224, 0, 0, 0, 0, 0, 0, 0, 168, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1065, 250, 249, 248, 247, 246, 245, 244, 243, 242, 241, 240, 239, 238, 237, 236, 235, 234, 233, 232, 231, 230, 229, 228, 227, 226, 225, 224, 250, 249, 248, 247, 246, 245, 244, 243, 242, 241, 240, 239, 238, 237, 236, 235, 234, 233, 232, 231, 230, 229, 228, 227, 226, 225, 224, 0, 0, 0, 0, 0, 811, 47, 46, 45, 44, 43, 42, 41, 40, 39, 38, 37, 36, 35, 34, 33, 32, 31, 30, 29, 28, 27, 26, 25, 24, yyDummy>>, 1, 200, 4400) end yytable_template_24 (an_array: ARRAY [INTEGER]) -- Fill chunk #24 of template for `yytable'. do yyarray_subcopy (an_array, << 23, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 356, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1232, 250, 249, 248, 247, 246, 245, 244, 243, 242, 241, 240, 239, 238, 237, 236, 235, 234, 233, 232, 231, 230, 229, 228, 227, 226, 225, 224, -84, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -84, -84, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -84, 0, -84, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -84, 0, 0, 0, 0, -84, -84, 0, 0, 0, 0, 0, 0, 0, -84, 0, -84, -84, 0, -84, 0, 1207, -84, 0, -84, 0, 0, -84, 0, 0, 0, 0, 0, -84, 0, 0, -84, -84, -84, 250, 249, 248, 247, 246, 245, 244, 243, 242, 241, 240, 239, 238, 237, 236, 235, 234, 233, 232, 231, 230, 229, 228, 227, 226, 225, 224, 250, 249, 248, 247, 246, 245, 244, 243, 242, 241, 240, 239, 238, 237, 236, 235, 234, 233, 232, 231, 230, 229, 228, 227, 226, yyDummy>>, 1, 200, 4600) end yytable_template_25 (an_array: ARRAY [INTEGER]) -- Fill chunk #25 of template for `yytable'. do yyarray_subcopy (an_array, << 225, 224, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -355, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -355, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -597, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -597, 250, 249, 248, 247, 246, 245, 244, 243, 242, 241, 240, 239, 238, 237, 236, 235, 234, 233, 232, 231, 230, 229, 228, 227, 226, 225, 224, 250, 249, 248, 247, 246, 245, 244, 243, 242, 241, 240, 239, 238, 237, 236, 235, 234, 233, 232, 231, 230, 229, 228, 227, 226, 225, 224, 47, 46, 45, 44, 43, 42, 41, 40, 39, 38, 37, 36, 35, 34, 33, 32, 31, 30, 29, 28, 27, 26, 25, 24, 23, 605, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1161, 250, 249, 248, 247, 246, 245, 244, 243, 242, 241, 240, 239, 238, 237, 236, 235, 234, 233, 232, 231, 230, 229, 228, 227, 226, 225, 224, 250, 249, 248, 247, 246, 245, 244, 243, 242, 241, 240, 239, 238, 237, 236, 235, 234, 233, yyDummy>>, 1, 200, 4800) end yytable_template_26 (an_array: ARRAY [INTEGER]) -- Fill chunk #26 of template for `yytable'. do yyarray_subcopy (an_array, << 232, 231, 230, 229, 228, 227, 226, 225, 224, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 810, 248, 247, 246, 245, 244, 243, 242, 241, 240, 239, 238, 237, 236, 235, 234, 233, 232, 231, 230, 229, 228, 227, 226, 225, 224, 0, 749, 250, 249, 248, 247, 246, 245, 244, 243, 242, 241, 240, 239, 238, 237, 236, 235, 234, 233, 232, 231, 230, 229, 228, 227, 226, 225, 224, 250, 249, 248, 247, 246, 245, 244, 243, 242, 241, 240, 239, 238, 237, 236, 235, 234, 233, 232, 231, 230, 229, 228, 227, 226, 225, 224, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 676, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1176, 250, 249, 248, 247, 246, 245, 244, 243, 242, 241, 240, 239, 238, 237, 236, 235, 234, 233, 232, 231, 230, 229, 228, 227, 226, 225, 224, 47, 0, 45, 0, 43, 42, 41, 40, 39, 38, 37, 36, 35, 34, 33, 32, 31, 30, 29, 28, 27, 26, 25, 24, 23, 636, 250, 249, 248, 247, 246, 245, 244, 243, 242, 241, 240, 239, 238, 237, 236, 235, 234, 233, 232, 231, yyDummy>>, 1, 200, 5000) end yytable_template_27 (an_array: ARRAY [INTEGER]) -- Fill chunk #27 of template for `yytable'. do yyarray_subcopy (an_array, << 230, 229, 228, 227, 226, 225, 224, 588, 587, 586, 585, 584, 583, 582, 581, 580, 579, 578, 577, 576, 575, 574, 573, 572, 571, 570, 569, 568, 0, 0, 0, 0, 635, 250, 249, 248, 247, 246, 245, 244, 243, 242, 241, 240, 239, 238, 237, 236, 235, 234, 233, 232, 231, 230, 229, 228, 227, 226, 225, 224, 243, 242, 241, 240, 239, 238, 237, 236, 235, 234, 233, 232, 231, 230, 229, 228, 227, 226, 225, 224, 0, 0, 0, 0, 518, 250, 249, 248, 247, 246, 245, 244, 243, 242, 241, 240, 239, 238, 237, 236, 235, 234, 233, 232, 231, 230, 229, 228, 227, 226, 225, 224, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 308, 250, 249, 248, 247, 246, 245, 244, 243, 242, 241, 240, 239, 238, 237, 236, 235, 234, 233, 232, 231, 230, 229, 228, 227, 226, 225, 224, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 762, 250, 249, 248, 247, 246, 245, 244, 243, 242, 241, 240, 239, 238, 237, 236, 235, 234, 233, yyDummy>>, 1, 200, 5200) end yytable_template_28 (an_array: ARRAY [INTEGER]) -- Fill chunk #28 of template for `yytable'. do yyarray_subcopy (an_array, << 232, 231, 230, 229, 228, 227, 226, 225, 224, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 378, 250, 249, 248, 247, 246, 245, 244, 243, 242, 241, 240, 239, 238, 237, 236, 235, 234, 233, 232, 231, 230, 229, 228, 227, 226, 225, 224, yyDummy>>, 1, 56, 5400) end yycheck_template: SPECIAL [INTEGER] -- Template for `yycheck' local an_array: ARRAY [INTEGER] once create an_array.make_filled (0, 0, 5455) yycheck_template_1 (an_array) yycheck_template_2 (an_array) yycheck_template_3 (an_array) yycheck_template_4 (an_array) yycheck_template_5 (an_array) yycheck_template_6 (an_array) yycheck_template_7 (an_array) yycheck_template_8 (an_array) yycheck_template_9 (an_array) yycheck_template_10 (an_array) yycheck_template_11 (an_array) yycheck_template_12 (an_array) yycheck_template_13 (an_array) yycheck_template_14 (an_array) yycheck_template_15 (an_array) yycheck_template_16 (an_array) yycheck_template_17 (an_array) yycheck_template_18 (an_array) yycheck_template_19 (an_array) yycheck_template_20 (an_array) yycheck_template_21 (an_array) yycheck_template_22 (an_array) yycheck_template_23 (an_array) yycheck_template_24 (an_array) yycheck_template_25 (an_array) yycheck_template_26 (an_array) yycheck_template_27 (an_array) yycheck_template_28 (an_array) Result := yyfixed_array (an_array) end yycheck_template_1 (an_array: ARRAY [INTEGER]) -- Fill chunk #1 of template for `yycheck'. do yyarray_subcopy (an_array, << 7, 159, 9, 64, 304, 154, 154, 174, 50, 16, 17, 18, 2, 154, 313, 268, 154, 0, 185, 602, 340, 804, 50, 643, 154, 53, 672, 55, 549, 154, 154, 597, 118, 56, 466, 157, 504, 621, 860, 22, 599, 549, 1059, 154, 205, 930, 869, 1030, 1002, 869, 602, 148, 1058, 1059, 189, 154, 63, 0, 65, 338, 933, 42, 935, 0, 0, 13, 470, 976, 913, 913, 1069, 913, 55, 913, 1000, 913, 73, 59, 59, 62, 913, 64, 3, 0, 170, 80, 221, 671, 3, 50, 95, 74, 42, 915, 99, 78, 79, 154, 1052, 60, 128, 924, 80, 3, 924, 1014, 73, 102, 674, 59, 60, 40, 154, 110, 62, 73, 251, 0, 253, 48, 255, 42, 257, 258, 259, 40, 154, 134, 71, 1055, 51, 126, 1131, 3, 49, 71, 73, 304, 74, 0, 40, 99, 124, 124, 87, 128, 113, 175, 126, 49, 93, 1134, 556, 160, 1108, 739, 624, 1042, 3, 742, 743, 104, 745, 3, 171, 123, 55, 125, 151, 735, 40, 154, 179, 1190, 157, 1084, 159, 120, 1051, 186, 1025, 1025, 165, 1025, 1190, 1025, 123, 1025, 125, 741, 742, 743, 1025, 745, 50, 40, 475, 58, 477, 478, yyDummy>>, 1, 200, 0) end yycheck_template_2 (an_array: ARRAY [INTEGER]) -- Fill chunk #2 of template for `yycheck'. do yyarray_subcopy (an_array, << 40, 208, 58, 787, 73, 188, 189, 73, 305, 306, 71, 51, 73, 74, 75, 222, 223, 165, 784, 73, 168, 804, 83, 384, 385, 49, 87, 44, 45, 40, 91, 790, 93, 44, 45, 58, 115, 116, 221, 1112, 101, 1114, 103, 104, 113, 252, 73, 254, 109, 73, 73, 337, 804, 260, 73, 416, 67, 418, 380, 120, 44, 45, 846, 424, 1086, 773, 1089, 73, 251, 1089, 253, 76, 255, 116, 257, 258, 259, 42, 557, 106, 85, 264, 42, 106, 111, 851, 565, 294, 111, 42, 758, 114, 111, 57, 59, 42, 57, 729, 882, 59, 73, 118, 119, 56, 121, 122, 313, 118, 119, 5, 121, 122, 59, 44, 5, 298, 299, 466, 466, 49, 89, 470, 470, 969, 73, 466, 99, 57, 466, 470, 73, 71, 470, 340, 118, 119, 466, 121, 122, 88, 470, 466, 466, 74, 73, 470, 470, 87, 371, 75, 123, 73, 125, 93, 361, 466, 363, 83, 73, 470, 91, 913, 345, 73, 104, 113, 88, 466, 351, 352, 353, 470, 893, 88, 357, 73, 107, 73, 73, 362, 120, 660, 1165, 662, 73, 664, 521, 118, 119, 120, 121, 122, 88, 89, 90, 126, 106, 380, 33, 34, yyDummy>>, 1, 200, 200) end yycheck_template_3 (an_array: ARRAY [INTEGER]) -- Fill chunk #3 of template for `yycheck'. do yyarray_subcopy (an_array, << 35, 111, 425, 99, 114, 94, 102, 556, 556, 466, 99, 71, 5, 470, 110, 556, 73, 365, 556, 115, 116, 117, 508, 94, 466, 373, 556, 87, 470, 73, 73, 556, 556, 93, 123, 56, 125, 73, 466, 73, 562, 101, 470, 56, 104, 556, 73, 840, 56, 92, 94, 512, 88, 602, 88, 99, 849, 556, 465, 57, 120, 88, 445, 106, 102, 58, 40, 40, 111, 630, 73, 114, 117, 1025, 497, 49, 49, 602, 506, 123, 73, 125, 71, 466, 99, 88, 493, 470, 511, 496, 80, 602, 73, 772, 44, 88, 89, 90, 87, 556, 27, 28, 485, 602, 93, 87, 99, 760, 456, 102, 59, 60, 102, 40, 556, 104, 499, 110, 60, 46, 503, 48, 115, 116, 117, 115, 116, 73, 556, 512, 40, 120, 42, 619, 813, 73, 126, 857, 521, 91, 123, 93, 125, 550, 60, 602, 84, 27, 28, 848, 44, 45, 104, 115, 48, 834, 94, 40, 1178, 726, 40, 99, 56, 60, 817, 73, 46, 653, 118, 119, 120, 121, 122, 556, 602, 115, 126, 59, 60, 562, 729, 729, 1165, 566, 73, 123, 609, 125, 729, 596, 111, 729, 58, 742, 743, 85, 745, 58, 59, 729, yyDummy>>, 1, 200, 400) end yycheck_template_4 (an_array: ARRAY [INTEGER]) -- Fill chunk #4 of template for `yycheck'. do yyarray_subcopy (an_array, << 94, 46, 47, 610, 729, 729, 99, 774, 775, 776, 909, 1231, 560, 1165, 1234, 73, 741, 742, 729, 602, 745, 46, 47, 1189, 118, 119, 905, 121, 122, 106, 729, 742, 743, 73, 745, 784, 784, 786, 786, 46, 47, 46, 47, 742, 743, 57, 745, 595, 1215, 1216, 76, 77, 81, 73, 784, 804, 786, 936, 153, 60, 784, 156, 786, 670, 60, 60, 919, 44, 45, 164, 57, 44, 729, 784, 55, 786, 58, 114, 84, 804, 155, 59, 73, 73, 73, 742, 743, 729, 745, 60, 60, 49, 675, 804, 49, 23, 42, 73, 784, 952, 786, 729, 27, 28, 871, 804, 873, 92, 875, 73, 108, 694, 73, 741, 742, 743, 56, 745, 58, 44, 45, 46, 49, 48, 57, 673, 10, 980, 756, 108, 110, 56, 79, 73, 717, 55, 0, 103, 113, 73, 80, 118, 119, 120, 121, 122, 729, 804, 97, 126, 50, 734, 90, 62, 123, 60, 124, 60, 741, 742, 743, 42, 745, 930, 48, 49, 106, 51, 52, 94, 101, 111, 55, 721, 114, 723, 804, 29, 30, 31, 32, 33, 34, 35, 113, 69, 70, 89, 72, 73, 46, 75, 46, 118, 119, 785, 121, 122, 119, 73, yyDummy>>, 1, 200, 600) end yycheck_template_5 (an_array: ARRAY [INTEGER]) -- Fill chunk #5 of template for `yycheck'. do yyarray_subcopy (an_array, << 1100, 73, 88, 88, 59, 55, 754, 71, 8, 73, 8, 60, 819, 27, 28, 8, 80, 312, 8, 22, 46, 804, 73, 87, 46, 1104, 54, 834, 323, 93, 44, 45, 46, 84, 309, 55, 109, 101, 102, 50, 104, 848, 56, 94, 50, 50, 110, 342, 99, 113, 857, 115, 116, 50, 55, 42, 120, 88, 60, 123, 867, 125, 126, 81, 117, 84, 55, 79, 71, 73, 50, 50, 123, 348, 125, 1042, 60, 92, 885, 886, 94, 376, 377, 60, 87, 913, 54, 877, 895, 975, 93, 106, 57, 108, 60, 55, 111, 49, 101, 114, 103, 104, 909, 49, 118, 119, 109, 121, 122, 50, 55, 40, 1212, 57, 24, 55, 85, 120, 57, 926, 123, 124, 125, 60, 59, 932, 933, 934, 935, 936, 913, 59, 993, 1100, 995, 60, 943, 93, 50, 1097, 224, 225, 226, 227, 228, 229, 230, 231, 232, 233, 234, 235, 236, 237, 238, 239, 240, 241, 242, 243, 244, 245, 246, 247, 248, 249, 250, 40, 54, 59, 861, 59, 955, 27, 28, 29, 30, 31, 32, 33, 34, 35, 57, 990, 55, 59, 481, 55, 1016, 484, 59, 40, 56, 40, 469, 60, 887, 1025, 81, 40, yyDummy>>, 1, 200, 800) end yycheck_template_6 (an_array: ARRAY [INTEGER]) -- Fill chunk #6 of template for `yycheck'. do yyarray_subcopy (an_array, << 495, 476, 40, 40, 1011, 1012, 989, 502, 483, 40, 993, 40, 995, 0, 40, 40, 1165, 44, 45, 494, 515, 42, 50, 40, 54, 40, 501, 659, 523, 920, 1242, 526, 527, 1016, 869, 530, 531, 532, 1089, 486, 1165, 1048, 1025, 518, 1051, 1212, 610, 721, 1109, 1056, 1057, 903, 566, 548, 1165, 950, 44, 45, 949, 121, 122, 345, 1086, 925, 126, 127, 1165, 1142, 130, 876, 756, 1025, 356, 100, 871, 1212, 906, 465, 906, 67, 1141, 1142, 70, 1007, 906, 369, 44, 45, 1071, 1088, 1196, 118, 119, 120, 121, 122, 1141, 381, 382, 126, 1139, 485, 1193, 941, 706, 1112, 752, 1114, 1165, 1241, 1101, 1229, 1116, 1214, 1097, 603, 1123, 612, 613, 1126, 1166, 405, 729, 129, 1015, 620, 1109, 411, 190, 191, 118, 119, 1066, 121, 122, 121, 122, 1165, 1029, 1153, 126, 127, 100, 473, 130, 304, 9, 431, 1155, 786, 951, 339, 627, 1214, 112, 1071, 1139, 591, 1141, 1142, 118, 119, 120, 121, 122, 888, 738, 0, 126, 644, 654, -1, -1, -1, 1065, -1, -1, -1, 1161, -1, 655, 1072, 1165, -1, 1191, -1, 42, -1, 44, 45, 685, -1, -1, -1, -1, -1, 691, -1, -1, -1, yyDummy>>, 1, 200, 1000) end yycheck_template_7 (an_array: ARRAY [INTEGER]) -- Fill chunk #7 of template for `yycheck'. do yyarray_subcopy (an_array, << -1, -1, 697, 487, 190, 191, -1, 491, 1215, 1216, 272, 67, -1, 275, 70, 690, 278, 279, 280, 503, -1, -1, 506, 698, -1, -1, -1, 289, 290, 291, 1121, 1214, -1, -1, 1241, -1, -1, -1, 71, -1, 73, 74, 75, -1, 1135, -1, -1, 722, -1, 724, 83, 535, 536, -1, 87, -1, -1, 0, 91, -1, 93, -1, 118, 119, -1, 121, 122, -1, 101, 744, 103, 104, -1, -1, -1, -1, 109, 1168, -1, -1, -1, 565, 566, -1, -1, -1, 272, 120, -1, 275, 44, 45, 278, 279, 280, -1, -1, -1, -1, 0, -1, -1, 56, 289, 290, 291, 1197, -1, -1, -1, -1, 1202, -1, 67, -1, -1, 1207, -1, 1209, 1210, -1, 605, -1, -1, -1, -1, -1, -1, 71, -1, 73, 74, 75, -1, -1, -1, -1, -1, 833, -1, 83, 1232, 626, -1, 87, 629, -1, -1, 91, -1, 93, -1, -1, 1244, -1, 1246, -1, 832, 101, -1, 103, 104, -1, -1, 118, 119, 109, 121, 122, -1, 71, -1, 73, 74, 75, 437, -1, 120, 440, -1, -1, -1, 83, -1, 446, 880, 87, 449, 883, -1, 91, -1, 93, 868, -1, -1, -1, -1, -1, -1, yyDummy>>, 1, 200, 1200) end yycheck_template_8 (an_array: ARRAY [INTEGER]) -- Fill chunk #8 of template for `yycheck'. do yyarray_subcopy (an_array, << 101, -1, 103, 104, 688, 689, -1, -1, 109, -1, -1, -1, 907, -1, 42, -1, -1, -1, -1, 120, -1, -1, 706, -1, 44, 45, 710, 711, -1, 904, -1, 59, 60, 717, -1, -1, 56, -1, 44, 45, -1, -1, -1, 71, -1, 73, -1, -1, -1, 944, 56, 437, -1, -1, 440, -1, 84, -1, -1, 87, 446, -1, -1, 449, 92, 93, -1, -1, 74, -1, -1, -1, 756, 101, -1, 103, 104, -1, 106, -1, -1, 109, 977, 111, 979, 0, 114, -1, -1, -1, 985, -1, 120, 968, 100, 123, 124, 125, 118, 119, -1, 121, 122, -1, -1, -1, 112, 22, -1, 984, 116, -1, 118, 119, 120, 121, 122, -1, -1, -1, 126, -1, -1, -1, -1, 809, -1, 811, -1, 44, 45, -1, -1, -1, 49, 50, -1, 821, -1, -1, 55, -1, 57, 58, -1, 60, 1041, -1, -1, 1044, -1, -1, 1047, -1, -1, 1050, 71, 1032, 73, 74, -1, 44, 45, -1, -1, -1, 1061, 44, 45, -1, 85, -1, 87, -1, 1049, -1, -1, -1, 93, 94, -1, -1, -1, -1, 99, 1060, 101, -1, 103, 104, -1, 74, -1, 108, 109, -1, -1, 74, 1093, -1, yyDummy>>, 1, 200, 1400) end yycheck_template_9 (an_array: ARRAY [INTEGER]) -- Fill chunk #9 of template for `yycheck'. do yyarray_subcopy (an_array, << -1, -1, -1, 118, 119, 120, 121, 122, 123, 124, 125, -1, -1, -1, -1, -1, 1091, 100, -1, 1094, -1, 1096, -1, 44, 45, 1120, -1, -1, -1, 112, 1125, -1, -1, 116, -1, 118, 119, 120, 121, 122, -1, 118, 119, 126, 121, 122, -1, 44, 45, 1124, 1145, 27, 28, 50, -1, -1, -1, 1152, -1, -1, -1, -1, 1157, 947, 948, -1, -1, -1, -1, -1, 46, 47, 48, -1, -1, -1, -1, 74, -1, 100, -1, 1156, -1, -1, -1, -1, -1, 1162, -1, 65, 66, 112, -1, 69, 91, -1, -1, 118, 119, 120, 121, 122, -1, 100, 1199, 126, -1, 1182, -1, -1, 1185, 1206, -1, -1, -1, 112, -1, -1, -1, 116, -1, 118, 119, 120, 121, 122, 1221, -1, -1, 126, 1205, 44, 45, -1, 1018, 1019, -1, 1021, 1022, 1023, 1024, 44, 45, 1027, 1028, 1220, -1, 123, -1, 125, -1, 127, 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143, 144, 145, 146, 147, 148, 149, 150, 151, -1, -1, 1062, 82, -1, -1, -1, -1, -1, -1, -1, 100, -1, -1, -1, 94, 1076, -1, -1, -1, 99, -1, 101, 112, yyDummy>>, 1, 200, 1600) end yycheck_template_10 (an_array: ARRAY [INTEGER]) -- Fill chunk #10 of template for `yycheck'. do yyarray_subcopy (an_array, << 4, -1, 6, 7, -1, 118, 119, 120, 121, 122, -1, -1, -1, 126, -1, 118, 119, -1, 121, 122, 123, -1, 125, 27, 28, -1, -1, -1, 44, 45, -1, 35, -1, -1, -1, -1, -1, -1, 42, -1, 44, 45, -1, 1127, 48, 49, -1, -1, -1, -1, -1, -1, 56, -1, -1, -1, -1, -1, 74, -1, -1, 65, 66, 67, 68, -1, 70, -1, -1, -1, -1, -1, -1, 77, -1, 91, -1, -1, 82, -1, -1, 85, 86, -1, 100, 44, 45, -1, -1, 1173, 94, 95, 96, -1, 98, -1, 112, 56, -1, -1, 116, 105, 118, 119, 120, 121, 122, -1, 112, -1, 126, 70, 1196, -1, 118, 119, -1, 121, 122, -1, 1204, -1, -1, 127, 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143, 144, 145, 146, 147, 148, 149, 150, 151, 6, 7, -1, -1, -1, -1, -1, -1, -1, -1, -1, 118, 119, -1, 121, 122, -1, -1, -1, -1, -1, 27, 28, -1, -1, -1, 44, 45, 34, 35, 36, 37, 38, 39, -1, -1, 42, -1, 44, 45, 46, 47, 48, 49, -1, -1, 52, 53, -1, -1, 56, -1, yyDummy>>, 1, 200, 1800) end yycheck_template_11 (an_array: ARRAY [INTEGER]) -- Fill chunk #11 of template for `yycheck'. do yyarray_subcopy (an_array, << 58, -1, -1, -1, 74, -1, -1, 65, 66, 67, -1, -1, 70, -1, 72, -1, -1, -1, -1, 77, 78, 91, -1, -1, -1, 83, -1, 85, -1, -1, 100, -1, -1, -1, -1, -1, 94, -1, 96, -1, 98, -1, 112, -1, -1, -1, 116, 105, 118, 119, 120, 121, 122, -1, -1, -1, 126, -1, -1, -1, 118, 119, -1, 121, 122, -1, -1, -1, -1, 127, 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143, 144, 145, 146, 147, 148, 149, 150, 151, 6, 7, -1, -1, -1, -1, -1, -1, -1, 44, 45, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 27, 28, -1, -1, -1, 44, 45, 34, 35, 36, 37, 38, 39, -1, -1, 42, -1, 44, 45, 46, 47, 48, 49, -1, -1, 52, 53, -1, -1, 56, -1, -1, -1, -1, -1, 74, 63, -1, 65, 66, 67, -1, -1, 70, 100, 72, -1, -1, -1, -1, 77, 78, 91, -1, -1, -1, 112, -1, 85, -1, -1, 100, 118, 119, 120, 121, 122, 94, -1, 96, 126, 98, -1, 112, -1, -1, -1, 116, 105, 118, 119, 120, 121, 122, -1, yyDummy>>, 1, 200, 2000) end yycheck_template_12 (an_array: ARRAY [INTEGER]) -- Fill chunk #12 of template for `yycheck'. do yyarray_subcopy (an_array, << -1, -1, 126, -1, -1, -1, 118, 119, -1, 121, 122, -1, -1, -1, -1, 127, 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143, 144, 145, 146, 147, 148, 149, 150, 151, 6, 7, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, -1, -1, 27, 28, -1, -1, -1, 44, 45, 34, 35, 36, 37, 38, 39, -1, -1, 42, -1, 44, 45, 46, 47, 48, 49, -1, -1, 52, 53, -1, -1, 56, -1, -1, -1, -1, -1, 74, -1, -1, 65, 66, 67, -1, -1, 70, -1, 72, -1, -1, -1, -1, 77, 78, 91, -1, -1, -1, 83, -1, 85, -1, -1, 100, -1, -1, -1, -1, -1, 94, -1, 96, -1, 98, -1, 112, -1, -1, -1, 116, 105, 118, 119, 120, 121, 122, -1, -1, -1, 126, -1, -1, -1, 118, 119, -1, 121, 122, -1, -1, -1, -1, 127, 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143, 144, 145, 146, 147, 148, 149, 150, 151, 6, 7, -1, -1, -1, -1, -1, -1, -1, 44, 45, -1, -1, -1, yyDummy>>, 1, 200, 2200) end yycheck_template_13 (an_array: ARRAY [INTEGER]) -- Fill chunk #13 of template for `yycheck'. do yyarray_subcopy (an_array, << -1, -1, -1, -1, -1, -1, -1, 27, 28, -1, -1, -1, -1, -1, 34, 35, 36, 37, 38, 39, -1, -1, 42, -1, 44, 45, 46, 47, 48, 49, -1, -1, 52, 53, -1, -1, 56, -1, -1, -1, -1, -1, -1, -1, -1, 65, 66, 67, -1, -1, 70, 100, 72, -1, -1, -1, -1, 77, 78, -1, -1, -1, -1, 112, -1, 85, -1, -1, 88, 118, 119, 120, 121, 122, 94, -1, 96, 126, 98, -1, -1, -1, -1, -1, -1, 105, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 118, 119, -1, 121, 122, -1, -1, -1, -1, 127, 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143, 144, 145, 146, 147, 148, 149, 150, 151, 6, 7, -1, -1, -1, -1, -1, 44, 45, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 27, 28, -1, -1, -1, -1, -1, 34, 35, 36, 37, 38, 39, -1, -1, 42, -1, 44, 45, 46, 47, 48, 49, -1, -1, 52, 53, -1, -1, 56, -1, -1, -1, -1, -1, -1, -1, -1, 65, 66, 67, -1, 100, 70, -1, 72, -1, yyDummy>>, 1, 200, 2400) end yycheck_template_14 (an_array: ARRAY [INTEGER]) -- Fill chunk #14 of template for `yycheck'. do yyarray_subcopy (an_array, << -1, -1, -1, 77, 78, -1, -1, 112, -1, -1, -1, 85, -1, 118, 119, 120, 121, 122, -1, -1, 94, 126, 96, -1, 98, -1, -1, -1, -1, -1, -1, 105, -1, -1, -1, -1, -1, -1, -1, 113, -1, -1, -1, -1, 118, 119, -1, 121, 122, -1, -1, -1, -1, 127, 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143, 144, 145, 146, 147, 148, 149, 150, 151, 6, 7, -1, -1, -1, -1, -1, 44, 45, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 27, 28, -1, -1, -1, -1, -1, 34, 35, 36, 37, 38, 39, -1, -1, 42, -1, 44, 45, 46, 47, 48, 49, -1, -1, 52, 53, -1, -1, 56, -1, -1, -1, -1, -1, -1, -1, -1, 65, 66, 67, -1, 100, 70, -1, 72, -1, -1, -1, -1, 77, 78, -1, -1, 112, -1, -1, -1, 85, -1, 118, 119, 120, 121, 122, -1, -1, 94, 126, 96, -1, 98, -1, -1, -1, -1, -1, -1, 105, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 118, 119, -1, 121, 122, -1, -1, -1, -1, 127, yyDummy>>, 1, 200, 2600) end yycheck_template_15 (an_array: ARRAY [INTEGER]) -- Fill chunk #15 of template for `yycheck'. do yyarray_subcopy (an_array, << 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143, 144, 145, 146, 147, 148, 149, 150, 151, 6, 7, -1, -1, -1, -1, -1, 44, 45, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 27, 28, -1, -1, -1, -1, -1, 34, 35, 36, 37, 38, 39, -1, -1, 42, -1, 44, 45, 46, 47, 48, 49, -1, -1, 52, 53, -1, -1, 56, -1, -1, -1, -1, -1, -1, -1, -1, 65, 66, 67, -1, 100, 70, -1, 72, -1, -1, -1, -1, 77, 78, -1, -1, 112, -1, -1, -1, 85, -1, 118, 119, 120, 121, 122, -1, -1, 94, 126, 96, -1, 98, -1, -1, -1, -1, -1, -1, 105, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 118, 119, -1, 121, 122, -1, -1, -1, -1, 127, 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143, 144, 145, 146, 147, 148, 149, 150, 151, 6, 7, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 27, 28, -1, -1, -1, -1, -1, 34, 35, yyDummy>>, 1, 200, 2800) end yycheck_template_16 (an_array: ARRAY [INTEGER]) -- Fill chunk #16 of template for `yycheck'. do yyarray_subcopy (an_array, << 36, 37, 38, 39, -1, -1, 42, -1, 44, 45, 46, 47, 48, 49, -1, -1, 52, 53, -1, -1, 56, -1, -1, -1, -1, -1, -1, -1, -1, 65, 66, 67, -1, -1, 70, -1, 72, -1, -1, -1, -1, 77, 78, 42, -1, 44, 45, -1, -1, 85, -1, -1, -1, -1, -1, -1, -1, 56, 94, -1, 96, -1, 98, -1, 63, -1, -1, -1, 67, 105, -1, 70, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 118, 119, -1, 121, 122, -1, -1, -1, -1, 127, 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143, 144, 145, 146, 147, 148, 149, 150, 151, 6, 7, -1, 118, 119, -1, 121, 122, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 27, 28, -1, -1, -1, -1, -1, 34, 35, 36, 37, 38, 39, -1, 71, 42, 73, 44, 45, 46, 47, 48, 49, -1, -1, 52, 53, -1, -1, 56, 87, -1, -1, -1, -1, -1, 93, -1, 65, 66, 67, -1, -1, 70, 101, 72, 103, 104, -1, -1, 77, 78, 109, -1, -1, -1, -1, -1, 85, -1, -1, -1, -1, yyDummy>>, 1, 200, 3000) end yycheck_template_17 (an_array: ARRAY [INTEGER]) -- Fill chunk #17 of template for `yycheck'. do yyarray_subcopy (an_array, << 120, -1, -1, -1, 94, -1, 96, -1, 98, -1, -1, -1, -1, -1, -1, 105, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 118, 119, -1, 121, 122, -1, -1, -1, -1, 127, 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143, 144, 145, 146, 147, 148, 149, 150, 151, 6, 7, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 27, 28, -1, -1, -1, -1, -1, 34, 35, 36, 37, 38, 39, -1, -1, 42, -1, 44, 45, 46, 47, 48, 49, -1, -1, 52, 53, -1, -1, 56, -1, -1, -1, -1, -1, -1, -1, -1, 65, 66, 67, -1, -1, 70, -1, 72, -1, -1, -1, -1, 77, 78, -1, -1, -1, -1, -1, -1, 85, -1, -1, -1, -1, -1, -1, -1, -1, 94, -1, 96, -1, 98, -1, -1, -1, -1, -1, -1, 105, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 118, 119, -1, 121, 122, -1, -1, -1, -1, 127, 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143, yyDummy>>, 1, 200, 3200) end yycheck_template_18 (an_array: ARRAY [INTEGER]) -- Fill chunk #18 of template for `yycheck'. do yyarray_subcopy (an_array, << 144, 145, 146, 147, 148, 149, 150, 151, 0, -1, 73, -1, -1, 76, -1, -1, -1, -1, 56, -1, 58, 84, 85, -1, -1, -1, -1, -1, -1, -1, 22, 94, -1, -1, 97, 73, 99, -1, 76, -1, -1, -1, -1, -1, -1, -1, 84, 85, -1, -1, -1, -1, 44, 45, -1, -1, 94, 49, 50, 97, 123, 99, 125, 55, -1, 57, 58, -1, 60, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 71, -1, 73, 74, -1, -1, 123, -1, 125, -1, -1, -1, 0, -1, 85, -1, 87, -1, -1, -1, -1, -1, 93, 94, -1, -1, -1, -1, 99, 100, 101, -1, 103, 104, 22, -1, -1, 108, 109, -1, -1, 112, -1, -1, -1, -1, -1, 118, 119, 120, 121, 122, 123, 124, 125, 126, 44, 45, -1, -1, -1, 49, 50, -1, -1, -1, -1, 55, -1, 57, 58, -1, 60, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 71, -1, 73, 74, -1, -1, -1, -1, -1, -1, -1, -1, 0, -1, 85, -1, 87, -1, -1, -1, -1, -1, 93, 94, -1, -1, -1, -1, 99, 100, 101, -1, 103, 104, 22, -1, -1, 108, yyDummy>>, 1, 200, 3400) end yycheck_template_19 (an_array: ARRAY [INTEGER]) -- Fill chunk #19 of template for `yycheck'. do yyarray_subcopy (an_array, << 109, -1, -1, 112, -1, -1, -1, -1, -1, 118, 119, 120, 121, 122, 123, 124, 125, 126, 44, 45, -1, -1, -1, 49, 50, -1, -1, -1, -1, 55, -1, 57, 58, -1, 60, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 71, -1, 73, 74, -1, -1, -1, -1, -1, -1, -1, -1, 0, -1, 85, -1, 87, -1, -1, -1, -1, -1, 93, 94, -1, -1, -1, -1, 99, -1, 101, -1, 103, 104, 22, -1, -1, 108, 109, -1, -1, -1, -1, -1, -1, -1, -1, 118, 119, 120, 121, 122, 123, 124, 125, -1, 44, 45, -1, -1, -1, 49, 50, -1, -1, -1, -1, 55, -1, 57, 58, -1, 60, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 71, -1, 73, 74, -1, -1, -1, -1, -1, -1, -1, -1, 0, -1, 85, -1, 87, -1, -1, -1, -1, -1, 93, 94, -1, -1, -1, -1, 99, -1, 101, -1, 103, 104, 22, -1, -1, 108, 109, -1, -1, -1, -1, -1, -1, -1, -1, 118, 119, 120, 121, 122, 123, 124, 125, -1, 44, 45, -1, -1, -1, -1, 50, -1, -1, -1, -1, 55, -1, 57, 58, -1, yyDummy>>, 1, 200, 3600) end yycheck_template_20 (an_array: ARRAY [INTEGER]) -- Fill chunk #20 of template for `yycheck'. do yyarray_subcopy (an_array, << 60, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 71, -1, 73, 74, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 85, -1, 87, -1, -1, -1, -1, -1, 93, 94, -1, -1, -1, -1, 99, -1, 101, -1, 103, 104, -1, -1, -1, 108, 109, 27, 28, -1, -1, -1, -1, -1, -1, 118, 119, 120, 121, 122, 123, 124, 125, -1, 44, 45, 46, 47, 48, -1, -1, -1, -1, -1, -1, -1, 56, -1, 58, -1, -1, 27, 28, -1, -1, 65, 66, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 44, 45, 46, 47, 48, -1, -1, -1, -1, -1, -1, -1, 56, -1, -1, -1, -1, -1, -1, -1, -1, 65, 66, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 118, 119, -1, 121, 122, -1, -1, -1, -1, 127, 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143, 144, 145, 146, 147, 148, 149, 150, 151, 118, 119, -1, 121, 122, -1, -1, -1, -1, 127, 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, yyDummy>>, 1, 200, 3800) end yycheck_template_21 (an_array: ARRAY [INTEGER]) -- Fill chunk #21 of template for `yycheck'. do yyarray_subcopy (an_array, << 143, 144, 145, 146, 147, 148, 149, 150, 151, 27, 28, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 46, 47, 48, -1, -1, -1, -1, -1, 27, 28, -1, -1, -1, -1, -1, -1, -1, -1, -1, 65, 66, 40, -1, 69, -1, -1, -1, 46, 47, 48, -1, -1, -1, -1, 53, 27, 28, -1, -1, -1, -1, -1, -1, -1, 63, -1, -1, -1, 40, -1, -1, -1, -1, -1, 46, 47, 48, -1, -1, -1, -1, 53, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 127, 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143, 144, 145, 146, 147, 148, 149, 150, 151, -1, -1, 127, 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143, 144, 145, 146, 147, 148, 149, 150, 151, -1, -1, 127, 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143, 144, 145, 146, 147, 148, 149, 150, 151, 27, 28, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, yyDummy>>, 1, 200, 4000) end yycheck_template_22 (an_array: ARRAY [INTEGER]) -- Fill chunk #22 of template for `yycheck'. do yyarray_subcopy (an_array, << -1, 40, -1, -1, -1, -1, -1, 46, 47, 48, -1, -1, -1, 27, 28, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 46, 47, 48, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, -1, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, -1, -1, -1, 127, 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143, 144, 145, 146, 147, 148, 149, 150, 151, 127, 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143, 144, 145, 146, 147, 148, 149, 150, 151, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 116, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, -1, -1, -1, -1, -1, -1, -1, yyDummy>>, 1, 200, 4200) end yycheck_template_23 (an_array: ARRAY [INTEGER]) -- Fill chunk #23 of template for `yycheck'. do yyarray_subcopy (an_array, << -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 81, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 124, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 113, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, -1, -1, -1, -1, -1, -1, -1, 56, -1, -1, -1, -1, -1, -1, -1, -1, -1, 113, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, -1, -1, -1, -1, -1, 113, 127, 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143, 144, 145, 146, 147, 148, 149, 150, yyDummy>>, 1, 200, 4400) end yycheck_template_24 (an_array: ARRAY [INTEGER]) -- Fill chunk #24 of template for `yycheck'. do yyarray_subcopy (an_array, << 151, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 113, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 102, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 42, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 59, 60, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 71, -1, 73, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 87, -1, -1, -1, -1, 92, 93, -1, -1, -1, -1, -1, -1, -1, 101, -1, 103, 104, -1, 106, -1, 102, 109, -1, 111, -1, -1, 114, -1, -1, -1, -1, -1, 120, -1, -1, 123, 124, 125, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, yyDummy>>, 1, 200, 4600) end yycheck_template_25 (an_array: ARRAY [INTEGER]) -- Fill chunk #25 of template for `yycheck'. do yyarray_subcopy (an_array, << 34, 35, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 73, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 88, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 73, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 88, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 127, 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143, 144, 145, 146, 147, 148, 149, 150, 151, 88, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 81, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, yyDummy>>, 1, 200, 4800) end yycheck_template_26 (an_array: ARRAY [INTEGER]) -- Fill chunk #26 of template for `yycheck'. do yyarray_subcopy (an_array, << 27, 28, 29, 30, 31, 32, 33, 34, 35, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 73, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, -1, 73, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 73, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 61, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 127, -1, 129, -1, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143, 144, 145, 146, 147, 148, 149, 150, 151, 61, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, yyDummy>>, 1, 200, 5000) end yycheck_template_27 (an_array: ARRAY [INTEGER]) -- Fill chunk #27 of template for `yycheck'. do yyarray_subcopy (an_array, << 29, 30, 31, 32, 33, 34, 35, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143, 144, 145, 146, 147, 148, 149, 150, 151, -1, -1, -1, -1, 61, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, -1, -1, -1, -1, 60, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 58, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 55, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, yyDummy>>, 1, 200, 5200) end yycheck_template_28 (an_array: ARRAY [INTEGER]) -- Fill chunk #28 of template for `yycheck'. do yyarray_subcopy (an_array, << 27, 28, 29, 30, 31, 32, 33, 34, 35, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 55, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, yyDummy>>, 1, 56, 5400) end feature {NONE} -- Semantic value stacks yyvs1: SPECIAL [detachable ANY] -- Stack for semantic values of type detachable ANY yyvsc1: INTEGER -- Capacity of semantic value stack `yyvs1' yyvsp1: INTEGER -- Top of semantic value stack `yyvs1' yyspecial_routines1: KL_SPECIAL_ROUTINES [detachable ANY] -- Routines that ought to be in SPECIAL [detachable ANY] yyvs2: SPECIAL [detachable ID_AS] -- Stack for semantic values of type detachable ID_AS yyvsc2: INTEGER -- Capacity of semantic value stack `yyvs2' yyvsp2: INTEGER -- Top of semantic value stack `yyvs2' yyspecial_routines2: KL_SPECIAL_ROUTINES [detachable ID_AS] -- Routines that ought to be in SPECIAL [detachable ID_AS] yyvs3: SPECIAL [detachable CHAR_AS] -- Stack for semantic values of type detachable CHAR_AS yyvsc3: INTEGER -- Capacity of semantic value stack `yyvs3' yyvsp3: INTEGER -- Top of semantic value stack `yyvs3' yyspecial_routines3: KL_SPECIAL_ROUTINES [detachable CHAR_AS] -- Routines that ought to be in SPECIAL [detachable CHAR_AS] yyvs4: SPECIAL [detachable SYMBOL_AS] -- Stack for semantic values of type detachable SYMBOL_AS yyvsc4: INTEGER -- Capacity of semantic value stack `yyvs4' yyvsp4: INTEGER -- Top of semantic value stack `yyvs4' yyspecial_routines4: KL_SPECIAL_ROUTINES [detachable SYMBOL_AS] -- Routines that ought to be in SPECIAL [detachable SYMBOL_AS] yyvs5: SPECIAL [AST_FACTORY] -- Stack for semantic values of type AST_FACTORY yyvsc5: INTEGER -- Capacity of semantic value stack `yyvs5' yyvsp5: INTEGER -- Top of semantic value stack `yyvs5' yyspecial_routines5: KL_SPECIAL_ROUTINES [AST_FACTORY] -- Routines that ought to be in SPECIAL [AST_FACTORY] yyvs6: SPECIAL [detachable like {AST_FACTORY}.symbol_id_type] -- Stack for semantic values of type detachable like {AST_FACTORY}.symbol_id_type yyvsc6: INTEGER -- Capacity of semantic value stack `yyvs6' yyvsp6: INTEGER -- Top of semantic value stack `yyvs6' yyspecial_routines6: KL_SPECIAL_ROUTINES [detachable like {AST_FACTORY}.symbol_id_type] -- Routines that ought to be in SPECIAL [detachable like {AST_FACTORY}.symbol_id_type] yyvs7: SPECIAL [detachable BOOL_AS] -- Stack for semantic values of type detachable BOOL_AS yyvsc7: INTEGER -- Capacity of semantic value stack `yyvs7' yyvsp7: INTEGER -- Top of semantic value stack `yyvs7' yyspecial_routines7: KL_SPECIAL_ROUTINES [detachable BOOL_AS] -- Routines that ought to be in SPECIAL [detachable BOOL_AS] yyvs8: SPECIAL [detachable RESULT_AS] -- Stack for semantic values of type detachable RESULT_AS yyvsc8: INTEGER -- Capacity of semantic value stack `yyvs8' yyvsp8: INTEGER -- Top of semantic value stack `yyvs8' yyspecial_routines8: KL_SPECIAL_ROUTINES [detachable RESULT_AS] -- Routines that ought to be in SPECIAL [detachable RESULT_AS] yyvs9: SPECIAL [detachable RETRY_AS] -- Stack for semantic values of type detachable RETRY_AS yyvsc9: INTEGER -- Capacity of semantic value stack `yyvs9' yyvsp9: INTEGER -- Top of semantic value stack `yyvs9' yyspecial_routines9: KL_SPECIAL_ROUTINES [detachable RETRY_AS] -- Routines that ought to be in SPECIAL [detachable RETRY_AS] yyvs10: SPECIAL [detachable UNIQUE_AS] -- Stack for semantic values of type detachable UNIQUE_AS yyvsc10: INTEGER -- Capacity of semantic value stack `yyvs10' yyvsp10: INTEGER -- Top of semantic value stack `yyvs10' yyspecial_routines10: KL_SPECIAL_ROUTINES [detachable UNIQUE_AS] -- Routines that ought to be in SPECIAL [detachable UNIQUE_AS] yyvs11: SPECIAL [detachable CURRENT_AS] -- Stack for semantic values of type detachable CURRENT_AS yyvsc11: INTEGER -- Capacity of semantic value stack `yyvs11' yyvsp11: INTEGER -- Top of semantic value stack `yyvs11' yyspecial_routines11: KL_SPECIAL_ROUTINES [detachable CURRENT_AS] -- Routines that ought to be in SPECIAL [detachable CURRENT_AS] yyvs12: SPECIAL [detachable DEFERRED_AS] -- Stack for semantic values of type detachable DEFERRED_AS yyvsc12: INTEGER -- Capacity of semantic value stack `yyvs12' yyvsp12: INTEGER -- Top of semantic value stack `yyvs12' yyspecial_routines12: KL_SPECIAL_ROUTINES [detachable DEFERRED_AS] -- Routines that ought to be in SPECIAL [detachable DEFERRED_AS] yyvs13: SPECIAL [detachable VOID_AS] -- Stack for semantic values of type detachable VOID_AS yyvsc13: INTEGER -- Capacity of semantic value stack `yyvs13' yyvsp13: INTEGER -- Top of semantic value stack `yyvs13' yyspecial_routines13: KL_SPECIAL_ROUTINES [detachable VOID_AS] -- Routines that ought to be in SPECIAL [detachable VOID_AS] yyvs14: SPECIAL [detachable KEYWORD_AS] -- Stack for semantic values of type detachable KEYWORD_AS yyvsc14: INTEGER -- Capacity of semantic value stack `yyvs14' yyvsp14: INTEGER -- Top of semantic value stack `yyvs14' yyspecial_routines14: KL_SPECIAL_ROUTINES [detachable KEYWORD_AS] -- Routines that ought to be in SPECIAL [detachable KEYWORD_AS] yyvs15: SPECIAL [detachable TUPLE [keyword: detachable KEYWORD_AS; id: detachable ID_AS; line, column: INTEGER; filename: READABLE_STRING_GENERAL]] -- Stack for semantic values of type detachable TUPLE [keyword: detachable KEYWORD_AS; id: detachable ID_AS; line, column: INTEGER; filename: READABLE_STRING_GENERAL] yyvsc15: INTEGER -- Capacity of semantic value stack `yyvs15' yyvsp15: INTEGER -- Top of semantic value stack `yyvs15' yyspecial_routines15: KL_SPECIAL_ROUTINES [detachable TUPLE [keyword: detachable KEYWORD_AS; id: detachable ID_AS; line, column: INTEGER; filename: READABLE_STRING_GENERAL]] -- Routines that ought to be in SPECIAL [detachable TUPLE [keyword: detachable KEYWORD_AS; id: detachable ID_AS; line, column: INTEGER; filename: READABLE_STRING_GENERAL]] yyvs16: SPECIAL [detachable STRING_AS] -- Stack for semantic values of type detachable STRING_AS yyvsc16: INTEGER -- Capacity of semantic value stack `yyvs16' yyvsp16: INTEGER -- Top of semantic value stack `yyvs16' yyspecial_routines16: KL_SPECIAL_ROUTINES [detachable STRING_AS] -- Routines that ought to be in SPECIAL [detachable STRING_AS] yyvs17: SPECIAL [detachable FEATURE_ALIAS_NAME] -- Stack for semantic values of type detachable FEATURE_ALIAS_NAME yyvsc17: INTEGER -- Capacity of semantic value stack `yyvs17' yyvsp17: INTEGER -- Top of semantic value stack `yyvs17' yyspecial_routines17: KL_SPECIAL_ROUTINES [detachable FEATURE_ALIAS_NAME] -- Routines that ought to be in SPECIAL [detachable FEATURE_ALIAS_NAME] yyvs18: SPECIAL [detachable CONSTRUCT_LIST [FEATURE_ALIAS_NAME]] -- Stack for semantic values of type detachable CONSTRUCT_LIST [FEATURE_ALIAS_NAME] yyvsc18: INTEGER -- Capacity of semantic value stack `yyvs18' yyvsp18: INTEGER -- Top of semantic value stack `yyvs18' yyspecial_routines18: KL_SPECIAL_ROUTINES [detachable CONSTRUCT_LIST [FEATURE_ALIAS_NAME]] -- Routines that ought to be in SPECIAL [detachable CONSTRUCT_LIST [FEATURE_ALIAS_NAME]] yyvs19: SPECIAL [detachable PAIR [KEYWORD_AS, EIFFEL_LIST [INSTRUCTION_AS]]] -- Stack for semantic values of type detachable PAIR [KEYWORD_AS, EIFFEL_LIST [INSTRUCTION_AS]] yyvsc19: INTEGER -- Capacity of semantic value stack `yyvs19' yyvsp19: INTEGER -- Top of semantic value stack `yyvs19' yyspecial_routines19: KL_SPECIAL_ROUTINES [detachable PAIR [KEYWORD_AS, EIFFEL_LIST [INSTRUCTION_AS]]] -- Routines that ought to be in SPECIAL [detachable PAIR [KEYWORD_AS, EIFFEL_LIST [INSTRUCTION_AS]]] yyvs20: SPECIAL [detachable PAIR [KEYWORD_AS, ID_AS]] -- Stack for semantic values of type detachable PAIR [KEYWORD_AS, ID_AS] yyvsc20: INTEGER -- Capacity of semantic value stack `yyvs20' yyvsp20: INTEGER -- Top of semantic value stack `yyvs20' yyspecial_routines20: KL_SPECIAL_ROUTINES [detachable PAIR [KEYWORD_AS, ID_AS]] -- Routines that ought to be in SPECIAL [detachable PAIR [KEYWORD_AS, ID_AS]] yyvs21: SPECIAL [detachable PAIR [KEYWORD_AS, STRING_AS]] -- Stack for semantic values of type detachable PAIR [KEYWORD_AS, STRING_AS] yyvsc21: INTEGER -- Capacity of semantic value stack `yyvs21' yyvsp21: INTEGER -- Top of semantic value stack `yyvs21' yyspecial_routines21: KL_SPECIAL_ROUTINES [detachable PAIR [KEYWORD_AS, STRING_AS]] -- Routines that ought to be in SPECIAL [detachable PAIR [KEYWORD_AS, STRING_AS]] yyvs22: SPECIAL [detachable IDENTIFIER_LIST] -- Stack for semantic values of type detachable IDENTIFIER_LIST yyvsc22: INTEGER -- Capacity of semantic value stack `yyvs22' yyvsp22: INTEGER -- Top of semantic value stack `yyvs22' yyspecial_routines22: KL_SPECIAL_ROUTINES [detachable IDENTIFIER_LIST] -- Routines that ought to be in SPECIAL [detachable IDENTIFIER_LIST] yyvs23: SPECIAL [detachable PAIR [KEYWORD_AS, detachable EIFFEL_LIST [TAGGED_AS]]] -- Stack for semantic values of type detachable PAIR [KEYWORD_AS, detachable EIFFEL_LIST [TAGGED_AS]] yyvsc23: INTEGER -- Capacity of semantic value stack `yyvs23' yyvsp23: INTEGER -- Top of semantic value stack `yyvs23' yyspecial_routines23: KL_SPECIAL_ROUTINES [detachable PAIR [KEYWORD_AS, detachable EIFFEL_LIST [TAGGED_AS]]] -- Routines that ought to be in SPECIAL [detachable PAIR [KEYWORD_AS, detachable EIFFEL_LIST [TAGGED_AS]]] yyvs24: SPECIAL [detachable PAIR [KEYWORD_AS, EXPR_AS]] -- Stack for semantic values of type detachable PAIR [KEYWORD_AS, EXPR_AS] yyvsc24: INTEGER -- Capacity of semantic value stack `yyvs24' yyvsp24: INTEGER -- Top of semantic value stack `yyvs24' yyspecial_routines24: KL_SPECIAL_ROUTINES [detachable PAIR [KEYWORD_AS, EXPR_AS]] -- Routines that ought to be in SPECIAL [detachable PAIR [KEYWORD_AS, EXPR_AS]] yyvs25: SPECIAL [detachable AGENT_TARGET_TRIPLE] -- Stack for semantic values of type detachable AGENT_TARGET_TRIPLE yyvsc25: INTEGER -- Capacity of semantic value stack `yyvs25' yyvsp25: INTEGER -- Top of semantic value stack `yyvs25' yyspecial_routines25: KL_SPECIAL_ROUTINES [detachable AGENT_TARGET_TRIPLE] -- Routines that ought to be in SPECIAL [detachable AGENT_TARGET_TRIPLE] yyvs26: SPECIAL [detachable ACCESS_AS] -- Stack for semantic values of type detachable ACCESS_AS yyvsc26: INTEGER -- Capacity of semantic value stack `yyvs26' yyvsp26: INTEGER -- Top of semantic value stack `yyvs26' yyspecial_routines26: KL_SPECIAL_ROUTINES [detachable ACCESS_AS] -- Routines that ought to be in SPECIAL [detachable ACCESS_AS] yyvs27: SPECIAL [detachable ACCESS_FEAT_AS] -- Stack for semantic values of type detachable ACCESS_FEAT_AS yyvsc27: INTEGER -- Capacity of semantic value stack `yyvs27' yyvsp27: INTEGER -- Top of semantic value stack `yyvs27' yyspecial_routines27: KL_SPECIAL_ROUTINES [detachable ACCESS_FEAT_AS] -- Routines that ought to be in SPECIAL [detachable ACCESS_FEAT_AS] yyvs28: SPECIAL [detachable ACCESS_INV_AS] -- Stack for semantic values of type detachable ACCESS_INV_AS yyvsc28: INTEGER -- Capacity of semantic value stack `yyvs28' yyvsp28: INTEGER -- Top of semantic value stack `yyvs28' yyspecial_routines28: KL_SPECIAL_ROUTINES [detachable ACCESS_INV_AS] -- Routines that ought to be in SPECIAL [detachable ACCESS_INV_AS] yyvs29: SPECIAL [detachable ARRAY_AS] -- Stack for semantic values of type detachable ARRAY_AS yyvsc29: INTEGER -- Capacity of semantic value stack `yyvs29' yyvsp29: INTEGER -- Top of semantic value stack `yyvs29' yyspecial_routines29: KL_SPECIAL_ROUTINES [detachable ARRAY_AS] -- Routines that ought to be in SPECIAL [detachable ARRAY_AS] yyvs30: SPECIAL [detachable ASSIGN_AS] -- Stack for semantic values of type detachable ASSIGN_AS yyvsc30: INTEGER -- Capacity of semantic value stack `yyvs30' yyvsp30: INTEGER -- Top of semantic value stack `yyvs30' yyspecial_routines30: KL_SPECIAL_ROUTINES [detachable ASSIGN_AS] -- Routines that ought to be in SPECIAL [detachable ASSIGN_AS] yyvs31: SPECIAL [detachable ATOMIC_AS] -- Stack for semantic values of type detachable ATOMIC_AS yyvsc31: INTEGER -- Capacity of semantic value stack `yyvs31' yyvsp31: INTEGER -- Top of semantic value stack `yyvs31' yyspecial_routines31: KL_SPECIAL_ROUTINES [detachable ATOMIC_AS] -- Routines that ought to be in SPECIAL [detachable ATOMIC_AS] yyvs32: SPECIAL [detachable BINARY_AS] -- Stack for semantic values of type detachable BINARY_AS yyvsc32: INTEGER -- Capacity of semantic value stack `yyvs32' yyvsp32: INTEGER -- Top of semantic value stack `yyvs32' yyspecial_routines32: KL_SPECIAL_ROUTINES [detachable BINARY_AS] -- Routines that ought to be in SPECIAL [detachable BINARY_AS] yyvs33: SPECIAL [detachable BODY_AS] -- Stack for semantic values of type detachable BODY_AS yyvsc33: INTEGER -- Capacity of semantic value stack `yyvs33' yyvsp33: INTEGER -- Top of semantic value stack `yyvs33' yyspecial_routines33: KL_SPECIAL_ROUTINES [detachable BODY_AS] -- Routines that ought to be in SPECIAL [detachable BODY_AS] yyvs34: SPECIAL [BOOLEAN] -- Stack for semantic values of type BOOLEAN yyvsc34: INTEGER -- Capacity of semantic value stack `yyvs34' yyvsp34: INTEGER -- Top of semantic value stack `yyvs34' yyspecial_routines34: KL_SPECIAL_ROUTINES [BOOLEAN] -- Routines that ought to be in SPECIAL [BOOLEAN] yyvs35: SPECIAL [detachable CALL_AS] -- Stack for semantic values of type detachable CALL_AS yyvsc35: INTEGER -- Capacity of semantic value stack `yyvs35' yyvsp35: INTEGER -- Top of semantic value stack `yyvs35' yyspecial_routines35: KL_SPECIAL_ROUTINES [detachable CALL_AS] -- Routines that ought to be in SPECIAL [detachable CALL_AS] yyvs36: SPECIAL [detachable CASE_AS] -- Stack for semantic values of type detachable CASE_AS yyvsc36: INTEGER -- Capacity of semantic value stack `yyvs36' yyvsp36: INTEGER -- Top of semantic value stack `yyvs36' yyspecial_routines36: KL_SPECIAL_ROUTINES [detachable CASE_AS] -- Routines that ought to be in SPECIAL [detachable CASE_AS] yyvs37: SPECIAL [detachable CASE_EXPRESSION_AS] -- Stack for semantic values of type detachable CASE_EXPRESSION_AS yyvsc37: INTEGER -- Capacity of semantic value stack `yyvs37' yyvsp37: INTEGER -- Top of semantic value stack `yyvs37' yyspecial_routines37: KL_SPECIAL_ROUTINES [detachable CASE_EXPRESSION_AS] -- Routines that ought to be in SPECIAL [detachable CASE_EXPRESSION_AS] yyvs38: SPECIAL [detachable CHECK_AS] -- Stack for semantic values of type detachable CHECK_AS yyvsc38: INTEGER -- Capacity of semantic value stack `yyvs38' yyvsp38: INTEGER -- Top of semantic value stack `yyvs38' yyspecial_routines38: KL_SPECIAL_ROUTINES [detachable CHECK_AS] -- Routines that ought to be in SPECIAL [detachable CHECK_AS] yyvs39: SPECIAL [detachable CLIENT_AS] -- Stack for semantic values of type detachable CLIENT_AS yyvsc39: INTEGER -- Capacity of semantic value stack `yyvs39' yyvsp39: INTEGER -- Top of semantic value stack `yyvs39' yyspecial_routines39: KL_SPECIAL_ROUTINES [detachable CLIENT_AS] -- Routines that ought to be in SPECIAL [detachable CLIENT_AS] yyvs40: SPECIAL [detachable CONSTANT_AS] -- Stack for semantic values of type detachable CONSTANT_AS yyvsc40: INTEGER -- Capacity of semantic value stack `yyvs40' yyvsp40: INTEGER -- Top of semantic value stack `yyvs40' yyspecial_routines40: KL_SPECIAL_ROUTINES [detachable CONSTANT_AS] -- Routines that ought to be in SPECIAL [detachable CONSTANT_AS] yyvs41: SPECIAL [detachable CONVERT_FEAT_AS] -- Stack for semantic values of type detachable CONVERT_FEAT_AS yyvsc41: INTEGER -- Capacity of semantic value stack `yyvs41' yyvsp41: INTEGER -- Top of semantic value stack `yyvs41' yyspecial_routines41: KL_SPECIAL_ROUTINES [detachable CONVERT_FEAT_AS] -- Routines that ought to be in SPECIAL [detachable CONVERT_FEAT_AS] yyvs42: SPECIAL [detachable CREATE_AS] -- Stack for semantic values of type detachable CREATE_AS yyvsc42: INTEGER -- Capacity of semantic value stack `yyvs42' yyvsp42: INTEGER -- Top of semantic value stack `yyvs42' yyspecial_routines42: KL_SPECIAL_ROUTINES [detachable CREATE_AS] -- Routines that ought to be in SPECIAL [detachable CREATE_AS] yyvs43: SPECIAL [detachable CREATION_AS] -- Stack for semantic values of type detachable CREATION_AS yyvsc43: INTEGER -- Capacity of semantic value stack `yyvs43' yyvsp43: INTEGER -- Top of semantic value stack `yyvs43' yyspecial_routines43: KL_SPECIAL_ROUTINES [detachable CREATION_AS] -- Routines that ought to be in SPECIAL [detachable CREATION_AS] yyvs44: SPECIAL [detachable CREATION_EXPR_AS] -- Stack for semantic values of type detachable CREATION_EXPR_AS yyvsc44: INTEGER -- Capacity of semantic value stack `yyvs44' yyvsp44: INTEGER -- Top of semantic value stack `yyvs44' yyspecial_routines44: KL_SPECIAL_ROUTINES [detachable CREATION_EXPR_AS] -- Routines that ought to be in SPECIAL [detachable CREATION_EXPR_AS] yyvs45: SPECIAL [detachable DEBUG_AS] -- Stack for semantic values of type detachable DEBUG_AS yyvsc45: INTEGER -- Capacity of semantic value stack `yyvs45' yyvsp45: INTEGER -- Top of semantic value stack `yyvs45' yyspecial_routines45: KL_SPECIAL_ROUTINES [detachable DEBUG_AS] -- Routines that ought to be in SPECIAL [detachable DEBUG_AS] yyvs46: SPECIAL [detachable ELSIF_AS] -- Stack for semantic values of type detachable ELSIF_AS yyvsc46: INTEGER -- Capacity of semantic value stack `yyvs46' yyvsp46: INTEGER -- Top of semantic value stack `yyvs46' yyspecial_routines46: KL_SPECIAL_ROUTINES [detachable ELSIF_AS] -- Routines that ought to be in SPECIAL [detachable ELSIF_AS] yyvs47: SPECIAL [detachable ELSIF_EXPRESSION_AS] -- Stack for semantic values of type detachable ELSIF_EXPRESSION_AS yyvsc47: INTEGER -- Capacity of semantic value stack `yyvs47' yyvsp47: INTEGER -- Top of semantic value stack `yyvs47' yyspecial_routines47: KL_SPECIAL_ROUTINES [detachable ELSIF_EXPRESSION_AS] -- Routines that ought to be in SPECIAL [detachable ELSIF_EXPRESSION_AS] yyvs48: SPECIAL [detachable ENSURE_AS] -- Stack for semantic values of type detachable ENSURE_AS yyvsc48: INTEGER -- Capacity of semantic value stack `yyvs48' yyvsp48: INTEGER -- Top of semantic value stack `yyvs48' yyspecial_routines48: KL_SPECIAL_ROUTINES [detachable ENSURE_AS] -- Routines that ought to be in SPECIAL [detachable ENSURE_AS] yyvs49: SPECIAL [detachable EXPORT_ITEM_AS] -- Stack for semantic values of type detachable EXPORT_ITEM_AS yyvsc49: INTEGER -- Capacity of semantic value stack `yyvs49' yyvsp49: INTEGER -- Top of semantic value stack `yyvs49' yyspecial_routines49: KL_SPECIAL_ROUTINES [detachable EXPORT_ITEM_AS] -- Routines that ought to be in SPECIAL [detachable EXPORT_ITEM_AS] yyvs50: SPECIAL [detachable EXPR_AS] -- Stack for semantic values of type detachable EXPR_AS yyvsc50: INTEGER -- Capacity of semantic value stack `yyvs50' yyvsp50: INTEGER -- Top of semantic value stack `yyvs50' yyspecial_routines50: KL_SPECIAL_ROUTINES [detachable EXPR_AS] -- Routines that ought to be in SPECIAL [detachable EXPR_AS] yyvs51: SPECIAL [detachable BRACKET_AS] -- Stack for semantic values of type detachable BRACKET_AS yyvsc51: INTEGER -- Capacity of semantic value stack `yyvs51' yyvsp51: INTEGER -- Top of semantic value stack `yyvs51' yyspecial_routines51: KL_SPECIAL_ROUTINES [detachable BRACKET_AS] -- Routines that ought to be in SPECIAL [detachable BRACKET_AS] yyvs52: SPECIAL [detachable EXTERNAL_AS] -- Stack for semantic values of type detachable EXTERNAL_AS yyvsc52: INTEGER -- Capacity of semantic value stack `yyvs52' yyvsp52: INTEGER -- Top of semantic value stack `yyvs52' yyspecial_routines52: KL_SPECIAL_ROUTINES [detachable EXTERNAL_AS] -- Routines that ought to be in SPECIAL [detachable EXTERNAL_AS] yyvs53: SPECIAL [detachable EXTERNAL_LANG_AS] -- Stack for semantic values of type detachable EXTERNAL_LANG_AS yyvsc53: INTEGER -- Capacity of semantic value stack `yyvs53' yyvsp53: INTEGER -- Top of semantic value stack `yyvs53' yyspecial_routines53: KL_SPECIAL_ROUTINES [detachable EXTERNAL_LANG_AS] -- Routines that ought to be in SPECIAL [detachable EXTERNAL_LANG_AS] yyvs54: SPECIAL [detachable FEATURE_AS] -- Stack for semantic values of type detachable FEATURE_AS yyvsc54: INTEGER -- Capacity of semantic value stack `yyvs54' yyvsp54: INTEGER -- Top of semantic value stack `yyvs54' yyspecial_routines54: KL_SPECIAL_ROUTINES [detachable FEATURE_AS] -- Routines that ought to be in SPECIAL [detachable FEATURE_AS] yyvs55: SPECIAL [detachable FEATURE_CLAUSE_AS] -- Stack for semantic values of type detachable FEATURE_CLAUSE_AS yyvsc55: INTEGER -- Capacity of semantic value stack `yyvs55' yyvsp55: INTEGER -- Top of semantic value stack `yyvs55' yyspecial_routines55: KL_SPECIAL_ROUTINES [detachable FEATURE_CLAUSE_AS] -- Routines that ought to be in SPECIAL [detachable FEATURE_CLAUSE_AS] yyvs56: SPECIAL [detachable FEATURE_SET_AS] -- Stack for semantic values of type detachable FEATURE_SET_AS yyvsc56: INTEGER -- Capacity of semantic value stack `yyvs56' yyvsp56: INTEGER -- Top of semantic value stack `yyvs56' yyspecial_routines56: KL_SPECIAL_ROUTINES [detachable FEATURE_SET_AS] -- Routines that ought to be in SPECIAL [detachable FEATURE_SET_AS] yyvs57: SPECIAL [detachable FORMAL_AS] -- Stack for semantic values of type detachable FORMAL_AS yyvsc57: INTEGER -- Capacity of semantic value stack `yyvs57' yyvsp57: INTEGER -- Top of semantic value stack `yyvs57' yyspecial_routines57: KL_SPECIAL_ROUTINES [detachable FORMAL_AS] -- Routines that ought to be in SPECIAL [detachable FORMAL_AS] yyvs58: SPECIAL [detachable FORMAL_DEC_AS] -- Stack for semantic values of type detachable FORMAL_DEC_AS yyvsc58: INTEGER -- Capacity of semantic value stack `yyvs58' yyvsp58: INTEGER -- Top of semantic value stack `yyvs58' yyspecial_routines58: KL_SPECIAL_ROUTINES [detachable FORMAL_DEC_AS] -- Routines that ought to be in SPECIAL [detachable FORMAL_DEC_AS] yyvs59: SPECIAL [detachable GUARD_AS] -- Stack for semantic values of type detachable GUARD_AS yyvsc59: INTEGER -- Capacity of semantic value stack `yyvs59' yyvsp59: INTEGER -- Top of semantic value stack `yyvs59' yyspecial_routines59: KL_SPECIAL_ROUTINES [detachable GUARD_AS] -- Routines that ought to be in SPECIAL [detachable GUARD_AS] yyvs60: SPECIAL [detachable IF_AS] -- Stack for semantic values of type detachable IF_AS yyvsc60: INTEGER -- Capacity of semantic value stack `yyvs60' yyvsp60: INTEGER -- Top of semantic value stack `yyvs60' yyspecial_routines60: KL_SPECIAL_ROUTINES [detachable IF_AS] -- Routines that ought to be in SPECIAL [detachable IF_AS] yyvs61: SPECIAL [detachable IF_EXPRESSION_AS] -- Stack for semantic values of type detachable IF_EXPRESSION_AS yyvsc61: INTEGER -- Capacity of semantic value stack `yyvs61' yyvsp61: INTEGER -- Top of semantic value stack `yyvs61' yyspecial_routines61: KL_SPECIAL_ROUTINES [detachable IF_EXPRESSION_AS] -- Routines that ought to be in SPECIAL [detachable IF_EXPRESSION_AS] yyvs62: SPECIAL [detachable INDEX_AS] -- Stack for semantic values of type detachable INDEX_AS yyvsc62: INTEGER -- Capacity of semantic value stack `yyvs62' yyvsp62: INTEGER -- Top of semantic value stack `yyvs62' yyspecial_routines62: KL_SPECIAL_ROUTINES [detachable INDEX_AS] -- Routines that ought to be in SPECIAL [detachable INDEX_AS] yyvs63: SPECIAL [detachable INSPECT_AS] -- Stack for semantic values of type detachable INSPECT_AS yyvsc63: INTEGER -- Capacity of semantic value stack `yyvs63' yyvsp63: INTEGER -- Top of semantic value stack `yyvs63' yyspecial_routines63: KL_SPECIAL_ROUTINES [detachable INSPECT_AS] -- Routines that ought to be in SPECIAL [detachable INSPECT_AS] yyvs64: SPECIAL [detachable INSPECT_EXPRESSION_AS] -- Stack for semantic values of type detachable INSPECT_EXPRESSION_AS yyvsc64: INTEGER -- Capacity of semantic value stack `yyvs64' yyvsp64: INTEGER -- Top of semantic value stack `yyvs64' yyspecial_routines64: KL_SPECIAL_ROUTINES [detachable INSPECT_EXPRESSION_AS] -- Routines that ought to be in SPECIAL [detachable INSPECT_EXPRESSION_AS] yyvs65: SPECIAL [detachable INSTRUCTION_AS] -- Stack for semantic values of type detachable INSTRUCTION_AS yyvsc65: INTEGER -- Capacity of semantic value stack `yyvs65' yyvsp65: INTEGER -- Top of semantic value stack `yyvs65' yyspecial_routines65: KL_SPECIAL_ROUTINES [detachable INSTRUCTION_AS] -- Routines that ought to be in SPECIAL [detachable INSTRUCTION_AS] yyvs66: SPECIAL [detachable INTEGER_AS] -- Stack for semantic values of type detachable INTEGER_AS yyvsc66: INTEGER -- Capacity of semantic value stack `yyvs66' yyvsp66: INTEGER -- Top of semantic value stack `yyvs66' yyspecial_routines66: KL_SPECIAL_ROUTINES [detachable INTEGER_AS] -- Routines that ought to be in SPECIAL [detachable INTEGER_AS] yyvs67: SPECIAL [detachable INTERNAL_AS] -- Stack for semantic values of type detachable INTERNAL_AS yyvsc67: INTEGER -- Capacity of semantic value stack `yyvs67' yyvsp67: INTEGER -- Top of semantic value stack `yyvs67' yyspecial_routines67: KL_SPECIAL_ROUTINES [detachable INTERNAL_AS] -- Routines that ought to be in SPECIAL [detachable INTERNAL_AS] yyvs68: SPECIAL [detachable INTERVAL_AS] -- Stack for semantic values of type detachable INTERVAL_AS yyvsc68: INTEGER -- Capacity of semantic value stack `yyvs68' yyvsp68: INTEGER -- Top of semantic value stack `yyvs68' yyspecial_routines68: KL_SPECIAL_ROUTINES [detachable INTERVAL_AS] -- Routines that ought to be in SPECIAL [detachable INTERVAL_AS] yyvs69: SPECIAL [detachable INVARIANT_AS] -- Stack for semantic values of type detachable INVARIANT_AS yyvsc69: INTEGER -- Capacity of semantic value stack `yyvs69' yyvsp69: INTEGER -- Top of semantic value stack `yyvs69' yyspecial_routines69: KL_SPECIAL_ROUTINES [detachable INVARIANT_AS] -- Routines that ought to be in SPECIAL [detachable INVARIANT_AS] yyvs70: SPECIAL [detachable LOOP_EXPR_AS] -- Stack for semantic values of type detachable LOOP_EXPR_AS yyvsc70: INTEGER -- Capacity of semantic value stack `yyvs70' yyvsp70: INTEGER -- Top of semantic value stack `yyvs70' yyspecial_routines70: KL_SPECIAL_ROUTINES [detachable LOOP_EXPR_AS] -- Routines that ought to be in SPECIAL [detachable LOOP_EXPR_AS] yyvs71: SPECIAL [detachable LOOP_AS] -- Stack for semantic values of type detachable LOOP_AS yyvsc71: INTEGER -- Capacity of semantic value stack `yyvs71' yyvsp71: INTEGER -- Top of semantic value stack `yyvs71' yyspecial_routines71: KL_SPECIAL_ROUTINES [detachable LOOP_AS] -- Routines that ought to be in SPECIAL [detachable LOOP_AS] yyvs72: SPECIAL [detachable NAMED_EXPRESSION_AS] -- Stack for semantic values of type detachable NAMED_EXPRESSION_AS yyvsc72: INTEGER -- Capacity of semantic value stack `yyvs72' yyvsp72: INTEGER -- Top of semantic value stack `yyvs72' yyspecial_routines72: KL_SPECIAL_ROUTINES [detachable NAMED_EXPRESSION_AS] -- Routines that ought to be in SPECIAL [detachable NAMED_EXPRESSION_AS] yyvs73: SPECIAL [detachable NESTED_EXPR_AS] -- Stack for semantic values of type detachable NESTED_EXPR_AS yyvsc73: INTEGER -- Capacity of semantic value stack `yyvs73' yyvsp73: INTEGER -- Top of semantic value stack `yyvs73' yyspecial_routines73: KL_SPECIAL_ROUTINES [detachable NESTED_EXPR_AS] -- Routines that ought to be in SPECIAL [detachable NESTED_EXPR_AS] yyvs74: SPECIAL [detachable OPERAND_AS] -- Stack for semantic values of type detachable OPERAND_AS yyvsc74: INTEGER -- Capacity of semantic value stack `yyvs74' yyvsp74: INTEGER -- Top of semantic value stack `yyvs74' yyspecial_routines74: KL_SPECIAL_ROUTINES [detachable OPERAND_AS] -- Routines that ought to be in SPECIAL [detachable OPERAND_AS] yyvs75: SPECIAL [detachable PARENT_AS] -- Stack for semantic values of type detachable PARENT_AS yyvsc75: INTEGER -- Capacity of semantic value stack `yyvs75' yyvsp75: INTEGER -- Top of semantic value stack `yyvs75' yyspecial_routines75: KL_SPECIAL_ROUTINES [detachable PARENT_AS] -- Routines that ought to be in SPECIAL [detachable PARENT_AS] yyvs76: SPECIAL [detachable PRECURSOR_AS] -- Stack for semantic values of type detachable PRECURSOR_AS yyvsc76: INTEGER -- Capacity of semantic value stack `yyvs76' yyvsp76: INTEGER -- Top of semantic value stack `yyvs76' yyspecial_routines76: KL_SPECIAL_ROUTINES [detachable PRECURSOR_AS] -- Routines that ought to be in SPECIAL [detachable PRECURSOR_AS] yyvs77: SPECIAL [detachable STATIC_ACCESS_AS] -- Stack for semantic values of type detachable STATIC_ACCESS_AS yyvsc77: INTEGER -- Capacity of semantic value stack `yyvs77' yyvsp77: INTEGER -- Top of semantic value stack `yyvs77' yyspecial_routines77: KL_SPECIAL_ROUTINES [detachable STATIC_ACCESS_AS] -- Routines that ought to be in SPECIAL [detachable STATIC_ACCESS_AS] yyvs78: SPECIAL [detachable REAL_AS] -- Stack for semantic values of type detachable REAL_AS yyvsc78: INTEGER -- Capacity of semantic value stack `yyvs78' yyvsp78: INTEGER -- Top of semantic value stack `yyvs78' yyspecial_routines78: KL_SPECIAL_ROUTINES [detachable REAL_AS] -- Routines that ought to be in SPECIAL [detachable REAL_AS] yyvs79: SPECIAL [detachable RENAME_AS] -- Stack for semantic values of type detachable RENAME_AS yyvsc79: INTEGER -- Capacity of semantic value stack `yyvs79' yyvsp79: INTEGER -- Top of semantic value stack `yyvs79' yyspecial_routines79: KL_SPECIAL_ROUTINES [detachable RENAME_AS] -- Routines that ought to be in SPECIAL [detachable RENAME_AS] yyvs80: SPECIAL [detachable REQUIRE_AS] -- Stack for semantic values of type detachable REQUIRE_AS yyvsc80: INTEGER -- Capacity of semantic value stack `yyvs80' yyvsp80: INTEGER -- Top of semantic value stack `yyvs80' yyspecial_routines80: KL_SPECIAL_ROUTINES [detachable REQUIRE_AS] -- Routines that ought to be in SPECIAL [detachable REQUIRE_AS] yyvs81: SPECIAL [detachable REVERSE_AS] -- Stack for semantic values of type detachable REVERSE_AS yyvsc81: INTEGER -- Capacity of semantic value stack `yyvs81' yyvsp81: INTEGER -- Top of semantic value stack `yyvs81' yyspecial_routines81: KL_SPECIAL_ROUTINES [detachable REVERSE_AS] -- Routines that ought to be in SPECIAL [detachable REVERSE_AS] yyvs82: SPECIAL [detachable ROUT_BODY_AS] -- Stack for semantic values of type detachable ROUT_BODY_AS yyvsc82: INTEGER -- Capacity of semantic value stack `yyvs82' yyvsp82: INTEGER -- Top of semantic value stack `yyvs82' yyspecial_routines82: KL_SPECIAL_ROUTINES [detachable ROUT_BODY_AS] -- Routines that ought to be in SPECIAL [detachable ROUT_BODY_AS] yyvs83: SPECIAL [detachable ROUTINE_AS] -- Stack for semantic values of type detachable ROUTINE_AS yyvsc83: INTEGER -- Capacity of semantic value stack `yyvs83' yyvsp83: INTEGER -- Top of semantic value stack `yyvs83' yyspecial_routines83: KL_SPECIAL_ROUTINES [detachable ROUTINE_AS] -- Routines that ought to be in SPECIAL [detachable ROUTINE_AS] yyvs84: SPECIAL [detachable ROUTINE_CREATION_AS] -- Stack for semantic values of type detachable ROUTINE_CREATION_AS yyvsc84: INTEGER -- Capacity of semantic value stack `yyvs84' yyvsp84: INTEGER -- Top of semantic value stack `yyvs84' yyspecial_routines84: KL_SPECIAL_ROUTINES [detachable ROUTINE_CREATION_AS] -- Routines that ought to be in SPECIAL [detachable ROUTINE_CREATION_AS] yyvs85: SPECIAL [detachable SEPARATE_INSTRUCTION_AS] -- Stack for semantic values of type detachable SEPARATE_INSTRUCTION_AS yyvsc85: INTEGER -- Capacity of semantic value stack `yyvs85' yyvsp85: INTEGER -- Top of semantic value stack `yyvs85' yyspecial_routines85: KL_SPECIAL_ROUTINES [detachable SEPARATE_INSTRUCTION_AS] -- Routines that ought to be in SPECIAL [detachable SEPARATE_INSTRUCTION_AS] yyvs86: SPECIAL [detachable TAGGED_AS] -- Stack for semantic values of type detachable TAGGED_AS yyvsc86: INTEGER -- Capacity of semantic value stack `yyvs86' yyvsp86: INTEGER -- Top of semantic value stack `yyvs86' yyspecial_routines86: KL_SPECIAL_ROUTINES [detachable TAGGED_AS] -- Routines that ought to be in SPECIAL [detachable TAGGED_AS] yyvs87: SPECIAL [detachable TUPLE_AS] -- Stack for semantic values of type detachable TUPLE_AS yyvsc87: INTEGER -- Capacity of semantic value stack `yyvs87' yyvsp87: INTEGER -- Top of semantic value stack `yyvs87' yyspecial_routines87: KL_SPECIAL_ROUTINES [detachable TUPLE_AS] -- Routines that ought to be in SPECIAL [detachable TUPLE_AS] yyvs88: SPECIAL [detachable TYPE_AS] -- Stack for semantic values of type detachable TYPE_AS yyvsc88: INTEGER -- Capacity of semantic value stack `yyvs88' yyvsp88: INTEGER -- Top of semantic value stack `yyvs88' yyspecial_routines88: KL_SPECIAL_ROUTINES [detachable TYPE_AS] -- Routines that ought to be in SPECIAL [detachable TYPE_AS] yyvs89: SPECIAL [detachable QUALIFIED_ANCHORED_TYPE_AS] -- Stack for semantic values of type detachable QUALIFIED_ANCHORED_TYPE_AS yyvsc89: INTEGER -- Capacity of semantic value stack `yyvs89' yyvsp89: INTEGER -- Top of semantic value stack `yyvs89' yyspecial_routines89: KL_SPECIAL_ROUTINES [detachable QUALIFIED_ANCHORED_TYPE_AS] -- Routines that ought to be in SPECIAL [detachable QUALIFIED_ANCHORED_TYPE_AS] yyvs90: SPECIAL [detachable CLASS_TYPE_AS] -- Stack for semantic values of type detachable CLASS_TYPE_AS yyvsc90: INTEGER -- Capacity of semantic value stack `yyvs90' yyvsp90: INTEGER -- Top of semantic value stack `yyvs90' yyspecial_routines90: KL_SPECIAL_ROUTINES [detachable CLASS_TYPE_AS] -- Routines that ought to be in SPECIAL [detachable CLASS_TYPE_AS] yyvs91: SPECIAL [detachable TYPE_DEC_AS] -- Stack for semantic values of type detachable TYPE_DEC_AS yyvsc91: INTEGER -- Capacity of semantic value stack `yyvs91' yyvsp91: INTEGER -- Top of semantic value stack `yyvs91' yyspecial_routines91: KL_SPECIAL_ROUTINES [detachable TYPE_DEC_AS] -- Routines that ought to be in SPECIAL [detachable TYPE_DEC_AS] yyvs92: SPECIAL [detachable LIST_DEC_AS] -- Stack for semantic values of type detachable LIST_DEC_AS yyvsc92: INTEGER -- Capacity of semantic value stack `yyvs92' yyvsp92: INTEGER -- Top of semantic value stack `yyvs92' yyspecial_routines92: KL_SPECIAL_ROUTINES [detachable LIST_DEC_AS] -- Routines that ought to be in SPECIAL [detachable LIST_DEC_AS] yyvs93: SPECIAL [detachable VARIANT_AS] -- Stack for semantic values of type detachable VARIANT_AS yyvsc93: INTEGER -- Capacity of semantic value stack `yyvs93' yyvsp93: INTEGER -- Top of semantic value stack `yyvs93' yyspecial_routines93: KL_SPECIAL_ROUTINES [detachable VARIANT_AS] -- Routines that ought to be in SPECIAL [detachable VARIANT_AS] yyvs94: SPECIAL [detachable FEATURE_NAME] -- Stack for semantic values of type detachable FEATURE_NAME yyvsc94: INTEGER -- Capacity of semantic value stack `yyvs94' yyvsp94: INTEGER -- Top of semantic value stack `yyvs94' yyspecial_routines94: KL_SPECIAL_ROUTINES [detachable FEATURE_NAME] -- Routines that ought to be in SPECIAL [detachable FEATURE_NAME] yyvs95: SPECIAL [detachable EIFFEL_LIST [ATOMIC_AS]] -- Stack for semantic values of type detachable EIFFEL_LIST [ATOMIC_AS] yyvsc95: INTEGER -- Capacity of semantic value stack `yyvs95' yyvsp95: INTEGER -- Top of semantic value stack `yyvs95' yyspecial_routines95: KL_SPECIAL_ROUTINES [detachable EIFFEL_LIST [ATOMIC_AS]] -- Routines that ought to be in SPECIAL [detachable EIFFEL_LIST [ATOMIC_AS]] yyvs96: SPECIAL [detachable EIFFEL_LIST [CASE_AS]] -- Stack for semantic values of type detachable EIFFEL_LIST [CASE_AS] yyvsc96: INTEGER -- Capacity of semantic value stack `yyvs96' yyvsp96: INTEGER -- Top of semantic value stack `yyvs96' yyspecial_routines96: KL_SPECIAL_ROUTINES [detachable EIFFEL_LIST [CASE_AS]] -- Routines that ought to be in SPECIAL [detachable EIFFEL_LIST [CASE_AS]] yyvs97: SPECIAL [detachable EIFFEL_LIST [CASE_EXPRESSION_AS]] -- Stack for semantic values of type detachable EIFFEL_LIST [CASE_EXPRESSION_AS] yyvsc97: INTEGER -- Capacity of semantic value stack `yyvs97' yyvsp97: INTEGER -- Top of semantic value stack `yyvs97' yyspecial_routines97: KL_SPECIAL_ROUTINES [detachable EIFFEL_LIST [CASE_EXPRESSION_AS]] -- Routines that ought to be in SPECIAL [detachable EIFFEL_LIST [CASE_EXPRESSION_AS]] yyvs98: SPECIAL [detachable CONVERT_FEAT_LIST_AS] -- Stack for semantic values of type detachable CONVERT_FEAT_LIST_AS yyvsc98: INTEGER -- Capacity of semantic value stack `yyvs98' yyvsp98: INTEGER -- Top of semantic value stack `yyvs98' yyspecial_routines98: KL_SPECIAL_ROUTINES [detachable CONVERT_FEAT_LIST_AS] -- Routines that ought to be in SPECIAL [detachable CONVERT_FEAT_LIST_AS] yyvs99: SPECIAL [detachable EIFFEL_LIST [CREATE_AS]] -- Stack for semantic values of type detachable EIFFEL_LIST [CREATE_AS] yyvsc99: INTEGER -- Capacity of semantic value stack `yyvs99' yyvsp99: INTEGER -- Top of semantic value stack `yyvs99' yyspecial_routines99: KL_SPECIAL_ROUTINES [detachable EIFFEL_LIST [CREATE_AS]] -- Routines that ought to be in SPECIAL [detachable EIFFEL_LIST [CREATE_AS]] yyvs100: SPECIAL [detachable EIFFEL_LIST [ELSIF_AS]] -- Stack for semantic values of type detachable EIFFEL_LIST [ELSIF_AS] yyvsc100: INTEGER -- Capacity of semantic value stack `yyvs100' yyvsp100: INTEGER -- Top of semantic value stack `yyvs100' yyspecial_routines100: KL_SPECIAL_ROUTINES [detachable EIFFEL_LIST [ELSIF_AS]] -- Routines that ought to be in SPECIAL [detachable EIFFEL_LIST [ELSIF_AS]] yyvs101: SPECIAL [detachable EIFFEL_LIST [ELSIF_EXPRESSION_AS]] -- Stack for semantic values of type detachable EIFFEL_LIST [ELSIF_EXPRESSION_AS] yyvsc101: INTEGER -- Capacity of semantic value stack `yyvs101' yyvsp101: INTEGER -- Top of semantic value stack `yyvs101' yyspecial_routines101: KL_SPECIAL_ROUTINES [detachable EIFFEL_LIST [ELSIF_EXPRESSION_AS]] -- Routines that ought to be in SPECIAL [detachable EIFFEL_LIST [ELSIF_EXPRESSION_AS]] yyvs102: SPECIAL [detachable EIFFEL_LIST [EXPORT_ITEM_AS]] -- Stack for semantic values of type detachable EIFFEL_LIST [EXPORT_ITEM_AS] yyvsc102: INTEGER -- Capacity of semantic value stack `yyvs102' yyvsp102: INTEGER -- Top of semantic value stack `yyvs102' yyspecial_routines102: KL_SPECIAL_ROUTINES [detachable EIFFEL_LIST [EXPORT_ITEM_AS]] -- Routines that ought to be in SPECIAL [detachable EIFFEL_LIST [EXPORT_ITEM_AS]] yyvs103: SPECIAL [detachable EXPORT_CLAUSE_AS] -- Stack for semantic values of type detachable EXPORT_CLAUSE_AS yyvsc103: INTEGER -- Capacity of semantic value stack `yyvs103' yyvsp103: INTEGER -- Top of semantic value stack `yyvs103' yyspecial_routines103: KL_SPECIAL_ROUTINES [detachable EXPORT_CLAUSE_AS] -- Routines that ought to be in SPECIAL [detachable EXPORT_CLAUSE_AS] yyvs104: SPECIAL [detachable EIFFEL_LIST [EXPR_AS]] -- Stack for semantic values of type detachable EIFFEL_LIST [EXPR_AS] yyvsc104: INTEGER -- Capacity of semantic value stack `yyvs104' yyvsp104: INTEGER -- Top of semantic value stack `yyvs104' yyspecial_routines104: KL_SPECIAL_ROUTINES [detachable EIFFEL_LIST [EXPR_AS]] -- Routines that ought to be in SPECIAL [detachable EIFFEL_LIST [EXPR_AS]] yyvs105: SPECIAL [detachable PARAMETER_LIST_AS] -- Stack for semantic values of type detachable PARAMETER_LIST_AS yyvsc105: INTEGER -- Capacity of semantic value stack `yyvs105' yyvsp105: INTEGER -- Top of semantic value stack `yyvs105' yyspecial_routines105: KL_SPECIAL_ROUTINES [detachable PARAMETER_LIST_AS] -- Routines that ought to be in SPECIAL [detachable PARAMETER_LIST_AS] yyvs106: SPECIAL [detachable EIFFEL_LIST [FEATURE_AS]] -- Stack for semantic values of type detachable EIFFEL_LIST [FEATURE_AS] yyvsc106: INTEGER -- Capacity of semantic value stack `yyvs106' yyvsp106: INTEGER -- Top of semantic value stack `yyvs106' yyspecial_routines106: KL_SPECIAL_ROUTINES [detachable EIFFEL_LIST [FEATURE_AS]] -- Routines that ought to be in SPECIAL [detachable EIFFEL_LIST [FEATURE_AS]] yyvs107: SPECIAL [detachable EIFFEL_LIST [FEATURE_CLAUSE_AS]] -- Stack for semantic values of type detachable EIFFEL_LIST [FEATURE_CLAUSE_AS] yyvsc107: INTEGER -- Capacity of semantic value stack `yyvs107' yyvsp107: INTEGER -- Top of semantic value stack `yyvs107' yyspecial_routines107: KL_SPECIAL_ROUTINES [detachable EIFFEL_LIST [FEATURE_CLAUSE_AS]] -- Routines that ought to be in SPECIAL [detachable EIFFEL_LIST [FEATURE_CLAUSE_AS]] yyvs108: SPECIAL [detachable EIFFEL_LIST [FEATURE_NAME]] -- Stack for semantic values of type detachable EIFFEL_LIST [FEATURE_NAME] yyvsc108: INTEGER -- Capacity of semantic value stack `yyvs108' yyvsp108: INTEGER -- Top of semantic value stack `yyvs108' yyspecial_routines108: KL_SPECIAL_ROUTINES [detachable EIFFEL_LIST [FEATURE_NAME]] -- Routines that ought to be in SPECIAL [detachable EIFFEL_LIST [FEATURE_NAME]] yyvs109: SPECIAL [detachable EIFFEL_LIST [NAMED_EXPRESSION_AS]] -- Stack for semantic values of type detachable EIFFEL_LIST [NAMED_EXPRESSION_AS] yyvsc109: INTEGER -- Capacity of semantic value stack `yyvs109' yyvsp109: INTEGER -- Top of semantic value stack `yyvs109' yyspecial_routines109: KL_SPECIAL_ROUTINES [detachable EIFFEL_LIST [NAMED_EXPRESSION_AS]] -- Routines that ought to be in SPECIAL [detachable EIFFEL_LIST [NAMED_EXPRESSION_AS]] yyvs110: SPECIAL [detachable CREATION_CONSTRAIN_TRIPLE] -- Stack for semantic values of type detachable CREATION_CONSTRAIN_TRIPLE yyvsc110: INTEGER -- Capacity of semantic value stack `yyvs110' yyvsp110: INTEGER -- Top of semantic value stack `yyvs110' yyspecial_routines110: KL_SPECIAL_ROUTINES [detachable CREATION_CONSTRAIN_TRIPLE] -- Routines that ought to be in SPECIAL [detachable CREATION_CONSTRAIN_TRIPLE] yyvs111: SPECIAL [detachable UNDEFINE_CLAUSE_AS] -- Stack for semantic values of type detachable UNDEFINE_CLAUSE_AS yyvsc111: INTEGER -- Capacity of semantic value stack `yyvs111' yyvsp111: INTEGER -- Top of semantic value stack `yyvs111' yyspecial_routines111: KL_SPECIAL_ROUTINES [detachable UNDEFINE_CLAUSE_AS] -- Routines that ought to be in SPECIAL [detachable UNDEFINE_CLAUSE_AS] yyvs112: SPECIAL [detachable REDEFINE_CLAUSE_AS] -- Stack for semantic values of type detachable REDEFINE_CLAUSE_AS yyvsc112: INTEGER -- Capacity of semantic value stack `yyvs112' yyvsp112: INTEGER -- Top of semantic value stack `yyvs112' yyspecial_routines112: KL_SPECIAL_ROUTINES [detachable REDEFINE_CLAUSE_AS] -- Routines that ought to be in SPECIAL [detachable REDEFINE_CLAUSE_AS] yyvs113: SPECIAL [detachable SELECT_CLAUSE_AS] -- Stack for semantic values of type detachable SELECT_CLAUSE_AS yyvsc113: INTEGER -- Capacity of semantic value stack `yyvs113' yyvsp113: INTEGER -- Top of semantic value stack `yyvs113' yyspecial_routines113: KL_SPECIAL_ROUTINES [detachable SELECT_CLAUSE_AS] -- Routines that ought to be in SPECIAL [detachable SELECT_CLAUSE_AS] yyvs114: SPECIAL [detachable FORMAL_GENERIC_LIST_AS] -- Stack for semantic values of type detachable FORMAL_GENERIC_LIST_AS yyvsc114: INTEGER -- Capacity of semantic value stack `yyvs114' yyvsp114: INTEGER -- Top of semantic value stack `yyvs114' yyspecial_routines114: KL_SPECIAL_ROUTINES [detachable FORMAL_GENERIC_LIST_AS] -- Routines that ought to be in SPECIAL [detachable FORMAL_GENERIC_LIST_AS] yyvs115: SPECIAL [detachable CLASS_LIST_AS] -- Stack for semantic values of type detachable CLASS_LIST_AS yyvsc115: INTEGER -- Capacity of semantic value stack `yyvs115' yyvsp115: INTEGER -- Top of semantic value stack `yyvs115' yyspecial_routines115: KL_SPECIAL_ROUTINES [detachable CLASS_LIST_AS] -- Routines that ought to be in SPECIAL [detachable CLASS_LIST_AS] yyvs116: SPECIAL [detachable INDEXING_CLAUSE_AS] -- Stack for semantic values of type detachable INDEXING_CLAUSE_AS yyvsc116: INTEGER -- Capacity of semantic value stack `yyvs116' yyvsp116: INTEGER -- Top of semantic value stack `yyvs116' yyspecial_routines116: KL_SPECIAL_ROUTINES [detachable INDEXING_CLAUSE_AS] -- Routines that ought to be in SPECIAL [detachable INDEXING_CLAUSE_AS] yyvs117: SPECIAL [detachable ITERATION_AS] -- Stack for semantic values of type detachable ITERATION_AS yyvsc117: INTEGER -- Capacity of semantic value stack `yyvs117' yyvsp117: INTEGER -- Top of semantic value stack `yyvs117' yyspecial_routines117: KL_SPECIAL_ROUTINES [detachable ITERATION_AS] -- Routines that ought to be in SPECIAL [detachable ITERATION_AS] yyvs118: SPECIAL [detachable EIFFEL_LIST [INSTRUCTION_AS]] -- Stack for semantic values of type detachable EIFFEL_LIST [INSTRUCTION_AS] yyvsc118: INTEGER -- Capacity of semantic value stack `yyvs118' yyvsp118: INTEGER -- Top of semantic value stack `yyvs118' yyspecial_routines118: KL_SPECIAL_ROUTINES [detachable EIFFEL_LIST [INSTRUCTION_AS]] -- Routines that ought to be in SPECIAL [detachable EIFFEL_LIST [INSTRUCTION_AS]] yyvs119: SPECIAL [detachable EIFFEL_LIST [INTERVAL_AS]] -- Stack for semantic values of type detachable EIFFEL_LIST [INTERVAL_AS] yyvsc119: INTEGER -- Capacity of semantic value stack `yyvs119' yyvsp119: INTEGER -- Top of semantic value stack `yyvs119' yyspecial_routines119: KL_SPECIAL_ROUTINES [detachable EIFFEL_LIST [INTERVAL_AS]] -- Routines that ought to be in SPECIAL [detachable EIFFEL_LIST [INTERVAL_AS]] yyvs120: SPECIAL [detachable EIFFEL_LIST [OPERAND_AS]] -- Stack for semantic values of type detachable EIFFEL_LIST [OPERAND_AS] yyvsc120: INTEGER -- Capacity of semantic value stack `yyvs120' yyvsp120: INTEGER -- Top of semantic value stack `yyvs120' yyspecial_routines120: KL_SPECIAL_ROUTINES [detachable EIFFEL_LIST [OPERAND_AS]] -- Routines that ought to be in SPECIAL [detachable EIFFEL_LIST [OPERAND_AS]] yyvs121: SPECIAL [detachable DELAYED_ACTUAL_LIST_AS] -- Stack for semantic values of type detachable DELAYED_ACTUAL_LIST_AS yyvsc121: INTEGER -- Capacity of semantic value stack `yyvs121' yyvsp121: INTEGER -- Top of semantic value stack `yyvs121' yyspecial_routines121: KL_SPECIAL_ROUTINES [detachable DELAYED_ACTUAL_LIST_AS] -- Routines that ought to be in SPECIAL [detachable DELAYED_ACTUAL_LIST_AS] yyvs122: SPECIAL [detachable PARENT_LIST_AS] -- Stack for semantic values of type detachable PARENT_LIST_AS yyvsc122: INTEGER -- Capacity of semantic value stack `yyvs122' yyvsp122: INTEGER -- Top of semantic value stack `yyvs122' yyspecial_routines122: KL_SPECIAL_ROUTINES [detachable PARENT_LIST_AS] -- Routines that ought to be in SPECIAL [detachable PARENT_LIST_AS] yyvs123: SPECIAL [detachable EIFFEL_LIST [RENAME_AS]] -- Stack for semantic values of type detachable EIFFEL_LIST [RENAME_AS] yyvsc123: INTEGER -- Capacity of semantic value stack `yyvs123' yyvsp123: INTEGER -- Top of semantic value stack `yyvs123' yyspecial_routines123: KL_SPECIAL_ROUTINES [detachable EIFFEL_LIST [RENAME_AS]] -- Routines that ought to be in SPECIAL [detachable EIFFEL_LIST [RENAME_AS]] yyvs124: SPECIAL [detachable RENAME_CLAUSE_AS] -- Stack for semantic values of type detachable RENAME_CLAUSE_AS yyvsc124: INTEGER -- Capacity of semantic value stack `yyvs124' yyvsp124: INTEGER -- Top of semantic value stack `yyvs124' yyspecial_routines124: KL_SPECIAL_ROUTINES [detachable RENAME_CLAUSE_AS] -- Routines that ought to be in SPECIAL [detachable RENAME_CLAUSE_AS] yyvs125: SPECIAL [detachable EIFFEL_LIST [STRING_AS]] -- Stack for semantic values of type detachable EIFFEL_LIST [STRING_AS] yyvsc125: INTEGER -- Capacity of semantic value stack `yyvs125' yyvsp125: INTEGER -- Top of semantic value stack `yyvs125' yyspecial_routines125: KL_SPECIAL_ROUTINES [detachable EIFFEL_LIST [STRING_AS]] -- Routines that ought to be in SPECIAL [detachable EIFFEL_LIST [STRING_AS]] yyvs126: SPECIAL [detachable KEY_LIST_AS] -- Stack for semantic values of type detachable KEY_LIST_AS yyvsc126: INTEGER -- Capacity of semantic value stack `yyvs126' yyvsp126: INTEGER -- Top of semantic value stack `yyvs126' yyspecial_routines126: KL_SPECIAL_ROUTINES [detachable KEY_LIST_AS] -- Routines that ought to be in SPECIAL [detachable KEY_LIST_AS] yyvs127: SPECIAL [detachable EIFFEL_LIST [TAGGED_AS]] -- Stack for semantic values of type detachable EIFFEL_LIST [TAGGED_AS] yyvsc127: INTEGER -- Capacity of semantic value stack `yyvs127' yyvsp127: INTEGER -- Top of semantic value stack `yyvs127' yyspecial_routines127: KL_SPECIAL_ROUTINES [detachable EIFFEL_LIST [TAGGED_AS]] -- Routines that ought to be in SPECIAL [detachable EIFFEL_LIST [TAGGED_AS]] yyvs128: SPECIAL [detachable TYPE_LIST_AS] -- Stack for semantic values of type detachable TYPE_LIST_AS yyvsc128: INTEGER -- Capacity of semantic value stack `yyvs128' yyvsp128: INTEGER -- Top of semantic value stack `yyvs128' yyspecial_routines128: KL_SPECIAL_ROUTINES [detachable TYPE_LIST_AS] -- Routines that ought to be in SPECIAL [detachable TYPE_LIST_AS] yyvs129: SPECIAL [detachable TYPE_DEC_LIST_AS] -- Stack for semantic values of type detachable TYPE_DEC_LIST_AS yyvsc129: INTEGER -- Capacity of semantic value stack `yyvs129' yyvsp129: INTEGER -- Top of semantic value stack `yyvs129' yyspecial_routines129: KL_SPECIAL_ROUTINES [detachable TYPE_DEC_LIST_AS] -- Routines that ought to be in SPECIAL [detachable TYPE_DEC_LIST_AS] yyvs130: SPECIAL [detachable LIST_DEC_LIST_AS] -- Stack for semantic values of type detachable LIST_DEC_LIST_AS yyvsc130: INTEGER -- Capacity of semantic value stack `yyvs130' yyvsp130: INTEGER -- Top of semantic value stack `yyvs130' yyspecial_routines130: KL_SPECIAL_ROUTINES [detachable LIST_DEC_LIST_AS] -- Routines that ought to be in SPECIAL [detachable LIST_DEC_LIST_AS] yyvs131: SPECIAL [detachable LOCAL_DEC_LIST_AS] -- Stack for semantic values of type detachable LOCAL_DEC_LIST_AS yyvsc131: INTEGER -- Capacity of semantic value stack `yyvs131' yyvsp131: INTEGER -- Top of semantic value stack `yyvs131' yyspecial_routines131: KL_SPECIAL_ROUTINES [detachable LOCAL_DEC_LIST_AS] -- Routines that ought to be in SPECIAL [detachable LOCAL_DEC_LIST_AS] yyvs132: SPECIAL [detachable FORMAL_ARGU_DEC_LIST_AS] -- Stack for semantic values of type detachable FORMAL_ARGU_DEC_LIST_AS yyvsc132: INTEGER -- Capacity of semantic value stack `yyvs132' yyvsp132: INTEGER -- Top of semantic value stack `yyvs132' yyspecial_routines132: KL_SPECIAL_ROUTINES [detachable FORMAL_ARGU_DEC_LIST_AS] -- Routines that ought to be in SPECIAL [detachable FORMAL_ARGU_DEC_LIST_AS] yyvs133: SPECIAL [detachable CONSTRAINT_TRIPLE] -- Stack for semantic values of type detachable CONSTRAINT_TRIPLE yyvsc133: INTEGER -- Capacity of semantic value stack `yyvs133' yyvsp133: INTEGER -- Top of semantic value stack `yyvs133' yyspecial_routines133: KL_SPECIAL_ROUTINES [detachable CONSTRAINT_TRIPLE] -- Routines that ought to be in SPECIAL [detachable CONSTRAINT_TRIPLE] yyvs134: SPECIAL [detachable CONSTRAINT_LIST_AS] -- Stack for semantic values of type detachable CONSTRAINT_LIST_AS yyvsc134: INTEGER -- Capacity of semantic value stack `yyvs134' yyvsp134: INTEGER -- Top of semantic value stack `yyvs134' yyspecial_routines134: KL_SPECIAL_ROUTINES [detachable CONSTRAINT_LIST_AS] -- Routines that ought to be in SPECIAL [detachable CONSTRAINT_LIST_AS] yyvs135: SPECIAL [detachable CONSTRAINING_TYPE_AS] -- Stack for semantic values of type detachable CONSTRAINING_TYPE_AS yyvsc135: INTEGER -- Capacity of semantic value stack `yyvs135' yyvsp135: INTEGER -- Top of semantic value stack `yyvs135' yyspecial_routines135: KL_SPECIAL_ROUTINES [detachable CONSTRAINING_TYPE_AS] -- Routines that ought to be in SPECIAL [detachable CONSTRAINING_TYPE_AS] feature {NONE} -- Constants yyFinal: INTEGER = 1264 -- Termination state id yyFlag: INTEGER = -32768 -- Most negative INTEGER yyNtbase: INTEGER = 152 -- Number of tokens yyLast: INTEGER = 5455 -- Upper bound of `yytable' and `yycheck' yyMax_token: INTEGER = 406 -- Maximum token id -- (upper bound of `yytranslate'.) yyNsyms: INTEGER = 406 -- Number of symbols -- (terminal and nonterminal) feature -- User-defined features note copyright: "Copyright (c) 1984-2021, Eiffel Software" license: "GPL version 2 (see http://www.eiffel.com/licensing/gpl.txt)" licensing_options: "http://www.eiffel.com/licensing" copying: "[ This file is part of Eiffel Software's Eiffel Development Environment. Eiffel Software's Eiffel Development Environment is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation, version 2 of the License (available at the URL listed under "license" above). Eiffel Software's Eiffel Development Environment is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with Eiffel Software's Eiffel Development Environment; if not, write to the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA ]" source: "[ Eiffel Software 5949 Hollister Ave., Goleta, CA 93117 USA Telephone 805-685-1006, Fax 805-685-6869 Website http://www.eiffel.com Customer support http://support.eiffel.com ]" end