changeset 5473:3e4564ddd985

[project @ 2005-09-23 21:19:17 by jwe]
author jwe
date Fri, 23 Sep 2005 21:19:17 +0000
parents e2f85b298a74
children af90c01ff467
files scripts/strings/split.m test/octave.test/string/split-3.m test/octave.test/string/string.exp
diffstat 3 files changed, 7 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/strings/split.m	Fri Sep 23 21:10:36 2005 +0000
+++ b/scripts/strings/split.m	Fri Sep 23 21:19:17 2005 +0000
@@ -74,7 +74,7 @@
 	m = s;
 	return;
       elseif (n - 1 < length(ind))
-	ind = ind(1:n-1)
+	ind = ind(1:n-1);
       endif
       ind2 = [1, ind+l_t];
       ind  = [ind, l_s+1];
--- a/test/octave.test/string/split-3.m	Fri Sep 23 21:10:36 2005 +0000
+++ b/test/octave.test/string/split-3.m	Fri Sep 23 21:19:17 2005 +0000
@@ -1,1 +1,1 @@
-split ("foo", "bar", 3)
+all (strcmp (split ("foo bar baz", " ", 2), ["foo"; "bar baz"]))
--- a/test/octave.test/string/string.exp	Fri Sep 23 21:10:36 2005 +0000
+++ b/test/octave.test/string/string.exp	Fri Sep 23 21:19:17 2005 +0000
@@ -231,8 +231,12 @@
 do_test split-2.m
 
 set test split-3
+set prog_output "^ans = 1"
+do_test split-3.m
+
+set test split-4
 set prog_output "^usage:.*"
-do_test split-3.m
+do_test split-4.m
 
 set test strrep-1
 set prog_output "^ans = 1"