Skip to content

R
riscv-gcc-1
Commit 47c14114 by Arnaud Charlet
Options

Minor reformatting. 

From-SVN: r216093
parent 9ceeaf9d
Showing with 4 additions and 4 deletions
gcc/ada/exp_aggr.adb
...@@ -856,8 +856,8 @@ package body Exp_Aggr is ...@@ -856,8 +856,8 @@ package body Exp_Aggr is
if not Is_Enumeration_Type (Index_Base) then if not Is_Enumeration_Type (Index_Base) then
Expr := Expr :=
Make_Op_Add (Loc, Make_Op_Add (Loc,
Left_Opnd => Duplicate_Subexpr (To), Left_Opnd => Duplicate_Subexpr (To),
Right_Opnd => Make_Integer_Literal (Loc, U_Val)); Right_Opnd => Make_Integer_Literal (Loc, U_Val));
-- If we are dealing with enumeration return -- If we are dealing with enumeration return
-- Index_Base'Val (Index_Base'Pos (To) + Val) -- Index_Base'Val (Index_Base'Pos (To) + Val)
...@@ -872,8 +872,8 @@ package body Exp_Aggr is ...@@ -872,8 +872,8 @@ package body Exp_Aggr is
Expr_Pos := Expr_Pos :=
Make_Op_Add (Loc, Make_Op_Add (Loc,
Left_Opnd => To_Pos, Left_Opnd => To_Pos,
Right_Opnd => Make_Integer_Literal (Loc, U_Val)); Right_Opnd => Make_Integer_Literal (Loc, U_Val));
Expr := Expr :=
Make_Attribute_Reference Make_Attribute_Reference
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment