note description: "External parsers" legal: "See notice at end of class." status: "See notice at end of class." date: "$Date$" revision: "$Revision$" class EXTERNAL_PARSER inherit EXTERNAL_PARSER_SKELETON EXTERNAL_FACTORY export {NONE} all end create make 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 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 end yy_clear_value_stacks -- Clear objects in semantic value stacks so that -- they can be collected by the garbage collector. local l_yyvs1_default_item: ANY l_yyvs2_default_item: EXTERNAL_EXTENSION_AS l_yyvs3_default_item: SIGNATURE_AS l_yyvs4_default_item: EXTERNAL_TYPE_AS l_yyvs5_default_item: ID_AS l_yyvs6_default_item: BOOLEAN l_yyvs7_default_item: INTEGER l_yyvs8_default_item: USE_LIST_AS l_yyvs9_default_item: ARRAYED_LIST [EXTERNAL_TYPE_AS] do if yyvs1 /= Void then yyvs1.fill_with (l_yyvs1_default_item, 0, yyvs1.upper) end if yyvs2 /= Void then yyvs2.fill_with (l_yyvs2_default_item, 0, yyvs2.upper) end if yyvs3 /= Void then yyvs3.fill_with (l_yyvs3_default_item, 0, yyvs3.upper) end if yyvs4 /= Void then yyvs4.fill_with (l_yyvs4_default_item, 0, yyvs4.upper) end if yyvs5 /= Void then yyvs5.fill_with (l_yyvs5_default_item, 0, yyvs5.upper) end if yyvs6 /= Void then yyvs6.fill_with (l_yyvs6_default_item, 0, yyvs6.upper) end if yyvs7 /= Void then yyvs7.fill_with (l_yyvs7_default_item, 0, yyvs7.upper) end if yyvs8 /= Void then yyvs8.fill_with (l_yyvs8_default_item, 0, yyvs8.upper) end if yyvs9 /= Void then yyvs9.fill_with (l_yyvs9_default_item, 0, yyvs9.upper) end 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 yyvsp1 := yyvsp1 + 1 if yyvsp1 >= yyvsc1 then if yyvs1 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs1") end create yyspecial_routines1 yyvsc1 := yyInitial_yyvs_size yyvs1 := yyspecial_routines1.make (yyvsc1) else debug ("GEYACC") std.error.put_line ("Resize yyvs1") end yyvsc1 := yyvsc1 + yyInitial_yyvs_size yyvs1 := yyspecial_routines1.resize (yyvs1, yyvsc1) end end yyspecial_routines1.force (yyvs1, last_any_value, yyvsp1) end yy_push_error_value -- Push semantic value associated with token 'error' -- on top of corresponding value stack. local yyval1: ANY do yyvsp1 := yyvsp1 + 1 if yyvsp1 >= yyvsc1 then if yyvs1 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs1") end create yyspecial_routines1 yyvsc1 := yyInitial_yyvs_size yyvs1 := yyspecial_routines1.make (yyvsc1) else debug ("GEYACC") std.error.put_line ("Resize yyvs1") end yyvsc1 := yyvsc1 + yyInitial_yyvs_size yyvs1 := yyspecial_routines1.resize (yyvs1, yyvsc1) end 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 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 inspect yy_act when 1 then --|#line "external.y" yy_do_action_1 when 2 then --|#line "external.y" yy_do_action_2 when 3 then --|#line "external.y" yy_do_action_3 when 4 then --|#line "external.y" yy_do_action_4 when 5 then --|#line "external.y" yy_do_action_5 when 6 then --|#line "external.y" yy_do_action_6 when 7 then --|#line "external.y" yy_do_action_7 when 8 then --|#line "external.y" yy_do_action_8 when 9 then --|#line "external.y" yy_do_action_9 when 10 then --|#line "external.y" yy_do_action_10 when 11 then --|#line "external.y" yy_do_action_11 when 12 then --|#line "external.y" yy_do_action_12 when 13 then --|#line "external.y" yy_do_action_13 when 14 then --|#line "external.y" yy_do_action_14 when 15 then --|#line "external.y" yy_do_action_15 when 16 then --|#line "external.y" yy_do_action_16 when 17 then --|#line "external.y" yy_do_action_17 when 18 then --|#line "external.y" yy_do_action_18 when 19 then --|#line "external.y" yy_do_action_19 when 20 then --|#line "external.y" yy_do_action_20 when 21 then --|#line "external.y" yy_do_action_21 when 22 then --|#line "external.y" yy_do_action_22 when 23 then --|#line "external.y" yy_do_action_23 when 24 then --|#line "external.y" yy_do_action_24 when 25 then --|#line "external.y" yy_do_action_25 when 26 then --|#line "external.y" yy_do_action_26 when 27 then --|#line "external.y" yy_do_action_27 when 28 then --|#line "external.y" yy_do_action_28 when 29 then --|#line "external.y" yy_do_action_29 when 30 then --|#line "external.y" yy_do_action_30 when 31 then --|#line "external.y" yy_do_action_31 when 32 then --|#line "external.y" yy_do_action_32 when 33 then --|#line "external.y" yy_do_action_33 when 34 then --|#line "external.y" yy_do_action_34 when 35 then --|#line "external.y" yy_do_action_35 when 36 then --|#line "external.y" yy_do_action_36 when 37 then --|#line "external.y" yy_do_action_37 when 38 then --|#line "external.y" yy_do_action_38 when 39 then --|#line "external.y" yy_do_action_39 when 40 then --|#line "external.y" yy_do_action_40 when 41 then --|#line "external.y" yy_do_action_41 when 42 then --|#line "external.y" yy_do_action_42 when 43 then --|#line "external.y" yy_do_action_43 when 44 then --|#line "external.y" yy_do_action_44 when 45 then --|#line "external.y" yy_do_action_45 when 46 then --|#line "external.y" yy_do_action_46 when 47 then --|#line "external.y" yy_do_action_47 when 48 then --|#line "external.y" yy_do_action_48 when 49 then --|#line "external.y" yy_do_action_49 when 50 then --|#line "external.y" yy_do_action_50 when 51 then --|#line "external.y" yy_do_action_51 when 52 then --|#line "external.y" yy_do_action_52 when 53 then --|#line "external.y" yy_do_action_53 when 54 then --|#line "external.y" yy_do_action_54 when 55 then --|#line "external.y" yy_do_action_55 when 56 then --|#line "external.y" yy_do_action_56 when 57 then --|#line "external.y" yy_do_action_57 when 58 then --|#line "external.y" yy_do_action_58 when 59 then --|#line "external.y" yy_do_action_59 when 60 then --|#line "external.y" yy_do_action_60 when 61 then --|#line "external.y" yy_do_action_61 when 62 then --|#line "external.y" yy_do_action_62 when 63 then --|#line "external.y" yy_do_action_63 when 64 then --|#line "external.y" yy_do_action_64 when 65 then --|#line "external.y" yy_do_action_65 when 66 then --|#line "external.y" yy_do_action_66 when 67 then --|#line "external.y" yy_do_action_67 when 68 then --|#line "external.y" yy_do_action_68 when 69 then --|#line "external.y" yy_do_action_69 when 70 then --|#line "external.y" yy_do_action_70 when 71 then --|#line "external.y" yy_do_action_71 when 72 then --|#line "external.y" yy_do_action_72 when 73 then --|#line "external.y" yy_do_action_73 when 74 then --|#line "external.y" yy_do_action_74 when 75 then --|#line "external.y" yy_do_action_75 when 76 then --|#line "external.y" yy_do_action_76 when 77 then --|#line "external.y" yy_do_action_77 when 78 then --|#line "external.y" yy_do_action_78 when 79 then --|#line "external.y" yy_do_action_79 when 80 then --|#line "external.y" yy_do_action_80 when 81 then --|#line "external.y" yy_do_action_81 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 "external.y" local yyval2: EXTERNAL_EXTENSION_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end root_node := yyvs2.item (yyvsp2) root_node.set_is_blocking_call (yyvs6.item (yyvsp6)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp1 := yyvsp1 -1 yyvsp6 := yyvsp6 -1 yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_2 --|#line "external.y" local yyval2: EXTERNAL_EXTENSION_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end root_node := yyvs2.item (yyvsp2) root_node.set_is_blocking_call (yyvs6.item (yyvsp6)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp1 := yyvsp1 -1 yyvsp6 := yyvsp6 -1 yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_3 --|#line "external.y" local yyval2: EXTERNAL_EXTENSION_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end root_node := yyvs2.item (yyvsp2) root_node.set_is_blocking_call (yyvs6.item (yyvsp6)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp6 := yyvsp6 -1 yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_4 --|#line "external.y" local yyval2: EXTERNAL_EXTENSION_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end root_node := yyvs2.item (yyvsp2) root_node.set_is_blocking_call (yyvs6.item (yyvsp6)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp6 := yyvsp6 -1 yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_5 --|#line "external.y" local yyval2: EXTERNAL_EXTENSION_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end create {BUILT_IN_EXTENSION_AS} root_node.initialize (True) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp2 := yyvsp2 + 1 yyvsp1 := yyvsp1 -2 if yyvsp2 >= yyvsc2 then if yyvs2 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs2") end create yyspecial_routines2 yyvsc2 := yyInitial_yyvs_size yyvs2 := yyspecial_routines2.make (yyvsc2) else debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.resize (yyvs2, yyvsc2) end end yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_6 --|#line "external.y" local yyval2: EXTERNAL_EXTENSION_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end create {BUILT_IN_EXTENSION_AS} root_node.initialize (True) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp2 := yyvsp2 + 1 yyvsp1 := yyvsp1 -2 if yyvsp2 >= yyvsc2 then if yyvs2 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs2") end create yyspecial_routines2 yyvsc2 := yyInitial_yyvs_size yyvs2 := yyspecial_routines2.make (yyvsc2) else debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.resize (yyvs2, yyvsc2) end end yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_7 --|#line "external.y" local yyval2: EXTERNAL_EXTENSION_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end create {BUILT_IN_EXTENSION_AS} root_node.initialize (False) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp2 := yyvsp2 + 1 yyvsp1 := yyvsp1 -1 if yyvsp2 >= yyvsc2 then if yyvs2 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs2") end create yyspecial_routines2 yyvsc2 := yyInitial_yyvs_size yyvs2 := yyspecial_routines2.make (yyvsc2) else debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.resize (yyvs2, yyvsc2) end end yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_8 --|#line "external.y" local yyval2: EXTERNAL_EXTENSION_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end root_node := yyvs2.item (yyvsp2) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_9 --|#line "external.y" local yyval6: BOOLEAN do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end yyval6 := False if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp6 := yyvsp6 + 1 if yyvsp6 >= yyvsc6 then if yyvs6 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs6") end create yyspecial_routines6 yyvsc6 := yyInitial_yyvs_size yyvs6 := yyspecial_routines6.make (yyvsc6) else debug ("GEYACC") std.error.put_line ("Resize yyvs6") end yyvsc6 := yyvsc6 + yyInitial_yyvs_size yyvs6 := yyspecial_routines6.resize (yyvs6, yyvsc6) end end yyspecial_routines6.force (yyvs6, yyval6, yyvsp6) end end yy_do_action_10 --|#line "external.y" local yyval6: BOOLEAN do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end yyval6 := True if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp6 := yyvsp6 + 1 yyvsp1 := yyvsp1 -1 if yyvsp6 >= yyvsc6 then if yyvs6 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs6") end create yyspecial_routines6 yyvsc6 := yyInitial_yyvs_size yyvs6 := yyspecial_routines6.make (yyvsc6) else debug ("GEYACC") std.error.put_line ("Resize yyvs6") end yyvsc6 := yyvsc6 + yyInitial_yyvs_size yyvs6 := yyspecial_routines6.resize (yyvs6, yyvsc6) end end yyspecial_routines6.force (yyvs6, yyval6, yyvsp6) end end yy_do_action_11 --|#line "external.y" local yyval2: EXTERNAL_EXTENSION_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end create {C_EXTENSION_AS} yyval2.initialize (yyvs3.item (yyvsp3), yyvs8.item (yyvsp8)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp2 := yyvsp2 + 1 yyvsp3 := yyvsp3 -1 yyvsp8 := yyvsp8 -1 if yyvsp2 >= yyvsc2 then if yyvs2 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs2") end create yyspecial_routines2 yyvsc2 := yyInitial_yyvs_size yyvs2 := yyspecial_routines2.make (yyvsc2) else debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.resize (yyvs2, yyvsc2) end end yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_12 --|#line "external.y" local yyval2: EXTERNAL_EXTENSION_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end -- False because this is a C construct create {STRUCT_EXTENSION_AS} yyval2.initialize (False, yyvs4.item (yyvsp4 - 1), yyvs5.item (yyvsp5), yyvs4.item (yyvsp4), yyvs8.item (yyvsp8)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 6 yyvsp2 := yyvsp2 + 1 yyvsp1 := yyvsp1 -2 yyvsp4 := yyvsp4 -2 yyvsp5 := yyvsp5 -1 yyvsp8 := yyvsp8 -1 if yyvsp2 >= yyvsc2 then if yyvs2 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs2") end create yyspecial_routines2 yyvsc2 := yyInitial_yyvs_size yyvs2 := yyspecial_routines2.make (yyvsc2) else debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.resize (yyvs2, yyvsc2) end end yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_13 --|#line "external.y" local yyval2: EXTERNAL_EXTENSION_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end -- False because this is a C construct create {MACRO_EXTENSION_AS} yyval2.initialize (False, yyvs3.item (yyvsp3), yyvs8.item (yyvsp8)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp2 := yyvsp2 + 1 yyvsp1 := yyvsp1 -1 yyvsp3 := yyvsp3 -1 yyvsp8 := yyvsp8 -1 if yyvsp2 >= yyvsc2 then if yyvs2 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs2") end create yyspecial_routines2 yyvsc2 := yyInitial_yyvs_size yyvs2 := yyspecial_routines2.make (yyvsc2) else debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.resize (yyvs2, yyvsc2) end end yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_14 --|#line "external.y" local yyval2: EXTERNAL_EXTENSION_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end create {INLINE_EXTENSION_AS} yyval2.initialize (False, yyvs8.item (yyvsp8)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp2 := yyvsp2 + 1 yyvsp1 := yyvsp1 -1 yyvsp8 := yyvsp8 -1 if yyvsp2 >= yyvsc2 then if yyvs2 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs2") end create yyspecial_routines2 yyvsc2 := yyInitial_yyvs_size yyvs2 := yyspecial_routines2.make (yyvsc2) else debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.resize (yyvs2, yyvsc2) end end yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_15 --|#line "external.y" local yyval2: EXTERNAL_EXTENSION_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.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_16 --|#line "external.y" local yyval2: EXTERNAL_EXTENSION_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end -- True because this is a C++ construct create {STRUCT_EXTENSION_AS} yyval2.initialize (True, yyvs4.item (yyvsp4 - 1), yyvs5.item (yyvsp5), yyvs4.item (yyvsp4), yyvs8.item (yyvsp8)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 6 yyvsp2 := yyvsp2 + 1 yyvsp1 := yyvsp1 -2 yyvsp4 := yyvsp4 -2 yyvsp5 := yyvsp5 -1 yyvsp8 := yyvsp8 -1 if yyvsp2 >= yyvsc2 then if yyvs2 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs2") end create yyspecial_routines2 yyvsc2 := yyInitial_yyvs_size yyvs2 := yyspecial_routines2.make (yyvsc2) else debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.resize (yyvs2, yyvsc2) end end yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_17 --|#line "external.y" local yyval2: EXTERNAL_EXTENSION_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end -- True because this is a C++ construct create {MACRO_EXTENSION_AS} yyval2.initialize (True, yyvs3.item (yyvsp3), yyvs8.item (yyvsp8)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp2 := yyvsp2 + 1 yyvsp1 := yyvsp1 -1 yyvsp3 := yyvsp3 -1 yyvsp8 := yyvsp8 -1 if yyvsp2 >= yyvsc2 then if yyvs2 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs2") end create yyspecial_routines2 yyvsc2 := yyInitial_yyvs_size yyvs2 := yyspecial_routines2.make (yyvsc2) else debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.resize (yyvs2, yyvsc2) end end yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_18 --|#line "external.y" local yyval2: EXTERNAL_EXTENSION_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end create {INLINE_EXTENSION_AS} yyval2.initialize (True, yyvs8.item (yyvsp8)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp2 := yyvsp2 + 1 yyvsp1 := yyvsp1 -1 yyvsp8 := yyvsp8 -1 if yyvsp2 >= yyvsc2 then if yyvs2 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs2") end create yyspecial_routines2 yyvsc2 := yyInitial_yyvs_size yyvs2 := yyspecial_routines2.make (yyvsc2) else debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.resize (yyvs2, yyvsc2) end end yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_19 --|#line "external.y" local yyval2: EXTERNAL_EXTENSION_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end create {CPP_EXTENSION_AS} yyval2.initialize (standard, yyvs5.item (yyvsp5), yyvs3.item (yyvsp3), yyvs8.item (yyvsp8)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp2 := yyvsp2 + 1 yyvsp5 := yyvsp5 -1 yyvsp3 := yyvsp3 -1 yyvsp8 := yyvsp8 -1 if yyvsp2 >= yyvsc2 then if yyvs2 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs2") end create yyspecial_routines2 yyvsc2 := yyInitial_yyvs_size yyvs2 := yyspecial_routines2.make (yyvsc2) else debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.resize (yyvs2, yyvsc2) end end yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_20 --|#line "external.y" local yyval2: EXTERNAL_EXTENSION_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end create {CPP_EXTENSION_AS} yyval2.initialize (creator, yyvs5.item (yyvsp5), yyvs3.item (yyvsp3), yyvs8.item (yyvsp8)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp2 := yyvsp2 + 1 yyvsp1 := yyvsp1 -1 yyvsp5 := yyvsp5 -1 yyvsp3 := yyvsp3 -1 yyvsp8 := yyvsp8 -1 if yyvsp2 >= yyvsc2 then if yyvs2 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs2") end create yyspecial_routines2 yyvsc2 := yyInitial_yyvs_size yyvs2 := yyspecial_routines2.make (yyvsc2) else debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.resize (yyvs2, yyvsc2) end end yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_21 --|#line "external.y" local yyval2: EXTERNAL_EXTENSION_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end create {CPP_EXTENSION_AS} yyval2.initialize (delete, yyvs5.item (yyvsp5), yyvs3.item (yyvsp3), yyvs8.item (yyvsp8)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp2 := yyvsp2 + 1 yyvsp1 := yyvsp1 -1 yyvsp5 := yyvsp5 -1 yyvsp3 := yyvsp3 -1 yyvsp8 := yyvsp8 -1 if yyvsp2 >= yyvsc2 then if yyvs2 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs2") end create yyspecial_routines2 yyvsc2 := yyInitial_yyvs_size yyvs2 := yyspecial_routines2.make (yyvsc2) else debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.resize (yyvs2, yyvsc2) end end yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_22 --|#line "external.y" local yyval2: EXTERNAL_EXTENSION_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end create {CPP_EXTENSION_AS} yyval2.initialize (static, yyvs5.item (yyvsp5), yyvs3.item (yyvsp3), yyvs8.item (yyvsp8)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp2 := yyvsp2 + 1 yyvsp1 := yyvsp1 -1 yyvsp5 := yyvsp5 -1 yyvsp3 := yyvsp3 -1 yyvsp8 := yyvsp8 -1 if yyvsp2 >= yyvsc2 then if yyvs2 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs2") end create yyspecial_routines2 yyvsc2 := yyInitial_yyvs_size yyvs2 := yyspecial_routines2.make (yyvsc2) else debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.resize (yyvs2, yyvsc2) end end yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_23 --|#line "external.y" local yyval2: EXTERNAL_EXTENSION_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end create {DLL_EXTENSION_AS} yyval2.initialize ({EXTERNAL_CONSTANTS}.dll32_type, yyvs5.item (yyvsp5), yyvs7.item (yyvsp7), yyvs3.item (yyvsp3), yyvs8.item (yyvsp8)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp2 := yyvsp2 + 1 yyvsp1 := yyvsp1 -1 yyvsp5 := yyvsp5 -1 yyvsp7 := yyvsp7 -1 yyvsp3 := yyvsp3 -1 yyvsp8 := yyvsp8 -1 if yyvsp2 >= yyvsc2 then if yyvs2 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs2") end create yyspecial_routines2 yyvsc2 := yyInitial_yyvs_size yyvs2 := yyspecial_routines2.make (yyvsc2) else debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.resize (yyvs2, yyvsc2) end end yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_24 --|#line "external.y" local yyval2: EXTERNAL_EXTENSION_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end create {DLL_EXTENSION_AS} yyval2.initialize ({EXTERNAL_CONSTANTS}.dllwin32_type, yyvs5.item (yyvsp5), yyvs7.item (yyvsp7), yyvs3.item (yyvsp3), yyvs8.item (yyvsp8)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp2 := yyvsp2 + 1 yyvsp1 := yyvsp1 -1 yyvsp5 := yyvsp5 -1 yyvsp7 := yyvsp7 -1 yyvsp3 := yyvsp3 -1 yyvsp8 := yyvsp8 -1 if yyvsp2 >= yyvsc2 then if yyvs2 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs2") end create yyspecial_routines2 yyvsc2 := yyInitial_yyvs_size yyvs2 := yyspecial_routines2.make (yyvsc2) else debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.resize (yyvs2, yyvsc2) end end yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_25 --|#line "external.y" local yyval7: INTEGER do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end yyval7 := -1 if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp7 := yyvsp7 + 1 if yyvsp7 >= yyvsc7 then if yyvs7 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs7") end create yyspecial_routines7 yyvsc7 := yyInitial_yyvs_size yyvs7 := yyspecial_routines7.make (yyvsc7) else debug ("GEYACC") std.error.put_line ("Resize yyvs7") end yyvsc7 := yyvsc7 + yyInitial_yyvs_size yyvs7 := yyspecial_routines7.resize (yyvs7, yyvsc7) end end yyspecial_routines7.force (yyvs7, yyval7, yyvsp7) end end yy_do_action_26 --|#line "external.y" local yyval7: INTEGER do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end yyval7 := token_buffer.to_integer if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp7 := yyvsp7 + 1 yyvsp1 := yyvsp1 -1 if yyvsp7 >= yyvsc7 then if yyvs7 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs7") end create yyspecial_routines7 yyvsc7 := yyInitial_yyvs_size yyvs7 := yyspecial_routines7.make (yyvsc7) else debug ("GEYACC") std.error.put_line ("Resize yyvs7") end yyvsc7 := yyvsc7 + yyInitial_yyvs_size yyvs7 := yyspecial_routines7.resize (yyvs7, yyvsc7) end end yyspecial_routines7.force (yyvs7, yyval7, yyvsp7) end end yy_do_action_27 --|#line "external.y" local yyval2: EXTERNAL_EXTENSION_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end create {IL_EXTENSION_AS} yyval2.initialize (yyvs7.item (yyvsp7), normal_type, yyvs3.item (yyvsp3), yyvs5.item (yyvsp5)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp2 := yyvsp2 + 1 yyvsp7 := yyvsp7 -1 yyvsp3 := yyvsp3 -1 yyvsp1 := yyvsp1 -1 yyvsp5 := yyvsp5 -1 if yyvsp2 >= yyvsc2 then if yyvs2 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs2") end create yyspecial_routines2 yyvsc2 := yyInitial_yyvs_size yyvs2 := yyspecial_routines2.make (yyvsc2) else debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.resize (yyvs2, yyvsc2) end end yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_28 --|#line "external.y" local yyval2: EXTERNAL_EXTENSION_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end create {IL_EXTENSION_AS} yyval2.initialize (yyvs7.item (yyvsp7), deferred_type, yyvs3.item (yyvsp3), yyvs5.item (yyvsp5)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp2 := yyvsp2 + 1 yyvsp7 := yyvsp7 -1 yyvsp1 := yyvsp1 -2 yyvsp3 := yyvsp3 -1 yyvsp5 := yyvsp5 -1 if yyvsp2 >= yyvsc2 then if yyvs2 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs2") end create yyspecial_routines2 yyvsc2 := yyInitial_yyvs_size yyvs2 := yyspecial_routines2.make (yyvsc2) else debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.resize (yyvs2, yyvsc2) end end yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_29 --|#line "external.y" local yyval2: EXTERNAL_EXTENSION_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end create {IL_EXTENSION_AS} yyval2.initialize (yyvs7.item (yyvsp7), creator_type, yyvs3.item (yyvsp3), yyvs5.item (yyvsp5)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp2 := yyvsp2 + 1 yyvsp7 := yyvsp7 -1 yyvsp1 := yyvsp1 -2 yyvsp3 := yyvsp3 -1 yyvsp5 := yyvsp5 -1 if yyvsp2 >= yyvsc2 then if yyvs2 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs2") end create yyspecial_routines2 yyvsc2 := yyInitial_yyvs_size yyvs2 := yyspecial_routines2.make (yyvsc2) else debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.resize (yyvs2, yyvsc2) end end yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_30 --|#line "external.y" local yyval2: EXTERNAL_EXTENSION_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end create {IL_EXTENSION_AS} yyval2.initialize (yyvs7.item (yyvsp7), field_type, yyvs3.item (yyvsp3), yyvs5.item (yyvsp5)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp2 := yyvsp2 + 1 yyvsp7 := yyvsp7 -1 yyvsp1 := yyvsp1 -2 yyvsp3 := yyvsp3 -1 yyvsp5 := yyvsp5 -1 if yyvsp2 >= yyvsc2 then if yyvs2 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs2") end create yyspecial_routines2 yyvsc2 := yyInitial_yyvs_size yyvs2 := yyspecial_routines2.make (yyvsc2) else debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.resize (yyvs2, yyvsc2) end end yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_31 --|#line "external.y" local yyval2: EXTERNAL_EXTENSION_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end create {IL_EXTENSION_AS} yyval2.initialize (yyvs7.item (yyvsp7), static_field_type, yyvs3.item (yyvsp3), yyvs5.item (yyvsp5)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp2 := yyvsp2 + 1 yyvsp7 := yyvsp7 -1 yyvsp1 := yyvsp1 -2 yyvsp3 := yyvsp3 -1 yyvsp5 := yyvsp5 -1 if yyvsp2 >= yyvsc2 then if yyvs2 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs2") end create yyspecial_routines2 yyvsc2 := yyInitial_yyvs_size yyvs2 := yyspecial_routines2.make (yyvsc2) else debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.resize (yyvs2, yyvsc2) end end yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_32 --|#line "external.y" local yyval2: EXTERNAL_EXTENSION_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end create {IL_EXTENSION_AS} yyval2.initialize (yyvs7.item (yyvsp7), enum_field_type, yyvs3.item (yyvsp3), yyvs5.item (yyvsp5)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp2 := yyvsp2 + 1 yyvsp7 := yyvsp7 -1 yyvsp1 := yyvsp1 -2 yyvsp3 := yyvsp3 -1 yyvsp5 := yyvsp5 -1 if yyvsp2 >= yyvsc2 then if yyvs2 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs2") end create yyspecial_routines2 yyvsc2 := yyInitial_yyvs_size yyvs2 := yyspecial_routines2.make (yyvsc2) else debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.resize (yyvs2, yyvsc2) end end yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_33 --|#line "external.y" local yyval2: EXTERNAL_EXTENSION_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end create {IL_EXTENSION_AS} yyval2.initialize (yyvs7.item (yyvsp7), set_static_field_type, yyvs3.item (yyvsp3), yyvs5.item (yyvsp5)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp2 := yyvsp2 + 1 yyvsp7 := yyvsp7 -1 yyvsp1 := yyvsp1 -2 yyvsp3 := yyvsp3 -1 yyvsp5 := yyvsp5 -1 if yyvsp2 >= yyvsc2 then if yyvs2 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs2") end create yyspecial_routines2 yyvsc2 := yyInitial_yyvs_size yyvs2 := yyspecial_routines2.make (yyvsc2) else debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.resize (yyvs2, yyvsc2) end end yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_34 --|#line "external.y" local yyval2: EXTERNAL_EXTENSION_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end create {IL_EXTENSION_AS} yyval2.initialize (yyvs7.item (yyvsp7), set_field_type, yyvs3.item (yyvsp3), yyvs5.item (yyvsp5)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp2 := yyvsp2 + 1 yyvsp7 := yyvsp7 -1 yyvsp1 := yyvsp1 -2 yyvsp3 := yyvsp3 -1 yyvsp5 := yyvsp5 -1 if yyvsp2 >= yyvsc2 then if yyvs2 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs2") end create yyspecial_routines2 yyvsc2 := yyInitial_yyvs_size yyvs2 := yyspecial_routines2.make (yyvsc2) else debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.resize (yyvs2, yyvsc2) end end yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_35 --|#line "external.y" local yyval2: EXTERNAL_EXTENSION_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end create {IL_EXTENSION_AS} yyval2.initialize (yyvs7.item (yyvsp7), static_type, yyvs3.item (yyvsp3), yyvs5.item (yyvsp5)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp2 := yyvsp2 + 1 yyvsp7 := yyvsp7 -1 yyvsp1 := yyvsp1 -2 yyvsp3 := yyvsp3 -1 yyvsp5 := yyvsp5 -1 if yyvsp2 >= yyvsc2 then if yyvs2 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs2") end create yyspecial_routines2 yyvsc2 := yyInitial_yyvs_size yyvs2 := yyspecial_routines2.make (yyvsc2) else debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.resize (yyvs2, yyvsc2) end end yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_36 --|#line "external.y" local yyval2: EXTERNAL_EXTENSION_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end create {IL_EXTENSION_AS} yyval2.initialize (yyvs7.item (yyvsp7), get_property_type, yyvs3.item (yyvsp3), yyvs5.item (yyvsp5)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp2 := yyvsp2 + 1 yyvsp7 := yyvsp7 -1 yyvsp1 := yyvsp1 -2 yyvsp3 := yyvsp3 -1 yyvsp5 := yyvsp5 -1 if yyvsp2 >= yyvsc2 then if yyvs2 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs2") end create yyspecial_routines2 yyvsc2 := yyInitial_yyvs_size yyvs2 := yyspecial_routines2.make (yyvsc2) else debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.resize (yyvs2, yyvsc2) end end yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_37 --|#line "external.y" local yyval2: EXTERNAL_EXTENSION_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end create {IL_EXTENSION_AS} yyval2.initialize (yyvs7.item (yyvsp7), set_property_type, yyvs3.item (yyvsp3), yyvs5.item (yyvsp5)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp2 := yyvsp2 + 1 yyvsp7 := yyvsp7 -1 yyvsp1 := yyvsp1 -2 yyvsp3 := yyvsp3 -1 yyvsp5 := yyvsp5 -1 if yyvsp2 >= yyvsc2 then if yyvs2 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs2") end create yyspecial_routines2 yyvsc2 := yyInitial_yyvs_size yyvs2 := yyspecial_routines2.make (yyvsc2) else debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.resize (yyvs2, yyvsc2) end end yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_38 --|#line "external.y" local yyval2: EXTERNAL_EXTENSION_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end create {IL_EXTENSION_AS} yyval2.initialize (yyvs7.item (yyvsp7), operator_type, yyvs3.item (yyvsp3), yyvs5.item (yyvsp5)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp2 := yyvsp2 + 1 yyvsp7 := yyvsp7 -1 yyvsp1 := yyvsp1 -2 yyvsp3 := yyvsp3 -1 yyvsp5 := yyvsp5 -1 if yyvsp2 >= yyvsc2 then if yyvs2 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs2") end create yyspecial_routines2 yyvsc2 := yyInitial_yyvs_size yyvs2 := yyspecial_routines2.make (yyvsc2) else debug ("GEYACC") std.error.put_line ("Resize yyvs2") end yyvsc2 := yyvsc2 + yyInitial_yyvs_size yyvs2 := yyspecial_routines2.resize (yyvs2, yyvsc2) end end yyspecial_routines2.force (yyvs2, yyval2, yyvsp2) end end yy_do_action_39 --|#line "external.y" local yyval7: INTEGER do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end yyval7 := msil_language if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp7 := yyvsp7 + 1 yyvsp1 := yyvsp1 -1 if yyvsp7 >= yyvsc7 then if yyvs7 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs7") end create yyspecial_routines7 yyvsc7 := yyInitial_yyvs_size yyvs7 := yyspecial_routines7.make (yyvsc7) else debug ("GEYACC") std.error.put_line ("Resize yyvs7") end yyvsc7 := yyvsc7 + yyInitial_yyvs_size yyvs7 := yyspecial_routines7.resize (yyvs7, yyvsc7) end end yyspecial_routines7.force (yyvs7, yyval7, yyvsp7) end end yy_do_action_40 --|#line "external.y" local yyval7: INTEGER do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end yyval7 := java_language if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp7 := yyvsp7 + 1 yyvsp1 := yyvsp1 -1 if yyvsp7 >= yyvsc7 then if yyvs7 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs7") end create yyspecial_routines7 yyvsc7 := yyInitial_yyvs_size yyvs7 := yyspecial_routines7.make (yyvsc7) else debug ("GEYACC") std.error.put_line ("Resize yyvs7") end yyvsc7 := yyvsc7 + yyInitial_yyvs_size yyvs7 := yyspecial_routines7.resize (yyvs7, yyvsc7) end end yyspecial_routines7.force (yyvs7, yyval7, yyvsp7) end end yy_do_action_41 --|#line "external.y" local yyval3: SIGNATURE_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp3 := yyvsp3 + 1 if yyvsp3 >= yyvsc3 then if yyvs3 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs3") end create yyspecial_routines3 yyvsc3 := yyInitial_yyvs_size yyvs3 := yyspecial_routines3.make (yyvsc3) else debug ("GEYACC") std.error.put_line ("Resize yyvs3") end yyvsc3 := yyvsc3 + yyInitial_yyvs_size yyvs3 := yyspecial_routines3.resize (yyvs3, yyvsc3) end end yyspecial_routines3.force (yyvs3, yyval3, yyvsp3) end end yy_do_action_42 --|#line "external.y" local yyval3: SIGNATURE_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.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_43 --|#line "external.y" local yyval3: SIGNATURE_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end create yyval3.initialize (yyvs9.item (yyvsp9), yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp3 := yyvsp3 + 1 yyvsp1 := yyvsp1 -1 yyvsp9 := yyvsp9 -1 yyvsp4 := yyvsp4 -1 if yyvsp3 >= yyvsc3 then if yyvs3 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs3") end create yyspecial_routines3 yyvsc3 := yyInitial_yyvs_size yyvs3 := yyspecial_routines3.make (yyvsc3) else debug ("GEYACC") std.error.put_line ("Resize yyvs3") end yyvsc3 := yyvsc3 + yyInitial_yyvs_size yyvs3 := yyspecial_routines3.resize (yyvs3, yyvsc3) end end yyspecial_routines3.force (yyvs3, yyval3, yyvsp3) end end yy_do_action_44 --|#line "external.y" local yyval9: ARRAYED_LIST [EXTERNAL_TYPE_AS] do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp9 := yyvsp9 + 1 if yyvsp9 >= yyvsc9 then if yyvs9 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs9") end create yyspecial_routines9 yyvsc9 := yyInitial_yyvs_size yyvs9 := yyspecial_routines9.make (yyvsc9) else debug ("GEYACC") std.error.put_line ("Resize yyvs9") end yyvsc9 := yyvsc9 + yyInitial_yyvs_size yyvs9 := yyspecial_routines9.resize (yyvs9, yyvsc9) end end yyspecial_routines9.force (yyvs9, yyval9, yyvsp9) end end yy_do_action_45 --|#line "external.y" local yyval9: ARRAYED_LIST [EXTERNAL_TYPE_AS] do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end yyval9 := yyvs9.item (yyvsp9) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines9.force (yyvs9, yyval9, yyvsp9) end end yy_do_action_46 --|#line "external.y" local yyval9: ARRAYED_LIST [EXTERNAL_TYPE_AS] do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end yyval9 := yyvs9.item (yyvsp9) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp1 := yyvsp1 -2 yyspecial_routines9.force (yyvs9, yyval9, yyvsp9) end end yy_do_action_47 --|#line "external.y" local yyval9: ARRAYED_LIST [EXTERNAL_TYPE_AS] do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp9 := yyvsp9 + 1 if yyvsp9 >= yyvsc9 then if yyvs9 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs9") end create yyspecial_routines9 yyvsc9 := yyInitial_yyvs_size yyvs9 := yyspecial_routines9.make (yyvsc9) else debug ("GEYACC") std.error.put_line ("Resize yyvs9") end yyvsc9 := yyvsc9 + yyInitial_yyvs_size yyvs9 := yyspecial_routines9.resize (yyvs9, yyvsc9) end end yyspecial_routines9.force (yyvs9, yyval9, yyvsp9) end end yy_do_action_48 --|#line "external.y" local yyval9: ARRAYED_LIST [EXTERNAL_TYPE_AS] do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end yyval9 := yyvs9.item (yyvsp9) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines9.force (yyvs9, yyval9, yyvsp9) end end yy_do_action_49 --|#line "external.y" local yyval9: ARRAYED_LIST [EXTERNAL_TYPE_AS] do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end create {ARRAYED_LIST [EXTERNAL_TYPE_AS]} yyval9.make (Argument_list_initial_size) yyval9.extend (yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp9 := yyvsp9 + 1 yyvsp4 := yyvsp4 -1 if yyvsp9 >= yyvsc9 then if yyvs9 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs9") end create yyspecial_routines9 yyvsc9 := yyInitial_yyvs_size yyvs9 := yyspecial_routines9.make (yyvsc9) else debug ("GEYACC") std.error.put_line ("Resize yyvs9") end yyvsc9 := yyvsc9 + yyInitial_yyvs_size yyvs9 := yyspecial_routines9.resize (yyvs9, yyvsc9) end end yyspecial_routines9.force (yyvs9, yyval9, yyvsp9) end end yy_do_action_50 --|#line "external.y" local yyval9: ARRAYED_LIST [EXTERNAL_TYPE_AS] do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end yyval9 := yyvs9.item (yyvsp9) yyval9.extend (yyvs4.item (yyvsp4)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp1 := yyvsp1 -1 yyvsp4 := yyvsp4 -1 yyspecial_routines9.force (yyvs9, yyval9, yyvsp9) end end yy_do_action_51 --|#line "external.y" local yyval4: EXTERNAL_TYPE_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp4 := yyvsp4 + 1 if yyvsp4 >= yyvsc4 then if yyvs4 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs4") end create yyspecial_routines4 yyvsc4 := yyInitial_yyvs_size yyvs4 := yyspecial_routines4.make (yyvsc4) else debug ("GEYACC") std.error.put_line ("Resize yyvs4") end yyvsc4 := yyvsc4 + yyInitial_yyvs_size yyvs4 := yyspecial_routines4.resize (yyvs4, yyvsc4) end end yyspecial_routines4.force (yyvs4, yyval4, yyvsp4) end end yy_do_action_52 --|#line "external.y" local yyval4: EXTERNAL_TYPE_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end yyval4 := yyvs4.item (yyvsp4) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp1 := yyvsp1 -1 yyspecial_routines4.force (yyvs4, yyval4, yyvsp4) end end yy_do_action_53 --|#line "external.y" local yyval4: EXTERNAL_TYPE_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end -- False because no `struct' keyword. -- Void because no `const', `signed', `unsigned' keyword. yyval4 := new_external_type_as (yyvs5.item (yyvsp5), Void, False, yyvs7.item (yyvsp7), yyvs6.item (yyvsp6)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp4 := yyvsp4 + 1 yyvsp5 := yyvsp5 -1 yyvsp7 := yyvsp7 -1 yyvsp6 := yyvsp6 -1 if yyvsp4 >= yyvsc4 then if yyvs4 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs4") end create yyspecial_routines4 yyvsc4 := yyInitial_yyvs_size yyvs4 := yyspecial_routines4.make (yyvsc4) else debug ("GEYACC") std.error.put_line ("Resize yyvs4") end yyvsc4 := yyvsc4 + yyInitial_yyvs_size yyvs4 := yyspecial_routines4.resize (yyvs4, yyvsc4) end end yyspecial_routines4.force (yyvs4, yyval4, yyvsp4) end end yy_do_action_54 --|#line "external.y" local yyval4: EXTERNAL_TYPE_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end -- True because `struct' keyword. -- Void because no `const', `signed', `unsigned' keyword. yyval4 := new_external_type_as (yyvs5.item (yyvsp5), Void, True, yyvs7.item (yyvsp7), yyvs6.item (yyvsp6)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp4 := yyvsp4 + 1 yyvsp1 := yyvsp1 -1 yyvsp5 := yyvsp5 -1 yyvsp7 := yyvsp7 -1 yyvsp6 := yyvsp6 -1 if yyvsp4 >= yyvsc4 then if yyvs4 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs4") end create yyspecial_routines4 yyvsc4 := yyInitial_yyvs_size yyvs4 := yyspecial_routines4.make (yyvsc4) else debug ("GEYACC") std.error.put_line ("Resize yyvs4") end yyvsc4 := yyvsc4 + yyInitial_yyvs_size yyvs4 := yyspecial_routines4.resize (yyvs4, yyvsc4) end end yyspecial_routines4.force (yyvs4, yyval4, yyvsp4) end end yy_do_action_55 --|#line "external.y" local yyval4: EXTERNAL_TYPE_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end -- False because no `struct' keyword. yyval4 := new_external_type_as (yyvs5.item (yyvsp5), signed_prefix, False, yyvs7.item (yyvsp7), yyvs6.item (yyvsp6)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp4 := yyvsp4 + 1 yyvsp1 := yyvsp1 -1 yyvsp5 := yyvsp5 -1 yyvsp7 := yyvsp7 -1 yyvsp6 := yyvsp6 -1 if yyvsp4 >= yyvsc4 then if yyvs4 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs4") end create yyspecial_routines4 yyvsc4 := yyInitial_yyvs_size yyvs4 := yyspecial_routines4.make (yyvsc4) else debug ("GEYACC") std.error.put_line ("Resize yyvs4") end yyvsc4 := yyvsc4 + yyInitial_yyvs_size yyvs4 := yyspecial_routines4.resize (yyvs4, yyvsc4) end end yyspecial_routines4.force (yyvs4, yyval4, yyvsp4) end end yy_do_action_56 --|#line "external.y" local yyval4: EXTERNAL_TYPE_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end -- False because no `struct' keyword. yyval4 := new_external_type_as (yyvs5.item (yyvsp5), unsigned_prefix, False, yyvs7.item (yyvsp7), yyvs6.item (yyvsp6)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp4 := yyvsp4 + 1 yyvsp1 := yyvsp1 -1 yyvsp5 := yyvsp5 -1 yyvsp7 := yyvsp7 -1 yyvsp6 := yyvsp6 -1 if yyvsp4 >= yyvsc4 then if yyvs4 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs4") end create yyspecial_routines4 yyvsc4 := yyInitial_yyvs_size yyvs4 := yyspecial_routines4.make (yyvsc4) else debug ("GEYACC") std.error.put_line ("Resize yyvs4") end yyvsc4 := yyvsc4 + yyInitial_yyvs_size yyvs4 := yyspecial_routines4.resize (yyvs4, yyvsc4) end end yyspecial_routines4.force (yyvs4, yyval4, yyvsp4) end end yy_do_action_57 --|#line "external.y" local yyval4: EXTERNAL_TYPE_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end -- False because no `struct' keyword. yyval4 := new_external_type_as (yyvs5.item (yyvsp5), const_prefix, False, yyvs7.item (yyvsp7), yyvs6.item (yyvsp6)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 4 yyvsp4 := yyvsp4 + 1 yyvsp1 := yyvsp1 -1 yyvsp5 := yyvsp5 -1 yyvsp7 := yyvsp7 -1 yyvsp6 := yyvsp6 -1 if yyvsp4 >= yyvsc4 then if yyvs4 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs4") end create yyspecial_routines4 yyvsc4 := yyInitial_yyvs_size yyvs4 := yyspecial_routines4.make (yyvsc4) else debug ("GEYACC") std.error.put_line ("Resize yyvs4") end yyvsc4 := yyvsc4 + yyInitial_yyvs_size yyvs4 := yyspecial_routines4.resize (yyvs4, yyvsc4) end end yyspecial_routines4.force (yyvs4, yyval4, yyvsp4) end end yy_do_action_58 --|#line "external.y" local yyval4: EXTERNAL_TYPE_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end -- True because `struct' keyword. yyval4 := new_external_type_as (yyvs5.item (yyvsp5), const_prefix, True, yyvs7.item (yyvsp7), yyvs6.item (yyvsp6)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp4 := yyvsp4 + 1 yyvsp1 := yyvsp1 -2 yyvsp5 := yyvsp5 -1 yyvsp7 := yyvsp7 -1 yyvsp6 := yyvsp6 -1 if yyvsp4 >= yyvsc4 then if yyvs4 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs4") end create yyspecial_routines4 yyvsc4 := yyInitial_yyvs_size yyvs4 := yyspecial_routines4.make (yyvsc4) else debug ("GEYACC") std.error.put_line ("Resize yyvs4") end yyvsc4 := yyvsc4 + yyInitial_yyvs_size yyvs4 := yyspecial_routines4.resize (yyvs4, yyvsc4) end end yyspecial_routines4.force (yyvs4, yyval4, yyvsp4) end end yy_do_action_59 --|#line "external.y" local yyval4: EXTERNAL_TYPE_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end -- False because no `struct' keyword. yyval4 := new_external_type_as (yyvs5.item (yyvsp5), const_signed_prefix, False, yyvs7.item (yyvsp7), yyvs6.item (yyvsp6)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp4 := yyvsp4 + 1 yyvsp1 := yyvsp1 -2 yyvsp5 := yyvsp5 -1 yyvsp7 := yyvsp7 -1 yyvsp6 := yyvsp6 -1 if yyvsp4 >= yyvsc4 then if yyvs4 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs4") end create yyspecial_routines4 yyvsc4 := yyInitial_yyvs_size yyvs4 := yyspecial_routines4.make (yyvsc4) else debug ("GEYACC") std.error.put_line ("Resize yyvs4") end yyvsc4 := yyvsc4 + yyInitial_yyvs_size yyvs4 := yyspecial_routines4.resize (yyvs4, yyvsc4) end end yyspecial_routines4.force (yyvs4, yyval4, yyvsp4) end end yy_do_action_60 --|#line "external.y" local yyval4: EXTERNAL_TYPE_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end -- False because no `struct' keyword. yyval4 := new_external_type_as (yyvs5.item (yyvsp5), const_unsigned_prefix, False, yyvs7.item (yyvsp7), yyvs6.item (yyvsp6)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 5 yyvsp4 := yyvsp4 + 1 yyvsp1 := yyvsp1 -2 yyvsp5 := yyvsp5 -1 yyvsp7 := yyvsp7 -1 yyvsp6 := yyvsp6 -1 if yyvsp4 >= yyvsc4 then if yyvs4 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs4") end create yyspecial_routines4 yyvsc4 := yyInitial_yyvs_size yyvs4 := yyspecial_routines4.make (yyvsc4) else debug ("GEYACC") std.error.put_line ("Resize yyvs4") end yyvsc4 := yyvsc4 + yyInitial_yyvs_size yyvs4 := yyspecial_routines4.resize (yyvs4, yyvsc4) end end yyspecial_routines4.force (yyvs4, yyval4, yyvsp4) end end yy_do_action_61 --|#line "external.y" local yyval4: EXTERNAL_TYPE_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp4 := yyvsp4 + 1 if yyvsp4 >= yyvsc4 then if yyvs4 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs4") end create yyspecial_routines4 yyvsc4 := yyInitial_yyvs_size yyvs4 := yyspecial_routines4.make (yyvsc4) else debug ("GEYACC") std.error.put_line ("Resize yyvs4") end yyvsc4 := yyvsc4 + yyInitial_yyvs_size yyvs4 := yyspecial_routines4.resize (yyvs4, yyvsc4) end end yyspecial_routines4.force (yyvs4, yyval4, yyvsp4) end end yy_do_action_62 --|#line "external.y" local yyval4: EXTERNAL_TYPE_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end yyval4 := yyvs4.item (yyvsp4) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp1 := yyvsp1 -1 yyspecial_routines4.force (yyvs4, yyval4, yyvsp4) end end yy_do_action_63 --|#line "external.y" local yyval7: INTEGER do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end yyval7 := 0 if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp7 := yyvsp7 + 1 if yyvsp7 >= yyvsc7 then if yyvs7 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs7") end create yyspecial_routines7 yyvsc7 := yyInitial_yyvs_size yyvs7 := yyspecial_routines7.make (yyvsc7) else debug ("GEYACC") std.error.put_line ("Resize yyvs7") end yyvsc7 := yyvsc7 + yyInitial_yyvs_size yyvs7 := yyspecial_routines7.resize (yyvs7, yyvsc7) end end yyspecial_routines7.force (yyvs7, yyval7, yyvsp7) end end yy_do_action_64 --|#line "external.y" local yyval7: INTEGER do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end yyval7 := yyvs7.item (yyvsp7) + 1 if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp1 := yyvsp1 -1 yyspecial_routines7.force (yyvs7, yyval7, yyvsp7) end end yy_do_action_65 --|#line "external.y" local yyval6: BOOLEAN do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end yyval6 := False if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp6 := yyvsp6 + 1 if yyvsp6 >= yyvsc6 then if yyvs6 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs6") end create yyspecial_routines6 yyvsc6 := yyInitial_yyvs_size yyvs6 := yyspecial_routines6.make (yyvsc6) else debug ("GEYACC") std.error.put_line ("Resize yyvs6") end yyvsc6 := yyvsc6 + yyInitial_yyvs_size yyvs6 := yyspecial_routines6.resize (yyvs6, yyvsc6) end end yyspecial_routines6.force (yyvs6, yyval6, yyvsp6) end end yy_do_action_66 --|#line "external.y" local yyval6: BOOLEAN do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end yyval6 := True if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp6 := yyvsp6 + 1 yyvsp1 := yyvsp1 -1 if yyvsp6 >= yyvsc6 then if yyvs6 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs6") end create yyspecial_routines6 yyvsc6 := yyInitial_yyvs_size yyvs6 := yyspecial_routines6.make (yyvsc6) else debug ("GEYACC") std.error.put_line ("Resize yyvs6") end yyvsc6 := yyvsc6 + yyInitial_yyvs_size yyvs6 := yyspecial_routines6.resize (yyvs6, yyvsc6) end end yyspecial_routines6.force (yyvs6, yyval6, yyvsp6) end end yy_do_action_67 --|#line "external.y" local yyval8: USE_LIST_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end if yy_parsing_status >= yyContinue then yyssp := yyssp - 0 yyvsp8 := yyvsp8 + 1 if yyvsp8 >= yyvsc8 then if yyvs8 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs8") end create yyspecial_routines8 yyvsc8 := yyInitial_yyvs_size yyvs8 := yyspecial_routines8.make (yyvsc8) else debug ("GEYACC") std.error.put_line ("Resize yyvs8") end yyvsc8 := yyvsc8 + yyInitial_yyvs_size yyvs8 := yyspecial_routines8.resize (yyvs8, yyvsc8) end end yyspecial_routines8.force (yyvs8, yyval8, yyvsp8) end end yy_do_action_68 --|#line "external.y" local yyval8: USE_LIST_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end yyval8 := yyvs8.item (yyvsp8) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyspecial_routines8.force (yyvs8, yyval8, yyvsp8) end end yy_do_action_69 --|#line "external.y" local yyval8: USE_LIST_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end yyval8 := yyvs8.item (yyvsp8) if yy_parsing_status >= yyContinue then yyssp := yyssp - 2 yyvsp1 := yyvsp1 -1 yyspecial_routines8.force (yyvs8, yyval8, yyvsp8) end end yy_do_action_70 --|#line "external.y" local yyval8: USE_LIST_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end create {USE_LIST_AS} yyval8.make (Argument_list_initial_size) yyval8.extend (yyvs5.item (yyvsp5)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp8 := yyvsp8 + 1 yyvsp5 := yyvsp5 -1 if yyvsp8 >= yyvsc8 then if yyvs8 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs8") end create yyspecial_routines8 yyvsc8 := yyInitial_yyvs_size yyvs8 := yyspecial_routines8.make (yyvsc8) else debug ("GEYACC") std.error.put_line ("Resize yyvs8") end yyvsc8 := yyvsc8 + yyInitial_yyvs_size yyvs8 := yyspecial_routines8.resize (yyvs8, yyvsc8) end end yyspecial_routines8.force (yyvs8, yyval8, yyvsp8) end end yy_do_action_71 --|#line "external.y" local yyval8: USE_LIST_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end yyval8 := yyvs8.item (yyvsp8) yyval8.extend (yyvs5.item (yyvsp5)) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp1 := yyvsp1 -1 yyvsp5 := yyvsp5 -1 yyspecial_routines8.force (yyvs8, yyval8, yyvsp8) end end yy_do_action_72 --|#line "external.y" local yyval5: ID_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end yyval5 := new_double_quote_id_as (token_buffer) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp5 := yyvsp5 + 1 yyvsp1 := yyvsp1 -3 if yyvsp5 >= yyvsc5 then if yyvs5 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs5") end create yyspecial_routines5 yyvsc5 := yyInitial_yyvs_size yyvs5 := yyspecial_routines5.make (yyvsc5) else debug ("GEYACC") std.error.put_line ("Resize yyvs5") end yyvsc5 := yyvsc5 + yyInitial_yyvs_size yyvs5 := yyspecial_routines5.resize (yyvs5, yyvsc5) end end yyspecial_routines5.force (yyvs5, yyval5, yyvsp5) end end yy_do_action_73 --|#line "external.y" local yyval5: ID_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end yyval5 := new_double_quote_id_as (token_buffer) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp5 := yyvsp5 + 1 yyvsp1 := yyvsp1 -3 if yyvsp5 >= yyvsc5 then if yyvs5 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs5") end create yyspecial_routines5 yyvsc5 := yyInitial_yyvs_size yyvs5 := yyspecial_routines5.make (yyvsc5) else debug ("GEYACC") std.error.put_line ("Resize yyvs5") end yyvsc5 := yyvsc5 + yyInitial_yyvs_size yyvs5 := yyspecial_routines5.resize (yyvs5, yyvsc5) end end yyspecial_routines5.force (yyvs5, yyval5, yyvsp5) end end yy_do_action_74 --|#line "external.y" local yyval5: ID_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end yyval5 := new_system_id_as (token_buffer) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp5 := yyvsp5 + 1 yyvsp1 := yyvsp1 -3 if yyvsp5 >= yyvsc5 then if yyvs5 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs5") end create yyspecial_routines5 yyvsc5 := yyInitial_yyvs_size yyvs5 := yyspecial_routines5.make (yyvsc5) else debug ("GEYACC") std.error.put_line ("Resize yyvs5") end yyvsc5 := yyvsc5 + yyInitial_yyvs_size yyvs5 := yyspecial_routines5.resize (yyvs5, yyvsc5) end end yyspecial_routines5.force (yyvs5, yyval5, yyvsp5) end end yy_do_action_75 --|#line "external.y" local yyval5: ID_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end yyval5 := new_system_id_as (token_buffer) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp5 := yyvsp5 + 1 yyvsp1 := yyvsp1 -3 if yyvsp5 >= yyvsc5 then if yyvs5 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs5") end create yyspecial_routines5 yyvsc5 := yyInitial_yyvs_size yyvs5 := yyspecial_routines5.make (yyvsc5) else debug ("GEYACC") std.error.put_line ("Resize yyvs5") end yyvsc5 := yyvsc5 + yyInitial_yyvs_size yyvs5 := yyspecial_routines5.resize (yyvs5, yyvsc5) end end yyspecial_routines5.force (yyvs5, yyval5, yyvsp5) end end yy_do_action_76 --|#line "external.y" local yyval5: ID_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end yyval5 := new_double_quote_id_as (token_buffer) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp5 := yyvsp5 + 1 yyvsp1 := yyvsp1 -1 if yyvsp5 >= yyvsc5 then if yyvs5 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs5") end create yyspecial_routines5 yyvsc5 := yyInitial_yyvs_size yyvs5 := yyspecial_routines5.make (yyvsc5) else debug ("GEYACC") std.error.put_line ("Resize yyvs5") end yyvsc5 := yyvsc5 + yyInitial_yyvs_size yyvs5 := yyspecial_routines5.resize (yyvs5, yyvsc5) end end yyspecial_routines5.force (yyvs5, yyval5, yyvsp5) end end yy_do_action_77 --|#line "external.y" local yyval5: ID_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end yyval5 := new_double_quote_id_as (token_buffer) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp5 := yyvsp5 + 1 yyvsp1 := yyvsp1 -3 if yyvsp5 >= yyvsc5 then if yyvs5 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs5") end create yyspecial_routines5 yyvsc5 := yyInitial_yyvs_size yyvs5 := yyspecial_routines5.make (yyvsc5) else debug ("GEYACC") std.error.put_line ("Resize yyvs5") end yyvsc5 := yyvsc5 + yyInitial_yyvs_size yyvs5 := yyspecial_routines5.resize (yyvs5, yyvsc5) end end yyspecial_routines5.force (yyvs5, yyval5, yyvsp5) end end yy_do_action_78 --|#line "external.y" local yyval5: ID_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end yyval5 := new_double_quote_id_as (token_buffer) if yy_parsing_status >= yyContinue then yyssp := yyssp - 3 yyvsp5 := yyvsp5 + 1 yyvsp1 := yyvsp1 -3 if yyvsp5 >= yyvsc5 then if yyvs5 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs5") end create yyspecial_routines5 yyvsc5 := yyInitial_yyvs_size yyvs5 := yyspecial_routines5.make (yyvsc5) else debug ("GEYACC") std.error.put_line ("Resize yyvs5") end yyvsc5 := yyvsc5 + yyInitial_yyvs_size yyvs5 := yyspecial_routines5.resize (yyvs5, yyvsc5) end end yyspecial_routines5.force (yyvs5, yyval5, yyvsp5) end end yy_do_action_79 --|#line "external.y" local yyval5: ID_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end yyval5 := new_double_quote_id_as (token_buffer) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp5 := yyvsp5 + 1 yyvsp1 := yyvsp1 -1 if yyvsp5 >= yyvsc5 then if yyvs5 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs5") end create yyspecial_routines5 yyvsc5 := yyInitial_yyvs_size yyvs5 := yyspecial_routines5.make (yyvsc5) else debug ("GEYACC") std.error.put_line ("Resize yyvs5") end yyvsc5 := yyvsc5 + yyInitial_yyvs_size yyvs5 := yyspecial_routines5.resize (yyvs5, yyvsc5) end end yyspecial_routines5.force (yyvs5, yyval5, yyvsp5) end end yy_do_action_80 --|#line "external.y" local yyval5: ID_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end yyval5 := new_double_quote_id_as (token_buffer) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp5 := yyvsp5 + 1 yyvsp1 := yyvsp1 -1 if yyvsp5 >= yyvsc5 then if yyvs5 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs5") end create yyspecial_routines5 yyvsc5 := yyInitial_yyvs_size yyvs5 := yyspecial_routines5.make (yyvsc5) else debug ("GEYACC") std.error.put_line ("Resize yyvs5") end yyvsc5 := yyvsc5 + yyInitial_yyvs_size yyvs5 := yyspecial_routines5.resize (yyvs5, yyvsc5) end end yyspecial_routines5.force (yyvs5, yyval5, yyvsp5) end end yy_do_action_81 --|#line "external.y" local yyval5: ID_AS do --|#line "external.y" debug ("GEYACC") std.error.put_line ("Executing parser user-code from file 'external.y' at line ") end create yyval5.initialize (token_buffer) if yy_parsing_status >= yyContinue then yyssp := yyssp - 1 yyvsp5 := yyvsp5 + 1 yyvsp1 := yyvsp1 -1 if yyvsp5 >= yyvsc5 then if yyvs5 = Void then debug ("GEYACC") std.error.put_line ("Create yyvs5") end create yyspecial_routines5 yyvsc5 := yyInitial_yyvs_size yyvs5 := yyspecial_routines5.make (yyvsc5) else debug ("GEYACC") std.error.put_line ("Resize yyvs5") end yyvsc5 := yyvsc5 + yyInitial_yyvs_size yyvs5 := yyspecial_routines5.resize (yyvs5, yyvsc5) end end yyspecial_routines5.force (yyvs5, yyval5, yyvsp5) end end yy_do_error_action (yy_act: INTEGER) -- Execute error action. do inspect yy_act when 191 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' once Result := yyfixed_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, 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, yyDummy>>) end yyr1_template: SPECIAL [INTEGER] -- Template for `yyr1' once Result := yyfixed_array (<< 0, 45, 45, 45, 45, 45, 45, 45, 45, 67, 67, 46, 46, 46, 46, 47, 47, 47, 47, 51, 51, 51, 51, 48, 49, 62, 62, 50, 50, 50, 50, 50, 50, 50, 50, 50, 50, 50, 50, 66, 66, 52, 52, 53, 68, 68, 69, 70, 70, 71, 71, 54, 54, 55, 55, 55, 55, 55, 55, 55, 55, 56, 56, 61, 61, 60, 60, 63, 63, 64, 65, 65, 58, 58, 58, 58, 58, 59, 59, 59, 59, 57, yyDummy>>) end yytypes1_template: SPECIAL [INTEGER] -- Template for `yytypes1' once Result := yyfixed_array (<< 2, 1, 1, 1, 1, 1, 1, 1, 2, 7, 6, 1, 6, 6, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 3, 3, 1, 1, 2, 2, 1, 1, 1, 1, 1, 1, 1, 2, 2, 5, 1, 1, 1, 2, 3, 3, 3, 3, 3, 1, 9, 9, 3, 3, 3, 3, 3, 3, 3, 1, 1, 1, 1, 5, 5, 1, 1, 1, 1, 4, 5, 5, 5, 3, 5, 1, 8, 8, 3, 4, 3, 8, 8, 1, 1, 1, 1, 4, 9, 9, 1, 4, 1, 1, 1, 1, 1, 1, 1, 5, 1, 1, 1, 7, 7, 5, 5, 1, 1, 1, 5, 5, 1, 7, 3, 3, 8, 3, 1, 1, 1, 5, 8, 8, 1, 8, 5, 5, 5, 5, 1, 1, 4, 5, 5, 5, 5, 5, 5, 5, 1, 1, 3, 3, 7, 7, 5, 5, 5, 7, 7, 5, 1, 1, 6, 8, 8, 8, 1, 1, 1, 1, 1, 5, 4, 8, 8, 6, 6, 7, 7, 7, 6, 6, 1, 4, 1, 1, 1, 1, 5, 4, 6, 6, 6, 4, 8, 8, 2, 1, 1, yyDummy>>) end yytypes2_template: SPECIAL [INTEGER] -- Template for `yytypes2' once Result := yyfixed_array (<< 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, yyDummy>>) end yydefact_template: SPECIAL [INTEGER] -- Template for `yydefact' once Result := yyfixed_array (<< 9, 0, 40, 39, 9, 9, 10, 7, 8, 41, 0, 6, 0, 41, 5, 41, 41, 41, 41, 44, 41, 41, 41, 41, 41, 41, 41, 0, 42, 0, 0, 3, 4, 81, 0, 0, 0, 41, 0, 67, 2, 15, 41, 0, 41, 67, 1, 67, 0, 0, 0, 0, 47, 51, 45, 0, 0, 0, 0, 0, 0, 0, 0, 79, 80, 0, 25, 25, 0, 0, 0, 0, 0, 63, 41, 41, 0, 41, 0, 18, 68, 0, 0, 0, 14, 11, 0, 0, 0, 0, 49, 0, 48, 0, 43, 0, 0, 0, 0, 0, 0, 0, 27, 0, 0, 26, 41, 41, 63, 63, 0, 0, 0, 63, 63, 0, 65, 0, 0, 17, 0, 76, 0, 0, 70, 69, 19, 0, 13, 33, 31, 29, 35, 46, 0, 52, 37, 34, 38, 28, 30, 36, 32, 78, 77, 67, 67, 65, 65, 63, 63, 63, 65, 65, 61, 64, 66, 53, 20, 22, 21, 0, 0, 0, 0, 0, 61, 50, 24, 23, 56, 55, 65, 65, 65, 57, 54, 0, 0, 73, 72, 75, 74, 71, 0, 60, 59, 58, 62, 16, 12, 0, 0, 0, yyDummy>>) end yydefgoto_template: SPECIAL [INTEGER] -- Template for `yydefgoto' once Result := yyfixed_array (<< 191, 46, 40, 31, 32, 8, 41, 27, 28, 94, 72, 178, 73, 124, 66, 157, 116, 106, 79, 80, 125, 9, 10, 53, 54, 91, 92, yyDummy>>) end yypact_template: SPECIAL [INTEGER] -- Template for `yypact' once Result := yyfixed_array (<< 122, 140, -32768, -32768, 112, 112, -32768, 64, -32768, 129, 43, -32768, 31, 29, -32768, 24, 24, 24, 24, 106, 24, 24, 24, 24, 24, 24, 24, 107, -32768, -6, -6, -32768, -32768, -32768, 55, 9, 9, 24, 9, -23, -32768, -32768, 24, 55, 24, -23, -32768, -23, 101, 100, 99, 98, 55, 105, -32768, 94, 93, 91, 90, 88, 72, 60, 9, -32768, -32768, -13, 53, 53, 9, 9, 66, 9, 79, -32768, 24, 24, -23, 24, -7, -32768, -32768, -23, 69, -23, -32768, -32768, 9, 9, 9, 9, -32768, 76, 73, 55, -32768, 9, 9, 9, 9, 9, 9, 9, -32768, 67, 54, -32768, 24, 24, -32768, -32768, 9, 9, 9, -32768, -32768, 9, 3, -23, -23, -32768, -23, -32768, -21, -26, -32768, 48, -32768, 9, -32768, -32768, -32768, -32768, -32768, -32768, 55, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -32768, -23, -23, 3, 3, -32768, -32768, -32768, 3, 3, -12, -32768, -32768, -32768, -32768, -32768, -32768, 30, 26, 23, 20, -7, -12, -32768, -32768, -32768, -32768, -32768, 3, 3, 3, -32768, -32768, 55, -23, -32768, -32768, -32768, -32768, -32768, -23, -32768, -32768, -32768, -32768, -32768, -32768, 5, 2, -32768, yyDummy>>) end yypgoto_template: SPECIAL [INTEGER] -- Template for `yypgoto' once Result := yyfixed_array (<< -32768, -32768, -32768, -32768, -32768, -32768, -32768, 102, -32768, -32768, -43, -8, -11, 1, 123, -132, -80, 85, -33, -73, -32768, -32768, 68, -32768, -32768, -32768, -32768, yyDummy>>) end yytable_template: SPECIAL [INTEGER] -- Template for `yytable' once Result := yyfixed_array (<< 82, 42, 193, 119, 123, 192, 122, 65, 126, 90, 128, 156, 84, 155, 85, 170, 171, 164, 163, 78, 175, 176, 162, 161, 74, 75, 177, 77, 147, 148, 104, 103, 182, 152, 153, 181, 121, 64, 63, 180, 185, 186, 187, 179, 158, 159, 45, 160, 39, 38, 135, 102, 33, 44, 165, 37, 19, 108, 109, 113, 114, 19, 30, 29, 36, 35, 43, 144, 34, 172, 173, 174, 12, 13, 33, 129, 130, 131, 132, 134, 143, 133, 105, 127, 136, 137, 138, 139, 140, 141, 142, 167, 71, 115, 70, 69, 68, 14, 33, 149, 150, 151, 101, 112, 154, 189, 111, 110, 93, 33, 52, 190, 168, 169, 100, 47, 166, 48, 49, 50, 51, 6, 55, 56, 57, 58, 59, 60, 61, 7, 99, 6, 98, 97, 188, 96, 95, 5, 4, 76, 89, 88, 87, 86, 81, 3, 83, 11, 2, 62, 26, 25, 107, 67, 24, 1, 23, 22, 184, 21, 20, 19, 18, 17, 16, 15, 183, 0, 0, 0, 0, 0, 0, 0, 0, 0, 117, 118, 0, 120, 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, 145, 146, yyDummy>>) end yycheck_template: SPECIAL [INTEGER] -- Template for `yycheck' once Result := yyfixed_array (<< 43, 12, 0, 76, 11, 0, 13, 13, 81, 52, 83, 8, 45, 10, 47, 147, 148, 43, 44, 42, 152, 153, 43, 44, 35, 36, 38, 38, 108, 109, 43, 44, 12, 113, 114, 12, 43, 43, 44, 13, 172, 173, 174, 13, 117, 118, 17, 120, 17, 18, 93, 62, 43, 24, 6, 24, 32, 68, 69, 70, 71, 32, 19, 20, 33, 34, 37, 13, 37, 149, 150, 151, 4, 5, 43, 86, 87, 88, 89, 6, 13, 5, 29, 14, 95, 96, 97, 98, 99, 100, 101, 134, 37, 14, 39, 40, 41, 33, 43, 110, 111, 112, 42, 37, 115, 178, 40, 41, 3, 43, 4, 184, 145, 146, 42, 13, 127, 15, 16, 17, 18, 9, 20, 21, 22, 23, 24, 25, 26, 7, 42, 9, 42, 42, 177, 42, 42, 15, 16, 37, 42, 42, 42, 42, 42, 23, 44, 7, 26, 42, 21, 22, 67, 30, 25, 33, 27, 28, 166, 30, 31, 32, 33, 34, 35, 36, 165, -1, -1, -1, -1, -1, -1, -1, -1, -1, 74, 75, -1, 77, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, 106, 107, yyDummy>>) end feature {NONE} -- Semantic value stacks yyvs1: SPECIAL [ANY] -- Stack for semantic values of type ANY yyvsc1: INTEGER -- Capacity of semantic value stack `yyvs1' yyvsp1: INTEGER -- Top of semantic value stack `yyvs1' yyspecial_routines1: KL_SPECIAL_ROUTINES [ANY] -- Routines that ought to be in SPECIAL [ANY] yyvs2: SPECIAL [EXTERNAL_EXTENSION_AS] -- Stack for semantic values of type EXTERNAL_EXTENSION_AS yyvsc2: INTEGER -- Capacity of semantic value stack `yyvs2' yyvsp2: INTEGER -- Top of semantic value stack `yyvs2' yyspecial_routines2: KL_SPECIAL_ROUTINES [EXTERNAL_EXTENSION_AS] -- Routines that ought to be in SPECIAL [EXTERNAL_EXTENSION_AS] yyvs3: SPECIAL [SIGNATURE_AS] -- Stack for semantic values of type SIGNATURE_AS yyvsc3: INTEGER -- Capacity of semantic value stack `yyvs3' yyvsp3: INTEGER -- Top of semantic value stack `yyvs3' yyspecial_routines3: KL_SPECIAL_ROUTINES [SIGNATURE_AS] -- Routines that ought to be in SPECIAL [SIGNATURE_AS] yyvs4: SPECIAL [EXTERNAL_TYPE_AS] -- Stack for semantic values of type EXTERNAL_TYPE_AS yyvsc4: INTEGER -- Capacity of semantic value stack `yyvs4' yyvsp4: INTEGER -- Top of semantic value stack `yyvs4' yyspecial_routines4: KL_SPECIAL_ROUTINES [EXTERNAL_TYPE_AS] -- Routines that ought to be in SPECIAL [EXTERNAL_TYPE_AS] yyvs5: SPECIAL [ID_AS] -- Stack for semantic values of type ID_AS yyvsc5: INTEGER -- Capacity of semantic value stack `yyvs5' yyvsp5: INTEGER -- Top of semantic value stack `yyvs5' yyspecial_routines5: KL_SPECIAL_ROUTINES [ID_AS] -- Routines that ought to be in SPECIAL [ID_AS] yyvs6: SPECIAL [BOOLEAN] -- Stack for semantic values of type BOOLEAN yyvsc6: INTEGER -- Capacity of semantic value stack `yyvs6' yyvsp6: INTEGER -- Top of semantic value stack `yyvs6' yyspecial_routines6: KL_SPECIAL_ROUTINES [BOOLEAN] -- Routines that ought to be in SPECIAL [BOOLEAN] yyvs7: SPECIAL [INTEGER] -- Stack for semantic values of type INTEGER yyvsc7: INTEGER -- Capacity of semantic value stack `yyvs7' yyvsp7: INTEGER -- Top of semantic value stack `yyvs7' yyspecial_routines7: KL_SPECIAL_ROUTINES [INTEGER] -- Routines that ought to be in SPECIAL [INTEGER] yyvs8: SPECIAL [USE_LIST_AS] -- Stack for semantic values of type USE_LIST_AS yyvsc8: INTEGER -- Capacity of semantic value stack `yyvs8' yyvsp8: INTEGER -- Top of semantic value stack `yyvs8' yyspecial_routines8: KL_SPECIAL_ROUTINES [USE_LIST_AS] -- Routines that ought to be in SPECIAL [USE_LIST_AS] yyvs9: SPECIAL [ARRAYED_LIST [EXTERNAL_TYPE_AS]] -- Stack for semantic values of type ARRAYED_LIST [EXTERNAL_TYPE_AS] yyvsc9: INTEGER -- Capacity of semantic value stack `yyvs9' yyvsp9: INTEGER -- Top of semantic value stack `yyvs9' yyspecial_routines9: KL_SPECIAL_ROUTINES [ARRAYED_LIST [EXTERNAL_TYPE_AS]] -- Routines that ought to be in SPECIAL [ARRAYED_LIST [EXTERNAL_TYPE_AS]] feature {NONE} -- Constants yyFinal: INTEGER = 193 -- Termination state id yyFlag: INTEGER = -32768 -- Most negative INTEGER yyNtbase: INTEGER = 45 -- Number of tokens yyLast: INTEGER = 209 -- Upper bound of `yytable' and `yycheck' yyMax_token: INTEGER = 299 -- Maximum token id -- (upper bound of `yytranslate'.) yyNsyms: INTEGER = 72 -- Number of symbols -- (terminal and nonterminal) feature -- User-defined features feature {NONE} -- Constants const_prefix: STRING = "const " const_signed_prefix: STRING = "const signed " const_unsigned_prefix: STRING = "const unsigned " signed_prefix: STRING = "signed " unsigned_prefix: STRING = "unsigned "; -- Available prefix to C/C++ basic types. note copyright: "Copyright (c) 1984-2006, 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 356 Storke Road, Goleta, CA 93117 USA Telephone 805-685-1006, Fax 805-685-6869 Website http://www.eiffel.com Customer support http://support.eiffel.com ]" end -- class EIFFEL_PARSER