# HG changeset patch
# User Kim Hansen <kim@ange.dk>
# Date 1289985419 18000
# Node ID fd18ba11af577b57414d8ef6523c3b68062aa4e7
# Parent  fe11e2b9d48a7054d62dfbdfe1f9b6cb6cbf652d
Extra tests in strchr

diff -r fe11e2b9d48a -r fd18ba11af57 scripts/ChangeLog
--- a/scripts/ChangeLog	Wed Nov 17 03:04:03 2010 -0500
+++ b/scripts/ChangeLog	Wed Nov 17 04:16:59 2010 -0500
@@ -1,3 +1,7 @@
+2010-11-17  Kim Hansen  <kim@ange.dk>
+
+	* strings/strchr.m: New tests.
+
 2010-11-16  Ben Abbott <bpabbott@mac.com>
 
 	* miscellaneous/unimplemented.m: Update unimplemented functions list.
diff -r fe11e2b9d48a -r fd18ba11af57 scripts/strings/strchr.m
--- a/scripts/strings/strchr.m	Wed Nov 17 03:04:03 2010 -0500
+++ b/scripts/strings/strchr.m	Wed Nov 17 04:16:59 2010 -0500
@@ -57,4 +57,7 @@
   [varargout{:}] = find (mask, varargin{:});
 endfunction 
 
+%!assert(strchr("Octave is the best software",""),zeros(1,0))
 %!assert(strchr("Octave is the best software","best"),[3, 6, 9, 11, 13, 15, 16, 17, 18, 20, 23, 27])
+%!assert(strchr("Octave is the best software","software"),[3, 4, 6, 9, 11, 13, 16, 17, 18, 20, 21, 22, 23, 24, 25, 26, 27])
+