Index: string-icalls.c
===================================================================
RCS file: /cvs/public/mono/mono/metadata/string-icalls.c,v
retrieving revision 1.4
diff -u -r1.4 string-icalls.c
--- string-icalls.c	20 Apr 2002 13:49:34 -0000	1.4
+++ string-icalls.c	22 Apr 2002 04:12:24 -0000
@@ -322,7 +322,7 @@
 	}
 
 	if (0 == typ || 2 == typ) {
-		for (i = srclen - lenfirst; i != 0; i--) {
+		for (i = srclen - lenfirst - 1; i != 0; i--) {
 			if (mono_string_isinarray(chars, arrlen, src[i]))
 				lenlast++;
 			else