Mercurial > octave-nkf

diff test/test_contin.m @ 14131:c3309e1ec50d stable

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
test: Use Octave coding and spacing conventions for fixed test scripts * build_bc_overload_tests.sh, build_bc_overloads_expected.m, build_sparse_tests.sh, test_args.m, test_contin.m, test_diag_perm.m, test_error.m, test_eval-catch.m, test_for.m, test_func.m, test_global.m, test_if.m, test_index.m, test_io.m, test_logical_index.m, test_null_assign.m, test_parser.m, test_prefer.m, test_range.m, test_recursion.m, test_return.m, test_slice.m, test_struct.m, test_switch.m, test_system.m, test_transpose.m, test_try.m, test_unwind.m, test_while.m: Use Octave coding and spacing conventions for fixed test scripts.
author Rik <octave@nomad.inbox5.com>
date Sun, 01 Jan 2012 20:04:52 -0800
parents fd0a3ac60b0e
children
line wrap: on
line diff
--- a/test/test_contin.m	Sun Jan 01 19:17:02 2012 -0500
+++ b/test/test_contin.m	Sun Jan 01 20:04:52 2012 -0800
@@ -16,100 +16,29 @@
 ## along with Octave; see the file COPYING.  If not, see
 ## <http://www.gnu.org/licenses/>.
 
-%% test/octave.test/contin/contin-1.m
-%!test
-%! x = [1,2];
-%! a = 1;
-%! b = 2;
-%! y = [a... # comments here ok
-%! b];
-%! assert(all (y == x));
-
-%% test/octave.test/contin/contin-2.m
-%!test
-%! x = [1,2];
-%! a = 1;
-%! b = 2;
-%! y = [a... # comments here ok
-%! b];
-%! assert(all (y == x));
-
-%% test/octave.test/contin/contin-3.m
-%!test
+%!shared x, a, b
 %! x = [1,2];
 %! a = 1;
 %! b = 2;
+
+%!test
 %! y = [a... # comments here ok
 %! b];
-%! assert(all (y == x));
-
-%% test/octave.test/contin/contin-4.m
-%!test
-%! x = [1,2];
-%! a = 1;
-%! b = 2;
-%! y = [a... # comments ok here
-%! b];
-%! assert(all (y == x));
+%! assert (y, x);
 
-%% test/octave.test/contin/contin-5.m
-%!test
-%! x = [1,2];
-%! a = 1;
-%! b = 2;
-%! y = [a... # comments here ok
-%! b];
-%! assert(all (y == x));
-
-%% test/octave.test/contin/contin-6.m
-%!test
-%! x = [1,2];
-%! a = 1;
-%! b = 2;
-%! y = [a... # comments here ok
-%! b];
-%! assert(all (y == x));
-
-%% test/octave.test/contin/contin-7.m
 %!test
 %! x = [1;2];
-%! a = 1;
-%! b = 2;
 %! y = [a... # comments here ok
 %! ;\
 %! 
 %! b];
-%! assert(all (y == x));
-
-%% test/octave.test/contin/contin-8.m
-%!test
-%! x = [1;2];
-%! a = 1;
-%! b = 2;
-%! y = [a... # comments here ok
-%! ;\
-%! 
-%! b];
-%! assert(all (y == x));
+%! assert (y, x);
 
-%% test/octave.test/contin/contin-9.m
-%!test
-%! x = [1;2];
-%! a = 1;
-%! b = 2;
-%! y = [a... # comments here ok
-%! ;\
-%! 
-%! b];
-%! assert(all (y == x));
-
-%% test/octave.test/contin/contin-10.m
-%!assert(1 + ...
+%!assert (1 + ...
 %! 2 - \# comments here ok
 %! 3 / ... # comments here ok
 %! -1,6);
 
-%% test/octave.test/contin/contin-11.m
 %!function y = f (a,...
 %!                b,  ...
 %!                c,  ...   % comments ok
@@ -118,16 +47,15 @@
 %!                z)
 %!
 %!  y = 1;
-%!test
-%! assert(f (),1);
+%!endfunction
+%!
+%!assert (f (), 1)
 
-%% test/octave.test/contin/contin-12.m
 %!test
-%!assert(1 == 1
+%!assert (1 == 1
 %! && 2 == 2
 %! || 3 == 5);
 
-%% test/octave.test/contin/contin-13.m
 %!test
 %! x = [1, ...
 %! 
@@ -135,29 +63,18 @@
 %! 
 %! 2];
 %! y = [1;2];
-%! assert(all (y == x));
+%! assert (y, x);
 
-%% test/octave.test/contin/contin-14.m
 %!test
-%! x = [1, ...
-%! 
-%! ...
-%! 
-%! 2];
-%! y = [1;2];
-%! assert(all (y == x));
-
-%% test/octave.test/contin/contin-15.m
-%!test
-%! x = [1,...
+%! x = [1 ,...
 %! 2];
 %! y = [1,2];
-%! assert(all (y == x));
+%! assert (y, x);
 
-%% test/octave.test/contin/contin-16.m
+%% test/oc tave.test/contin/contin-16.m
 %!test
 %! x = [ 1 , ...
 %! 2];
 %! y = [1,2];
-%! assert(all (y == x));
+%! assert  (y, x);