summaryrefslogtreecommitdiff
path: root/gcc/ada/a-string.ads
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/a-string.ads')
-rw-r--r--gcc/ada/a-string.ads9
1 files changed, 7 insertions, 2 deletions
diff --git a/gcc/ada/a-string.ads b/gcc/ada/a-string.ads
index e8ec5ac3690..5b9d803a200 100644
--- a/gcc/ada/a-string.ads
+++ b/gcc/ada/a-string.ads
@@ -16,8 +16,13 @@
package Ada.Strings is
pragma Pure (Strings);
- Space : constant Character := ' ';
- Wide_Space : constant Wide_Character := ' ';
+ Space : constant Character := ' ';
+ Wide_Space : constant Wide_Character := ' ';
+
+ -- The following declaration is for Ada 2005 (AI-285)
+
+ Wide_Wide_Space : constant Wide_Wide_Character := ' ';
+ pragma Ada_05 (Wide_Wide_Space);
Length_Error, Pattern_Error, Index_Error, Translation_Error : exception;