diff options
Diffstat (limited to 'gcc/ada/s-valllu.adb')
| -rw-r--r-- | gcc/ada/s-valllu.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/s-valllu.adb b/gcc/ada/s-valllu.adb index ab5752f4c7c..abbbaa440f0 100644 --- a/gcc/ada/s-valllu.adb +++ b/gcc/ada/s-valllu.adb @@ -42,7 +42,7 @@ package body System.Val_LLU is function Scan_Raw_Long_Long_Unsigned (Str : String; - Ptr : access Integer; + Ptr : not null access Integer; Max : Integer) return Long_Long_Unsigned is P : Integer; @@ -271,7 +271,7 @@ package body System.Val_LLU is function Scan_Long_Long_Unsigned (Str : String; - Ptr : access Integer; + Ptr : not null access Integer; Max : Integer) return Long_Long_Unsigned is Start : Positive; |