diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-04-20 08:18:43 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-04-20 08:18:43 +0000 |
| commit | a5b5e9bdb0d0cfb71601b7ea729153ed7fde0641 (patch) | |
| tree | cbbdb7b765b7450d3975715bb6b8f577fd8d8e65 /gcc/ada/lib-load.adb | |
| parent | 8672abac0ec9468a70809e88893e2c2643aace53 (diff) | |
| download | gcc-a5b5e9bdb0d0cfb71601b7ea729153ed7fde0641.tar.gz | |
2009-04-20 Robert Dewar <dewar@adacore.com>
* sem_ch3.adb: Minor reformatting
* lib-load.adb: Minor reformatting
* sem_ch4.adb: Minor reformatting
2009-04-20 Robert Dewar <dewar@adacore.com>
* namet-sp.ads, namet-sp.adb (Is_Bad_Spelling_Of): Implement new spec
(equal values => False).
2009-04-20 Ed Schonberg <schonberg@adacore.com>
* exp_ch6.adb (Is_Null_Procedure): predicate is global, so that calls
to null procedures can be inlined unconditionally.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@146368 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/lib-load.adb')
| -rw-r--r-- | gcc/ada/lib-load.adb | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/gcc/ada/lib-load.adb b/gcc/ada/lib-load.adb index 857b609b0bc..508b2e871ad 100644 --- a/gcc/ada/lib-load.adb +++ b/gcc/ada/lib-load.adb @@ -714,12 +714,12 @@ package body Lib.Load is -- it may very likely be the case that there is also pragma -- Restriction forbidding its usage. This is typically the -- case when building a configurable run time, where the - -- usage of certain run-time units is restricted by - -- means of both the corresponding pragma Restriction (such - -- as No_Calendar), and by not including the unit. Hence, - -- we check whether this predefined unit is forbidden, so - -- that the message about the restriction violation is - -- generated, if needed. + -- usage of certain run-time units is restricted by means + -- of both the corresponding pragma Restriction (such as + -- No_Calendar), and by not including the unit. Hence, we + -- check whether this predefined unit is forbidden, so that + -- the message about the restriction violation is generated, + -- if needed. Check_Restricted_Unit (Load_Name, Error_Node); |