diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2017-01-19 12:46:14 +0100 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2017-01-19 12:46:14 +0100 |
| commit | c63a2ad68bc0704fc2926badc46f3ccd952dbbb9 (patch) | |
| tree | 9b5192623bf3246439db9c7ea3d6c832eca97899 /gcc/ada/lib-xref.ads | |
| parent | 40bf00b1f85afad60951ed3c07b5ffd6414241cf (diff) | |
| download | gcc-c63a2ad68bc0704fc2926badc46f3ccd952dbbb9.zip gcc-c63a2ad68bc0704fc2926badc46f3ccd952dbbb9.tar.gz gcc-c63a2ad68bc0704fc2926badc46f3ccd952dbbb9.tar.bz2 | |
[multiple changes]
2017-01-19 Hristian Kirtchev <kirtchev@adacore.com>
* lib-xref-spark_specific.adb, sem_util.adb, sem_util.ads,
sem_ch4.adb, sem_ch8.adb, lib-xref.ads: Minor reformatting.
2017-01-19 Bob Duff <duff@adacore.com>
* bcheck.adb (Check_Consistent_Dynamic_Elaboration_Checking):
Increment Warnings_Detected. It was decrementing, which is
wrong since we just issued a warning message.
* binderr.ads (Errors_Detected, Warnings_Detected): Declare
these variables to be of subtype Nat instead of Int, because
they should never be negative.
2017-01-19 Javier Miranda <miranda@adacore.com>
* contracts.adb (Build_Postconditions_Procedure): Replace
Generate_C_Code by Modify_Tree_For_C.
* exp_aggr.adb (Build_Record_Aggr_Code, Expand_Array_Aggregate):
Replace Generate_C_Code by Modify_Tree_For_C.
* exp_attr.adb (Float_Valid, Is_GCC_Target): Replace Generate_C_Code by
Modify_Tree_For_C.
* exp_ch11.adb (Expand_N_Exception_Declaration): Replace
Generate_C_Code by Modify_Tree_For_C.
* exp_ch4.adb (Expand_Allocator_Expression): Replace
Generate_C_Code by Modify_Tree_For_C.
* exp_dbug.adb (Qualify_Entity_Name): Replace Generate_C_Code
by Modify_Tree_For_C.
* exp_util.adb (Remove_Side_Effects, Side_Effect_Free): Replace
Generate_C_Code by Modify_Tree_For_C.
* sem_res.adb (Resolve_Type_Conversion): Replace Generate_C_Code
by Modify_Tree_For_C.
* sinfo.ads (Modify_Tree_For_C): Adding documentation.
From-SVN: r244619
Diffstat (limited to 'gcc/ada/lib-xref.ads')
| -rw-r--r-- | gcc/ada/lib-xref.ads | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/gcc/ada/lib-xref.ads b/gcc/ada/lib-xref.ads index 3713bdb..ecb70b6 100644 --- a/gcc/ada/lib-xref.ads +++ b/gcc/ada/lib-xref.ads @@ -653,8 +653,9 @@ package Lib.Xref is generic with procedure Process (N : Node_Id) is <>; - procedure Traverse_Compilation_Unit (CU : Node_Id; - Inside_Stubs : Boolean); + procedure Traverse_Compilation_Unit + (CU : Node_Id; + Inside_Stubs : Boolean); -- Call Process on all declarations within compilation unit CU. If -- Inside_Stubs is True, then the body of stubs is also traversed. -- Generic declarations are ignored. |