diff options
Diffstat (limited to 'gcc/ada/s-valint.adb')
| -rw-r--r-- | gcc/ada/s-valint.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/s-valint.adb b/gcc/ada/s-valint.adb index 60c761fdfd3..1e2524b390c 100644 --- a/gcc/ada/s-valint.adb +++ b/gcc/ada/s-valint.adb @@ -43,7 +43,7 @@ package body System.Val_Int is function Scan_Integer (Str : String; - Ptr : access Integer; + Ptr : not null access Integer; Max : Integer) return Integer is Uval : Unsigned; |