exp_pakd.adb (Expand_Packed_Boolean_Operator): The bounds of the result are the bounds of the left operand, not the right.
2007-04-06 Ed Schonberg <schonberg@adacore.com> * exp_pakd.adb (Expand_Packed_Boolean_Operator): The bounds of the result are the bounds of the left operand, not the right. From-SVN: r123567
This commit is contained in:
parent
6254883738
commit
86109281fd
@ -1824,7 +1824,7 @@ package body Exp_Pakd is
|
||||
P := Make_Op_Xor (Loc, L, R);
|
||||
end if;
|
||||
|
||||
Rewrite (N, Unchecked_Convert_To (Rtyp, P));
|
||||
Rewrite (N, Unchecked_Convert_To (Ltyp, P));
|
||||
end;
|
||||
|
||||
-- For the array case, we insert the actions
|
||||
|
Loading…
Reference in New Issue
Block a user