aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/i-cstrin.ads
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/i-cstrin.ads')
-rw-r--r--gcc/ada/i-cstrin.ads6
1 files changed, 1 insertions, 5 deletions
diff --git a/gcc/ada/i-cstrin.ads b/gcc/ada/i-cstrin.ads
index 1d956a6059a..7bfee8f2c6d 100644
--- a/gcc/ada/i-cstrin.ads
+++ b/gcc/ada/i-cstrin.ads
@@ -38,14 +38,10 @@ package Interfaces.C.Strings is
type char_array_access is access all char_array;
- pragma Warnings (Off);
pragma No_Strict_Aliasing (char_array_access);
- pragma Warnings (On);
-- Since this type is used for external interfacing, with the pointer
-- coming from who knows where, it seems a good idea to turn off any
- -- strict aliasing assumptions for this type. We turn off warnings for
- -- this pragma to deal with being compiled with an earlier GNAT version
- -- that does not recognize this pragma.
+ -- strict aliasing assumptions for this type.
type chars_ptr is private;