Code cleanup only; semantics is unaffected.
gcc/ada/
* sem_aggr.adb (Resolve_Array_Aggregate): Change an inconsistent
use of False into its local equivalent Failure.
and then No (Component_Associations (N))
and then not Null_Record_Present (N)
then
- return False;
+ return Failure;
end if;
-- Disable the warning for GNAT Mode to allow for easier transition.
Error_Msg_N ("mixed iterated component association"
& " (RM 4.3.3 (17.1/5))",
Assoc);
- return False;
+ return Failure;
end if;
Next (Assoc);
Error_Msg_N ("mixed iterated component association"
& " (RM 4.3.3 (17.1/5))",
Assoc);
- return False;
+ return Failure;
end if;
Next (Assoc);