diff options
Diffstat (limited to 'gcc/ada/a-wtdeau.adb')
| -rw-r--r-- | gcc/ada/a-wtdeau.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/a-wtdeau.adb b/gcc/ada/a-wtdeau.adb index 6b6286537f0..fd6cc2eea42 100644 --- a/gcc/ada/a-wtdeau.adb +++ b/gcc/ada/a-wtdeau.adb @@ -103,7 +103,7 @@ package body Ada.Wide_Text_IO.Decimal_Aux is function Gets_Dec (From : String; - Last : access Positive; + Last : not null access Positive; Scale : Integer) return Integer is Pos : aliased Integer; @@ -128,7 +128,7 @@ package body Ada.Wide_Text_IO.Decimal_Aux is function Gets_LLD (From : String; - Last : access Positive; + Last : not null access Positive; Scale : Integer) return Long_Long_Integer is Pos : aliased Integer; |