diff options
author | Robert Dewar <dewar@adacore.com> | 2015-01-06 09:14:09 +0000 |
---|---|---|
committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2015-01-06 10:14:09 +0100 |
commit | ac16e74cdf9135046892193eeb6eee7c8a8d4123 (patch) | |
tree | a6c9ae2d13ce15da801b75989ca200a9d7fc88a5 /gcc/ada/namet.adb | |
parent | 4b6f99f50583af11b3e6798ef4c5bf91b8c28fcd (diff) | |
download | gcc-ac16e74cdf9135046892193eeb6eee7c8a8d4123.zip gcc-ac16e74cdf9135046892193eeb6eee7c8a8d4123.tar.gz gcc-ac16e74cdf9135046892193eeb6eee7c8a8d4123.tar.bz2 |
ali-util.adb, [...]: Minor change of name Name_Table_Info => Name_Table_Int.
2015-01-06 Robert Dewar <dewar@adacore.com>
* ali-util.adb, sem_prag.adb, rtsfind.adb, sem_util.adb, sem_res.adb,
ali.adb, binde.adb, namet.adb, namet.ads, gnatls.adb, bcheck.adb:
Minor change of name Name_Table_Info => Name_Table_Int.
From-SVN: r219230
Diffstat (limited to 'gcc/ada/namet.adb')
-rw-r--r-- | gcc/ada/namet.adb | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/gcc/ada/namet.adb b/gcc/ada/namet.adb index e6df9db..d0dfee27 100644 --- a/gcc/ada/namet.adb +++ b/gcc/ada/namet.adb @@ -726,14 +726,14 @@ package body Namet is end Get_Name_Table_Byte; ------------------------- - -- Get_Name_Table_Info -- + -- Get_Name_Table_Int -- ------------------------- - function Get_Name_Table_Info (Id : Name_Id) return Int is + function Get_Name_Table_Int (Id : Name_Id) return Int is begin pragma Assert (Id in Name_Entries.First .. Name_Entries.Last); return Name_Entries.Table (Id).Int_Info; - end Get_Name_Table_Info; + end Get_Name_Table_Int; ----------------------------------------- -- Get_Unqualified_Decoded_Name_String -- @@ -1321,14 +1321,14 @@ package body Namet is end Set_Name_Table_Byte; ------------------------- - -- Set_Name_Table_Info -- + -- Set_Name_Table_Int -- ------------------------- - procedure Set_Name_Table_Info (Id : Name_Id; Val : Int) is + procedure Set_Name_Table_Int (Id : Name_Id; Val : Int) is begin pragma Assert (Id in Name_Entries.First .. Name_Entries.Last); Name_Entries.Table (Id).Int_Info := Val; - end Set_Name_Table_Info; + end Set_Name_Table_Int; ----------------------------- -- Store_Encoded_Character -- |