diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2007-10-15 13:58:20 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2007-10-15 13:58:20 +0000 |
| commit | 8f199ad0416c7b2779da7eaabd9f00c4f936502b (patch) | |
| tree | 51acb2abb4ef8b5a72e09e35ec949add9fa416cb /gcc/ada/lib.ads | |
| parent | 4536414b71264cb3f73463a0e8af3d349ca885a0 (diff) | |
| download | gcc-8f199ad0416c7b2779da7eaabd9f00c4f936502b.tar.gz | |
2007-10-15 Robert Dewar <dewar@adacore.com>
* errout.ads: Comment clarification
* exp_ch4.adb (Expand_N_Allocator): Code cleanup.
(Expand_N_Op_Eq): Improve handling of array equality with -gnatVa
* lib.ads: Comment update
* init.c: Minor reformatting.
* sem_attr.adb: Minor formatting
* osint-b.ads: Minor reformatting
* sem_ch9.adb: Implement -gnatd.I switch
* g-comlin.adb: (Start): Fix handling of empty command line.
* gnatcmd.adb (GNATCmd): Do not put the -rules in the -cargs section,
even when -rules follows the -cargs section.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@129343 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/lib.ads')
| -rw-r--r-- | gcc/ada/lib.ads | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/gcc/ada/lib.ads b/gcc/ada/lib.ads index 19cfa1841ac..bff54f09ec1 100644 --- a/gcc/ada/lib.ads +++ b/gcc/ada/lib.ads @@ -509,10 +509,11 @@ package Lib is -- Same function as above but argument is a source pointer function Earlier_In_Extended_Unit (S1, S2 : Source_Ptr) return Boolean; - -- Given two Sloc values for which In_Same_Extended_Unit is true, - -- determine if S1 appears before S2. Returns True if S1 appears before - -- S2, and False otherwise. The result is undefined if S1 and S2 are - -- not in the same extended unit. + -- Given two Sloc values for which In_Same_Extended_Unit is true, determine + -- if S1 appears before S2. Returns True if S1 appears before S2, and False + -- otherwise. The result is undefined if S1 and S2 are not in the same + -- extended unit. Note: this routine will not give reliable results if + -- called after Sprint has been called with -gnatD set. function Compilation_Switches_Last return Nat; -- Return the count of stored compilation switches |