diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2014-07-30 15:53:11 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2014-07-30 15:53:11 +0200 |
| commit | d3e16619ae38fba5a464064046114a6638d1816f (patch) | |
| tree | f34b8a064f087cdef85b843e241141f43015292c /gcc/ada/rtsfind.ads | |
| parent | fccaf220f3c01660f800b6ea055463823051904c (diff) | |
| download | gcc-d3e16619ae38fba5a464064046114a6638d1816f.zip gcc-d3e16619ae38fba5a464064046114a6638d1816f.tar.gz gcc-d3e16619ae38fba5a464064046114a6638d1816f.tar.bz2 | |
[multiple changes]
2014-07-30 Vincent Celier <celier@adacore.com>
* debug.adb: Minor comment update.
2014-07-30 Robert Dewar <dewar@adacore.com>
* s-tasuti.adb, s-tassta.adb: Minor reformatting.
* sprint.adb (Sprint_Node): Handle N_Contract case.
* exp_prag.adb: Minor reformatting.
* freeze.adb (Freeze_Entity): Check useless postcondition for
No_Return subprogram.
* sem_prag.adb: Minor reformatting.
2014-07-30 Javier Miranda <miranda@adacore.com>
* a-tags.ads: Complete comments about performance.
2014-07-30 Fedor Rybin <frybin@adacore.com>
* gnat_ugn.texi: Adding description for --exit-status option to
gnattest section. Fixing index entry of --passed-tests option
in gnattest section.
2014-07-30 Javier Miranda <miranda@adacore.com>
* Makefile.rtl, gnat_rm.texi, i-cpp.adb, i-cpp.ads, impunit.adb,
rtsfind.ads: Remove references to package Interfaces.CPP since this
package is no longer needed.
From-SVN: r213270
Diffstat (limited to 'gcc/ada/rtsfind.ads')
| -rw-r--r-- | gcc/ada/rtsfind.ads | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gcc/ada/rtsfind.ads b/gcc/ada/rtsfind.ads index 72bbd02..bb57b1c 100644 --- a/gcc/ada/rtsfind.ads +++ b/gcc/ada/rtsfind.ads @@ -71,7 +71,8 @@ package Rtsfind is -- of Ada.Wide_Wide_Text_IO. -- Names of the form Interfaces_xxx are first level children of - -- Interfaces_CPP refers to package Interfaces.CPP + -- Interfaces. For example, the name Interfaces_Packed_Decimal refers to + -- package Interfaces.Packed_Decimal. -- Names of the form System_xxx are first level children of System, whose -- name is System.xxx. For example, the name System_Str_Concat refers to @@ -202,7 +203,6 @@ package Rtsfind is -- Children of Interfaces - Interfaces_CPP, Interfaces_Packed_Decimal, -- Package System @@ -466,7 +466,7 @@ package Rtsfind is Ada_Wide_Wide_Text_IO_Modular_IO; subtype Interfaces_Child is RTU_Id - range Interfaces_CPP .. Interfaces_Packed_Decimal; + range Interfaces_Packed_Decimal .. Interfaces_Packed_Decimal; -- Range of values for children of Interfaces subtype System_Child is RTU_Id |