summaryrefslogtreecommitdiff
path: root/gcc/ada/a-wtdeau.ads
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/a-wtdeau.ads')
-rw-r--r--gcc/ada/a-wtdeau.ads4
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/a-wtdeau.ads b/gcc/ada/a-wtdeau.ads
index f8983ebd83d..b469a3574e3 100644
--- a/gcc/ada/a-wtdeau.ads
+++ b/gcc/ada/a-wtdeau.ads
@@ -54,12 +54,12 @@ private package Ada.Wide_Text_IO.Decimal_Aux is
function Gets_Dec
(From : String;
- Last : access Positive;
+ Last : not null access Positive;
Scale : Integer) return Integer;
function Gets_LLD
(From : String;
- Last : access Positive;
+ Last : not null access Positive;
Scale : Integer) return Long_Long_Integer;
procedure Put_Dec