mirror of
https://gcc.gnu.org/git/gcc.git
synced 2024-11-24 03:14:08 +08:00
[Ada] Code cleanup: rename ALI.Scope
gcc/ada/ * ali.ads, ali.adb, bindo-writers.adb, lib-writ.adb (Scope): Renamed to IS_Scope.
This commit is contained in:
parent
571d3fb1f4
commit
1c4aefb681
@ -3814,15 +3814,15 @@ package body ALI is
|
||||
return No_ALI_Id;
|
||||
end Scan_ALI;
|
||||
|
||||
-----------
|
||||
-- Scope --
|
||||
-----------
|
||||
--------------
|
||||
-- IS_Scope --
|
||||
--------------
|
||||
|
||||
function Scope (IS_Id : Invocation_Signature_Id) return Name_Id is
|
||||
function IS_Scope (IS_Id : Invocation_Signature_Id) return Name_Id is
|
||||
begin
|
||||
pragma Assert (Present (IS_Id));
|
||||
return Invocation_Signatures.Table (IS_Id).Scope;
|
||||
end Scope;
|
||||
end IS_Scope;
|
||||
|
||||
---------
|
||||
-- SEq --
|
||||
|
@ -1350,8 +1350,8 @@ package ALI is
|
||||
pragma Inline (Name);
|
||||
-- Obtain the name of invocation signature IS_Id
|
||||
|
||||
function Scope (IS_Id : Invocation_Signature_Id) return Name_Id;
|
||||
pragma Inline (Scope);
|
||||
function IS_Scope (IS_Id : Invocation_Signature_Id) return Name_Id;
|
||||
pragma Inline (IS_Scope);
|
||||
-- Obtain the scope of invocation signature IS_Id
|
||||
|
||||
procedure Set_Invocation_Graph_Encoding
|
||||
|
@ -222,7 +222,7 @@ package body Bindo.Writers is
|
||||
Write_Eol;
|
||||
|
||||
Write_Str (" Scope = ");
|
||||
Write_Name (Scope (IS_Id));
|
||||
Write_Name (IS_Scope (IS_Id));
|
||||
Write_Eol;
|
||||
end Write_Invocation_Signature;
|
||||
|
||||
|
@ -1724,7 +1724,7 @@ package body Lib.Writ is
|
||||
|
||||
-- scope
|
||||
|
||||
Write_Info_Name (Scope (IS_Id));
|
||||
Write_Info_Name (IS_Scope (IS_Id));
|
||||
Write_Info_Char (' ');
|
||||
|
||||
-- line
|
||||
|
Loading…
Reference in New Issue
Block a user