Mercurial > hg > octave-lyh

diff scripts/strings/index.m @ 6901:0baa196d93b5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-09-14 17:16:42 by jwe]
author jwe
date Fri, 14 Sep 2007 17:16:42 +0000
parents f7fdea19da88
children 93c65f2a5668
line wrap: on
line diff
--- a/scripts/strings/index.m
+++ b/scripts/strings/index.m
@@ -106,6 +106,7 @@
 	  break;
 	endif
       endfor
+      v = [];
     endif
 
   endif
@@ -122,9 +123,11 @@
 %!assert(index("astringbstringcstring", "st"), 2)
 %!assert(index("astringbstringcstring", "str"), 2)
 %!assert(index("astringbstringcstring", "string"), 2)
+%!assert(index("abc---", "abc+++"), 0) 
 
 ## test everything out in reverse
 %!assert(index("astringbstringcstring", "s", "last"), 16)
 %!assert(index("astringbstringcstring", "st", "last"), 16)
 %!assert(index("astringbstringcstring", "str", "last"), 16)
 %!assert(index("astringbstringcstring", "string", "last"), 16)
+%!assert(index("abc---", "abc+++", "last"), 0)