aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/s-valint.ads
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/s-valint.ads')
-rw-r--r--gcc/ada/s-valint.ads4
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/s-valint.ads b/gcc/ada/s-valint.ads
index 6413a34..8b8a4c7 100644
--- a/gcc/ada/s-valint.ads
+++ b/gcc/ada/s-valint.ads
@@ -6,7 +6,7 @@
-- --
-- S p e c --
-- --
--- Copyright (C) 1992-2005, Free Software Foundation, Inc. --
+-- Copyright (C) 1992-2006, Free Software Foundation, Inc. --
-- --
-- GNAT is free software; you can redistribute it and/or modify it under --
-- terms of the GNU General Public License as published by the Free Soft- --
@@ -39,7 +39,7 @@ package System.Val_Int is
function Scan_Integer
(Str : String;
- Ptr : access Integer;
+ Ptr : not null access Integer;
Max : Integer) return Integer;
-- This function scans the string starting at Str (Ptr.all) for a valid
-- integer according to the syntax described in (RM 3.5(43)). The substring