libgpr2_25.0.0_70fe0fcf/testsuite/tests/ali_parser/imports/obj/b__test.adb

pragma Warnings (Off);
pragma Ada_95;
pragma Source_File_Name (ada_main, Spec_File_Name => "b__test.ads");
pragma Source_File_Name (ada_main, Body_File_Name => "b__test.adb");
pragma Suppress (Overflow_Check);
with Ada.Exceptions;

package body ada_main is

   E073 : Short_Integer; pragma Import (Ada, E073, "system__os_lib_E");
   E006 : Short_Integer; pragma Import (Ada, E006, "ada__exceptions_E");
   E011 : Short_Integer; pragma Import (Ada, E011, "system__soft_links_E");
   E022 : Short_Integer; pragma Import (Ada, E022, "system__exception_table_E");
   E038 : Short_Integer; pragma Import (Ada, E038, "ada__containers_E");
   E068 : Short_Integer; pragma Import (Ada, E068, "ada__io_exceptions_E");
   E029 : Short_Integer; pragma Import (Ada, E029, "ada__numerics_E");
   E053 : Short_Integer; pragma Import (Ada, E053, "ada__strings_E");
   E055 : Short_Integer; pragma Import (Ada, E055, "ada__strings__maps_E");
   E058 : Short_Integer; pragma Import (Ada, E058, "ada__strings__maps__constants_E");
   E043 : Short_Integer; pragma Import (Ada, E043, "interfaces__c_E");
   E023 : Short_Integer; pragma Import (Ada, E023, "system__exceptions_E");
   E084 : Short_Integer; pragma Import (Ada, E084, "system__object_reader_E");
   E048 : Short_Integer; pragma Import (Ada, E048, "system__dwarf_lines_E");
   E018 : Short_Integer; pragma Import (Ada, E018, "system__soft_links__initialize_E");
   E037 : Short_Integer; pragma Import (Ada, E037, "system__traceback__symbolic_E");
   E197 : Short_Integer; pragma Import (Ada, E197, "ada__assertions_E");
   E105 : Short_Integer; pragma Import (Ada, E105, "ada__strings__utf_encoding_E");
   E113 : Short_Integer; pragma Import (Ada, E113, "ada__tags_E");
   E103 : Short_Integer; pragma Import (Ada, E103, "ada__strings__text_buffers_E");
   E192 : Short_Integer; pragma Import (Ada, E192, "gnat_E");
   E220 : Short_Integer; pragma Import (Ada, E220, "interfaces__c__strings_E");
   E130 : Short_Integer; pragma Import (Ada, E130, "ada__streams_E");
   E155 : Short_Integer; pragma Import (Ada, E155, "system__file_control_block_E");
   E136 : Short_Integer; pragma Import (Ada, E136, "system__finalization_root_E");
   E128 : Short_Integer; pragma Import (Ada, E128, "ada__finalization_E");
   E127 : Short_Integer; pragma Import (Ada, E127, "system__finalization_primitives_E");
   E154 : Short_Integer; pragma Import (Ada, E154, "system__file_io_E");
   E353 : Short_Integer; pragma Import (Ada, E353, "ada__streams__stream_io_E");
   E185 : Short_Integer; pragma Import (Ada, E185, "system__storage_pools_E");
   E187 : Short_Integer; pragma Import (Ada, E187, "system__storage_pools__subpools_E");
   E119 : Short_Integer; pragma Import (Ada, E119, "ada__strings__unbounded_E");
   E622 : Short_Integer; pragma Import (Ada, E622, "ada__strings__wide_wide_maps_E");
   E639 : Short_Integer; pragma Import (Ada, E639, "ada__strings__wide_wide_unbounded_E");
   E292 : Short_Integer; pragma Import (Ada, E292, "system__task_info_E");
   E241 : Short_Integer; pragma Import (Ada, E241, "system__regpat_E");
   E161 : Short_Integer; pragma Import (Ada, E161, "ada__calendar_E");
   E673 : Short_Integer; pragma Import (Ada, E673, "ada__calendar__delays_E");
   E167 : Short_Integer; pragma Import (Ada, E167, "ada__calendar__time_zones_E");
   E150 : Short_Integer; pragma Import (Ada, E150, "ada__text_io_E");
   E502 : Short_Integer; pragma Import (Ada, E502, "ada__text_io__text_streams_E");
   E671 : Short_Integer; pragma Import (Ada, E671, "gnat__byte_order_mark_E");
   E222 : Short_Integer; pragma Import (Ada, E222, "gnat__calendar_E");
   E377 : Short_Integer; pragma Import (Ada, E377, "gnat__directory_operations_E");
   E567 : Short_Integer; pragma Import (Ada, E567, "gnat__dynamic_htables_E");
   E361 : Short_Integer; pragma Import (Ada, E361, "gnat__secure_hashes_E");
   E363 : Short_Integer; pragma Import (Ada, E363, "gnat__secure_hashes__md5_E");
   E359 : Short_Integer; pragma Import (Ada, E359, "gnat__md5_E");
   E835 : Short_Integer; pragma Import (Ada, E835, "gnat__secure_hashes__sha1_E");
   E841 : Short_Integer; pragma Import (Ada, E841, "gnat__secure_hashes__sha2_common_E");
   E839 : Short_Integer; pragma Import (Ada, E839, "gnat__secure_hashes__sha2_32_E");
   E833 : Short_Integer; pragma Import (Ada, E833, "gnat__sha1_E");
   E837 : Short_Integer; pragma Import (Ada, E837, "gnat__sha256_E");
   E400 : Short_Integer; pragma Import (Ada, E400, "gnat__string_split_E");
   E446 : Short_Integer; pragma Import (Ada, E446, "system__checked_pools_E");
   E286 : Short_Integer; pragma Import (Ada, E286, "system__task_primitives__operations_E");
   E225 : Short_Integer; pragma Import (Ada, E225, "gnat__calendar__time_io_E");
   E441 : Short_Integer; pragma Import (Ada, E441, "gnat__debug_pools_E");
   E245 : Short_Integer; pragma Import (Ada, E245, "system__pool_global_E");
   E236 : Short_Integer; pragma Import (Ada, E236, "gnat__expect_E");
   E300 : Short_Integer; pragma Import (Ada, E300, "gnat__formatted_string_E");
   E392 : Short_Integer; pragma Import (Ada, E392, "system__random_seed_E");
   E183 : Short_Integer; pragma Import (Ada, E183, "system__regexp_E");
   E159 : Short_Integer; pragma Import (Ada, E159, "ada__directories_E");
   E785 : Short_Integer; pragma Import (Ada, E785, "system__tasking__protected_objects_E");
   E698 : Short_Integer; pragma Import (Ada, E698, "gnatcoll__gmp__integers_E");
   E666 : Short_Integer; pragma Import (Ada, E666, "gpr_parser_support__errors_E");
   E469 : Short_Integer; pragma Import (Ada, E469, "unicode_E");
   E271 : Short_Integer; pragma Import (Ada, E271, "gnatcoll__atomic_E");
   E595 : Short_Integer; pragma Import (Ada, E595, "gnatcoll__directed_graph_E");
   E439 : Short_Integer; pragma Import (Ada, E439, "gnatcoll__memory_E");
   E232 : Short_Integer; pragma Import (Ada, E232, "gnatcoll__os_E");
   E277 : Short_Integer; pragma Import (Ada, E277, "gnatcoll__storage_pools__headers_E");
   E275 : Short_Integer; pragma Import (Ada, E275, "gnatcoll__refcount_E");
   E231 : Short_Integer; pragma Import (Ada, E231, "gnatcoll__string_builders_E");
   E261 : Short_Integer; pragma Import (Ada, E261, "gnatcoll__os__fs_E");
   E844 : Short_Integer; pragma Import (Ada, E844, "gnatcoll__hash__blake3_E");
   E256 : Short_Integer; pragma Import (Ada, E256, "gnatcoll__os__stat_E");
   E794 : Short_Integer; pragma Import (Ada, E794, "gnatcoll__os__dir_E");
   E424 : Short_Integer; pragma Import (Ada, E424, "gnatcoll__string_list_builders_E");
   E422 : Short_Integer; pragma Import (Ada, E422, "gnatcoll__os__process_types_E");
   E416 : Short_Integer; pragma Import (Ada, E416, "gnatcoll__os__process_E");
   E273 : Short_Integer; pragma Import (Ada, E273, "gnatcoll__strings_impl_E");
   E830 : Short_Integer; pragma Import (Ada, E830, "gnatcoll__os__fsutil_E");
   E828 : Short_Integer; pragma Import (Ada, E828, "gnatcoll__file_indexes_E");
   E269 : Short_Integer; pragma Import (Ada, E269, "gnatcoll__strings_E");
   E268 : Short_Integer; pragma Import (Ada, E268, "gnatcoll__strings_E");
   E265 : Short_Integer; pragma Import (Ada, E265, "gnatcoll__mmap_E");
   E267 : Short_Integer; pragma Import (Ada, E267, "gnatcoll__mmap__system_E");
   E254 : Short_Integer; pragma Import (Ada, E254, "gnatcoll__buffer_E");
   E848 : Short_Integer; pragma Import (Ada, E848, "gnatcoll__json_E");
   E850 : Short_Integer; pragma Import (Ada, E850, "gnatcoll__json__utility_E");
   E448 : Short_Integer; pragma Import (Ada, E448, "gnatcoll__templates_E");
   E450 : Short_Integer; pragma Import (Ada, E450, "gnatcoll__terminal_E");
   E410 : Short_Integer; pragma Import (Ada, E410, "gnatcoll__tribooleans_E");
   E214 : Short_Integer; pragma Import (Ada, E214, "gnatcoll__utils_E");
   E372 : Short_Integer; pragma Import (Ada, E372, "gnatcoll__io_E");
   E381 : Short_Integer; pragma Import (Ada, E381, "gnatcoll__path_E");
   E379 : Short_Integer; pragma Import (Ada, E379, "gnatcoll__io__native_E");
   E384 : Short_Integer; pragma Import (Ada, E384, "gnatcoll__remote_E");
   E388 : Short_Integer; pragma Import (Ada, E388, "gnatcoll__remote__db_E");
   E375 : Short_Integer; pragma Import (Ada, E375, "gnatcoll__io__remote_E");
   E383 : Short_Integer; pragma Import (Ada, E383, "gnatcoll__io__remote__unix_E");
   E386 : Short_Integer; pragma Import (Ada, E386, "gnatcoll__io__remote__windows_E");
   E368 : Short_Integer; pragma Import (Ada, E368, "gnatcoll__vfs_E");
   E435 : Short_Integer; pragma Import (Ada, E435, "gnatcoll__traces_E");
   E635 : Short_Integer; pragma Import (Ada, E635, "gnatcoll__iconv_E");
   E454 : Short_Integer; pragma Import (Ada, E454, "gnatcoll__vfs_utils_E");
   E157 : Short_Integer; pragma Import (Ada, E157, "gpr2_E");
   E414 : Short_Integer; pragma Import (Ada, E414, "gpr2__environment_E");
   E351 : Short_Integer; pragma Import (Ada, E351, "gpr2__path_name_E");
   E426 : Short_Integer; pragma Import (Ada, E426, "gpr2__path_name__set_E");
   E349 : Short_Integer; pragma Import (Ada, E349, "gpr2__source_reference_E");
   E298 : Short_Integer; pragma Import (Ada, E298, "gpr2__message_E");
   E396 : Short_Integer; pragma Import (Ada, E396, "gpr2__message__reporter_E");
   E790 : Short_Integer; pragma Import (Ada, E790, "gpr2__source_reference__attribute_E");
   E780 : Short_Integer; pragma Import (Ada, E780, "gpr2__source_reference__pack_E");
   E404 : Short_Integer; pragma Import (Ada, E404, "gpr2__source_reference__text_value_E");
   E776 : Short_Integer; pragma Import (Ada, E776, "gpr2__source_reference__identifier_E");
   E402 : Short_Integer; pragma Import (Ada, E402, "gpr2__source_reference__value_E");
   E398 : Short_Integer; pragma Import (Ada, E398, "gpr2__containers_E");
   E600 : Short_Integer; pragma Import (Ada, E600, "gpr2__build__unit_info_E");
   E602 : Short_Integer; pragma Import (Ada, E602, "gpr2__build__unit_info__list_E");
   E431 : Short_Integer; pragma Import (Ada, E431, "gpr2__context_E");
   E769 : Short_Integer; pragma Import (Ada, E769, "gpr2__builtin_E");
   E394 : Short_Integer; pragma Import (Ada, E394, "gpr2__log_E");
   E252 : Short_Integer; pragma Import (Ada, E252, "gpr2__build__ali_parser_E");
   E408 : Short_Integer; pragma Import (Ada, E408, "gpr2__project_E");
   E756 : Short_Integer; pragma Import (Ada, E756, "gpr2__project__attribute_index_E");
   E763 : Short_Integer; pragma Import (Ada, E763, "gpr2__project__import_E");
   E765 : Short_Integer; pragma Import (Ada, E765, "gpr2__project__import__set_E");
   E587 : Short_Integer; pragma Import (Ada, E587, "gpr2__project__registry__pack_E");
   E859 : Short_Integer; pragma Import (Ada, E859, "gpr2__project__registry__pack__description_E");
   E826 : Short_Integer; pragma Import (Ada, E826, "gpr2__utils__hash_E");
   E823 : Short_Integer; pragma Import (Ada, E823, "gpr2__build__artifacts_E");
   E803 : Short_Integer; pragma Import (Ada, E803, "gpr2__view_base_internal_E");
   E805 : Short_Integer; pragma Import (Ada, E805, "gpr2__view_ids_E");
   E807 : Short_Integer; pragma Import (Ada, E807, "gpr2__view_ids__set_E");
   E813 : Short_Integer; pragma Import (Ada, E813, "gpr2__view_ids__vector_E");
   E818 : Short_Integer; pragma Import (Ada, E818, "gpr2__view_ids__dags_E");
   E703 : Short_Integer; pragma Import (Ada, E703, "gpr_parser_adasat_E");
   E708 : Short_Integer; pragma Import (Ada, E708, "gpr_parser_adasat__decisions_E");
   E706 : Short_Integer; pragma Import (Ada, E706, "gpr_parser_adasat__vectors_E");
   E710 : Short_Integer; pragma Import (Ada, E710, "gpr_parser_adasat__formulas_E");
   E704 : Short_Integer; pragma Import (Ada, E704, "gpr_parser_adasat__internals_E");
   E720 : Short_Integer; pragma Import (Ada, E720, "gpr_parser_adasat__builders_E");
   E701 : Short_Integer; pragma Import (Ada, E701, "gpr_parser_adasat__dpll_E");
   E712 : Short_Integer; pragma Import (Ada, E712, "gpr_parser_support__adalog_E");
   E714 : Short_Integer; pragma Import (Ada, E714, "gpr_parser_support__adalog__debug_E");
   E716 : Short_Integer; pragma Import (Ada, E716, "gpr_parser_support__adalog__logic_var_E");
   E724 : Short_Integer; pragma Import (Ada, E724, "gpr_parser_support__adalog__solver_interface_E");
   E726 : Short_Integer; pragma Import (Ada, E726, "gpr_parser_support__array_utils_E");
   E679 : Short_Integer; pragma Import (Ada, E679, "gpr_parser_support__hashes_E");
   E722 : Short_Integer; pragma Import (Ada, E722, "gpr_parser_support__images_E");
   E742 : Short_Integer; pragma Import (Ada, E742, "gpr_parser_support__packrat_E");
   E732 : Short_Integer; pragma Import (Ada, E732, "gpr_parser_support__relative_get_E");
   E628 : Short_Integer; pragma Import (Ada, E628, "gpr_parser_support__text_E");
   E693 : Short_Integer; pragma Import (Ada, E693, "gpr_parser_support__names_E");
   E618 : Short_Integer; pragma Import (Ada, E618, "gpr_parser_support__slocs_E");
   E616 : Short_Integer; pragma Import (Ada, E616, "gpr_parser_support__diagnostics_E");
   E669 : Short_Integer; pragma Import (Ada, E669, "gpr_parser_support__file_readers_E");
   E754 : Short_Integer; pragma Import (Ada, E754, "gpr2__file_readers_E");
   E683 : Short_Integer; pragma Import (Ada, E683, "gpr_parser_support__vectors_E");
   E718 : Short_Integer; pragma Import (Ada, E718, "gpr_parser_support__adalog__solver_E");
   E728 : Short_Integer; pragma Import (Ada, E728, "gpr_parser_support__cheap_sets_E");
   E746 : Short_Integer; pragma Import (Ada, E746, "gpr_parser_support__generic_bump_ptr_E");
   E744 : Short_Integer; pragma Import (Ada, E744, "gpr_parser_support__bump_ptr_E");
   E680 : Short_Integer; pragma Import (Ada, E680, "gpr_parser_support__lexical_envs_E");
   E687 : Short_Integer; pragma Import (Ada, E687, "gpr_parser_support__symbols_E");
   E730 : Short_Integer; pragma Import (Ada, E730, "gpr_parser_support__lexical_envs_impl_E");
   E734 : Short_Integer; pragma Import (Ada, E734, "gpr_parser_support__symbols__precomputed_E");
   E685 : Short_Integer; pragma Import (Ada, E685, "gpr_parser_support__token_data_handlers_E");
   E665 : Short_Integer; pragma Import (Ada, E665, "gpr_parser_support__generic_api_E");
   E677 : Short_Integer; pragma Import (Ada, E677, "gpr_parser_support__internal__analysis_E");
   E691 : Short_Integer; pragma Import (Ada, E691, "gpr_parser_support__generic_api__analysis_E");
   E675 : Short_Integer; pragma Import (Ada, E675, "gpr_parser_support__generic_api__introspection_E");
   E695 : Short_Integer; pragma Import (Ada, E695, "gpr_parser_support__internal__introspection_E");
   E649 : Short_Integer; pragma Import (Ada, E649, "gpr_parser__common_E");
   E736 : Short_Integer; pragma Import (Ada, E736, "gpr_parser__lexer_implementation_E");
   E738 : Short_Integer; pragma Import (Ada, E738, "gpr_parser__lexer_state_machine_E");
   E740 : Short_Integer; pragma Import (Ada, E740, "gpr_parser__parsers_E");
   E657 : Short_Integer; pragma Import (Ada, E657, "gpr_parser__implementation_E");
   E750 : Short_Integer; pragma Import (Ada, E750, "gpr_parser__debug_E");
   E645 : Short_Integer; pragma Import (Ada, E645, "gpr_parser__analysis_E");
   E651 : Short_Integer; pragma Import (Ada, E651, "gpr_parser__generic_api_E");
   E655 : Short_Integer; pragma Import (Ada, E655, "gpr_parser__generic_introspection_E");
   E662 : Short_Integer; pragma Import (Ada, E662, "gpr_parser__private_converters_E");
   E653 : Short_Integer; pragma Import (Ada, E653, "gpr_parser__generic_impl_E");
   E748 : Short_Integer; pragma Import (Ada, E748, "gpr_parser__public_converters_E");
   E752 : Short_Integer; pragma Import (Ada, E752, "gpr_parser__basic_ada_parser_E");
   E486 : Short_Integer; pragma Import (Ada, E486, "sax__htable_E");
   E490 : Short_Integer; pragma Import (Ada, E490, "sax__pointers_E");
   E571 : Short_Integer; pragma Import (Ada, E571, "sax__state_machines_E");
   E550 : Short_Integer; pragma Import (Ada, E550, "schema_E");
   E482 : Short_Integer; pragma Import (Ada, E482, "unicode__ccs_E");
   E506 : Short_Integer; pragma Import (Ada, E506, "unicode__ccs__iso_8859_1_E");
   E508 : Short_Integer; pragma Import (Ada, E508, "unicode__ccs__iso_8859_15_E");
   E513 : Short_Integer; pragma Import (Ada, E513, "unicode__ccs__iso_8859_2_E");
   E516 : Short_Integer; pragma Import (Ada, E516, "unicode__ccs__iso_8859_3_E");
   E518 : Short_Integer; pragma Import (Ada, E518, "unicode__ccs__iso_8859_4_E");
   E520 : Short_Integer; pragma Import (Ada, E520, "unicode__ccs__windows_1251_E");
   E525 : Short_Integer; pragma Import (Ada, E525, "unicode__ccs__windows_1252_E");
   E478 : Short_Integer; pragma Import (Ada, E478, "unicode__ces_E");
   E488 : Short_Integer; pragma Import (Ada, E488, "sax__symbols_E");
   E548 : Short_Integer; pragma Import (Ada, E548, "sax__locators_E");
   E546 : Short_Integer; pragma Import (Ada, E546, "sax__exceptions_E");
   E480 : Short_Integer; pragma Import (Ada, E480, "unicode__ces__utf32_E");
   E528 : Short_Integer; pragma Import (Ada, E528, "unicode__ces__basic_8bit_E");
   E530 : Short_Integer; pragma Import (Ada, E530, "unicode__ces__utf16_E");
   E484 : Short_Integer; pragma Import (Ada, E484, "unicode__ces__utf8_E");
   E544 : Short_Integer; pragma Import (Ada, E544, "sax__models_E");
   E542 : Short_Integer; pragma Import (Ada, E542, "sax__attributes_E");
   E492 : Short_Integer; pragma Import (Ada, E492, "sax__utils_E");
   E465 : Short_Integer; pragma Import (Ada, E465, "dom__core_E");
   E562 : Short_Integer; pragma Import (Ada, E562, "schema__date_time_E");
   E564 : Short_Integer; pragma Import (Ada, E564, "schema__decimal_E");
   E560 : Short_Integer; pragma Import (Ada, E560, "schema__simple_types_E");
   E504 : Short_Integer; pragma Import (Ada, E504, "unicode__encodings_E");
   E500 : Short_Integer; pragma Import (Ada, E500, "dom__core__nodes_E");
   E498 : Short_Integer; pragma Import (Ada, E498, "dom__core__attrs_E");
   E554 : Short_Integer; pragma Import (Ada, E554, "dom__core__character_datas_E");
   E494 : Short_Integer; pragma Import (Ada, E494, "dom__core__documents_E");
   E496 : Short_Integer; pragma Import (Ada, E496, "dom__core__elements_E");
   E534 : Short_Integer; pragma Import (Ada, E534, "input_sources_E");
   E536 : Short_Integer; pragma Import (Ada, E536, "input_sources__file_E");
   E538 : Short_Integer; pragma Import (Ada, E538, "input_sources__strings_E");
   E540 : Short_Integer; pragma Import (Ada, E540, "sax__readers_E");
   E569 : Short_Integer; pragma Import (Ada, E569, "schema__validators_E");
   E556 : Short_Integer; pragma Import (Ada, E556, "schema__readers_E");
   E558 : Short_Integer; pragma Import (Ada, E558, "schema__schema_readers_E");
   E573 : Short_Integer; pragma Import (Ada, E573, "schema__validators__xsd_grammar_E");
   E552 : Short_Integer; pragma Import (Ada, E552, "schema__dom_readers_E");
   E598 : Short_Integer; pragma Import (Ada, E598, "gpr2__build__source_base_E");
   E612 : Short_Integer; pragma Import (Ada, E612, "gpr2__build__source_base__ada_parser_E");
   E585 : Short_Integer; pragma Import (Ada, E585, "gpr2__project__registry__attribute_E");
   E583 : Short_Integer; pragma Import (Ada, E583, "gpr2__project__attr_values_E");
   E581 : Short_Integer; pragma Import (Ada, E581, "gpr2__project__attribute_E");
   E761 : Short_Integer; pragma Import (Ada, E761, "gpr2__project__attribute__set_E");
   E798 : Short_Integer; pragma Import (Ada, E798, "gpr2__project__attribute_cache_E");
   E774 : Short_Integer; pragma Import (Ada, E774, "gpr2__project__name_values_E");
   E857 : Short_Integer; pragma Import (Ada, E857, "gpr2__project__registry__attribute__description_E");
   E846 : Short_Integer; pragma Import (Ada, E846, "gpr2__project__registry__exchange_E");
   E778 : Short_Integer; pragma Import (Ada, E778, "gpr2__project__typ_E");
   E801 : Short_Integer; pragma Import (Ada, E801, "gpr2__project__typ__set_E");
   E772 : Short_Integer; pragma Import (Ada, E772, "gpr2__project__variable_E");
   E779 : Short_Integer; pragma Import (Ada, E779, "gpr2__project__variable__set_E");
   E770 : Short_Integer; pragma Import (Ada, E770, "gpr2__pack_internal_E");
   E589 : Short_Integer; pragma Import (Ada, E589, "gpr2__project__view_E");
   E822 : Short_Integer; pragma Import (Ada, E822, "gpr2__build__actions_E");
   E591 : Short_Integer; pragma Import (Ada, E591, "gpr2__build__compilation_unit_E");
   E608 : Short_Integer; pragma Import (Ada, E608, "gpr2__build__compilation_unit__maps_E");
   E596 : Short_Integer; pragma Import (Ada, E596, "gpr2__build__source_E");
   E605 : Short_Integer; pragma Import (Ada, E605, "gpr2__project__view__set_E");
   E610 : Short_Integer; pragma Import (Ada, E610, "gpr2__build__view_tables_E");
   E607 : Short_Integer; pragma Import (Ada, E607, "gpr2__build__view_db_E");
   E604 : Short_Integer; pragma Import (Ada, E604, "gpr2__build__source__sets_E");
   E593 : Short_Integer; pragma Import (Ada, E593, "gpr2__build__tree_db_E");
   E816 : Short_Integer; pragma Import (Ada, E816, "gpr2__project__view__vector_E");
   E767 : Short_Integer; pragma Import (Ada, E767, "gpr2__project_parser_E");
   E579 : Short_Integer; pragma Import (Ada, E579, "gpr2__project__configuration_E");
   E433 : Short_Integer; pragma Import (Ada, E433, "gpr2__kb_E");
   E456 : Short_Integer; pragma Import (Ada, E456, "gpr2__kb__compiler_iterator_E");
   E532 : Short_Integer; pragma Import (Ada, E532, "gpr2__kb__embedded_E");
   E462 : Short_Integer; pragma Import (Ada, E462, "gpr2__kb__parsing_E");
   E406 : Short_Integer; pragma Import (Ada, E406, "gpr2__options_E");
   E811 : Short_Integer; pragma Import (Ada, E811, "gpr2__project_parser__create_E");
   E783 : Short_Integer; pragma Import (Ada, E783, "gpr2__project_parser__registry_E");
   E802 : Short_Integer; pragma Import (Ada, E802, "gpr2__project_parser__set_E");
   E792 : Short_Integer; pragma Import (Ada, E792, "gpr2__view_internal_E");
   E758 : Short_Integer; pragma Import (Ada, E758, "gpr2__tree_internal_E");
   E815 : Short_Integer; pragma Import (Ada, E815, "gpr2__project__tree_E");
   E809 : Short_Integer; pragma Import (Ada, E809, "gpr2__tree_internal__view_builder_E");

   Sec_Default_Sized_Stacks : array (1 .. 1) of aliased System.Secondary_Stack.SS_Stack (System.Parameters.Runtime_Default_Sec_Stack_Size);

   Local_Priority_Specific_Dispatching : constant String := "";
   Local_Interrupt_States : constant String := "";

   Is_Elaborated : Boolean := False;

   procedure finalize_library is
   begin
      E792 := E792 - 1;
      E758 := E758 - 1;
      E809 := E809 - 1;
      declare
         procedure F1;
         pragma Import (Ada, F1, "gpr2__tree_internal__view_builder__finalize_spec");
      begin
         F1;
      end;
      E767 := E767 - 1;
      declare
         procedure F2;
         pragma Import (Ada, F2, "gpr2__project__view__finalize_body");
      begin
         E589 := E589 - 1;
         F2;
      end;
      E815 := E815 - 1;
      declare
         procedure F3;
         pragma Import (Ada, F3, "gpr2__project__tree__finalize_spec");
      begin
         F3;
      end;
      declare
         procedure F4;
         pragma Import (Ada, F4, "gpr2__build__view_tables__finalize_body");
      begin
         E610 := E610 - 1;
         F4;
      end;
      declare
         procedure F5;
         pragma Import (Ada, F5, "gpr2__build__tree_db__finalize_body");
      begin
         E593 := E593 - 1;
         F5;
      end;
      E591 := E591 - 1;
      declare
         procedure F6;
         pragma Import (Ada, F6, "gpr2__tree_internal__finalize_spec");
      begin
         F6;
      end;
      E579 := E579 - 1;
      declare
         procedure F7;
         pragma Import (Ada, F7, "gpr2__view_internal__finalize_spec");
      begin
         F7;
      end;
      declare
         procedure F8;
         pragma Import (Ada, F8, "gpr2__project_parser__set__finalize_spec");
      begin
         E802 := E802 - 1;
         F8;
      end;
      declare
         procedure F9;
         pragma Import (Ada, F9, "gpr2__project_parser__registry__finalize_body");
      begin
         E783 := E783 - 1;
         F9;
      end;
      E406 := E406 - 1;
      declare
         procedure F10;
         pragma Import (Ada, F10, "gpr2__options__finalize_spec");
      begin
         F10;
      end;
      declare
         procedure F11;
         pragma Import (Ada, F11, "gpr2__kb__finalize_body");
      begin
         E433 := E433 - 1;
         F11;
      end;
      E532 := E532 - 1;
      declare
         procedure F12;
         pragma Import (Ada, F12, "gpr2__kb__embedded__finalize_spec");
      begin
         F12;
      end;
      declare
         procedure F13;
         pragma Import (Ada, F13, "gpr2__kb__compiler_iterator__finalize_body");
      begin
         E456 := E456 - 1;
         F13;
      end;
      declare
         procedure F14;
         pragma Import (Ada, F14, "gpr2__kb__finalize_spec");
      begin
         F14;
      end;
      declare
         procedure F15;
         pragma Import (Ada, F15, "gpr2__project__configuration__finalize_spec");
      begin
         F15;
      end;
      declare
         procedure F16;
         pragma Import (Ada, F16, "gpr2__project_parser__finalize_spec");
      begin
         F16;
      end;
      declare
         procedure F17;
         pragma Import (Ada, F17, "gpr2__project__view__vector__finalize_spec");
      begin
         E816 := E816 - 1;
         F17;
      end;
      E607 := E607 - 1;
      E598 := E598 - 1;
      E604 := E604 - 1;
      declare
         procedure F18;
         pragma Import (Ada, F18, "gpr2__build__tree_db__finalize_spec");
      begin
         F18;
      end;
      declare
         procedure F19;
         pragma Import (Ada, F19, "gpr2__build__source__sets__finalize_spec");
      begin
         F19;
      end;
      declare
         procedure F20;
         pragma Import (Ada, F20, "gpr2__build__view_db__finalize_spec");
      begin
         F20;
      end;
      declare
         procedure F21;
         pragma Import (Ada, F21, "gpr2__build__view_tables__finalize_spec");
      begin
         F21;
      end;
      declare
         procedure F22;
         pragma Import (Ada, F22, "gpr2__project__view__set__finalize_spec");
      begin
         E605 := E605 - 1;
         F22;
      end;
      declare
         procedure F23;
         pragma Import (Ada, F23, "gpr2__project__registry__attribute__finalize_body");
      begin
         E585 := E585 - 1;
         F23;
      end;
      declare
         procedure F24;
         pragma Import (Ada, F24, "gpr2__build__source__finalize_spec");
      begin
         E596 := E596 - 1;
         F24;
      end;
      declare
         procedure F25;
         pragma Import (Ada, F25, "gpr2__build__compilation_unit__maps__finalize_spec");
      begin
         E608 := E608 - 1;
         F25;
      end;
      declare
         procedure F26;
         pragma Import (Ada, F26, "gpr2__build__compilation_unit__finalize_spec");
      begin
         F26;
      end;
      declare
         procedure F27;
         pragma Import (Ada, F27, "gpr2__project__view__finalize_spec");
      begin
         F27;
      end;
      declare
         procedure F28;
         pragma Import (Ada, F28, "gpr2__pack_internal__finalize_spec");
      begin
         E770 := E770 - 1;
         F28;
      end;
      declare
         procedure F29;
         pragma Import (Ada, F29, "gpr2__project__variable__set__finalize_spec");
      begin
         E779 := E779 - 1;
         F29;
      end;
      E772 := E772 - 1;
      declare
         procedure F30;
         pragma Import (Ada, F30, "gpr2__project__variable__finalize_spec");
      begin
         F30;
      end;
      declare
         procedure F31;
         pragma Import (Ada, F31, "gpr2__project__typ__set__finalize_spec");
      begin
         E801 := E801 - 1;
         F31;
      end;
      E778 := E778 - 1;
      declare
         procedure F32;
         pragma Import (Ada, F32, "gpr2__project__typ__finalize_spec");
      begin
         F32;
      end;
      E857 := E857 - 1;
      declare
         procedure F33;
         pragma Import (Ada, F33, "gpr2__project__registry__attribute__description__finalize_spec");
      begin
         F33;
      end;
      E774 := E774 - 1;
      declare
         procedure F34;
         pragma Import (Ada, F34, "gpr2__project__name_values__finalize_spec");
      begin
         F34;
      end;
      E798 := E798 - 1;
      declare
         procedure F35;
         pragma Import (Ada, F35, "gpr2__project__attribute_cache__finalize_spec");
      begin
         F35;
      end;
      declare
         procedure F36;
         pragma Import (Ada, F36, "gpr2__project__attribute__set__finalize_body");
      begin
         E761 := E761 - 1;
         F36;
      end;
      declare
         procedure F37;
         pragma Import (Ada, F37, "gpr2__project__attribute__set__finalize_spec");
      begin
         F37;
      end;
      E581 := E581 - 1;
      declare
         procedure F38;
         pragma Import (Ada, F38, "gpr2__project__attribute__finalize_spec");
      begin
         F38;
      end;
      E583 := E583 - 1;
      declare
         procedure F39;
         pragma Import (Ada, F39, "gpr2__project__attr_values__finalize_spec");
      begin
         F39;
      end;
      declare
         procedure F40;
         pragma Import (Ada, F40, "gpr2__project__registry__attribute__finalize_spec");
      begin
         F40;
      end;
      declare
         procedure F41;
         pragma Import (Ada, F41, "gpr2__build__source_base__finalize_spec");
      begin
         F41;
      end;
      E552 := E552 - 1;
      declare
         procedure F42;
         pragma Import (Ada, F42, "schema__dom_readers__finalize_spec");
      begin
         F42;
      end;
      E569 := E569 - 1;
      E556 := E556 - 1;
      E558 := E558 - 1;
      declare
         procedure F43;
         pragma Import (Ada, F43, "schema__schema_readers__finalize_spec");
      begin
         F43;
      end;
      declare
         procedure F44;
         pragma Import (Ada, F44, "schema__readers__finalize_spec");
      begin
         F44;
      end;
      declare
         procedure F45;
         pragma Import (Ada, F45, "schema__validators__finalize_spec");
      begin
         F45;
      end;
      E540 := E540 - 1;
      declare
         procedure F46;
         pragma Import (Ada, F46, "sax__readers__finalize_spec");
      begin
         F46;
      end;
      E538 := E538 - 1;
      declare
         procedure F47;
         pragma Import (Ada, F47, "input_sources__strings__finalize_spec");
      begin
         F47;
      end;
      E536 := E536 - 1;
      declare
         procedure F48;
         pragma Import (Ada, F48, "input_sources__file__finalize_spec");
      begin
         F48;
      end;
      E534 := E534 - 1;
      declare
         procedure F49;
         pragma Import (Ada, F49, "input_sources__finalize_spec");
      begin
         F49;
      end;
      E465 := E465 - 1;
      declare
         procedure F50;
         pragma Import (Ada, F50, "dom__core__finalize_spec");
      begin
         F50;
      end;
      E492 := E492 - 1;
      declare
         procedure F51;
         pragma Import (Ada, F51, "sax__utils__finalize_spec");
      begin
         F51;
      end;
      E542 := E542 - 1;
      declare
         procedure F52;
         pragma Import (Ada, F52, "sax__attributes__finalize_spec");
      begin
         F52;
      end;
      E546 := E546 - 1;
      declare
         procedure F53;
         pragma Import (Ada, F53, "sax__exceptions__finalize_spec");
      begin
         F53;
      end;
      E488 := E488 - 1;
      declare
         procedure F54;
         pragma Import (Ada, F54, "sax__symbols__finalize_spec");
      begin
         F54;
      end;
      E490 := E490 - 1;
      declare
         procedure F55;
         pragma Import (Ada, F55, "sax__pointers__finalize_spec");
      begin
         F55;
      end;
      E655 := E655 - 1;
      E645 := E645 - 1;
      declare
         procedure F56;
         pragma Import (Ada, F56, "gpr_parser__public_converters__finalize_body");
      begin
         E748 := E748 - 1;
         F56;
      end;
      declare
         procedure F57;
         pragma Import (Ada, F57, "gpr_parser__public_converters__finalize_spec");
      begin
         F57;
      end;
      declare
         procedure F58;
         pragma Import (Ada, F58, "gpr_parser__parsers__finalize_body");
      begin
         E740 := E740 - 1;
         F58;
      end;
      declare
         procedure F59;
         pragma Import (Ada, F59, "gpr_parser__implementation__finalize_body");
      begin
         E657 := E657 - 1;
         F59;
      end;
      declare
         procedure F60;
         pragma Import (Ada, F60, "gpr_parser__generic_introspection__finalize_spec");
      begin
         F60;
      end;
      declare
         procedure F61;
         pragma Import (Ada, F61, "gpr_parser__analysis__finalize_spec");
      begin
         F61;
      end;
      declare
         procedure F62;
         pragma Import (Ada, F62, "gpr_parser__implementation__finalize_spec");
      begin
         F62;
      end;
      E695 := E695 - 1;
      E677 := E677 - 1;
      E675 := E675 - 1;
      E691 := E691 - 1;
      declare
         procedure F63;
         pragma Import (Ada, F63, "gpr_parser_support__internal__introspection__finalize_spec");
      begin
         F63;
      end;
      declare
         procedure F64;
         pragma Import (Ada, F64, "gpr_parser_support__generic_api__introspection__finalize_spec");
      begin
         F64;
      end;
      declare
         procedure F65;
         pragma Import (Ada, F65, "gpr_parser_support__generic_api__analysis__finalize_spec");
      begin
         F65;
      end;
      declare
         procedure F66;
         pragma Import (Ada, F66, "gpr_parser_support__internal__analysis__finalize_spec");
      begin
         F66;
      end;
      E685 := E685 - 1;
      declare
         procedure F67;
         pragma Import (Ada, F67, "gpr_parser_support__token_data_handlers__finalize_spec");
      begin
         F67;
      end;
      E687 := E687 - 1;
      declare
         procedure F68;
         pragma Import (Ada, F68, "gpr_parser_support__symbols__finalize_spec");
      begin
         F68;
      end;
      declare
         procedure F69;
         pragma Import (Ada, F69, "gpr_parser_support__lexical_envs__finalize_spec");
      begin
         E680 := E680 - 1;
         F69;
      end;
      E744 := E744 - 1;
      declare
         procedure F70;
         pragma Import (Ada, F70, "gpr_parser_support__bump_ptr__finalize_spec");
      begin
         F70;
      end;
      declare
         procedure F71;
         pragma Import (Ada, F71, "gpr2__file_readers__finalize_body");
      begin
         E754 := E754 - 1;
         F71;
      end;
      declare
         procedure F72;
         pragma Import (Ada, F72, "gpr2__file_readers__finalize_spec");
      begin
         F72;
      end;
      E669 := E669 - 1;
      declare
         procedure F73;
         pragma Import (Ada, F73, "gpr_parser_support__file_readers__finalize_spec");
      begin
         F73;
      end;
      E616 := E616 - 1;
      declare
         procedure F74;
         pragma Import (Ada, F74, "gpr_parser_support__diagnostics__finalize_spec");
      begin
         F74;
      end;
      E720 := E720 - 1;
      declare
         procedure F75;
         pragma Import (Ada, F75, "gpr_parser_adasat__builders__finalize_spec");
      begin
         F75;
      end;
      declare
         procedure F76;
         pragma Import (Ada, F76, "gpr_parser_adasat__internals__finalize_spec");
      begin
         E704 := E704 - 1;
         F76;
      end;
      E710 := E710 - 1;
      declare
         procedure F77;
         pragma Import (Ada, F77, "gpr_parser_adasat__formulas__finalize_spec");
      begin
         F77;
      end;
      declare
         procedure F78;
         pragma Import (Ada, F78, "gpr2__view_ids__dags__finalize_body");
      begin
         E818 := E818 - 1;
         F78;
      end;
      declare
         procedure F79;
         pragma Import (Ada, F79, "gpr2__view_ids__dags__finalize_spec");
      begin
         F79;
      end;
      E813 := E813 - 1;
      declare
         procedure F80;
         pragma Import (Ada, F80, "gpr2__view_ids__vector__finalize_spec");
      begin
         F80;
      end;
      E807 := E807 - 1;
      declare
         procedure F81;
         pragma Import (Ada, F81, "gpr2__view_ids__set__finalize_spec");
      begin
         F81;
      end;
      declare
         procedure F82;
         pragma Import (Ada, F82, "gpr2__view_base_internal__finalize_spec");
      begin
         E803 := E803 - 1;
         F82;
      end;
      E826 := E826 - 1;
      declare
         procedure F83;
         pragma Import (Ada, F83, "gpr2__utils__hash__finalize_spec");
      begin
         F83;
      end;
      E859 := E859 - 1;
      declare
         procedure F84;
         pragma Import (Ada, F84, "gpr2__project__registry__pack__description__finalize_spec");
      begin
         F84;
      end;
      declare
         procedure F85;
         pragma Import (Ada, F85, "gpr2__project__registry__pack__finalize_body");
      begin
         E587 := E587 - 1;
         F85;
      end;
      declare
         procedure F86;
         pragma Import (Ada, F86, "gpr2__project__import__set__finalize_body");
      begin
         E765 := E765 - 1;
         F86;
      end;
      declare
         procedure F87;
         pragma Import (Ada, F87, "gpr2__project__import__set__finalize_spec");
      begin
         F87;
      end;
      E763 := E763 - 1;
      declare
         procedure F88;
         pragma Import (Ada, F88, "gpr2__project__import__finalize_spec");
      begin
         F88;
      end;
      E756 := E756 - 1;
      declare
         procedure F89;
         pragma Import (Ada, F89, "gpr2__project__attribute_index__finalize_spec");
      begin
         F89;
      end;
      E252 := E252 - 1;
      declare
         procedure F90;
         pragma Import (Ada, F90, "gpr2__build__ali_parser__finalize_spec");
      begin
         F90;
      end;
      declare
         procedure F91;
         pragma Import (Ada, F91, "gpr2__log__finalize_body");
      begin
         E394 := E394 - 1;
         F91;
      end;
      declare
         procedure F92;
         pragma Import (Ada, F92, "gpr2__log__finalize_spec");
      begin
         F92;
      end;
      E431 := E431 - 1;
      declare
         procedure F93;
         pragma Import (Ada, F93, "gpr2__context__finalize_spec");
      begin
         F93;
      end;
      declare
         procedure F94;
         pragma Import (Ada, F94, "gpr2__build__unit_info__list__finalize_body");
      begin
         E602 := E602 - 1;
         F94;
      end;
      declare
         procedure F95;
         pragma Import (Ada, F95, "gpr2__build__unit_info__list__finalize_spec");
      begin
         F95;
      end;
      E600 := E600 - 1;
      declare
         procedure F96;
         pragma Import (Ada, F96, "gpr2__build__unit_info__finalize_spec");
      begin
         F96;
      end;
      E398 := E398 - 1;
      declare
         procedure F97;
         pragma Import (Ada, F97, "gpr2__containers__finalize_spec");
      begin
         F97;
      end;
      declare
         procedure F98;
         pragma Import (Ada, F98, "gpr2__source_reference__value__finalize_spec");
      begin
         E402 := E402 - 1;
         F98;
      end;
      E776 := E776 - 1;
      declare
         procedure F99;
         pragma Import (Ada, F99, "gpr2__source_reference__identifier__finalize_spec");
      begin
         F99;
      end;
      declare
         procedure F100;
         pragma Import (Ada, F100, "gpr2__source_reference__pack__finalize_spec");
      begin
         E780 := E780 - 1;
         F100;
      end;
      declare
         procedure F101;
         pragma Import (Ada, F101, "gpr2__source_reference__attribute__finalize_spec");
      begin
         E790 := E790 - 1;
         F101;
      end;
      declare
         procedure F102;
         pragma Import (Ada, F102, "gpr2__message__reporter__finalize_body");
      begin
         E396 := E396 - 1;
         F102;
      end;
      declare
         procedure F103;
         pragma Import (Ada, F103, "gpr2__message__reporter__finalize_spec");
      begin
         F103;
      end;
      E298 := E298 - 1;
      declare
         procedure F104;
         pragma Import (Ada, F104, "gpr2__message__finalize_spec");
      begin
         F104;
      end;
      E349 := E349 - 1;
      declare
         procedure F105;
         pragma Import (Ada, F105, "gpr2__source_reference__finalize_spec");
      begin
         F105;
      end;
      E426 := E426 - 1;
      declare
         procedure F106;
         pragma Import (Ada, F106, "gpr2__path_name__set__finalize_spec");
      begin
         F106;
      end;
      E351 := E351 - 1;
      declare
         procedure F107;
         pragma Import (Ada, F107, "gpr2__path_name__finalize_spec");
      begin
         F107;
      end;
      E414 := E414 - 1;
      declare
         procedure F108;
         pragma Import (Ada, F108, "gpr2__environment__finalize_spec");
      begin
         F108;
      end;
      E157 := E157 - 1;
      declare
         procedure F109;
         pragma Import (Ada, F109, "gpr2__finalize_spec");
      begin
         F109;
      end;
      declare
         procedure F110;
         pragma Import (Ada, F110, "gnatcoll__traces__finalize_body");
      begin
         E435 := E435 - 1;
         F110;
      end;
      declare
         procedure F111;
         pragma Import (Ada, F111, "gnatcoll__traces__finalize_spec");
      begin
         F111;
      end;
      E368 := E368 - 1;
      declare
         procedure F112;
         pragma Import (Ada, F112, "gnatcoll__vfs__finalize_spec");
      begin
         F112;
      end;
      E375 := E375 - 1;
      declare
         procedure F113;
         pragma Import (Ada, F113, "gnatcoll__io__remote__finalize_spec");
      begin
         F113;
      end;
      declare
         procedure F114;
         pragma Import (Ada, F114, "gnatcoll__remote__finalize_spec");
      begin
         E384 := E384 - 1;
         F114;
      end;
      E379 := E379 - 1;
      declare
         procedure F115;
         pragma Import (Ada, F115, "gnatcoll__io__native__finalize_spec");
      begin
         F115;
      end;
      E372 := E372 - 1;
      declare
         procedure F116;
         pragma Import (Ada, F116, "gnatcoll__io__finalize_spec");
      begin
         F116;
      end;
      E450 := E450 - 1;
      declare
         procedure F117;
         pragma Import (Ada, F117, "gnatcoll__terminal__finalize_spec");
      begin
         F117;
      end;
      E848 := E848 - 1;
      declare
         procedure F118;
         pragma Import (Ada, F118, "gnatcoll__json__finalize_spec");
      begin
         F118;
      end;
      E254 := E254 - 1;
      declare
         procedure F119;
         pragma Import (Ada, F119, "gnatcoll__buffer__finalize_spec");
      begin
         F119;
      end;
      E269 := E269 - 1;
      declare
         procedure F120;
         pragma Import (Ada, F120, "gnatcoll__strings__finalize_spec");
      begin
         F120;
      end;
      E828 := E828 - 1;
      declare
         procedure F121;
         pragma Import (Ada, F121, "gnatcoll__file_indexes__finalize_spec");
      begin
         F121;
      end;
      E416 := E416 - 1;
      declare
         procedure F122;
         pragma Import (Ada, F122, "gnatcoll__os__process__finalize_spec");
      begin
         F122;
      end;
      E844 := E844 - 1;
      declare
         procedure F123;
         pragma Import (Ada, F123, "gnatcoll__hash__blake3__finalize_spec");
      begin
         F123;
      end;
      E275 := E275 - 1;
      declare
         procedure F124;
         pragma Import (Ada, F124, "gnatcoll__refcount__finalize_spec");
      begin
         F124;
      end;
      declare
         procedure F125;
         pragma Import (Ada, F125, "gnatcoll__memory__finalize_body");
      begin
         E439 := E439 - 1;
         F125;
      end;
      declare
         procedure F126;
         pragma Import (Ada, F126, "gnatcoll__directed_graph__finalize_body");
      begin
         E595 := E595 - 1;
         F126;
      end;
      declare
         procedure F127;
         pragma Import (Ada, F127, "gnatcoll__directed_graph__finalize_spec");
      begin
         F127;
      end;
      E698 := E698 - 1;
      declare
         procedure F128;
         pragma Import (Ada, F128, "gnatcoll__gmp__integers__finalize_spec");
      begin
         F128;
      end;
      declare
         procedure F129;
         pragma Import (Ada, F129, "ada__directories__finalize_body");
      begin
         E159 := E159 - 1;
         F129;
      end;
      declare
         procedure F130;
         pragma Import (Ada, F130, "ada__directories__finalize_spec");
      begin
         F130;
      end;
      E183 := E183 - 1;
      declare
         procedure F131;
         pragma Import (Ada, F131, "system__regexp__finalize_spec");
      begin
         F131;
      end;
      E300 := E300 - 1;
      declare
         procedure F132;
         pragma Import (Ada, F132, "gnat__formatted_string__finalize_spec");
      begin
         F132;
      end;
      E236 := E236 - 1;
      declare
         procedure F133;
         pragma Import (Ada, F133, "gnat__expect__finalize_spec");
      begin
         F133;
      end;
      E245 := E245 - 1;
      declare
         procedure F134;
         pragma Import (Ada, F134, "system__pool_global__finalize_spec");
      begin
         F134;
      end;
      declare
         procedure F135;
         pragma Import (Ada, F135, "gnat__debug_pools__finalize_body");
      begin
         E441 := E441 - 1;
         F135;
      end;
      declare
         procedure F136;
         pragma Import (Ada, F136, "gnat__debug_pools__finalize_spec");
      begin
         F136;
      end;
      E400 := E400 - 1;
      declare
         procedure F137;
         pragma Import (Ada, F137, "gnat__string_split__finalize_spec");
      begin
         F137;
      end;
      E837 := E837 - 1;
      declare
         procedure F138;
         pragma Import (Ada, F138, "gnat__sha256__finalize_spec");
      begin
         F138;
      end;
      E833 := E833 - 1;
      declare
         procedure F139;
         pragma Import (Ada, F139, "gnat__sha1__finalize_spec");
      begin
         F139;
      end;
      E359 := E359 - 1;
      declare
         procedure F140;
         pragma Import (Ada, F140, "gnat__md5__finalize_spec");
      begin
         F140;
      end;
      E150 := E150 - 1;
      declare
         procedure F141;
         pragma Import (Ada, F141, "ada__text_io__finalize_spec");
      begin
         F141;
      end;
      E639 := E639 - 1;
      declare
         procedure F142;
         pragma Import (Ada, F142, "ada__strings__wide_wide_unbounded__finalize_spec");
      begin
         F142;
      end;
      E622 := E622 - 1;
      declare
         procedure F143;
         pragma Import (Ada, F143, "ada__strings__wide_wide_maps__finalize_spec");
      begin
         F143;
      end;
      E119 := E119 - 1;
      declare
         procedure F144;
         pragma Import (Ada, F144, "ada__strings__unbounded__finalize_spec");
      begin
         F144;
      end;
      E187 := E187 - 1;
      declare
         procedure F145;
         pragma Import (Ada, F145, "system__storage_pools__subpools__finalize_spec");
      begin
         F145;
      end;
      E353 := E353 - 1;
      declare
         procedure F146;
         pragma Import (Ada, F146, "ada__streams__stream_io__finalize_spec");
      begin
         F146;
      end;
      declare
         procedure F147;
         pragma Import (Ada, F147, "system__file_io__finalize_body");
      begin
         E154 := E154 - 1;
         F147;
      end;
      E127 := E127 - 1;
      declare
         procedure F148;
         pragma Import (Ada, F148, "system__finalization_primitives__finalize_spec");
      begin
         F148;
      end;
      declare
         procedure Reraise_Library_Exception_If_Any;
            pragma Import (Ada, Reraise_Library_Exception_If_Any, "__gnat_reraise_library_exception_if_any");
      begin
         Reraise_Library_Exception_If_Any;
      end;
   end finalize_library;

   procedure adafinal is
      procedure s_stalib_adafinal;
      pragma Import (Ada, s_stalib_adafinal, "system__standard_library__adafinal");

      procedure Runtime_Finalize;
      pragma Import (C, Runtime_Finalize, "__gnat_runtime_finalize");

   begin
      if not Is_Elaborated then
         return;
      end if;
      Is_Elaborated := False;
      Runtime_Finalize;
      s_stalib_adafinal;
   end adafinal;

   type No_Param_Proc is access procedure;
   pragma Favor_Top_Level (No_Param_Proc);

   procedure adainit is
      Main_Priority : Integer;
      pragma Import (C, Main_Priority, "__gl_main_priority");
      Time_Slice_Value : Integer;
      pragma Import (C, Time_Slice_Value, "__gl_time_slice_val");
      WC_Encoding : Character;
      pragma Import (C, WC_Encoding, "__gl_wc_encoding");
      Locking_Policy : Character;
      pragma Import (C, Locking_Policy, "__gl_locking_policy");
      Queuing_Policy : Character;
      pragma Import (C, Queuing_Policy, "__gl_queuing_policy");
      Task_Dispatching_Policy : Character;
      pragma Import (C, Task_Dispatching_Policy, "__gl_task_dispatching_policy");
      Priority_Specific_Dispatching : System.Address;
      pragma Import (C, Priority_Specific_Dispatching, "__gl_priority_specific_dispatching");
      Num_Specific_Dispatching : Integer;
      pragma Import (C, Num_Specific_Dispatching, "__gl_num_specific_dispatching");
      Main_CPU : Integer;
      pragma Import (C, Main_CPU, "__gl_main_cpu");
      Interrupt_States : System.Address;
      pragma Import (C, Interrupt_States, "__gl_interrupt_states");
      Num_Interrupt_States : Integer;
      pragma Import (C, Num_Interrupt_States, "__gl_num_interrupt_states");
      Unreserve_All_Interrupts : Integer;
      pragma Import (C, Unreserve_All_Interrupts, "__gl_unreserve_all_interrupts");
      Detect_Blocking : Integer;
      pragma Import (C, Detect_Blocking, "__gl_detect_blocking");
      Default_Stack_Size : Integer;
      pragma Import (C, Default_Stack_Size, "__gl_default_stack_size");
      Default_Secondary_Stack_Size : System.Parameters.Size_Type;
      pragma Import (C, Default_Secondary_Stack_Size, "__gnat_default_ss_size");
      Bind_Env_Addr : System.Address;
      pragma Import (C, Bind_Env_Addr, "__gl_bind_env_addr");
      Interrupts_Default_To_System : Integer;
      pragma Import (C, Interrupts_Default_To_System, "__gl_interrupts_default_to_system");

      procedure Runtime_Initialize (Install_Handler : Integer);
      pragma Import (C, Runtime_Initialize, "__gnat_runtime_initialize");

      procedure Tasking_Runtime_Initialize;
      pragma Import (C, Tasking_Runtime_Initialize, "__gnat_tasking_runtime_initialize");

      Finalize_Library_Objects : No_Param_Proc;
      pragma Import (C, Finalize_Library_Objects, "__gnat_finalize_library_objects");
      Binder_Sec_Stacks_Count : Natural;
      pragma Import (Ada, Binder_Sec_Stacks_Count, "__gnat_binder_ss_count");
      Default_Sized_SS_Pool : System.Address;
      pragma Import (Ada, Default_Sized_SS_Pool, "__gnat_default_ss_pool");

   begin
      if Is_Elaborated then
         return;
      end if;
      Is_Elaborated := True;
      Main_Priority := -1;
      Time_Slice_Value := -1;
      WC_Encoding := 'b';
      Locking_Policy := ' ';
      Queuing_Policy := ' ';
      Task_Dispatching_Policy := ' ';
      Priority_Specific_Dispatching :=
        Local_Priority_Specific_Dispatching'Address;
      Num_Specific_Dispatching := 0;
      Main_CPU := -1;
      Interrupt_States := Local_Interrupt_States'Address;
      Num_Interrupt_States := 0;
      Unreserve_All_Interrupts := 0;
      Detect_Blocking := 0;
      Default_Stack_Size := -1;

      ada_main'Elab_Body;
      Default_Secondary_Stack_Size := System.Parameters.Runtime_Default_Sec_Stack_Size;
      Binder_Sec_Stacks_Count := 1;
      Default_Sized_SS_Pool := Sec_Default_Sized_Stacks'Address;

      Runtime_Initialize (1);
      Tasking_Runtime_Initialize;

      Finalize_Library_Objects := finalize_library'access;

      Ada.Exceptions'Elab_Spec;
      System.Soft_Links'Elab_Spec;
      System.Exception_Table'Elab_Body;
      E022 := E022 + 1;
      Ada.Containers'Elab_Spec;
      E038 := E038 + 1;
      Ada.Io_Exceptions'Elab_Spec;
      E068 := E068 + 1;
      Ada.Numerics'Elab_Spec;
      E029 := E029 + 1;
      Ada.Strings'Elab_Spec;
      E053 := E053 + 1;
      Ada.Strings.Maps'Elab_Spec;
      E055 := E055 + 1;
      Ada.Strings.Maps.Constants'Elab_Spec;
      E058 := E058 + 1;
      Interfaces.C'Elab_Spec;
      E043 := E043 + 1;
      System.Exceptions'Elab_Spec;
      E023 := E023 + 1;
      System.Object_Reader'Elab_Spec;
      E084 := E084 + 1;
      System.Dwarf_Lines'Elab_Spec;
      E048 := E048 + 1;
      System.Os_Lib'Elab_Body;
      E073 := E073 + 1;
      System.Soft_Links.Initialize'Elab_Body;
      E018 := E018 + 1;
      E011 := E011 + 1;
      System.Traceback.Symbolic'Elab_Body;
      E037 := E037 + 1;
      E006 := E006 + 1;
      Ada.Assertions'Elab_Spec;
      E197 := E197 + 1;
      Ada.Strings.Utf_Encoding'Elab_Spec;
      E105 := E105 + 1;
      Ada.Tags'Elab_Spec;
      Ada.Tags'Elab_Body;
      E113 := E113 + 1;
      Ada.Strings.Text_Buffers'Elab_Spec;
      E103 := E103 + 1;
      Gnat'Elab_Spec;
      E192 := E192 + 1;
      Interfaces.C.Strings'Elab_Spec;
      E220 := E220 + 1;
      Ada.Streams'Elab_Spec;
      E130 := E130 + 1;
      System.File_Control_Block'Elab_Spec;
      E155 := E155 + 1;
      System.Finalization_Root'Elab_Spec;
      E136 := E136 + 1;
      Ada.Finalization'Elab_Spec;
      E128 := E128 + 1;
      System.Finalization_Primitives'Elab_Spec;
      E127 := E127 + 1;
      System.File_Io'Elab_Body;
      E154 := E154 + 1;
      Ada.Streams.Stream_Io'Elab_Spec;
      E353 := E353 + 1;
      System.Storage_Pools'Elab_Spec;
      E185 := E185 + 1;
      System.Storage_Pools.Subpools'Elab_Spec;
      E187 := E187 + 1;
      Ada.Strings.Unbounded'Elab_Spec;
      E119 := E119 + 1;
      Ada.Strings.Wide_Wide_Maps'Elab_Spec;
      E622 := E622 + 1;
      Ada.Strings.Wide_Wide_Unbounded'Elab_Spec;
      E639 := E639 + 1;
      System.Task_Info'Elab_Spec;
      E292 := E292 + 1;
      System.Regpat'Elab_Spec;
      E241 := E241 + 1;
      Ada.Calendar'Elab_Spec;
      Ada.Calendar'Elab_Body;
      E161 := E161 + 1;
      Ada.Calendar.Delays'Elab_Body;
      E673 := E673 + 1;
      Ada.Calendar.Time_Zones'Elab_Spec;
      E167 := E167 + 1;
      Ada.Text_Io'Elab_Spec;
      Ada.Text_Io'Elab_Body;
      E150 := E150 + 1;
      Ada.Text_Io.Text_Streams'Elab_Spec;
      E502 := E502 + 1;
      E671 := E671 + 1;
      Gnat.Calendar'Elab_Spec;
      E222 := E222 + 1;
      Gnat.Directory_Operations'Elab_Spec;
      Gnat.Directory_Operations'Elab_Body;
      E377 := E377 + 1;
      E567 := E567 + 1;
      E361 := E361 + 1;
      E363 := E363 + 1;
      Gnat.Md5'Elab_Spec;
      E359 := E359 + 1;
      E835 := E835 + 1;
      E841 := E841 + 1;
      E839 := E839 + 1;
      Gnat.Sha1'Elab_Spec;
      E833 := E833 + 1;
      Gnat.Sha256'Elab_Spec;
      E837 := E837 + 1;
      Gnat.String_Split'Elab_Spec;
      E400 := E400 + 1;
      System.Checked_Pools'Elab_Spec;
      E446 := E446 + 1;
      System.Task_Primitives.Operations'Elab_Body;
      E286 := E286 + 1;
      Gnat.Calendar.Time_Io'Elab_Spec;
      E225 := E225 + 1;
      Gnat.Debug_Pools'Elab_Spec;
      Gnat.Debug_Pools'Elab_Body;
      E441 := E441 + 1;
      System.Pool_Global'Elab_Spec;
      System.Pool_Global'Elab_Body;
      E245 := E245 + 1;
      Gnat.Expect'Elab_Spec;
      Gnat.Expect'Elab_Body;
      E236 := E236 + 1;
      Gnat.Formatted_String'Elab_Spec;
      Gnat.Formatted_String'Elab_Body;
      E300 := E300 + 1;
      System.Random_Seed'Elab_Body;
      E392 := E392 + 1;
      System.Regexp'Elab_Spec;
      System.Regexp'Elab_Body;
      E183 := E183 + 1;
      Ada.Directories'Elab_Spec;
      Ada.Directories'Elab_Body;
      E159 := E159 + 1;
      System.Tasking.Protected_Objects'Elab_Body;
      E785 := E785 + 1;
      GNATCOLL.GMP.INTEGERS'ELAB_SPEC;
      E698 := E698 + 1;
      Gpr_Parser_Support.Errors'Elab_Spec;
      E666 := E666 + 1;
      Unicode'Elab_Body;
      E469 := E469 + 1;
      E271 := E271 + 1;
      GNATCOLL.DIRECTED_GRAPH'ELAB_SPEC;
      GNATCOLL.DIRECTED_GRAPH'ELAB_BODY;
      E595 := E595 + 1;
      GNATCOLL.MEMORY'ELAB_BODY;
      E439 := E439 + 1;
      GNATCOLL.OS'ELAB_SPEC;
      E232 := E232 + 1;
      E277 := E277 + 1;
      GNATCOLL.REFCOUNT'ELAB_SPEC;
      E275 := E275 + 1;
      E231 := E231 + 1;
      E261 := E261 + 1;
      GNATCOLL.HASH.BLAKE3'ELAB_SPEC;
      E844 := E844 + 1;
      E256 := E256 + 1;
      E794 := E794 + 1;
      E424 := E424 + 1;
      E422 := E422 + 1;
      GNATCOLL.OS.PROCESS'ELAB_SPEC;
      E416 := E416 + 1;
      E273 := E273 + 1;
      GNATCOLL.OS.FSUTIL'ELAB_BODY;
      E830 := E830 + 1;
      GNATCOLL.FILE_INDEXES'ELAB_SPEC;
      E828 := E828 + 1;
      GNATCOLL.STRINGS'ELAB_SPEC;
      GNATCOLL.STRINGS'ELAB_BODY;
      E269 := E269 + 1;
      GNATCOLL.MMAP'ELAB_SPEC;
      E267 := E267 + 1;
      E265 := E265 + 1;
      GNATCOLL.BUFFER'ELAB_SPEC;
      GNATCOLL.BUFFER'ELAB_BODY;
      E254 := E254 + 1;
      GNATCOLL.JSON'ELAB_SPEC;
      E850 := E850 + 1;
      GNATCOLL.JSON'ELAB_BODY;
      E848 := E848 + 1;
      GNATCOLL.TEMPLATES'ELAB_SPEC;
      E448 := E448 + 1;
      GNATCOLL.TERMINAL'ELAB_SPEC;
      GNATCOLL.TERMINAL'ELAB_BODY;
      E450 := E450 + 1;
      E410 := E410 + 1;
      E214 := E214 + 1;
      GNATCOLL.IO'ELAB_SPEC;
      GNATCOLL.IO'ELAB_BODY;
      E372 := E372 + 1;
      GNATCOLL.PATH'ELAB_SPEC;
      GNATCOLL.PATH'ELAB_BODY;
      E381 := E381 + 1;
      GNATCOLL.IO.NATIVE'ELAB_SPEC;
      GNATCOLL.IO.NATIVE'ELAB_BODY;
      E379 := E379 + 1;
      GNATCOLL.REMOTE'ELAB_SPEC;
      E384 := E384 + 1;
      GNATCOLL.REMOTE.DB'ELAB_SPEC;
      E388 := E388 + 1;
      GNATCOLL.IO.REMOTE'ELAB_SPEC;
      E383 := E383 + 1;
      E386 := E386 + 1;
      GNATCOLL.IO.REMOTE'ELAB_BODY;
      E375 := E375 + 1;
      GNATCOLL.VFS'ELAB_SPEC;
      GNATCOLL.VFS'ELAB_BODY;
      E368 := E368 + 1;
      GNATCOLL.TRACES'ELAB_SPEC;
      GNATCOLL.TRACES'ELAB_BODY;
      E435 := E435 + 1;
      GNATCOLL.ICONV'ELAB_SPEC;
      GNATCOLL.ICONV'ELAB_BODY;
      E635 := E635 + 1;
      GNATCOLL.VFS_UTILS'ELAB_SPEC;
      E454 := E454 + 1;
      GPR2'ELAB_SPEC;
      GPR2'ELAB_BODY;
      E157 := E157 + 1;
      GPR2.ENVIRONMENT'ELAB_SPEC;
      GPR2.ENVIRONMENT'ELAB_BODY;
      E414 := E414 + 1;
      GPR2.PATH_NAME'ELAB_SPEC;
      GPR2.PATH_NAME'ELAB_BODY;
      E351 := E351 + 1;
      GPR2.PATH_NAME.SET'ELAB_SPEC;
      E426 := E426 + 1;
      GPR2.SOURCE_REFERENCE'ELAB_SPEC;
      GPR2.SOURCE_REFERENCE'ELAB_BODY;
      E349 := E349 + 1;
      GPR2.MESSAGE'ELAB_SPEC;
      GPR2.MESSAGE'ELAB_BODY;
      E298 := E298 + 1;
      GPR2.MESSAGE.REPORTER'ELAB_SPEC;
      GPR2.MESSAGE.REPORTER'ELAB_BODY;
      E396 := E396 + 1;
      GPR2.SOURCE_REFERENCE.ATTRIBUTE'ELAB_SPEC;
      E790 := E790 + 1;
      GPR2.SOURCE_REFERENCE.PACK'ELAB_SPEC;
      E780 := E780 + 1;
      E404 := E404 + 1;
      GPR2.SOURCE_REFERENCE.IDENTIFIER'ELAB_SPEC;
      E776 := E776 + 1;
      GPR2.SOURCE_REFERENCE.VALUE'ELAB_SPEC;
      E402 := E402 + 1;
      GPR2.CONTAINERS'ELAB_SPEC;
      E398 := E398 + 1;
      GPR2.BUILD.UNIT_INFO'ELAB_SPEC;
      GPR2.BUILD.UNIT_INFO'ELAB_BODY;
      E600 := E600 + 1;
      GPR2.BUILD.UNIT_INFO.LIST'ELAB_SPEC;
      GPR2.BUILD.UNIT_INFO.LIST'ELAB_BODY;
      E602 := E602 + 1;
      GPR2.CONTEXT'ELAB_SPEC;
      GPR2.CONTEXT'ELAB_BODY;
      E431 := E431 + 1;
      E769 := E769 + 1;
      GPR2.LOG'ELAB_SPEC;
      GPR2.LOG'ELAB_BODY;
      E394 := E394 + 1;
      GPR2.BUILD.ALI_PARSER'ELAB_SPEC;
      GPR2.BUILD.ALI_PARSER'ELAB_BODY;
      E252 := E252 + 1;
      GPR2.PROJECT'ELAB_SPEC;
      E408 := E408 + 1;
      GPR2.PROJECT.ATTRIBUTE_INDEX'ELAB_SPEC;
      GPR2.PROJECT.ATTRIBUTE_INDEX'ELAB_BODY;
      E756 := E756 + 1;
      GPR2.PROJECT.IMPORT'ELAB_SPEC;
      GPR2.PROJECT.IMPORT'ELAB_BODY;
      E763 := E763 + 1;
      GPR2.PROJECT.IMPORT.SET'ELAB_SPEC;
      GPR2.PROJECT.IMPORT.SET'ELAB_BODY;
      E765 := E765 + 1;
      GPR2.PROJECT.REGISTRY.PACK'ELAB_SPEC;
      GPR2.PROJECT.REGISTRY.PACK'ELAB_BODY;
      E587 := E587 + 1;
      GPR2.PROJECT.REGISTRY.PACK.DESCRIPTION'ELAB_SPEC;
      GPR2.PROJECT.REGISTRY.PACK.DESCRIPTION'ELAB_BODY;
      E859 := E859 + 1;
      GPR2.UTILS.HASH'ELAB_SPEC;
      E826 := E826 + 1;
      GPR2.BUILD.ARTIFACTS'ELAB_SPEC;
      E823 := E823 + 1;
      GPR2.VIEW_BASE_INTERNAL'ELAB_SPEC;
      E803 := E803 + 1;
      GPR2.VIEW_IDS'ELAB_SPEC;
      E805 := E805 + 1;
      GPR2.VIEW_IDS.SET'ELAB_SPEC;
      E807 := E807 + 1;
      GPR2.VIEW_IDS.VECTOR'ELAB_SPEC;
      E813 := E813 + 1;
      GPR2.VIEW_IDS.DAGS'ELAB_SPEC;
      GPR2.VIEW_IDS.DAGS'ELAB_BODY;
      E818 := E818 + 1;
      E703 := E703 + 1;
      E708 := E708 + 1;
      E706 := E706 + 1;
      Gpr_Parser_Adasat.Formulas'Elab_Spec;
      E710 := E710 + 1;
      Gpr_Parser_Adasat.Internals'Elab_Spec;
      E704 := E704 + 1;
      Gpr_Parser_Adasat.Builders'Elab_Spec;
      Gpr_Parser_Adasat.Builders'Elab_Body;
      E720 := E720 + 1;
      E701 := E701 + 1;
      Gpr_Parser_Support.Adalog'Elab_Spec;
      E712 := E712 + 1;
      E714 := E714 + 1;
      E716 := E716 + 1;
      E724 := E724 + 1;
      E726 := E726 + 1;
      E679 := E679 + 1;
      E722 := E722 + 1;
      E742 := E742 + 1;
      E732 := E732 + 1;
      Gpr_Parser_Support.Text'Elab_Spec;
      E628 := E628 + 1;
      Gpr_Parser_Support.Names'Elab_Spec;
      E693 := E693 + 1;
      E618 := E618 + 1;
      Gpr_Parser_Support.Diagnostics'Elab_Spec;
      E616 := E616 + 1;
      Gpr_Parser_Support.File_Readers'Elab_Spec;
      E669 := E669 + 1;
      GPR2.FILE_READERS'ELAB_SPEC;
      GPR2.FILE_READERS'ELAB_BODY;
      E754 := E754 + 1;
      E683 := E683 + 1;
      E718 := E718 + 1;
      E728 := E728 + 1;
      E746 := E746 + 1;
      Gpr_Parser_Support.Bump_Ptr'Elab_Spec;
      E744 := E744 + 1;
      Gpr_Parser_Support.Lexical_Envs'Elab_Spec;
      E680 := E680 + 1;
      Gpr_Parser_Support.Symbols'Elab_Spec;
      E687 := E687 + 1;
      E730 := E730 + 1;
      E734 := E734 + 1;
      Gpr_Parser_Support.Token_Data_Handlers'Elab_Spec;
      E685 := E685 + 1;
      Gpr_Parser_Support.Generic_Api'Elab_Spec;
      Gpr_Parser_Support.Internal.Analysis'Elab_Spec;
      Gpr_Parser_Support.Generic_Api.Analysis'Elab_Spec;
      Gpr_Parser_Support.Generic_Api.Introspection'Elab_Spec;
      Gpr_Parser_Support.Internal.Introspection'Elab_Spec;
      E665 := E665 + 1;
      Gpr_Parser_Support.Generic_Api.Analysis'Elab_Body;
      E691 := E691 + 1;
      Gpr_Parser_Support.Generic_Api.Introspection'Elab_Body;
      E675 := E675 + 1;
      E677 := E677 + 1;
      Gpr_Parser_Support.Internal.Introspection'Elab_Body;
      E695 := E695 + 1;
      E738 := E738 + 1;
      Gpr_Parser.Parsers'Elab_Spec;
      Gpr_Parser.Implementation'Elab_Spec;
      E750 := E750 + 1;
      Gpr_Parser.Analysis'Elab_Spec;
      Gpr_Parser.Generic_Introspection'Elab_Spec;
      E736 := E736 + 1;
      E662 := E662 + 1;
      Gpr_Parser.Common'Elab_Body;
      E649 := E649 + 1;
      Gpr_Parser.Generic_Impl'Elab_Spec;
      Gpr_Parser.Implementation'Elab_Body;
      E657 := E657 + 1;
      Gpr_Parser.Parsers'Elab_Body;
      E740 := E740 + 1;
      Gpr_Parser.Public_Converters'Elab_Spec;
      Gpr_Parser.Public_Converters'Elab_Body;
      E748 := E748 + 1;
      Gpr_Parser.Analysis'Elab_Body;
      E645 := E645 + 1;
      E651 := E651 + 1;
      E653 := E653 + 1;
      Gpr_Parser.Generic_Introspection'Elab_Body;
      E655 := E655 + 1;
      E752 := E752 + 1;
      E486 := E486 + 1;
      Sax.Pointers'Elab_Spec;
      Sax.Pointers'Elab_Body;
      E490 := E490 + 1;
      E571 := E571 + 1;
      Schema'Elab_Spec;
      E550 := E550 + 1;
      Unicode.Ccs'Elab_Spec;
      E482 := E482 + 1;
      E506 := E506 + 1;
      E508 := E508 + 1;
      E513 := E513 + 1;
      E516 := E516 + 1;
      E518 := E518 + 1;
      E520 := E520 + 1;
      E525 := E525 + 1;
      Unicode.Ces'Elab_Spec;
      E478 := E478 + 1;
      Sax.Symbols'Elab_Spec;
      Sax.Symbols'Elab_Body;
      E488 := E488 + 1;
      E548 := E548 + 1;
      Sax.Exceptions'Elab_Spec;
      Sax.Exceptions'Elab_Body;
      E546 := E546 + 1;
      E480 := E480 + 1;
      E528 := E528 + 1;
      E530 := E530 + 1;
      E484 := E484 + 1;
      Sax.Models'Elab_Spec;
      E544 := E544 + 1;
      Sax.Attributes'Elab_Spec;
      Sax.Attributes'Elab_Body;
      E542 := E542 + 1;
      Sax.Utils'Elab_Spec;
      Sax.Utils'Elab_Body;
      E492 := E492 + 1;
      DOM.CORE'ELAB_SPEC;
      E465 := E465 + 1;
      Schema.Date_Time'Elab_Spec;
      E562 := E562 + 1;
      E564 := E564 + 1;
      Schema.Simple_Types'Elab_Spec;
      E560 := E560 + 1;
      E504 := E504 + 1;
      E500 := E500 + 1;
      E498 := E498 + 1;
      E554 := E554 + 1;
      E496 := E496 + 1;
      E494 := E494 + 1;
      Input_Sources'Elab_Spec;
      Input_Sources'Elab_Body;
      E534 := E534 + 1;
      Input_Sources.File'Elab_Spec;
      Input_Sources.File'Elab_Body;
      E536 := E536 + 1;
      Input_Sources.Strings'Elab_Spec;
      Input_Sources.Strings'Elab_Body;
      E538 := E538 + 1;
      Sax.Readers'Elab_Spec;
      Sax.Readers'Elab_Body;
      E540 := E540 + 1;
      Schema.Validators'Elab_Spec;
      Schema.Readers'Elab_Spec;
      Schema.Schema_Readers'Elab_Spec;
      Schema.Schema_Readers'Elab_Body;
      E558 := E558 + 1;
      Schema.Readers'Elab_Body;
      E556 := E556 + 1;
      E573 := E573 + 1;
      Schema.Validators'Elab_Body;
      E569 := E569 + 1;
      Schema.Dom_Readers'Elab_Spec;
      Schema.Dom_Readers'Elab_Body;
      E552 := E552 + 1;
      GPR2.BUILD.SOURCE_BASE'ELAB_SPEC;
      E612 := E612 + 1;
      GPR2.PROJECT.REGISTRY.ATTRIBUTE'ELAB_SPEC;
      GPR2.PROJECT.ATTR_VALUES'ELAB_SPEC;
      GPR2.PROJECT.ATTR_VALUES'ELAB_BODY;
      E583 := E583 + 1;
      GPR2.PROJECT.ATTRIBUTE'ELAB_SPEC;
      GPR2.PROJECT.ATTRIBUTE'ELAB_BODY;
      E581 := E581 + 1;
      GPR2.PROJECT.ATTRIBUTE.SET'ELAB_SPEC;
      GPR2.PROJECT.ATTRIBUTE.SET'ELAB_BODY;
      E761 := E761 + 1;
      GPR2.PROJECT.ATTRIBUTE_CACHE'ELAB_SPEC;
      GPR2.PROJECT.ATTRIBUTE_CACHE'ELAB_BODY;
      E798 := E798 + 1;
      GPR2.PROJECT.NAME_VALUES'ELAB_SPEC;
      GPR2.PROJECT.NAME_VALUES'ELAB_BODY;
      E774 := E774 + 1;
      GPR2.PROJECT.REGISTRY.ATTRIBUTE.DESCRIPTION'ELAB_SPEC;
      GPR2.PROJECT.REGISTRY.ATTRIBUTE.DESCRIPTION'ELAB_BODY;
      E857 := E857 + 1;
      GPR2.PROJECT.TYP'ELAB_SPEC;
      GPR2.PROJECT.TYP'ELAB_BODY;
      E778 := E778 + 1;
      GPR2.PROJECT.TYP.SET'ELAB_SPEC;
      E801 := E801 + 1;
      GPR2.PROJECT.VARIABLE'ELAB_SPEC;
      GPR2.PROJECT.VARIABLE'ELAB_BODY;
      E772 := E772 + 1;
      GPR2.PROJECT.VARIABLE.SET'ELAB_SPEC;
      E779 := E779 + 1;
      GPR2.PACK_INTERNAL'ELAB_SPEC;
      E770 := E770 + 1;
      GPR2.PROJECT.VIEW'ELAB_SPEC;
      GPR2.BUILD.ACTIONS'ELAB_SPEC;
      GPR2.BUILD.COMPILATION_UNIT'ELAB_SPEC;
      GPR2.BUILD.COMPILATION_UNIT.MAPS'ELAB_SPEC;
      E608 := E608 + 1;
      GPR2.BUILD.SOURCE'ELAB_SPEC;
      E596 := E596 + 1;
      GPR2.PROJECT.REGISTRY.ATTRIBUTE'ELAB_BODY;
      E585 := E585 + 1;
      E846 := E846 + 1;
      GPR2.PROJECT.VIEW.SET'ELAB_SPEC;
      E605 := E605 + 1;
      GPR2.BUILD.VIEW_TABLES'ELAB_SPEC;
      GPR2.BUILD.VIEW_DB'ELAB_SPEC;
      GPR2.BUILD.SOURCE.SETS'ELAB_SPEC;
      GPR2.BUILD.TREE_DB'ELAB_SPEC;
      GPR2.BUILD.ACTIONS'ELAB_BODY;
      E822 := E822 + 1;
      GPR2.BUILD.SOURCE.SETS'ELAB_BODY;
      E604 := E604 + 1;
      GPR2.BUILD.SOURCE_BASE'ELAB_BODY;
      E598 := E598 + 1;
      GPR2.BUILD.VIEW_DB'ELAB_BODY;
      E607 := E607 + 1;
      GPR2.PROJECT.VIEW.VECTOR'ELAB_SPEC;
      E816 := E816 + 1;
      GPR2.PROJECT_PARSER'ELAB_SPEC;
      GPR2.PROJECT.CONFIGURATION'ELAB_SPEC;
      GPR2.KB'ELAB_SPEC;
      GPR2.KB.COMPILER_ITERATOR'ELAB_SPEC;
      GPR2.KB.COMPILER_ITERATOR'ELAB_BODY;
      E456 := E456 + 1;
      GPR2.KB.EMBEDDED'ELAB_SPEC;
      GPR2.KB.EMBEDDED'ELAB_BODY;
      E532 := E532 + 1;
      GPR2.KB.PARSING'ELAB_BODY;
      E462 := E462 + 1;
      GPR2.KB'ELAB_BODY;
      E433 := E433 + 1;
      GPR2.OPTIONS'ELAB_SPEC;
      GPR2.OPTIONS'ELAB_BODY;
      E406 := E406 + 1;
      E811 := E811 + 1;
      GPR2.PROJECT_PARSER.REGISTRY'ELAB_BODY;
      E783 := E783 + 1;
      GPR2.PROJECT_PARSER.SET'ELAB_SPEC;
      E802 := E802 + 1;
      GPR2.VIEW_INTERNAL'ELAB_SPEC;
      GPR2.PROJECT.CONFIGURATION'ELAB_BODY;
      E579 := E579 + 1;
      GPR2.TREE_INTERNAL'ELAB_SPEC;
      GPR2.BUILD.COMPILATION_UNIT'ELAB_BODY;
      E591 := E591 + 1;
      GPR2.BUILD.TREE_DB'ELAB_BODY;
      E593 := E593 + 1;
      GPR2.BUILD.VIEW_TABLES'ELAB_BODY;
      E610 := E610 + 1;
      GPR2.PROJECT.TREE'ELAB_SPEC;
      GPR2.PROJECT.TREE'ELAB_BODY;
      E815 := E815 + 1;
      GPR2.PROJECT.VIEW'ELAB_BODY;
      E589 := E589 + 1;
      GPR2.PROJECT_PARSER'ELAB_BODY;
      E767 := E767 + 1;
      GPR2.TREE_INTERNAL.VIEW_BUILDER'ELAB_SPEC;
      GPR2.TREE_INTERNAL.VIEW_BUILDER'ELAB_BODY;
      E809 := E809 + 1;
      GPR2.TREE_INTERNAL'ELAB_BODY;
      E758 := E758 + 1;
      GPR2.VIEW_INTERNAL'ELAB_BODY;
      E792 := E792 + 1;
   end adainit;

   procedure Ada_Main_Program;
   pragma Import (Ada, Ada_Main_Program, "_ada_test");

   function main
     (argc : Integer;
      argv : System.Address;
      envp : System.Address)
      return Integer
   is
      procedure Initialize (Addr : System.Address);
      pragma Import (C, Initialize, "__gnat_initialize");

      procedure Finalize;
      pragma Import (C, Finalize, "__gnat_finalize");
      SEH : aliased array (1 .. 2) of Integer;

      Ensure_Reference : aliased System.Address := Ada_Main_Program_Name'Address;
      pragma Volatile (Ensure_Reference);

   begin
      if gnat_argc = 0 then
         gnat_argc := argc;
         gnat_argv := argv;
      end if;
      gnat_envp := envp;

      Initialize (SEH'Address);
      adainit;
      Ada_Main_Program;
      adafinal;
      Finalize;
      return (gnat_exit_status);
   end;

--  BEGIN Object file/option list
   --   /home/jicquel/projects/gpr-next/testsuite/tests/ali_parser/imports/obj/test.o
   --   -L/home/jicquel/projects/gpr-next/testsuite/tests/ali_parser/imports/obj/
   --   -L/home/jicquel/projects/gpr-next/testsuite/tests/ali_parser/imports/obj/
   --   -L/home/jicquel/projects/gpr-next/.build/debug/lib-static/
   --   -L/home/jicquel/sandboxes/gpr-next/x86_64-linux/gnatcoll-core-current/install/lib/gnatcoll_core.static/
   --   -L/home/jicquel/sandboxes/gpr-next/x86_64-linux/gnatcoll-core-current/install/lib/gnatcoll_projects.static/
   --   -L/home/jicquel/sandboxes/gpr-next/x86_64-linux/libgpr-current/install/lib/gpr/static/gpr/
   --   -L/home/jicquel/sandboxes/gpr-next/x86_64-linux/gnat/install/lib/xmlada/xmlada_dom.static/
   --   -L/home/jicquel/sandboxes/gpr-next/x86_64-linux/gnat/install/lib/xmlada/xmlada_unicode.static/
   --   -L/home/jicquel/sandboxes/gpr-next/x86_64-linux/gnat/install/lib/xmlada/xmlada_sax.static/
   --   -L/home/jicquel/sandboxes/gpr-next/x86_64-linux/gnat/install/lib/xmlada/xmlada_input.static/
   --   -L/home/jicquel/sandboxes/gpr-next/x86_64-linux/gnat/install/lib/xmlada/xmlada_schema.static/
   --   -L/home/jicquel/sandboxes/gpr-next/x86_64-linux/gnatcoll-bindings-py3/install/lib/gnatcoll_iconv.static/
   --   -L/home/jicquel/sandboxes/gpr-next/x86_64-linux/gnatcoll-bindings-py3/install/lib/gnatcoll_gmp.static/
   --   -L/home/jicquel/sandboxes/gpr-next/x86_64-linux/gnat/install/lib/gcc/x86_64-pc-linux-gnu/13.3.1/adalib/
   --   -static
   --   -lgnarl
   --   -lgnat
   --   -lrt
   --   -lpthread
   --   -ldl
--  END Object file/option list   

end ada_main;