aboutsummaryrefslogtreecommitdiff
path: root/gcc/m2/gm2-libs-log/Strings.def
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/m2/gm2-libs-log/Strings.def')
-rw-r--r--gcc/m2/gm2-libs-log/Strings.def4
1 files changed, 3 insertions, 1 deletions
diff --git a/gcc/m2/gm2-libs-log/Strings.def b/gcc/m2/gm2-libs-log/Strings.def
index aea35f8..2be4e42 100644
--- a/gcc/m2/gm2-libs-log/Strings.def
+++ b/gcc/m2/gm2-libs-log/Strings.def
@@ -53,7 +53,9 @@ PROCEDURE Delete (VAR str: ARRAY OF CHAR; index: CARDINAL; length: CARDINAL) ;
(*
- Pos - return the first position of, substr, in, str.
+ Pos - return the first position of substr in str.
+ If substr is not found in str then it returns
+ HIGH (str) + 1.
*)
PROCEDURE Pos (substr, str: ARRAY OF CHAR) : CARDINAL ;