diff options
| author | Ed Schonberg <schonberg@adacore.com> | 2017-01-23 12:00:26 +0000 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2017-01-23 13:00:26 +0100 |
| commit | 913e4b3617fe7f46fbdbb72b010cf6cf7201d329 (patch) | |
| tree | a30bc477380cd60dbeb59b86ec2abe49e3833502 /gcc/ada/lib.ads | |
| parent | a77152ca855e6009a38ee011043465d60ed8f5c2 (diff) | |
| download | gcc-913e4b3617fe7f46fbdbb72b010cf6cf7201d329.zip gcc-913e4b3617fe7f46fbdbb72b010cf6cf7201d329.tar.gz gcc-913e4b3617fe7f46fbdbb72b010cf6cf7201d329.tar.bz2 | |
sem_ch4.adb (Try_Primitive_Operations, [...]): argument is valid if it is a derived type with unknown discriminants that...
2017-01-23 Ed Schonberg <schonberg@adacore.com>
* sem_ch4.adb (Try_Primitive_Operations,
Is_Valid_First_Argument_Of): argument is valid if it is a derived
type with unknown discriminants that matches its underlying
record view.
* exp_util.adb (Expand_Subtype_From_Expr): Do not expand
expression if its type is derived from a limited type with
unknown discriminants, because the expansion (which is a call)
must be expanded in the enclosing context to add the proper build-
in-place parameters to the call.
* lib.ads, exp_ch9.adb: Minor fixes in comments.
From-SVN: r244790
Diffstat (limited to 'gcc/ada/lib.ads')
| -rw-r--r-- | gcc/ada/lib.ads | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/lib.ads b/gcc/ada/lib.ads index c54e2ca..a6cfd5d 100644 --- a/gcc/ada/lib.ads +++ b/gcc/ada/lib.ads @@ -302,7 +302,7 @@ package Lib is -- No_Name for the main unit. -- Fatal_Error - -- A flag that is initialized to None and gets set to Errorif a fatal + -- A flag that is initialized to None and gets set to Error if a fatal -- error occurs during the processing of a unit. A fatal error is one -- defined as serious enough to stop the next phase of the compiler -- from running (i.e. fatal error during parsing stops semantics, |