diff options
Diffstat (limited to 'gcc/ada/libgnat/a-except.ads')
| -rw-r--r-- | gcc/ada/libgnat/a-except.ads | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/gcc/ada/libgnat/a-except.ads b/gcc/ada/libgnat/a-except.ads index 22b7be9..4d36a84 100644 --- a/gcc/ada/libgnat/a-except.ads +++ b/gcc/ada/libgnat/a-except.ads @@ -301,6 +301,8 @@ private pragma Stream_Convert (Exception_Occurrence, String_To_EO, EO_To_String); -- Functions for implementing Exception_Occurrence stream attributes + pragma Warnings (Off, "aggregate not fully initialized"); Null_Occurrence : constant Exception_Occurrence := (others => <>); + pragma Warnings (On, "aggregate not fully initialized"); end Ada.Exceptions; |