with System;
package ada_main is
   pragma Warnings (Off);

   gnat_argc : Integer;
   gnat_argv : System.Address;
   gnat_envp : System.Address;

   pragma Import (C, gnat_argc);
   pragma Import (C, gnat_argv);
   pragma Import (C, gnat_envp);

   gnat_exit_status : Integer;
   pragma Import (C, gnat_exit_status);

   GNAT_Version : constant String :=
                    "GNAT Version: GAP 1.0.0 (20040604)";
   pragma Export (C, GNAT_Version, "__gnat_version");

   Ada_Main_Program_Name : constant String := "_ada_gnatbind" & Ascii.NUL;
   pragma Export (C, Ada_Main_Program_Name, "__gnat_ada_main_program_name");

   procedure adafinal;
   pragma Export (C, adafinal, "adafinal");

   procedure adainit;
   pragma Export (C, adainit, "adainit");

   procedure Break_Start;
   pragma Import (C, Break_Start, "__gnat_break_start");

   function main
     (argc : Integer;
      argv : System.Address;
      envp : System.Address)
      return Integer;
   pragma Export (C, main, "main");

   type Version_32 is mod 2 ** 32;
   u00001 : constant Version_32 := 16#bd807703#;
   u00002 : constant Version_32 := 16#14054310#;
   u00003 : constant Version_32 := 16#a308e142#;
   u00004 : constant Version_32 := 16#6e012854#;
   u00005 : constant Version_32 := 16#0e59aeae#;
   u00006 : constant Version_32 := 16#0ef0f419#;
   u00007 : constant Version_32 := 16#0ff28bf9#;
   u00008 : constant Version_32 := 16#4d44a439#;
   u00009 : constant Version_32 := 16#4f3683fd#;
   u00010 : constant Version_32 := 16#9cf521d4#;
   u00011 : constant Version_32 := 16#5168b013#;
   u00012 : constant Version_32 := 16#1bbc5455#;
   u00013 : constant Version_32 := 16#fcfd3b9d#;
   u00014 : constant Version_32 := 16#01f64304#;
   u00015 : constant Version_32 := 16#bc5cf793#;
   u00016 : constant Version_32 := 16#8167c36c#;
   u00017 : constant Version_32 := 16#05ea3447#;
   u00018 : constant Version_32 := 16#4fbc0bea#;
   u00019 : constant Version_32 := 16#f905402e#;
   u00020 : constant Version_32 := 16#f855ef71#;
   u00021 : constant Version_32 := 16#26f3365a#;
   u00022 : constant Version_32 := 16#d2a2fed0#;
   u00023 : constant Version_32 := 16#69a85fad#;
   u00024 : constant Version_32 := 16#7298b6e3#;
   u00025 : constant Version_32 := 16#f0868a3f#;
   u00026 : constant Version_32 := 16#8968a3b7#;
   u00027 : constant Version_32 := 16#53464f1d#;
   u00028 : constant Version_32 := 16#1358e1f4#;
   u00029 : constant Version_32 := 16#0462b7f5#;
   u00030 : constant Version_32 := 16#0d3bfcc1#;
   u00031 : constant Version_32 := 16#1f53fc7c#;
   u00032 : constant Version_32 := 16#d0257763#;
   u00033 : constant Version_32 := 16#24763f23#;
   u00034 : constant Version_32 := 16#3d920894#;
   u00035 : constant Version_32 := 16#8c2e9e54#;
   u00036 : constant Version_32 := 16#357243f2#;
   u00037 : constant Version_32 := 16#6e527eac#;
   u00038 : constant Version_32 := 16#eb53cac6#;
   u00039 : constant Version_32 := 16#62031732#;
   u00040 : constant Version_32 := 16#07a381d1#;
   u00041 : constant Version_32 := 16#8520b354#;
   u00042 : constant Version_32 := 16#ece92546#;
   u00043 : constant Version_32 := 16#e902ed3d#;
   u00044 : constant Version_32 := 16#7b2d0447#;
   u00045 : constant Version_32 := 16#678c3667#;
   u00046 : constant Version_32 := 16#2c158170#;
   u00047 : constant Version_32 := 16#03e857a5#;
   u00048 : constant Version_32 := 16#231161ce#;
   u00049 : constant Version_32 := 16#0723ed27#;
   u00050 : constant Version_32 := 16#74808519#;
   u00051 : constant Version_32 := 16#0caab002#;
   u00052 : constant Version_32 := 16#9afab0e6#;
   u00053 : constant Version_32 := 16#b94cfe7c#;
   u00054 : constant Version_32 := 16#51567fe1#;
   u00055 : constant Version_32 := 16#fad7de10#;
   u00056 : constant Version_32 := 16#9d3004a0#;
   u00057 : constant Version_32 := 16#cda47026#;
   u00058 : constant Version_32 := 16#08493c74#;
   u00059 : constant Version_32 := 16#02c629f5#;
   u00060 : constant Version_32 := 16#7fcfc8a9#;
   u00061 : constant Version_32 := 16#42c7e638#;
   u00062 : constant Version_32 := 16#5da87136#;
   u00063 : constant Version_32 := 16#7226bb1e#;
   u00064 : constant Version_32 := 16#a27be464#;
   u00065 : constant Version_32 := 16#d0339ebe#;
   u00066 : constant Version_32 := 16#43088a1b#;
   u00067 : constant Version_32 := 16#4932cebc#;
   u00068 : constant Version_32 := 16#e7941cde#;
   u00069 : constant Version_32 := 16#77fbbbb2#;
   u00070 : constant Version_32 := 16#f1bfe626#;
   u00071 : constant Version_32 := 16#c041519b#;
   u00072 : constant Version_32 := 16#d29c55f1#;
   u00073 : constant Version_32 := 16#513204d2#;
   u00074 : constant Version_32 := 16#ec46459d#;
   u00075 : constant Version_32 := 16#a09803be#;
   u00076 : constant Version_32 := 16#ec5c6480#;
   u00077 : constant Version_32 := 16#98e37eca#;
   u00078 : constant Version_32 := 16#0f31afd8#;
   u00079 : constant Version_32 := 16#f25a52b7#;
   u00080 : constant Version_32 := 16#9c4c4f30#;
   u00081 : constant Version_32 := 16#398ad485#;
   u00082 : constant Version_32 := 16#3e9e5a62#;
   u00083 : constant Version_32 := 16#293ba6c7#;
   u00084 : constant Version_32 := 16#9ce932b3#;
   u00085 : constant Version_32 := 16#b151fa83#;
   u00086 : constant Version_32 := 16#1c1b159b#;
   u00087 : constant Version_32 := 16#cd99f476#;
   u00088 : constant Version_32 := 16#4aac86c9#;
   u00089 : constant Version_32 := 16#28c880d5#;
   u00090 : constant Version_32 := 16#6769a6c9#;
   u00091 : constant Version_32 := 16#874601e7#;
   u00092 : constant Version_32 := 16#875a76d7#;
   u00093 : constant Version_32 := 16#4b845cf2#;
   u00094 : constant Version_32 := 16#a48e089f#;
   u00095 : constant Version_32 := 16#8d7ad3f8#;
   u00096 : constant Version_32 := 16#41276113#;
   u00097 : constant Version_32 := 16#d3781181#;
   u00098 : constant Version_32 := 16#ccd9ad9b#;
   u00099 : constant Version_32 := 16#ba1750d6#;
   u00100 : constant Version_32 := 16#a949e3f2#;
   u00101 : constant Version_32 := 16#b6667fe6#;
   u00102 : constant Version_32 := 16#c3105dd9#;
   u00103 : constant Version_32 := 16#2defd827#;
   u00104 : constant Version_32 := 16#809b0b08#;
   u00105 : constant Version_32 := 16#ef1cdad6#;
   u00106 : constant Version_32 := 16#28e31423#;
   u00107 : constant Version_32 := 16#4a5d11f4#;
   u00108 : constant Version_32 := 16#2ef59995#;
   u00109 : constant Version_32 := 16#36ba99d8#;
   u00110 : constant Version_32 := 16#fb6fbaa2#;
   u00111 : constant Version_32 := 16#95b8ab89#;
   u00112 : constant Version_32 := 16#b5a56fa9#;
   u00113 : constant Version_32 := 16#4957ad55#;
   u00114 : constant Version_32 := 16#37355cc5#;
   u00115 : constant Version_32 := 16#ee4006c2#;
   u00116 : constant Version_32 := 16#3202854d#;
   u00117 : constant Version_32 := 16#f8381cab#;
   u00118 : constant Version_32 := 16#908e4fee#;
   u00119 : constant Version_32 := 16#6d980fe2#;
   u00120 : constant Version_32 := 16#4a92a481#;
   u00121 : constant Version_32 := 16#d9f2127d#;
   u00122 : constant Version_32 := 16#25397eae#;
   u00123 : constant Version_32 := 16#4f8c274a#;
   u00124 : constant Version_32 := 16#25278ecc#;
   u00125 : constant Version_32 := 16#6c916c9c#;
   u00126 : constant Version_32 := 16#a1e1f387#;
   u00127 : constant Version_32 := 16#c014548a#;
   u00128 : constant Version_32 := 16#29862b70#;
   u00129 : constant Version_32 := 16#07144387#;
   u00130 : constant Version_32 := 16#5872d126#;
   u00131 : constant Version_32 := 16#46455c38#;
   u00132 : constant Version_32 := 16#3aeb17cd#;
   u00133 : constant Version_32 := 16#09ca1903#;
   u00134 : constant Version_32 := 16#a599cbc2#;
   u00135 : constant Version_32 := 16#49d7406a#;
   u00136 : constant Version_32 := 16#7f7dd88c#;
   u00137 : constant Version_32 := 16#20f00bdd#;
   u00138 : constant Version_32 := 16#deb54647#;
   u00139 : constant Version_32 := 16#9e35616f#;
   u00140 : constant Version_32 := 16#02426c1e#;
   u00141 : constant Version_32 := 16#2e7674ae#;
   u00142 : constant Version_32 := 16#a73e2e02#;
   u00143 : constant Version_32 := 16#5ad3d7de#;
   u00144 : constant Version_32 := 16#d5414136#;
   u00145 : constant Version_32 := 16#d426ba9e#;
   u00146 : constant Version_32 := 16#af06f0ba#;
   u00147 : constant Version_32 := 16#ac931291#;
   u00148 : constant Version_32 := 16#add0f738#;
   u00149 : constant Version_32 := 16#72224219#;
   u00150 : constant Version_32 := 16#324444fc#;
   u00151 : constant Version_32 := 16#4bad42a3#;
   u00152 : constant Version_32 := 16#52ee96ea#;
   u00153 : constant Version_32 := 16#c9fa87a6#;
   u00154 : constant Version_32 := 16#ebf7aada#;
   u00155 : constant Version_32 := 16#00e2f4cc#;
   u00156 : constant Version_32 := 16#f404e58c#;
   u00157 : constant Version_32 := 16#f003c27c#;
   u00158 : constant Version_32 := 16#f77be749#;
   u00159 : constant Version_32 := 16#9c934c23#;
   u00160 : constant Version_32 := 16#d3728c28#;
   u00161 : constant Version_32 := 16#d4f78e65#;
   u00162 : constant Version_32 := 16#cd2786cc#;
   u00163 : constant Version_32 := 16#eee1e1a8#;
   u00164 : constant Version_32 := 16#1e10a11d#;
   u00165 : constant Version_32 := 16#24b2387e#;
   u00166 : constant Version_32 := 16#ee70e0d4#;
   u00167 : constant Version_32 := 16#80388223#;

   pragma Export (C, u00001, "gnatbindB");
   pragma Export (C, u00002, "gnatbindS");
   pragma Export (C, u00003, "system__standard_libraryB");
   pragma Export (C, u00004, "system__standard_libraryS");
   pragma Export (C, u00005, "ada__exceptionsB");
   pragma Export (C, u00006, "ada__exceptionsS");
   pragma Export (C, u00007, "adaS");
   pragma Export (C, u00008, "ada__exceptions__last_chance_handlerB");
   pragma Export (C, u00009, "ada__exceptions__last_chance_handlerS");
   pragma Export (C, u00010, "system__secondary_stackB");
   pragma Export (C, u00011, "system__secondary_stackS");
   pragma Export (C, u00012, "systemS");
   pragma Export (C, u00013, "system__parametersB");
   pragma Export (C, u00014, "system__parametersS");
   pragma Export (C, u00015, "system__soft_linksB");
   pragma Export (C, u00016, "system__soft_linksS");
   pragma Export (C, u00017, "system__machine_state_operationsB");
   pragma Export (C, u00018, "system__machine_state_operationsS");
   pragma Export (C, u00019, "system__machine_codeS");
   pragma Export (C, u00020, "system__memoryB");
   pragma Export (C, u00021, "system__memoryS");
   pragma Export (C, u00022, "system__storage_elementsB");
   pragma Export (C, u00023, "system__storage_elementsS");
   pragma Export (C, u00024, "system__exceptionsS");
   pragma Export (C, u00025, "system__stack_checkingB");
   pragma Export (C, u00026, "system__stack_checkingS");
   pragma Export (C, u00027, "interfacesS");
   pragma Export (C, u00028, "system__assertionsB");
   pragma Export (C, u00029, "system__assertionsS");
   pragma Export (C, u00030, "system__exception_tableB");
   pragma Export (C, u00031, "system__exception_tableS");
   pragma Export (C, u00032, "system__htableB");
   pragma Export (C, u00033, "system__htableS");
   pragma Export (C, u00034, "system__tracebackB");
   pragma Export (C, u00035, "system__tracebackS");
   pragma Export (C, u00036, "system__unsigned_typesS");
   pragma Export (C, u00037, "system__traceback_entriesB");
   pragma Export (C, u00038, "system__traceback_entriesS");
   pragma Export (C, u00039, "aliB");
   pragma Export (C, u00040, "aliS");
   pragma Export (C, u00041, "butilB");
   pragma Export (C, u00042, "butilS");
   pragma Export (C, u00043, "hostparmS");
   pragma Export (C, u00044, "nametB");
   pragma Export (C, u00045, "nametS");
   pragma Export (C, u00046, "debugB");
   pragma Export (C, u00047, "debugS");
   pragma Export (C, u00048, "outputB");
   pragma Export (C, u00049, "outputS");
   pragma Export (C, u00050, "gnatS");
   pragma Export (C, u00051, "gnat__os_libB");
   pragma Export (C, u00052, "gnat__os_libS");
   pragma Export (C, u00053, "system__case_utilB");
   pragma Export (C, u00054, "system__case_utilS");
   pragma Export (C, u00055, "system__crtlS");
   pragma Export (C, u00056, "gnat__stringsB");
   pragma Export (C, u00057, "gnat__stringsS");
   pragma Export (C, u00058, "typesB");
   pragma Export (C, u00059, "typesS");
   pragma Export (C, u00060, "system__compare_array_unsigned_8B");
   pragma Export (C, u00061, "system__compare_array_unsigned_8S");
   pragma Export (C, u00062, "system__address_operationsB");
   pragma Export (C, u00063, "system__address_operationsS");
   pragma Export (C, u00064, "tree_ioB");
   pragma Export (C, u00065, "tree_ioS");
   pragma Export (C, u00066, "widecharB");
   pragma Export (C, u00067, "widecharS");
   pragma Export (C, u00068, "optB");
   pragma Export (C, u00069, "optS");
   pragma Export (C, u00070, "gnatvsnB");
   pragma Export (C, u00071, "gnatvsnS");
   pragma Export (C, u00072, "system__wch_conS");
   pragma Export (C, u00073, "system__wch_cnvB");
   pragma Export (C, u00074, "system__wch_cnvS");
   pragma Export (C, u00075, "system__wch_jisB");
   pragma Export (C, u00076, "system__wch_jisS");
   pragma Export (C, u00077, "allocS");
   pragma Export (C, u00078, "tableB");
   pragma Export (C, u00079, "tableS");
   pragma Export (C, u00080, "fnameB");
   pragma Export (C, u00081, "fnameS");
   pragma Export (C, u00082, "osintB");
   pragma Export (C, u00083, "osintS");
   pragma Export (C, u00084, "fmapB");
   pragma Export (C, u00085, "fmapS");
   pragma Export (C, u00086, "gnat__htableB");
   pragma Export (C, u00087, "gnat__htableS");
   pragma Export (C, u00088, "sdefaultB");
   pragma Export (C, u00089, "sdefaultS");
   pragma Export (C, u00090, "gnat__case_utilB");
   pragma Export (C, u00091, "gnat__case_utilS");
   pragma Export (C, u00092, "system__string_opsB");
   pragma Export (C, u00093, "system__string_opsS");
   pragma Export (C, u00094, "system__string_ops_concat_3B");
   pragma Export (C, u00095, "system__string_ops_concat_3S");
   pragma Export (C, u00096, "system__string_ops_concat_4B");
   pragma Export (C, u00097, "system__string_ops_concat_4S");
   pragma Export (C, u00098, "casingB");
   pragma Export (C, u00099, "casingS");
   pragma Export (C, u00100, "csetsB");
   pragma Export (C, u00101, "csetsS");
   pragma Export (C, u00102, "ridentS");
   pragma Export (C, u00103, "ali__utilB");
   pragma Export (C, u00104, "ali__utilS");
   pragma Export (C, u00105, "binderrB");
   pragma Export (C, u00106, "binderrS");
   pragma Export (C, u00107, "libB");
   pragma Export (C, u00108, "libS");
   pragma Export (C, u00109, "atreeB");
   pragma Export (C, u00110, "atreeS");
   pragma Export (C, u00111, "elistsB");
   pragma Export (C, u00112, "elistsS");
   pragma Export (C, u00113, "nlistsB");
   pragma Export (C, u00114, "nlistsS");
   pragma Export (C, u00115, "sinfoB");
   pragma Export (C, u00116, "sinfoS");
   pragma Export (C, u00117, "uintpB");
   pragma Export (C, u00118, "uintpS");
   pragma Export (C, u00119, "urealpB");
   pragma Export (C, u00120, "urealpS");
   pragma Export (C, u00121, "sinputB");
   pragma Export (C, u00122, "sinputS");
   pragma Export (C, u00123, "system__img_enumB");
   pragma Export (C, u00124, "system__img_enumS");
   pragma Export (C, u00125, "einfoB");
   pragma Export (C, u00126, "einfoS");
   pragma Export (C, u00127, "standB");
   pragma Export (C, u00128, "standS");
   pragma Export (C, u00129, "snamesB");
   pragma Export (C, u00130, "snamesS");
   pragma Export (C, u00131, "gnat__heap_sort_aB");
   pragma Export (C, u00132, "gnat__heap_sort_aS");
   pragma Export (C, u00133, "stringtB");
   pragma Export (C, u00134, "stringtS");
   pragma Export (C, u00135, "unameB");
   pragma Export (C, u00136, "unameS");
   pragma Export (C, u00137, "scansB");
   pragma Export (C, u00138, "scansS");
   pragma Export (C, u00139, "scngB");
   pragma Export (C, u00140, "scngS");
   pragma Export (C, u00141, "err_varsS");
   pragma Export (C, u00142, "styleswB");
   pragma Export (C, u00143, "styleswS");
   pragma Export (C, u00144, "system__crc32B");
   pragma Export (C, u00145, "system__crc32S");
   pragma Export (C, u00146, "stylegB");
   pragma Export (C, u00147, "stylegS");
   pragma Export (C, u00148, "sinput__cB");
   pragma Export (C, u00149, "sinput__cS");
   pragma Export (C, u00150, "bcheckB");
   pragma Export (C, u00151, "bcheckS");
   pragma Export (C, u00152, "bindeB");
   pragma Export (C, u00153, "bindeS");
   pragma Export (C, u00154, "bindgenB");
   pragma Export (C, u00155, "bindgenS");
   pragma Export (C, u00156, "osint__bB");
   pragma Export (C, u00157, "osint__bS");
   pragma Export (C, u00158, "system__string_ops_concat_5B");
   pragma Export (C, u00159, "system__string_ops_concat_5S");
   pragma Export (C, u00160, "targparmB");
   pragma Export (C, u00161, "targparmS");
   pragma Export (C, u00162, "bindusgB");
   pragma Export (C, u00163, "bindusgS");
   pragma Export (C, u00164, "switchB");
   pragma Export (C, u00165, "switchS");
   pragma Export (C, u00166, "switch__bB");
   pragma Export (C, u00167, "switch__bS");

   --  BEGIN ELABORATION ORDER
   --  ada (spec)
   --  gnat (spec)
   --  gnat.heap_sort_a (spec)
   --  gnat.heap_sort_a (body)
   --  gnat.strings (spec)
   --  gnat.strings (body)
   --  interfaces (spec)
   --  system (spec)
   --  system.address_operations (spec)
   --  system.address_operations (body)
   --  system.case_util (spec)
   --  system.case_util (body)
   --  gnat.case_util (spec)
   --  gnat.case_util (body)
   --  system.compare_array_unsigned_8 (spec)
   --  system.crc32 (spec)
   --  system.crc32 (body)
   --  system.htable (spec)
   --  system.htable (body)
   --  gnat.htable (spec)
   --  gnat.htable (body)
   --  system.img_enum (spec)
   --  system.machine_code (spec)
   --  system.parameters (spec)
   --  system.parameters (body)
   --  system.crtl (spec)
   --  system.standard_library (spec)
   --  system.storage_elements (spec)
   --  system.storage_elements (body)
   --  system.compare_array_unsigned_8 (body)
   --  system.secondary_stack (spec)
   --  system.img_enum (body)
   --  system.stack_checking (spec)
   --  system.stack_checking (body)
   --  system.string_ops (spec)
   --  system.string_ops (body)
   --  system.string_ops_concat_3 (spec)
   --  system.string_ops_concat_3 (body)
   --  system.string_ops_concat_4 (spec)
   --  system.string_ops_concat_4 (body)
   --  system.string_ops_concat_5 (spec)
   --  system.string_ops_concat_5 (body)
   --  system.traceback (spec)
   --  system.traceback (body)
   --  system.traceback_entries (spec)
   --  system.traceback_entries (body)
   --  ada.exceptions (spec)
   --  ada.exceptions.last_chance_handler (spec)
   --  system.exceptions (spec)
   --  system.machine_state_operations (spec)
   --  system.soft_links (spec)
   --  system.soft_links (body)
   --  ada.exceptions.last_chance_handler (body)
   --  system.secondary_stack (body)
   --  system.exception_table (spec)
   --  system.exception_table (body)
   --  gnat.os_lib (spec)
   --  gnat.os_lib (body)
   --  system.assertions (spec)
   --  system.assertions (body)
   --  system.memory (spec)
   --  system.memory (body)
   --  system.machine_state_operations (body)
   --  system.standard_library (body)
   --  system.unsigned_types (spec)
   --  ada.exceptions (body)
   --  system.wch_con (spec)
   --  system.wch_cnv (spec)
   --  system.wch_jis (spec)
   --  system.wch_jis (body)
   --  system.wch_cnv (body)
   --  alloc (spec)
   --  bcheck (spec)
   --  bindgen (spec)
   --  bindusg (spec)
   --  debug (spec)
   --  debug (body)
   --  gnatbind (spec)
   --  gnatvsn (spec)
   --  gnatvsn (body)
   --  hostparm (spec)
   --  rident (spec)
   --  types (spec)
   --  types (body)
   --  binderr (spec)
   --  butil (spec)
   --  casing (spec)
   --  elists (spec)
   --  fmap (spec)
   --  fname (spec)
   --  nlists (spec)
   --  opt (spec)
   --  csets (spec)
   --  csets (body)
   --  osint (spec)
   --  osint.b (spec)
   --  output (spec)
   --  output (body)
   --  bindusg (body)
   --  sdefault (spec)
   --  sdefault (body)
   --  snames (spec)
   --  stringt (spec)
   --  styleg (spec)
   --  scng (spec)
   --  stylesw (spec)
   --  stylesw (body)
   --  switch (spec)
   --  switch (body)
   --  switch.b (spec)
   --  switch.b (body)
   --  targparm (spec)
   --  tree_io (spec)
   --  tree_io (body)
   --  opt (body)
   --  table (spec)
   --  table (body)
   --  elists (body)
   --  ali (spec)
   --  ali.util (spec)
   --  binde (spec)
   --  lib (spec)
   --  namet (spec)
   --  binde (body)
   --  ali (body)
   --  targparm (body)
   --  stringt (body)
   --  snames (body)
   --  osint.b (body)
   --  osint (body)
   --  fname (body)
   --  fmap (body)
   --  butil (body)
   --  binderr (body)
   --  gnatbind (body)
   --  bindgen (body)
   --  bcheck (body)
   --  sinput (spec)
   --  sinput (body)
   --  sinput.c (spec)
   --  sinput.c (body)
   --  uintp (spec)
   --  uintp (body)
   --  err_vars (spec)
   --  uname (spec)
   --  urealp (spec)
   --  urealp (body)
   --  einfo (spec)
   --  scans (spec)
   --  scans (body)
   --  ali.util (body)
   --  styleg (body)
   --  sinfo (spec)
   --  atree (spec)
   --  atree (body)
   --  sinfo (body)
   --  uname (body)
   --  nlists (body)
   --  widechar (spec)
   --  widechar (body)
   --  namet (body)
   --  scng (body)
   --  casing (body)
   --  stand (spec)
   --  stand (body)
   --  einfo (body)
   --  lib (body)
   --  END ELABORATION ORDER

end ada_main;
