diff options
author | Yannick Moy <moy@adacore.com> | 2011-08-04 08:02:00 +0000 |
---|---|---|
committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2011-08-04 10:02:00 +0200 |
commit | e9a1ed9bed46e92e18d754d6956602f63ad73623 (patch) | |
tree | 6f3eb5c1927de33d93c7b907c188624ea27aa1cc /gcc/ada/lib-xref.ads | |
parent | 8e293fbdc67c2db30becbf0a7deeb77f6bd9d0b0 (diff) | |
download | gcc-e9a1ed9bed46e92e18d754d6956602f63ad73623.zip gcc-e9a1ed9bed46e92e18d754d6956602f63ad73623.tar.gz gcc-e9a1ed9bed46e92e18d754d6956602f63ad73623.tar.bz2 |
sem_ch3.adb (Analyze_Object_Declaration): remove obsolete addition of reference for ALFA mode.
2011-08-04 Yannick Moy <moy@adacore.com>
* sem_ch3.adb (Analyze_Object_Declaration): remove obsolete addition of
reference for ALFA mode.
* lib-xref-alfa.adb, lib-xref.ads (Traverse_Compilation_Unit): make
procedure public so as to use it from formal verification back-end.
From-SVN: r177324
Diffstat (limited to 'gcc/ada/lib-xref.ads')
-rw-r--r-- | gcc/ada/lib-xref.ads | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/gcc/ada/lib-xref.ads b/gcc/ada/lib-xref.ads index 3d6252e..5ddc273 100644 --- a/gcc/ada/lib-xref.ads +++ b/gcc/ada/lib-xref.ads @@ -593,6 +593,10 @@ package Lib.Xref is type Node_Processing is access procedure (N : Node_Id); + procedure Traverse_Compilation_Unit + (CU : Node_Id; + Process : Node_Processing); + procedure Traverse_All_Compilation_Units (Process : Node_Processing); -- Call Process on all declarations through all compilation units |