summaryrefslogtreecommitdiff
path: root/gcc/ada/a-stzsup.ads
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/a-stzsup.ads')
-rw-r--r--gcc/ada/a-stzsup.ads10
1 files changed, 9 insertions, 1 deletions
diff --git a/gcc/ada/a-stzsup.ads b/gcc/ada/a-stzsup.ads
index 978ad34e3f0..7e67f53bae8 100644
--- a/gcc/ada/a-stzsup.ads
+++ b/gcc/ada/a-stzsup.ads
@@ -6,7 +6,7 @@
-- --
-- S p e c --
-- --
--- Copyright (C) 2003-2009, Free Software Foundation, Inc. --
+-- Copyright (C) 2003-2010, 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- --
@@ -307,6 +307,14 @@ package Ada.Strings.Wide_Wide_Superbounded is
procedure Super_Find_Token
(Source : Super_String;
Set : Wide_Wide_Maps.Wide_Wide_Character_Set;
+ From : Positive;
+ Test : Membership;
+ First : out Positive;
+ Last : out Natural);
+
+ procedure Super_Find_Token
+ (Source : Super_String;
+ Set : Wide_Wide_Maps.Wide_Wide_Character_Set;
Test : Membership;
First : out Positive;
Last : out Natural);