diff options
Diffstat (limited to 'gcc/ada/osint.ads')
| -rw-r--r-- | gcc/ada/osint.ads | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/gcc/ada/osint.ads b/gcc/ada/osint.ads index 5de8eced2ac..a44d4e24b3c 100644 --- a/gcc/ada/osint.ads +++ b/gcc/ada/osint.ads @@ -571,10 +571,11 @@ package Osint is pragma Import (C, Len_Arg, "__gnat_len_arg"); -- Get length of argument -private + ALI_Default_Suffix : constant String_Ptr := new String'("ali"); + ALI_Suffix : String_Ptr := ALI_Default_Suffix; + -- The suffixes used for the library files (also known as ALI files) - ALI_Suffix : constant String_Ptr := new String'("ali"); - -- The suffix used for the library files (also known as ALI files) +private Current_Main : File_Name_Type := No_File; -- Used to save a simple file name between calls to Next_Main_Source and |