projects
/
gcc.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
363f2c5
)
Minor reformatting.
author
Arnaud Charlet
<charlet@gcc.gnu.org>
Mon, 26 Oct 2015 11:32:50 +0000
(12:32 +0100)
committer
Arnaud Charlet
<charlet@gcc.gnu.org>
Mon, 26 Oct 2015 11:32:50 +0000
(12:32 +0100)
From-SVN: r229339
gcc/ada/sem_attr.adb
patch
|
blob
|
history
diff --git
a/gcc/ada/sem_attr.adb
b/gcc/ada/sem_attr.adb
index df4c5ceeda540f1c9cefb7bf70dff7289009897e..c7f1bf5ad1e11490761825a4f13d5cccd7929744 100644
(file)
--- a/
gcc/ada/sem_attr.adb
+++ b/
gcc/ada/sem_attr.adb
@@
-7303,7
+7303,7
@@
package body Sem_Attr is
P_Entity := Etype (P);
-- Otherwise the attribute must be expanded into a conversion
P_Entity := Etype (P);
-- Otherwise the attribute must be expanded into a conversion
- -- and evaluated at runtime.
+ -- and evaluated at run
time.
else
Check_Expressions;
else
Check_Expressions;
@@
-8013,7
+8013,7
@@
package body Sem_Attr is
Val : Node_Id;
begin
Val : Node_Id;
begin
- -- The attribute appears in the form
+ -- The attribute appears in the form
:
-- Enum_Typ'Enum_Rep (Const)
-- Enum_Typ'Enum_Rep (Enum_Lit)
-- Enum_Typ'Enum_Rep (Const)
-- Enum_Typ'Enum_Rep (Enum_Lit)
@@
-8021,7
+8021,7
@@
package body Sem_Attr is
if Present (E1) then
Val := E1;
if Present (E1) then
Val := E1;
- -- Otherwise the prefix denotes a constant or enumeration literal
+ -- Otherwise the prefix denotes a constant or enumeration literal
:
-- Const'Enum_Rep
-- Enum_Lit'Enum_Rep
-- Const'Enum_Rep
-- Enum_Lit'Enum_Rep