# HG changeset patch # User jwe # Date 1057885074 0 # Node ID 4accb5d844126d4a9160d727af0cbe1307396892 # Parent f3c21a1d1c621f20f4172d274128af5682b5550f [project @ 2003-07-11 00:57:52 by jwe] diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/index.exp --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/index.exp Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,163 @@ +## Tests with warn_fortran_indexing == "false" + +## scalar tests + +set test index-s-1 +set prog_output "ans = 1" +do_test s-1.m + +set test index-s-2 +set prog_output "ans = 1" +do_test s-2.m + +set test index-s-3 +set prog_output "ans = 1" +do_test s-3.m + +set test index-s-4 +set prog_output "ans = 1" +do_test s-4.m + +set test index-s-5 +set prog_output "ans = 1" +do_test s-5.m + +set test index-s-6 +set prog_output "ans = 1" +do_test s-6.m + +set test index-s-7 +set prog_output "ans = 1" +do_test s-7.m + +set test index-s-8 +set prog_output "error:.*" +do_test s-8.m + +set test index-s-9 +set prog_output "error:.*" +do_test s-9.m + +set test index-s-10 +set prog_output "error:.*" +do_test s-10.m + +set test index-s-11 +set prog_output "error:.*" +do_test s-11.m + +set test index-s-12 +set prog_output "error:.*" +do_test s-12.m + +set test index-s-13 +set prog_output "error:.*" +do_test s-13.m + +set test index-s-14 +set prog_output "error:.*" +do_test s-14.m + +set test index-s-15 +set prog_output "error:.*" +do_test s-15.m + +set test index-s-16 +set prog_output "error:.*" +do_test s-16.m + +set test index-s-17 +set prog_output "error:.*" +do_test s-17.m + +set test index-s-18 +set prog_output "error:.*" +do_test s-18.m + +set test index-s-19 +set prog_output "error:.*" +do_test s-19.m + +set test index-s-20 +set prog_output "error:.*" +do_test s-20.m + +## vector tests + +set test index-v-1 +set prog_output "ans = 4" +do_test v-1.m + +set test index-v-2 +set prog_output "ans = 3" +do_test v-2.m + +set test index-v-3 +set prog_output "ans = 1" +do_test v-3.m + +set test index-v-4 +set prog_output "ans = 1" +do_test v-4.m + +set test index-v-5 +set prog_output "ans = 2" +do_test v-5.m + +set test index-v-6 +set prog_output "ans = 1" +do_test v-6.m + +set test index-v-7 +set prog_output "ans = 1" +do_test v-7.m + +set test index-v-8 +set prog_output "error:.*" +do_test v-8.m + +set test index-v-9 +set prog_output "error:.*" +do_test v-9.m + +set test index-v-10 +set prog_output "error:.*" +do_test v-10.m + +set test index-v-11 +set prog_output "ans = 1" +do_test v-11.m + +set test index-v-12 +set prog_output "error:.*" +do_test v-12.m + +set test index-v-13 +set prog_output "ans = 1" +do_test v-13.m + +set test index-v-14 +set prog_output "ans = 1" +do_test v-14.m + +set test index-v-15 +set prog_output "ans = 1" +do_test v-15.m + +## matrix tests + +set test index-m-1 +set prog_output "ans = 1" +do_test m-1.m + +set test index-m-2 +set prog_output "ans = 1" +do_test m-2.m + +set test index-m-3 +set prog_output "error:.*" +do_test m-3.m + +set test index-m-4 +set prog_output "ans = 3" +do_test m-4.m diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/m-1.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/m-1.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,8 @@ +warn_fortran_indexing = 0; +a = [1,2;3,4]; +a_fvec = [1;3;2;4]; +a_col_1 = [1;3]; +a_col_2 = [2;4]; +a_row_1 = [1,2]; +a_row_2 = [3,4]; +all (all (a(:,:) == a)) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/m-2.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/m-2.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,8 @@ +warn_fortran_indexing = 0; +a = [1,2;3,4]; +a_fvec = [1;3;2;4]; +a_col_1 = [1;3]; +a_col_2 = [2;4]; +a_row_1 = [1,2]; +a_row_2 = [3,4]; +all (a(:) == a_fvec) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/m-3.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/m-3.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,8 @@ +warn_fortran_indexing = 0; +a = [1,2;3,4]; +a_fvec = [1;3;2;4]; +a_col_1 = [1;3]; +a_col_2 = [2;4]; +a_row_1 = [1,2]; +a_row_2 = [3,4]; +a(0) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/m-4.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/m-4.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,8 @@ +warn_fortran_indexing = 0; +a = [1,2;3,4]; +a_fvec = [1;3;2;4]; +a_col_1 = [1;3]; +a_col_2 = [2;4]; +a_row_1 = [1,2]; +a_row_2 = [3,4]; +a(2) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/s-1.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/s-1.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = []; +isempty (a) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/s-10.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/s-10.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = 1; +a(2,:) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/s-11.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/s-11.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = 1; +a(:,2) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/s-12.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/s-12.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = 1; +a(-1,:) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/s-13.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/s-13.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = 1; +a(:,-1) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/s-14.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/s-14.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = 1; +a([1,2,3]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/s-15.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/s-15.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = 1; +a([1;2;3]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/s-16.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/s-16.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = 1; +a([1,2;3,4]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/s-17.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/s-17.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = 1; +a([0,1]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/s-18.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/s-18.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = 1; +a([0;1]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/s-19.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/s-19.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = 1; +a([-1,0]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/s-2.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/s-2.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = 1; +a(1) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/s-20.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/s-20.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = 1; +a([-1;0]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/s-3.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/s-3.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = 1; +a(:) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/s-4.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/s-4.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = 1; +a(:,:) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/s-5.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/s-5.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = 1; +a(1,:) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/s-6.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/s-6.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = 1; +a(:,1) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/s-7.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/s-7.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = 1; +isempty (a(logical (0))) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/s-8.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/s-8.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = 1; +a(-1) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/s-9.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/s-9.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = 1; +a(2) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/v-1.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/v-1.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,5 @@ +warn_fortran_indexing = 0; +a = [4,3,2,1]; +a_prime = [4;3;2;1]; +mid_a = [3,2]; +a(1) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/v-10.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/v-10.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,5 @@ +warn_fortran_indexing = 0; +a = [4,3,2,1]; +a_prime = [4;3;2;1]; +mid_a = [3,2]; +a(0,1) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/v-11.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/v-11.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,5 @@ +warn_fortran_indexing = 0; +a = [4,3,2,1]; +a_prime = [4;3;2;1]; +mid_a = [3,2]; +isempty (a(logical (0),:)) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/v-12.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/v-12.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,5 @@ +warn_fortran_indexing = 0; +a = [4,3,2,1]; +a_prime = [4;3;2;1]; +mid_a = [3,2]; +a(:,0) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/v-13.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/v-13.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,5 @@ +warn_fortran_indexing = 0; +a = [4,3,2,1]; +a_prime = [4;3;2;1]; +mid_a = [3,2]; +isempty (a([])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/v-14.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/v-14.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,5 @@ +warn_fortran_indexing = 0; +a = [4,3,2,1]; +a_prime = [4;3;2;1]; +mid_a = [3,2]; +isempty (a([],:)) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/v-15.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/v-15.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,5 @@ +warn_fortran_indexing = 0; +a = [4,3,2,1]; +a_prime = [4;3;2;1]; +mid_a = [3,2]; +isempty (a(:,[])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/v-2.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/v-2.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,5 @@ +warn_fortran_indexing = 0; +a = [4,3,2,1]; +a_prime = [4;3;2;1]; +mid_a = [3,2]; +a(2) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/v-3.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/v-3.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,5 @@ +warn_fortran_indexing = 0; +a = [4,3,2,1]; +a_prime = [4;3;2;1]; +mid_a = [3,2]; +all (a(:) == a_prime) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/v-4.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/v-4.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,5 @@ +warn_fortran_indexing = 0; +a = [4,3,2,1]; +a_prime = [4;3;2;1]; +mid_a = [3,2]; +all (a(1,:) == a) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/v-5.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/v-5.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,5 @@ +warn_fortran_indexing = 0; +a = [4,3,2,1]; +a_prime = [4;3;2;1]; +mid_a = [3,2]; +a(:,3) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/v-6.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/v-6.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,5 @@ +warn_fortran_indexing = 0; +a = [4,3,2,1]; +a_prime = [4;3;2;1]; +mid_a = [3,2]; +all (a(:,:) == a) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/v-7.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/v-7.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,5 @@ +warn_fortran_indexing = 0; +a = [4,3,2,1]; +a_prime = [4;3;2;1]; +mid_a = [3,2]; +all (a(logical ([0,1,1,0])) == mid_a) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/v-8.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/v-8.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,5 @@ +warn_fortran_indexing = 0; +a = [4,3,2,1]; +a_prime = [4;3;2;1]; +mid_a = [3,2]; +a(0) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-f/v-9.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-f/v-9.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,5 @@ +warn_fortran_indexing = 0; +a = [4,3,2,1]; +a_prime = [4;3;2;1]; +mid_a = [3,2]; +a(5) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/index.exp --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/index.exp Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,163 @@ +## Tests with warn_fortran_indexing == "true" + +## scalar tests + +set test index-s-1 +set prog_output "ans = 1" +do_test s-1.m + +set test index-s-2 +set prog_output "ans = 1" +do_test s-2.m + +set test index-s-3 +set prog_output "ans = 1" +do_test s-3.m + +set test index-s-4 +set prog_output "ans = 1" +do_test s-4.m + +set test index-s-5 +set prog_output "ans = 1" +do_test s-5.m + +set test index-s-6 +set prog_output "ans = 1" +do_test s-6.m + +set test index-s-7 +set prog_output "ans = 1" +do_test s-7.m + +set test index-s-8 +set prog_output "error:.*" +do_test s-8.m + +set test index-s-9 +set prog_output "error:.*" +do_test s-9.m + +set test index-s-10 +set prog_output "error:.*" +do_test s-10.m + +set test index-s-11 +set prog_output "error:.*" +do_test s-11.m + +set test index-s-12 +set prog_output "error:.*" +do_test s-12.m + +set test index-s-13 +set prog_output "error:.*" +do_test s-13.m + +set test index-s-14 +set prog_output "error:.*" +do_test s-14.m + +set test index-s-15 +set prog_output "error:.*" +do_test s-15.m + +set test index-s-16 +set prog_output "error:.*" +do_test s-16.m + +set test index-s-17 +set prog_output "error:.*" +do_test s-17.m + +set test index-s-18 +set prog_output "error:.*" +do_test s-18.m + +set test index-s-19 +set prog_output "error:.*" +do_test s-19.m + +set test index-s-20 +set prog_output "error:.*" +do_test s-20.m + +## vector tests + +set test index-v-1 +set prog_output "ans = 4" +do_test v-1.m + +set test index-v-2 +set prog_output "ans = 3" +do_test v-2.m + +set test index-v-3 +set prog_output "ans = 1" +do_test v-3.m + +set test index-v-4 +set prog_output "ans = 1" +do_test v-4.m + +set test index-v-5 +set prog_output "ans = 2" +do_test v-5.m + +set test index-v-6 +set prog_output "ans = 1" +do_test v-6.m + +set test index-v-7 +set prog_output "ans = 1" +do_test v-7.m + +set test index-v-8 +set prog_output "error:.*" +do_test v-8.m + +set test index-v-9 +set prog_output "error:.*" +do_test v-9.m + +set test index-v-10 +set prog_output "error:.*" +do_test v-10.m + +set test index-v-11 +set prog_output "ans = 1" +do_test v-11.m + +set test index-v-12 +set prog_output "error:.*" +do_test v-12.m + +set test index-v-13 +set prog_output "ans = 1" +do_test v-13.m + +set test index-v-14 +set prog_output "ans = 1" +do_test v-14.m + +set test index-v-15 +set prog_output "ans = 1" +do_test v-15.m + +## matrix tests + +set test index-m-1 +set prog_output "ans = 1" +do_test m-1.m + +set test index-m-2 +set prog_output "ans = 1" +do_test m-2.m + +set test index-m-3 +set prog_output "error:.*" +do_test m-3.m + +set test index-m-4 +set prog_output "warning:.*" +do_test m-4.m diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/m-1.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/m-1.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,8 @@ +warn_fortran_indexing = 1; +a = [1,2;3,4]; +a_fvec = [1;3;2;4]; +a_col_1 = [1;3]; +a_col_2 = [2;4]; +a_row_1 = [1,2]; +a_row_2 = [3,4]; +all (all (a(:,:) == a)) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/m-2.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/m-2.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,8 @@ +warn_fortran_indexing = 1; +a = [1,2;3,4]; +a_fvec = [1;3;2;4]; +a_col_1 = [1;3]; +a_col_2 = [2;4]; +a_row_1 = [1,2]; +a_row_2 = [3,4]; +all (a(:) == a_fvec) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/m-3.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/m-3.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,8 @@ +warn_fortran_indexing = 1; +a = [1,2;3,4]; +a_fvec = [1;3;2;4]; +a_col_1 = [1;3]; +a_col_2 = [2;4]; +a_row_1 = [1,2]; +a_row_2 = [3,4]; +a(0) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/m-4.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/m-4.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,8 @@ +warn_fortran_indexing = 1; +a = [1,2;3,4]; +a_fvec = [1;3;2;4]; +a_col_1 = [1;3]; +a_col_2 = [2;4]; +a_row_1 = [1,2]; +a_row_2 = [3,4]; +a(2) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/s-1.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/s-1.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = []; +isempty (a) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/s-10.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/s-10.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = 1; +a(2,:) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/s-11.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/s-11.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = 1; +a(:,2) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/s-12.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/s-12.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = 1; +a(-1,:) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/s-13.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/s-13.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = 1; +a(:,-1) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/s-14.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/s-14.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = 1; +a([1,2,3]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/s-15.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/s-15.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = 1; +a([1;2;3]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/s-16.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/s-16.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = 1; +a([1,2;3,4]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/s-17.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/s-17.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = 1; +a([0,1]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/s-18.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/s-18.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = 1; +a([0;1]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/s-19.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/s-19.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = 1; +a([-1,0]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/s-2.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/s-2.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = 1; +a(1) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/s-20.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/s-20.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = 1; +a([-1;0]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/s-3.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/s-3.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = 1; +a(:) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/s-4.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/s-4.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = 1; +a(:,:) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/s-5.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/s-5.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = 1; +a(1,:) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/s-6.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/s-6.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = 1; +a(:,1) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/s-7.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/s-7.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = 1; +isempty (a(logical (0))) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/s-8.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/s-8.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = 1; +a(-1) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/s-9.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/s-9.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = 1; +a(2) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/v-1.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/v-1.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,5 @@ +warn_fortran_indexing = 1; +a = [4,3,2,1]; +a_prime = [4;3;2;1]; +mid_a = [3,2]; +a(1) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/v-10.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/v-10.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,5 @@ +warn_fortran_indexing = 1; +a = [4,3,2,1]; +a_prime = [4;3;2;1]; +mid_a = [3,2]; +a(0,1) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/v-11.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/v-11.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,5 @@ +warn_fortran_indexing = 1; +a = [4,3,2,1]; +a_prime = [4;3;2;1]; +mid_a = [3,2]; +isempty (a(logical (0),:)) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/v-12.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/v-12.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,5 @@ +warn_fortran_indexing = 1; +a = [4,3,2,1]; +a_prime = [4;3;2;1]; +mid_a = [3,2]; +a(:,0) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/v-13.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/v-13.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,5 @@ +warn_fortran_indexing = 1; +a = [4,3,2,1]; +a_prime = [4;3;2;1]; +mid_a = [3,2]; +isempty (a([])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/v-14.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/v-14.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,5 @@ +warn_fortran_indexing = 1; +a = [4,3,2,1]; +a_prime = [4;3;2;1]; +mid_a = [3,2]; +isempty (a([],:)) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/v-15.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/v-15.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,5 @@ +warn_fortran_indexing = 1; +a = [4,3,2,1]; +a_prime = [4;3;2;1]; +mid_a = [3,2]; +isempty (a(:,[])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/v-2.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/v-2.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,5 @@ +warn_fortran_indexing = 1; +a = [4,3,2,1]; +a_prime = [4;3;2;1]; +mid_a = [3,2]; +a(2) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/v-3.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/v-3.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,5 @@ +warn_fortran_indexing = 1; +a = [4,3,2,1]; +a_prime = [4;3;2;1]; +mid_a = [3,2]; +all (a(:) == a_prime) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/v-4.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/v-4.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,5 @@ +warn_fortran_indexing = 1; +a = [4,3,2,1]; +a_prime = [4;3;2;1]; +mid_a = [3,2]; +all (a(1,:) == a) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/v-5.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/v-5.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,5 @@ +warn_fortran_indexing = 1; +a = [4,3,2,1]; +a_prime = [4;3;2;1]; +mid_a = [3,2]; +a(:,3) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/v-6.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/v-6.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,5 @@ +warn_fortran_indexing = 1; +a = [4,3,2,1]; +a_prime = [4;3;2;1]; +mid_a = [3,2]; +all (a(:,:) == a) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/v-7.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/v-7.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,5 @@ +warn_fortran_indexing = 1; +a = [4,3,2,1]; +a_prime = [4;3;2;1]; +mid_a = [3,2]; +all (a(logical ([0,1,1,0])) == mid_a) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/v-8.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/v-8.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,5 @@ +warn_fortran_indexing = 1; +a = [4,3,2,1]; +a_prime = [4;3;2;1]; +mid_a = [3,2]; +a(0) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index-wfi-t/v-9.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/index-wfi-t/v-9.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,5 @@ +warn_fortran_indexing = 1; +a = [4,3,2,1]; +a_prime = [4;3;2;1]; +mid_a = [3,2]; +a(5) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/index.exp --- a/test/octave.test/index/dfi-f/index.exp Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,163 +0,0 @@ -## Tests with do_fortran_indexing == "false" - -## scalar tests - -set test index-s-1 -set prog_output "ans = 1" -do_test s-1.m - -set test index-s-2 -set prog_output "ans = 1" -do_test s-2.m - -set test index-s-3 -set prog_output "ans = 1" -do_test s-3.m - -set test index-s-4 -set prog_output "ans = 1" -do_test s-4.m - -set test index-s-5 -set prog_output "ans = 1" -do_test s-5.m - -set test index-s-6 -set prog_output "ans = 1" -do_test s-6.m - -set test index-s-7 -set prog_output "ans = 1" -do_test s-7.m - -set test index-s-8 -set prog_output "error:.*" -do_test s-8.m - -set test index-s-9 -set prog_output "error:.*" -do_test s-9.m - -set test index-s-10 -set prog_output "error:.*" -do_test s-10.m - -set test index-s-11 -set prog_output "error:.*" -do_test s-11.m - -set test index-s-12 -set prog_output "error:.*" -do_test s-12.m - -set test index-s-13 -set prog_output "error:.*" -do_test s-13.m - -set test index-s-14 -set prog_output "error:.*" -do_test s-14.m - -set test index-s-15 -set prog_output "error:.*" -do_test s-15.m - -set test index-s-16 -set prog_output "error:.*" -do_test s-16.m - -set test index-s-17 -set prog_output "error:.*" -do_test s-17.m - -set test index-s-18 -set prog_output "error:.*" -do_test s-18.m - -set test index-s-19 -set prog_output "error:.*" -do_test s-19.m - -set test index-s-20 -set prog_output "error:.*" -do_test s-20.m - -## vector tests - -set test index-v-1 -set prog_output "ans = 4" -do_test v-1.m - -set test index-v-2 -set prog_output "ans = 3" -do_test v-2.m - -set test index-v-3 -set prog_output "ans = 1" -do_test v-3.m - -set test index-v-4 -set prog_output "ans = 1" -do_test v-4.m - -set test index-v-5 -set prog_output "ans = 2" -do_test v-5.m - -set test index-v-6 -set prog_output "ans = 1" -do_test v-6.m - -set test index-v-7 -set prog_output "ans = 1" -do_test v-7.m - -set test index-v-8 -set prog_output "error:.*" -do_test v-8.m - -set test index-v-9 -set prog_output "error:.*" -do_test v-9.m - -set test index-v-10 -set prog_output "error:.*" -do_test v-10.m - -set test index-v-11 -set prog_output "ans = 1" -do_test v-11.m - -set test index-v-12 -set prog_output "error:.*" -do_test v-12.m - -set test index-v-13 -set prog_output "ans = 1" -do_test v-13.m - -set test index-v-14 -set prog_output "ans = 1" -do_test v-14.m - -set test index-v-15 -set prog_output "ans = 1" -do_test v-15.m - -## matrix tests - -set test index-m-1 -set prog_output "ans = 1" -do_test m-1.m - -set test index-m-2 -set prog_output "ans = 1" -do_test m-2.m - -set test index-m-3 -set prog_output "error:.*" -do_test m-3.m - -set test index-m-4 -set prog_output "error:.*" -do_test m-4.m diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/m-1.m --- a/test/octave.test/index/dfi-f/m-1.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,8 +0,0 @@ -do_fortran_indexing = 0; -a = [1,2;3,4]; -a_fvec = [1;3;2;4]; -a_col_1 = [1;3]; -a_col_2 = [2;4]; -a_row_1 = [1,2]; -a_row_2 = [3,4]; -all (all (a(:,:) == a)) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/m-2.m --- a/test/octave.test/index/dfi-f/m-2.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,8 +0,0 @@ -do_fortran_indexing = 0; -a = [1,2;3,4]; -a_fvec = [1;3;2;4]; -a_col_1 = [1;3]; -a_col_2 = [2;4]; -a_row_1 = [1,2]; -a_row_2 = [3,4]; -all (a(:) == a_fvec) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/m-3.m --- a/test/octave.test/index/dfi-f/m-3.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,8 +0,0 @@ -do_fortran_indexing = 0; -a = [1,2;3,4]; -a_fvec = [1;3;2;4]; -a_col_1 = [1;3]; -a_col_2 = [2;4]; -a_row_1 = [1,2]; -a_row_2 = [3,4]; -a(0) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/m-4.m --- a/test/octave.test/index/dfi-f/m-4.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,8 +0,0 @@ -do_fortran_indexing = 0; -a = [1,2;3,4]; -a_fvec = [1;3;2;4]; -a_col_1 = [1;3]; -a_col_2 = [2;4]; -a_row_1 = [1,2]; -a_row_2 = [3,4]; -a(2) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/s-1.m --- a/test/octave.test/index/dfi-f/s-1.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 0; -a = []; -isempty (a) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/s-10.m --- a/test/octave.test/index/dfi-f/s-10.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 0; -a = 1; -a(2,:) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/s-11.m --- a/test/octave.test/index/dfi-f/s-11.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 0; -a = 1; -a(:,2) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/s-12.m --- a/test/octave.test/index/dfi-f/s-12.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 0; -a = 1; -a(-1,:) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/s-13.m --- a/test/octave.test/index/dfi-f/s-13.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 0; -a = 1; -a(:,-1) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/s-14.m --- a/test/octave.test/index/dfi-f/s-14.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 0; -a = 1; -a([1,2,3]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/s-15.m --- a/test/octave.test/index/dfi-f/s-15.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 0; -a = 1; -a([1;2;3]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/s-16.m --- a/test/octave.test/index/dfi-f/s-16.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 0; -a = 1; -a([1,2;3,4]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/s-17.m --- a/test/octave.test/index/dfi-f/s-17.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 0; -a = 1; -a([0,1]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/s-18.m --- a/test/octave.test/index/dfi-f/s-18.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 0; -a = 1; -a([0;1]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/s-19.m --- a/test/octave.test/index/dfi-f/s-19.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 0; -a = 1; -a([-1,0]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/s-2.m --- a/test/octave.test/index/dfi-f/s-2.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 0; -a = 1; -a(1) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/s-20.m --- a/test/octave.test/index/dfi-f/s-20.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 0; -a = 1; -a([-1;0]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/s-3.m --- a/test/octave.test/index/dfi-f/s-3.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 0; -a = 1; -a(:) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/s-4.m --- a/test/octave.test/index/dfi-f/s-4.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 0; -a = 1; -a(:,:) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/s-5.m --- a/test/octave.test/index/dfi-f/s-5.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 0; -a = 1; -a(1,:) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/s-6.m --- a/test/octave.test/index/dfi-f/s-6.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 0; -a = 1; -a(:,1) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/s-7.m --- a/test/octave.test/index/dfi-f/s-7.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 0; -a = 1; -isempty (a(logical (0))) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/s-8.m --- a/test/octave.test/index/dfi-f/s-8.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 0; -a = 1; -a(-1) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/s-9.m --- a/test/octave.test/index/dfi-f/s-9.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 0; -a = 1; -a(2) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/v-1.m --- a/test/octave.test/index/dfi-f/v-1.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,5 +0,0 @@ -do_fortran_indexing = 0; -a = [4,3,2,1]; -a_prime = [4;3;2;1]; -mid_a = [3,2]; -a(1) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/v-10.m --- a/test/octave.test/index/dfi-f/v-10.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,5 +0,0 @@ -do_fortran_indexing = 0; -a = [4,3,2,1]; -a_prime = [4;3;2;1]; -mid_a = [3,2]; -a(0,1) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/v-11.m --- a/test/octave.test/index/dfi-f/v-11.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,5 +0,0 @@ -do_fortran_indexing = 0; -a = [4,3,2,1]; -a_prime = [4;3;2;1]; -mid_a = [3,2]; -isempty (a(logical (0),:)) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/v-12.m --- a/test/octave.test/index/dfi-f/v-12.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,5 +0,0 @@ -do_fortran_indexing = 0; -a = [4,3,2,1]; -a_prime = [4;3;2;1]; -mid_a = [3,2]; -a(:,0) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/v-13.m --- a/test/octave.test/index/dfi-f/v-13.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,5 +0,0 @@ -do_fortran_indexing = 0; -a = [4,3,2,1]; -a_prime = [4;3;2;1]; -mid_a = [3,2]; -isempty (a([])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/v-14.m --- a/test/octave.test/index/dfi-f/v-14.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,5 +0,0 @@ -do_fortran_indexing = 0; -a = [4,3,2,1]; -a_prime = [4;3;2;1]; -mid_a = [3,2]; -isempty (a([],:)) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/v-15.m --- a/test/octave.test/index/dfi-f/v-15.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,5 +0,0 @@ -do_fortran_indexing = 0; -a = [4,3,2,1]; -a_prime = [4;3;2;1]; -mid_a = [3,2]; -isempty (a(:,[])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/v-2.m --- a/test/octave.test/index/dfi-f/v-2.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,5 +0,0 @@ -do_fortran_indexing = 0; -a = [4,3,2,1]; -a_prime = [4;3;2;1]; -mid_a = [3,2]; -a(2) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/v-3.m --- a/test/octave.test/index/dfi-f/v-3.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,5 +0,0 @@ -do_fortran_indexing = 0; -a = [4,3,2,1]; -a_prime = [4;3;2;1]; -mid_a = [3,2]; -all (a(:) == a_prime) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/v-4.m --- a/test/octave.test/index/dfi-f/v-4.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,5 +0,0 @@ -do_fortran_indexing = 0; -a = [4,3,2,1]; -a_prime = [4;3;2;1]; -mid_a = [3,2]; -all (a(1,:) == a) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/v-5.m --- a/test/octave.test/index/dfi-f/v-5.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,5 +0,0 @@ -do_fortran_indexing = 0; -a = [4,3,2,1]; -a_prime = [4;3;2;1]; -mid_a = [3,2]; -a(:,3) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/v-6.m --- a/test/octave.test/index/dfi-f/v-6.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,5 +0,0 @@ -do_fortran_indexing = 0; -a = [4,3,2,1]; -a_prime = [4;3;2;1]; -mid_a = [3,2]; -all (a(:,:) == a) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/v-7.m --- a/test/octave.test/index/dfi-f/v-7.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,5 +0,0 @@ -do_fortran_indexing = 0; -a = [4,3,2,1]; -a_prime = [4;3;2;1]; -mid_a = [3,2]; -all (a(logical ([0,1,1,0])) == mid_a) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/v-8.m --- a/test/octave.test/index/dfi-f/v-8.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,5 +0,0 @@ -do_fortran_indexing = 0; -a = [4,3,2,1]; -a_prime = [4;3;2;1]; -mid_a = [3,2]; -a(0) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-f/v-9.m --- a/test/octave.test/index/dfi-f/v-9.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,5 +0,0 @@ -do_fortran_indexing = 0; -a = [4,3,2,1]; -a_prime = [4;3;2;1]; -mid_a = [3,2]; -a(5) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/index.exp --- a/test/octave.test/index/dfi-t/index.exp Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,163 +0,0 @@ -## Tests with do_fortran_indexing == "true" - -## scalar tests - -set test index-s-1 -set prog_output "ans = 1" -do_test s-1.m - -set test index-s-2 -set prog_output "ans = 1" -do_test s-2.m - -set test index-s-3 -set prog_output "ans = 1" -do_test s-3.m - -set test index-s-4 -set prog_output "ans = 1" -do_test s-4.m - -set test index-s-5 -set prog_output "ans = 1" -do_test s-5.m - -set test index-s-6 -set prog_output "ans = 1" -do_test s-6.m - -set test index-s-7 -set prog_output "ans = 1" -do_test s-7.m - -set test index-s-8 -set prog_output "error:.*" -do_test s-8.m - -set test index-s-9 -set prog_output "error:.*" -do_test s-9.m - -set test index-s-10 -set prog_output "error:.*" -do_test s-10.m - -set test index-s-11 -set prog_output "error:.*" -do_test s-11.m - -set test index-s-12 -set prog_output "error:.*" -do_test s-12.m - -set test index-s-13 -set prog_output "error:.*" -do_test s-13.m - -set test index-s-14 -set prog_output "error:.*" -do_test s-14.m - -set test index-s-15 -set prog_output "error:.*" -do_test s-15.m - -set test index-s-16 -set prog_output "error:.*" -do_test s-16.m - -set test index-s-17 -set prog_output "error:.*" -do_test s-17.m - -set test index-s-18 -set prog_output "error:.*" -do_test s-18.m - -set test index-s-19 -set prog_output "error:.*" -do_test s-19.m - -set test index-s-20 -set prog_output "error:.*" -do_test s-20.m - -## vector tests - -set test index-v-1 -set prog_output "ans = 4" -do_test v-1.m - -set test index-v-2 -set prog_output "ans = 3" -do_test v-2.m - -set test index-v-3 -set prog_output "ans = 1" -do_test v-3.m - -set test index-v-4 -set prog_output "ans = 1" -do_test v-4.m - -set test index-v-5 -set prog_output "ans = 2" -do_test v-5.m - -set test index-v-6 -set prog_output "ans = 1" -do_test v-6.m - -set test index-v-7 -set prog_output "ans = 1" -do_test v-7.m - -set test index-v-8 -set prog_output "error:.*" -do_test v-8.m - -set test index-v-9 -set prog_output "error:.*" -do_test v-9.m - -set test index-v-10 -set prog_output "error:.*" -do_test v-10.m - -set test index-v-11 -set prog_output "ans = 1" -do_test v-11.m - -set test index-v-12 -set prog_output "error:.*" -do_test v-12.m - -set test index-v-13 -set prog_output "ans = 1" -do_test v-13.m - -set test index-v-14 -set prog_output "ans = 1" -do_test v-14.m - -set test index-v-15 -set prog_output "ans = 1" -do_test v-15.m - -## matrix tests - -set test index-m-1 -set prog_output "ans = 1" -do_test m-1.m - -set test index-m-2 -set prog_output "ans = 1" -do_test m-2.m - -set test index-m-3 -set prog_output "error:.*" -do_test m-3.m - -set test index-m-4 -set prog_output "ans = 3" -do_test m-4.m diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/m-1.m --- a/test/octave.test/index/dfi-t/m-1.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,8 +0,0 @@ -do_fortran_indexing = 1; -a = [1,2;3,4]; -a_fvec = [1;3;2;4]; -a_col_1 = [1;3]; -a_col_2 = [2;4]; -a_row_1 = [1,2]; -a_row_2 = [3,4]; -all (all (a(:,:) == a)) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/m-2.m --- a/test/octave.test/index/dfi-t/m-2.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,8 +0,0 @@ -do_fortran_indexing = 1; -a = [1,2;3,4]; -a_fvec = [1;3;2;4]; -a_col_1 = [1;3]; -a_col_2 = [2;4]; -a_row_1 = [1,2]; -a_row_2 = [3,4]; -all (a(:) == a_fvec) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/m-3.m --- a/test/octave.test/index/dfi-t/m-3.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,8 +0,0 @@ -do_fortran_indexing = 1; -a = [1,2;3,4]; -a_fvec = [1;3;2;4]; -a_col_1 = [1;3]; -a_col_2 = [2;4]; -a_row_1 = [1,2]; -a_row_2 = [3,4]; -a(0) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/m-4.m --- a/test/octave.test/index/dfi-t/m-4.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,8 +0,0 @@ -do_fortran_indexing = 1; -a = [1,2;3,4]; -a_fvec = [1;3;2;4]; -a_col_1 = [1;3]; -a_col_2 = [2;4]; -a_row_1 = [1,2]; -a_row_2 = [3,4]; -a(2) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/s-1.m --- a/test/octave.test/index/dfi-t/s-1.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 1; -a = []; -isempty (a) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/s-10.m --- a/test/octave.test/index/dfi-t/s-10.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 1; -a = 1; -a(2,:) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/s-11.m --- a/test/octave.test/index/dfi-t/s-11.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 1; -a = 1; -a(:,2) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/s-12.m --- a/test/octave.test/index/dfi-t/s-12.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 1; -a = 1; -a(-1,:) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/s-13.m --- a/test/octave.test/index/dfi-t/s-13.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 1; -a = 1; -a(:,-1) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/s-14.m --- a/test/octave.test/index/dfi-t/s-14.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 1; -a = 1; -a([1,2,3]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/s-15.m --- a/test/octave.test/index/dfi-t/s-15.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 1; -a = 1; -a([1;2;3]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/s-16.m --- a/test/octave.test/index/dfi-t/s-16.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 1; -a = 1; -a([1,2;3,4]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/s-17.m --- a/test/octave.test/index/dfi-t/s-17.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 1; -a = 1; -a([0,1]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/s-18.m --- a/test/octave.test/index/dfi-t/s-18.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 1; -a = 1; -a([0;1]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/s-19.m --- a/test/octave.test/index/dfi-t/s-19.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 1; -a = 1; -a([-1,0]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/s-2.m --- a/test/octave.test/index/dfi-t/s-2.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 1; -a = 1; -a(1) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/s-20.m --- a/test/octave.test/index/dfi-t/s-20.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 1; -a = 1; -a([-1;0]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/s-3.m --- a/test/octave.test/index/dfi-t/s-3.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 1; -a = 1; -a(:) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/s-4.m --- a/test/octave.test/index/dfi-t/s-4.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 1; -a = 1; -a(:,:) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/s-5.m --- a/test/octave.test/index/dfi-t/s-5.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 1; -a = 1; -a(1,:) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/s-6.m --- a/test/octave.test/index/dfi-t/s-6.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 1; -a = 1; -a(:,1) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/s-7.m --- a/test/octave.test/index/dfi-t/s-7.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 1; -a = 1; -isempty (a(logical (0))) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/s-8.m --- a/test/octave.test/index/dfi-t/s-8.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 1; -a = 1; -a(-1) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/s-9.m --- a/test/octave.test/index/dfi-t/s-9.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -do_fortran_indexing = 1; -a = 1; -a(2) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/v-1.m --- a/test/octave.test/index/dfi-t/v-1.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,5 +0,0 @@ -do_fortran_indexing = 1; -a = [4,3,2,1]; -a_prime = [4;3;2;1]; -mid_a = [3,2]; -a(1) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/v-10.m --- a/test/octave.test/index/dfi-t/v-10.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,5 +0,0 @@ -do_fortran_indexing = 1; -a = [4,3,2,1]; -a_prime = [4;3;2;1]; -mid_a = [3,2]; -a(0,1) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/v-11.m --- a/test/octave.test/index/dfi-t/v-11.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,5 +0,0 @@ -do_fortran_indexing = 1; -a = [4,3,2,1]; -a_prime = [4;3;2;1]; -mid_a = [3,2]; -isempty (a(logical (0),:)) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/v-12.m --- a/test/octave.test/index/dfi-t/v-12.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,5 +0,0 @@ -do_fortran_indexing = 1; -a = [4,3,2,1]; -a_prime = [4;3;2;1]; -mid_a = [3,2]; -a(:,0) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/v-13.m --- a/test/octave.test/index/dfi-t/v-13.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,5 +0,0 @@ -do_fortran_indexing = 1; -a = [4,3,2,1]; -a_prime = [4;3;2;1]; -mid_a = [3,2]; -isempty (a([])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/v-14.m --- a/test/octave.test/index/dfi-t/v-14.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,5 +0,0 @@ -do_fortran_indexing = 1; -a = [4,3,2,1]; -a_prime = [4;3;2;1]; -mid_a = [3,2]; -isempty (a([],:)) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/v-15.m --- a/test/octave.test/index/dfi-t/v-15.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,5 +0,0 @@ -do_fortran_indexing = 1; -a = [4,3,2,1]; -a_prime = [4;3;2;1]; -mid_a = [3,2]; -isempty (a(:,[])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/v-2.m --- a/test/octave.test/index/dfi-t/v-2.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,5 +0,0 @@ -do_fortran_indexing = 1; -a = [4,3,2,1]; -a_prime = [4;3;2;1]; -mid_a = [3,2]; -a(2) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/v-3.m --- a/test/octave.test/index/dfi-t/v-3.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,5 +0,0 @@ -do_fortran_indexing = 1; -a = [4,3,2,1]; -a_prime = [4;3;2;1]; -mid_a = [3,2]; -all (a(:) == a_prime) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/v-4.m --- a/test/octave.test/index/dfi-t/v-4.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,5 +0,0 @@ -do_fortran_indexing = 1; -a = [4,3,2,1]; -a_prime = [4;3;2;1]; -mid_a = [3,2]; -all (a(1,:) == a) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/v-5.m --- a/test/octave.test/index/dfi-t/v-5.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,5 +0,0 @@ -do_fortran_indexing = 1; -a = [4,3,2,1]; -a_prime = [4;3;2;1]; -mid_a = [3,2]; -a(:,3) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/v-6.m --- a/test/octave.test/index/dfi-t/v-6.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,5 +0,0 @@ -do_fortran_indexing = 1; -a = [4,3,2,1]; -a_prime = [4;3;2;1]; -mid_a = [3,2]; -all (a(:,:) == a) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/v-7.m --- a/test/octave.test/index/dfi-t/v-7.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,5 +0,0 @@ -do_fortran_indexing = 1; -a = [4,3,2,1]; -a_prime = [4;3;2;1]; -mid_a = [3,2]; -all (a(logical ([0,1,1,0])) == mid_a) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/v-8.m --- a/test/octave.test/index/dfi-t/v-8.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,5 +0,0 @@ -do_fortran_indexing = 1; -a = [4,3,2,1]; -a_prime = [4;3;2;1]; -mid_a = [3,2]; -a(0) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/index/dfi-t/v-9.m --- a/test/octave.test/index/dfi-t/v-9.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,5 +0,0 @@ -do_fortran_indexing = 1; -a = [4,3,2,1]; -a_prime = [4;3;2;1]; -mid_a = [3,2]; -a(5) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/logical-wfi-f.exp --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/logical-wfi-f.exp Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,183 @@ +## Tests with warn_fortran_indexing = false + +## scalar tests + +set test zero-one-ff-s-1 +set prog_output "^error:.*" +do_test s-1.m + +set test zero-one-ff-s-2 +set prog_output "^ans = 1" +do_test s-2.m + +set test zero-one-ff-s-3 +set prog_output "^ans = 1" +do_test s-3.m + +set test zero-one-ff-s-4 +set prog_output "^ans = 1" +do_test s-4.m + +## vector tests + +set test zero-one-ff-v-1 +set prog_output "^ans = 1" +do_test v-1.m + +set test zero-one-ff-v-2 +set prog_output "^ans = 1" +do_test v-2.m + +set test zero-one-ff-v-3 +set prog_output "^ans = 1" +do_test v-3.m + +set test zero-one-ff-v-4 +set prog_output "^ans = 1" +do_test v-4.m + +## matrix tests + +set test zero-one-ff-m-1 +set prog_output "^ans = 1" +do_test m-1.m + +set test zero-one-ff-m-2 +set prog_output "^ans = 1" +do_test m-2.m + +set test zero-one-ff-m-3 +set prog_output "^ans = 1"; +do_test m-3.m + +set test zero-one-ff-m-4 +set prog_output "^ans = 1" +do_test m-4.m + +set test zero-one-ff-m-5 +set prog_output "^ans = 1" +do_test m-5.m + +set test zero-one-ff-m-6 +set prog_output "^ans = 1" +do_test m-6.m + +set test zero-one-ff-m-7 +set prog_output "^ans = 1" +do_test m-7.m + +set test zero-one-ff-m-8 +set prog_output "^ans = 1" +do_test m-8.m + +set test zero-one-ff-m-9 +set prog_output "^ans = 1" +do_test m-9.m + +set test zero-one-ff-m-10 +set prog_output "^ans = 1" +do_test m-10.m + +set test zero-one-ff-m-11 +set prog_output "^ans = 1" +do_test m-11.m + +set test zero-one-ff-m-12 +set prog_output "^ans = 1" +do_test m-12.m + +set test zero-one-ff-m-13 +set prog_output "^ans = 1" +do_test m-13.m + +set test zero-one-ff-m-14 +set prog_output "^ans = 1" +do_test m-14.m + +set test zero-one-ff-m-15 +set prog_output "^ans = 1" +do_test m-15.m + +set test zero-one-ff-m-16 +set prog_output "^ans = 1" +do_test m-16.m + +set test zero-one-ff-m-17 +set prog_output "^ans = 1" +do_test m-17.m + +set test zero-one-ff-m-18 +set prog_output "^ans = 1" +do_test m-18.m + +set test zero-one-ff-m-19 +set prog_output "^ans = 1" +do_test m-19.m + +set test zero-one-ff-m-20 +set prog_output "^ans = 1" +do_test m-20.m + +set test zero-one-ff-m-21 +set prog_output "^ans = 1" +do_test m-21.m + +set test zero-one-ff-m-22 +set prog_output "^ans = 1" +do_test m-22.m + +set test zero-one-ff-m-23 +set prog_output "^ans = 1" +do_test m-23.m + +set test zero-one-ff-m-24 +set prog_output "^ans = 1" +do_test m-24.m + +set test zero-one-ff-m-25 +set prog_output "^ans = 1" +do_test m-25.m + +set test zero-one-ff-m-26 +set prog_output "^ans = 1" +do_test m-26.m + +set test zero-one-ff-m-27 +set prog_output "^ans = 1" +do_test m-27.m + +set test zero-one-ff-m-28 +set prog_output "^ans = 1" +do_test m-28.m + +set test zero-one-ff-m-29 +set prog_output "^ans = 1" +do_test m-29.m + +set test zero-one-ff-m-30 +set prog_output "^ans = 1" +do_test m-30.m + +set test zero-one-ff-m-31 +set prog_output "^ans = 1" +do_test m-31.m + +set test zero-one-ff-m-32 +set prog_output "^ans = 1" +do_test m-32.m + +set test zero-one-ff-m-33 +set prog_output "^ans = 1" +do_test m-33.m + +set test zero-one-ff-m-34 +set prog_output "^ans = 1" +do_test m-34.m + +set test zero-one-ff-m-35 +set prog_output "^ans = 1" +do_test m-35.m + +set test zero-one-ff-m-36 +set prog_output "^ans = 1" +do_test m-36.m diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/m-1.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/m-1.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8;7,6]; +isempty (a(logical ([0,0,0,0]))) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/m-10.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/m-10.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8;7,6]; +all (a(logical (0:1),logical ([1,1])) == [7,6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/m-11.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/m-11.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8;7,6]; +all (a(2:-1:1,logical (0:1)) == [6;8]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/m-12.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/m-12.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8;7,6]; +all (a(2:-1:1,logical ([0,1])) == [6;8]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/m-13.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/m-13.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8;7,6]; +all (all (a(2:-1:1,logical ([1,1])) == [7,6;9,8])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/m-14.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/m-14.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8;7,6]; +a(logical ([0,1]),logical (0:1)) == 6 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/m-15.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/m-15.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8;7,6]; +all (a(logical ([0,1]),2:-1:1) == [6,7]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/m-16.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/m-16.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8;7,6]; +a(logical ([0,1]),logical ([0,1])) == 6 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/m-17.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/m-17.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8;7,6]; +all (a(logical ([0,1]),[2,1]) == [6,7]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/m-18.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/m-18.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8;7,6]; +all (a(logical ([0,1]),:) == [7,6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/m-19.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/m-19.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8;7,6]; +a(logical ([0,1]),1) == 7 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/m-2.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/m-2.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8;7,6]; +all (a(logical ([1,1,1,1])) == [9;7;8;6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/m-20.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/m-20.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8;7,6]; +all (a(logical ([0,1]),logical ([1,1])) == [7,6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/m-21.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/m-21.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8;7,6]; +all (a([2,1],logical (0:1)) == [6;8]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/m-22.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/m-22.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8;7,6]; +all (a([2,1],logical ([0,1])) == [6;8]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/m-23.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/m-23.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8;7,6]; +all (all (a([2,1],logical ([1,1])) == [7,6;9,8])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/m-24.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/m-24.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8;7,6]; +all (a(:,logical (0:1)) == [8;6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/m-25.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/m-25.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8;7,6]; +all (a(:,logical ([0,1])) == [8;6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/m-26.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/m-26.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8;7,6]; +all (all (a(:,logical ([1,1])) == [9,8;7,6])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/m-27.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/m-27.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8;7,6]; +a(1,logical (0:1)) == 8 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/m-28.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/m-28.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8;7,6]; +a(1,logical ([0,1])) == 8 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/m-29.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/m-29.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8;7,6]; +all (a(1,logical ([1,1])) == [9,8]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/m-3.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/m-3.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8;7,6]; +all (a(logical ([0,1,1,0])) == [7;8]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/m-30.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/m-30.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8;7,6]; +all (a(logical ([1,1]),logical (0:1)) == [8;6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/m-31.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/m-31.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8;7,6]; +all (all (a(logical ([1,1]),2:-1:1) == [8,9;6,7])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/m-32.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/m-32.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8;7,6]; +all (a(logical ([1,1]),logical ([0,1])) == [8;6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/m-33.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/m-33.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8;7,6]; +all (all (a(logical ([1,1]),[2,1]) == [8,9;6,7])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/m-34.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/m-34.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8;7,6]; +all (all (a(logical ([1,1]),:) == [9,8;7,6])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/m-35.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/m-35.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8;7,6]; +all (a(logical ([1,1]),1) == [9;7]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/m-36.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/m-36.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8;7,6]; +all (all (a(logical ([1,1]),logical ([1,1])) == [9,8;7,6])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/m-4.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/m-4.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8;7,6]; +a(logical (0:1),logical (0:1)) == 6 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/m-5.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/m-5.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8;7,6]; +all (a(logical (0:1),2:-1:1) == [6,7]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/m-6.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/m-6.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8;7,6]; +a(logical (0:1),logical ([0,1])) == 6 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/m-7.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/m-7.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8;7,6]; +all (a(logical (0:1),[2,1]) == [6,7]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/m-8.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/m-8.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8;7,6]; +all (a(logical (0:1),:) == [7,6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/m-9.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/m-9.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8;7,6]; +a(logical (0:1),1) == 7 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/s-1.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/s-1.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = []; +a(0) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/s-2.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/s-2.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = 2; +a(1) == 2 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/s-3.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/s-3.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = 2; +a(1) == 2 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/s-4.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/s-4.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = 2; +all (a(logical ([1,1])) == [2,2]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/v-1.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/v-1.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8,7,6]; +isempty (a(logical ([0,0,0,0]))) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/v-2.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/v-2.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8,7,6]; +all (a(logical ([1,1,1,1])) == [9,8,7,6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/v-3.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/v-3.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8,7,6]; +all (a(logical ([0,1,1,0])) == [8,7]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-f/v-4.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-f/v-4.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 0; +a = [9,8,7,6]; +all (a(logical ([1,1])) == [9,9]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/logical-wfi-t.exp --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/logical-wfi-t.exp Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,183 @@ +## Tests with warn_fortran_indexing = true + +## scalar tests + +set test zero-one-ft-s-1 +set prog_output "^warning:.*" +do_test s-1.m + +set test zero-one-ft-s-2 +set prog_output "^ans = 1" +do_test s-2.m + +set test zero-one-ft-s-3 +set prog_output "^ans = 1" +do_test s-3.m + +set test zero-one-ft-s-4 +set prog_output "^ans = 1" +do_test s-4.m + +## vector tests + +set test zero-one-ft-v-1 +set prog_output "^ans = 1" +do_test v-1.m + +set test zero-one-ft-v-2 +set prog_output "^ans = 1" +do_test v-2.m + +set test zero-one-ft-v-3 +set prog_output "^ans = 1" +do_test v-3.m + +set test zero-one-ft-v-4 +set prog_output "^ans = 1" +do_test v-4.m + +## matrix tests + +set test zero-one-ft-m-1 +set prog_output "^warning:.*" +do_test m-1.m + +set test zero-one-ft-m-2 +set prog_output "^warning:.*" +do_test m-2.m + +set test zero-one-ft-m-3 +set prog_output "^warning:.*" +do_test m-3.m + +set test zero-one-ft-m-4 +set prog_output "^ans = 1" +do_test m-4.m + +set test zero-one-ft-m-5 +set prog_output "^ans = 1" +do_test m-5.m + +set test zero-one-ft-m-6 +set prog_output "^ans = 1" +do_test m-6.m + +set test zero-one-ft-m-7 +set prog_output "^ans = 1" +do_test m-7.m + +set test zero-one-ft-m-8 +set prog_output "^ans = 1" +do_test m-8.m + +set test zero-one-ft-m-9 +set prog_output "^ans = 1" +do_test m-9.m + +set test zero-one-ft-m-10 +set prog_output "^ans = 1" +do_test m-10.m + +set test zero-one-ft-m-11 +set prog_output "^ans = 1" +do_test m-11.m + +set test zero-one-ft-m-12 +set prog_output "^ans = 1" +do_test m-12.m + +set test zero-one-ft-m-13 +set prog_output "^ans = 1" +do_test m-13.m + +set test zero-one-ft-m-14 +set prog_output "^ans = 1" +do_test m-14.m + +set test zero-one-ft-m-15 +set prog_output "^ans = 1" +do_test m-15.m + +set test zero-one-ft-m-16 +set prog_output "^ans = 1" +do_test m-16.m + +set test zero-one-ft-m-17 +set prog_output "^ans = 1" +do_test m-17.m + +set test zero-one-ft-m-18 +set prog_output "^ans = 1" +do_test m-18.m + +set test zero-one-ft-m-19 +set prog_output "^ans = 1" +do_test m-19.m + +set test zero-one-ft-m-20 +set prog_output "^ans = 1" +do_test m-20.m + +set test zero-one-ft-m-21 +set prog_output "^ans = 1" +do_test m-21.m + +set test zero-one-ft-m-22 +set prog_output "^ans = 1" +do_test m-22.m + +set test zero-one-ft-m-23 +set prog_output "^ans = 1" +do_test m-23.m + +set test zero-one-ft-m-24 +set prog_output "^ans = 1" +do_test m-24.m + +set test zero-one-ft-m-25 +set prog_output "^ans = 1" +do_test m-25.m + +set test zero-one-ft-m-26 +set prog_output "^ans = 1" +do_test m-26.m + +set test zero-one-ft-m-27 +set prog_output "^ans = 1" +do_test m-27.m + +set test zero-one-ft-m-28 +set prog_output "^ans = 1" +do_test m-28.m + +set test zero-one-ft-m-29 +set prog_output "^ans = 1" +do_test m-29.m + +set test zero-one-ft-m-30 +set prog_output "^ans = 1" +do_test m-30.m + +set test zero-one-ft-m-31 +set prog_output "^ans = 1" +do_test m-31.m + +set test zero-one-ft-m-32 +set prog_output "^ans = 1" +do_test m-32.m + +set test zero-one-ft-m-33 +set prog_output "^ans = 1" +do_test m-33.m + +set test zero-one-ft-m-34 +set prog_output "^ans = 1" +do_test m-34.m + +set test zero-one-ft-m-35 +set prog_output "^ans = 1" +do_test m-35.m + +set test zero-one-ft-m-36 +set prog_output "^ans = 1" +do_test m-36.m diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/m-1.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/m-1.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8;7,6]; +isempty (a(logical ([0,0,0,0]))) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/m-10.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/m-10.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8;7,6]; +all (a(logical (0:1),logical ([1,1])) == [7,6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/m-11.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/m-11.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8;7,6]; +all (a(2:-1:1,logical (0:1)) == [6;8]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/m-12.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/m-12.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8;7,6]; +all (a(2:-1:1,logical ([0,1])) == [6;8]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/m-13.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/m-13.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8;7,6]; +all (all (a(2:-1:1,logical ([1,1])) == [7,6;9,8])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/m-14.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/m-14.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8;7,6]; +a(logical ([0,1]),logical (0:1)) == 6 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/m-15.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/m-15.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8;7,6]; +all (a(logical ([0,1]),2:-1:1) == [6,7]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/m-16.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/m-16.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8;7,6]; +a(logical ([0,1]),logical ([0,1])) == 6 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/m-17.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/m-17.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8;7,6]; +all (a(logical ([0,1]),[2,1]) == [6,7]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/m-18.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/m-18.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8;7,6]; +all (a(logical ([0,1]),:) == [7,6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/m-19.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/m-19.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8;7,6]; +a(logical ([0,1]),1) == 7 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/m-2.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/m-2.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8;7,6]; +all (a(logical ([1,1,1,1])) == [9;7;8;6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/m-20.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/m-20.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8;7,6]; +all (a(logical ([0,1]),logical ([1,1])) == [7,6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/m-21.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/m-21.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8;7,6]; +all (a([2,1],logical (0:1)) == [6;8]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/m-22.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/m-22.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8;7,6]; +all (a([2,1],logical ([0,1])) == [6;8]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/m-23.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/m-23.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8;7,6]; +all (all (a([2,1],logical ([1,1])) == [7,6;9,8])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/m-24.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/m-24.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8;7,6]; +all (a(:,logical (0:1)) == [8;6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/m-25.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/m-25.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8;7,6]; +all (a(:,logical ([0,1])) == [8;6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/m-26.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/m-26.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8;7,6]; +all (all (a(:,logical ([1,1])) == [9,8;7,6])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/m-27.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/m-27.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8;7,6]; +a(1,logical (0:1)) == 8 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/m-28.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/m-28.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8;7,6]; +a(1,logical ([0,1])) == 8 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/m-29.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/m-29.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8;7,6]; +all (a(1,logical ([1,1])) == [9,8]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/m-3.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/m-3.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8;7,6]; +all (a(logical ([0,1,1,0])) == [7;8]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/m-30.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/m-30.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8;7,6]; +all (a(logical ([1,1]),logical (0:1)) == [8;6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/m-31.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/m-31.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8;7,6]; +all (all (a(logical ([1,1]),2:-1:1) == [8,9;6,7])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/m-32.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/m-32.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8;7,6]; +all (a(logical ([1,1]),logical ([0,1])) == [8;6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/m-33.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/m-33.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8;7,6]; +all (all (a(logical ([1,1]),[2,1]) == [8,9;6,7])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/m-34.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/m-34.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8;7,6]; +all (all (a(logical ([1,1]),:) == [9,8;7,6])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/m-35.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/m-35.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8;7,6]; +all (a(logical ([1,1]),1) == [9;7]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/m-36.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/m-36.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8;7,6]; +all (all (a(logical ([1,1]),logical ([1,1])) == [9,8;7,6])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/m-4.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/m-4.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8;7,6]; +a(logical (0:1),logical (0:1)) == 6 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/m-5.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/m-5.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8;7,6]; +all (a(logical (0:1),2:-1:1) == [6,7]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/m-6.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/m-6.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8;7,6]; +a(logical (0:1),logical ([0,1])) == 6 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/m-7.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/m-7.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8;7,6]; +all (a(logical (0:1),[2,1]) == [6,7]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/m-8.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/m-8.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8;7,6]; +all (a(logical (0:1),:) == [7,6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/m-9.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/m-9.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8;7,6]; +a(logical (0:1),1) == 7 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/s-1.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/s-1.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = []; +a(0) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/s-2.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/s-2.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = 2; +a(1) == 2 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/s-3.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/s-3.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = 2; +a(1) == 2 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/s-4.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/s-4.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = 2; +all (a(logical ([1,1])) == [2,2]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/v-1.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/v-1.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8,7,6]; +isempty (a(logical ([0,0,0,0]))) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/v-2.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/v-2.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8,7,6]; +all (a(logical ([1,1,1,1])) == [9,8,7,6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/v-3.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/v-3.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8,7,6]; +all (a(logical ([0,1,1,0])) == [8,7]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/logical-wfi-t/v-4.m --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/test/octave.test/logical-wfi-t/v-4.m Fri Jul 11 00:57:54 2003 +0000 @@ -0,0 +1,3 @@ +warn_fortran_indexing = 1; +a = [9,8,7,6]; +all (a(logical ([1,1])) == [9,9]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/matrix/linspace-2.m --- a/test/octave.test/matrix/linspace-2.m Wed Jul 09 23:20:19 2003 +0000 +++ b/test/octave.test/matrix/linspace-2.m Fri Jul 11 00:57:54 2003 +0000 @@ -1,1 +1,2 @@ -linspace ([1, 2; 3, 4], 5, 6) +warn_fortran_indexing = 0; +all (linspace ([1, 2; 3, 4], 5, 6) == linspace (1, 5, 6)) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/matrix/matrix.exp --- a/test/octave.test/matrix/matrix.exp Wed Jul 09 23:20:19 2003 +0000 +++ b/test/octave.test/matrix/matrix.exp Fri Jul 11 00:57:54 2003 +0000 @@ -239,7 +239,7 @@ do_test linspace-1.m set test linspace-2 -set prog_output "error:.*" +set prog_output "ans = 1" do_test linspace-2.m set test linspace-3 @@ -250,6 +250,10 @@ set prog_output "\n... linspace:.*" do_test linspace-4.m +set test linspace-5 +set prog_output "warning:.*" +do_test linspace-5.m + set test logspace-1 set prog_output "ans = 1" do_test logspace-1.m diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/prefer/prefer-17.m --- a/test/octave.test/prefer/prefer-17.m Wed Jul 09 23:20:19 2003 +0000 +++ b/test/octave.test/prefer/prefer-17.m Fri Jul 11 00:57:54 2003 +0000 @@ -1,3 +1,2 @@ resize_on_range_error = 1; -prefer_column_vectors = 1; -clear a; a(1) = 1; a(2) = 2; all (a == [1;2]) +clear a; a(2) = 1; a(3) = 2; all (a == [0,1,2]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/prefer/prefer-18.m --- a/test/octave.test/prefer/prefer-18.m Wed Jul 09 23:20:19 2003 +0000 +++ b/test/octave.test/prefer/prefer-18.m Fri Jul 11 00:57:54 2003 +0000 @@ -1,2 +1,1 @@ -prefer_column_vectors = 0; clear a; a(1) = 1; a(2) = 2; all (a == [1,2]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/m-1.m --- a/test/octave.test/zero-one/ff/m-1.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8;7,6]; -a(logical ([0,0,0,0])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/m-10.m --- a/test/octave.test/zero-one/ff/m-10.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (a(logical (0:1),logical ([1,1])) == [7,6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/m-11.m --- a/test/octave.test/zero-one/ff/m-11.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (a(2:-1:1,logical (0:1)) == [6;8]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/m-12.m --- a/test/octave.test/zero-one/ff/m-12.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (a(2:-1:1,logical ([0,1])) == [6;8]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/m-13.m --- a/test/octave.test/zero-one/ff/m-13.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (all (a(2:-1:1,logical ([1,1])) == [7,6;9,8])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/m-14.m --- a/test/octave.test/zero-one/ff/m-14.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8;7,6]; -a(logical ([0,1]),logical (0:1)) == 6 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/m-15.m --- a/test/octave.test/zero-one/ff/m-15.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (a(logical ([0,1]),2:-1:1) == [6,7]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/m-16.m --- a/test/octave.test/zero-one/ff/m-16.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8;7,6]; -a(logical ([0,1]),logical ([0,1])) == 6 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/m-17.m --- a/test/octave.test/zero-one/ff/m-17.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (a(logical ([0,1]),[2,1]) == [6,7]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/m-18.m --- a/test/octave.test/zero-one/ff/m-18.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (a(logical ([0,1]),:) == [7,6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/m-19.m --- a/test/octave.test/zero-one/ff/m-19.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8;7,6]; -a(logical ([0,1]),1) == 7 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/m-2.m --- a/test/octave.test/zero-one/ff/m-2.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8;7,6]; -a(logical ([1,1,1,1])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/m-20.m --- a/test/octave.test/zero-one/ff/m-20.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (a(logical ([0,1]),logical ([1,1])) == [7,6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/m-21.m --- a/test/octave.test/zero-one/ff/m-21.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (a([2,1],logical (0:1)) == [6;8]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/m-22.m --- a/test/octave.test/zero-one/ff/m-22.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (a([2,1],logical ([0,1])) == [6;8]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/m-23.m --- a/test/octave.test/zero-one/ff/m-23.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (all (a([2,1],logical ([1,1])) == [7,6;9,8])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/m-24.m --- a/test/octave.test/zero-one/ff/m-24.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (a(:,logical (0:1)) == [8;6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/m-25.m --- a/test/octave.test/zero-one/ff/m-25.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (a(:,logical ([0,1])) == [8;6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/m-26.m --- a/test/octave.test/zero-one/ff/m-26.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (all (a(:,logical ([1,1])) == [9,8;7,6])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/m-27.m --- a/test/octave.test/zero-one/ff/m-27.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8;7,6]; -a(1,logical (0:1)) == 8 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/m-28.m --- a/test/octave.test/zero-one/ff/m-28.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8;7,6]; -a(1,logical ([0,1])) == 8 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/m-29.m --- a/test/octave.test/zero-one/ff/m-29.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (a(1,logical ([1,1])) == [9,8]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/m-3.m --- a/test/octave.test/zero-one/ff/m-3.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8;7,6]; -a(logical ([0,1,1,0])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/m-30.m --- a/test/octave.test/zero-one/ff/m-30.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (a(logical ([1,1]),logical (0:1)) == [8;6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/m-31.m --- a/test/octave.test/zero-one/ff/m-31.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (all (a(logical ([1,1]),2:-1:1) == [8,9;6,7])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/m-32.m --- a/test/octave.test/zero-one/ff/m-32.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (a(logical ([1,1]),logical ([0,1])) == [8;6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/m-33.m --- a/test/octave.test/zero-one/ff/m-33.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (all (a(logical ([1,1]),[2,1]) == [8,9;6,7])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/m-34.m --- a/test/octave.test/zero-one/ff/m-34.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (all (a(logical ([1,1]),:) == [9,8;7,6])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/m-35.m --- a/test/octave.test/zero-one/ff/m-35.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (a(logical ([1,1]),1) == [9;7]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/m-36.m --- a/test/octave.test/zero-one/ff/m-36.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (all (a(logical ([1,1]),logical ([1,1])) == [9,8;7,6])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/m-4.m --- a/test/octave.test/zero-one/ff/m-4.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8;7,6]; -a(logical (0:1),logical (0:1)) == 6 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/m-5.m --- a/test/octave.test/zero-one/ff/m-5.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (a(logical (0:1),2:-1:1) == [6,7]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/m-6.m --- a/test/octave.test/zero-one/ff/m-6.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8;7,6]; -a(logical (0:1),logical ([0,1])) == 6 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/m-7.m --- a/test/octave.test/zero-one/ff/m-7.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (a(logical (0:1),[2,1]) == [6,7]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/m-8.m --- a/test/octave.test/zero-one/ff/m-8.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (a(logical (0:1),:) == [7,6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/m-9.m --- a/test/octave.test/zero-one/ff/m-9.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8;7,6]; -a(logical (0:1),1) == 7 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/s-1.m --- a/test/octave.test/zero-one/ff/s-1.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = []; -a(0) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/s-2.m --- a/test/octave.test/zero-one/ff/s-2.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = 2; -a(1) == 2 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/s-3.m --- a/test/octave.test/zero-one/ff/s-3.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = 2; -a(1) == 2 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/s-4.m --- a/test/octave.test/zero-one/ff/s-4.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = 2; -all (a(logical ([1,1])) == [2,2]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/v-1.m --- a/test/octave.test/zero-one/ff/v-1.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8,7,6]; -isempty (a(logical ([0,0,0,0]))) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/v-2.m --- a/test/octave.test/zero-one/ff/v-2.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8,7,6]; -all (a(logical ([1,1,1,1])) == [9,8,7,6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/v-3.m --- a/test/octave.test/zero-one/ff/v-3.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8,7,6]; -all (a(logical ([0,1,1,0])) == [8,7]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/v-4.m --- a/test/octave.test/zero-one/ff/v-4.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 0; -a = [9,8,7,6]; -all (a(logical ([1,1])) == [9,9]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ff/zero-one.exp --- a/test/octave.test/zero-one/ff/zero-one.exp Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,186 +0,0 @@ -## Tests with: -## -## prefer_column_vectors == "false" -## do_fortran_indexing == "false" - -## scalar tests - -set test zero-one-ff-s-1 -set prog_output "error:.*" -do_test s-1.m - -set test zero-one-ff-s-2 -set prog_output "ans = *1" -do_test s-2.m - -set test zero-one-ff-s-3 -set prog_output "ans = *1" -do_test s-3.m - -set test zero-one-ff-s-4 -set prog_output "ans = *1" -do_test s-4.m - -## vector tests - -set test zero-one-ff-v-1 -set prog_output "ans = *1" -do_test v-1.m - -set test zero-one-ff-v-2 -set prog_output "ans = *1" -do_test v-2.m - -set test zero-one-ff-v-3 -set prog_output "ans = *1" -do_test v-3.m - -set test zero-one-ff-v-4 -set prog_output "ans = *1" -do_test v-4.m - -## matrix tests - -set test zero-one-ff-m-1 -set prog_output "error:.*" -do_test m-1.m - -set test zero-one-ff-m-2 -set prog_output "error:.*" -do_test m-2.m - -set test zero-one-ff-m-3 -set prog_output "error:.*" -do_test m-3.m - -set test zero-one-ff-m-4 -set prog_output "ans = *1" -do_test m-4.m - -set test zero-one-ff-m-5 -set prog_output "ans = *1" -do_test m-5.m - -set test zero-one-ff-m-6 -set prog_output "ans = *1" -do_test m-6.m - -set test zero-one-ff-m-7 -set prog_output "ans = *1" -do_test m-7.m - -set test zero-one-ff-m-8 -set prog_output "ans = *1" -do_test m-8.m - -set test zero-one-ff-m-9 -set prog_output "ans = *1" -do_test m-9.m - -set test zero-one-ff-m-10 -set prog_output "ans = *1" -do_test m-10.m - -set test zero-one-ff-m-11 -set prog_output "ans = *1" -do_test m-11.m - -set test zero-one-ff-m-12 -set prog_output "ans = *1" -do_test m-12.m - -set test zero-one-ff-m-13 -set prog_output "ans = *1" -do_test m-13.m - -set test zero-one-ff-m-14 -set prog_output "ans = *1" -do_test m-14.m - -set test zero-one-ff-m-15 -set prog_output "ans = *1" -do_test m-15.m - -set test zero-one-ff-m-16 -set prog_output "ans = *1" -do_test m-16.m - -set test zero-one-ff-m-17 -set prog_output "ans = *1" -do_test m-17.m - -set test zero-one-ff-m-18 -set prog_output "ans = *1" -do_test m-18.m - -set test zero-one-ff-m-19 -set prog_output "ans = *1" -do_test m-19.m - -set test zero-one-ff-m-20 -set prog_output "ans = *1" -do_test m-20.m - -set test zero-one-ff-m-21 -set prog_output "ans = *1" -do_test m-21.m - -set test zero-one-ff-m-22 -set prog_output "ans = *1" -do_test m-22.m - -set test zero-one-ff-m-23 -set prog_output "ans = *1" -do_test m-23.m - -set test zero-one-ff-m-24 -set prog_output "ans = *1" -do_test m-24.m - -set test zero-one-ff-m-25 -set prog_output "ans = *1" -do_test m-25.m - -set test zero-one-ff-m-26 -set prog_output "ans = *1" -do_test m-26.m - -set test zero-one-ff-m-27 -set prog_output "ans = *1" -do_test m-27.m - -set test zero-one-ff-m-28 -set prog_output "ans = *1" -do_test m-28.m - -set test zero-one-ff-m-29 -set prog_output "ans = *1" -do_test m-29.m - -set test zero-one-ff-m-30 -set prog_output "ans = *1" -do_test m-30.m - -set test zero-one-ff-m-31 -set prog_output "ans = *1" -do_test m-31.m - -set test zero-one-ff-m-32 -set prog_output "ans = *1" -do_test m-32.m - -set test zero-one-ff-m-33 -set prog_output "ans = *1" -do_test m-33.m - -set test zero-one-ff-m-34 -set prog_output "ans = *1" -do_test m-34.m - -set test zero-one-ff-m-35 -set prog_output "ans = *1" -do_test m-35.m - -set test zero-one-ff-m-36 -set prog_output "ans = *1" -do_test m-36.m diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/m-1.m --- a/test/octave.test/zero-one/ft/m-1.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8;7,6]; -isempty (a(logical ([0,0,0,0]))) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/m-10.m --- a/test/octave.test/zero-one/ft/m-10.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a(logical (0:1),logical ([1,1])) == [7,6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/m-11.m --- a/test/octave.test/zero-one/ft/m-11.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a(2:-1:1,logical (0:1)) == [6;8]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/m-12.m --- a/test/octave.test/zero-one/ft/m-12.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a(2:-1:1,logical ([0,1])) == [6;8]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/m-13.m --- a/test/octave.test/zero-one/ft/m-13.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (all (a(2:-1:1,logical ([1,1])) == [7,6;9,8])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/m-14.m --- a/test/octave.test/zero-one/ft/m-14.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8;7,6]; -a(logical ([0,1]),logical (0:1)) == 6 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/m-15.m --- a/test/octave.test/zero-one/ft/m-15.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a(logical ([0,1]),2:-1:1) == [6,7]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/m-16.m --- a/test/octave.test/zero-one/ft/m-16.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8;7,6]; -a(logical ([0,1]),logical ([0,1])) == 6 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/m-17.m --- a/test/octave.test/zero-one/ft/m-17.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a(logical ([0,1]),[2,1]) == [6,7]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/m-18.m --- a/test/octave.test/zero-one/ft/m-18.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a(logical ([0,1]),:) == [7,6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/m-19.m --- a/test/octave.test/zero-one/ft/m-19.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8;7,6]; -a(logical ([0,1]),1) == 7 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/m-2.m --- a/test/octave.test/zero-one/ft/m-2.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a(logical ([1,1,1,1])) == [9;7;8;6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/m-20.m --- a/test/octave.test/zero-one/ft/m-20.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a(logical ([0,1]),logical ([1,1])) == [7,6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/m-21.m --- a/test/octave.test/zero-one/ft/m-21.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a([2,1],logical (0:1)) == [6;8]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/m-22.m --- a/test/octave.test/zero-one/ft/m-22.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a([2,1],logical ([0,1])) == [6;8]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/m-23.m --- a/test/octave.test/zero-one/ft/m-23.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (all (a([2,1],logical ([1,1])) == [7,6;9,8])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/m-24.m --- a/test/octave.test/zero-one/ft/m-24.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a(:,logical (0:1)) == [8;6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/m-25.m --- a/test/octave.test/zero-one/ft/m-25.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a(:,logical ([0,1])) == [8;6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/m-26.m --- a/test/octave.test/zero-one/ft/m-26.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (all (a(:,logical ([1,1])) == [9,8;7,6])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/m-27.m --- a/test/octave.test/zero-one/ft/m-27.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8;7,6]; -a(1,logical (0:1)) == 8 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/m-28.m --- a/test/octave.test/zero-one/ft/m-28.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8;7,6]; -a(1,logical ([0,1])) == 8 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/m-29.m --- a/test/octave.test/zero-one/ft/m-29.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a(1,logical ([1,1])) == [9,8]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/m-3.m --- a/test/octave.test/zero-one/ft/m-3.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a(logical ([0,1,1,0])) == [7;8]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/m-30.m --- a/test/octave.test/zero-one/ft/m-30.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a(logical ([1,1]),logical (0:1)) == [8;6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/m-31.m --- a/test/octave.test/zero-one/ft/m-31.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (all (a(logical ([1,1]),2:-1:1) == [8,9;6,7])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/m-32.m --- a/test/octave.test/zero-one/ft/m-32.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a(logical ([1,1]),logical ([0,1])) == [8;6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/m-33.m --- a/test/octave.test/zero-one/ft/m-33.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (all (a(logical ([1,1]),[2,1]) == [8,9;6,7])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/m-34.m --- a/test/octave.test/zero-one/ft/m-34.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (all (a(logical ([1,1]),:) == [9,8;7,6])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/m-35.m --- a/test/octave.test/zero-one/ft/m-35.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a(logical ([1,1]),1) == [9;7]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/m-36.m --- a/test/octave.test/zero-one/ft/m-36.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (all (a(logical ([1,1]),logical ([1,1])) == [9,8;7,6])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/m-4.m --- a/test/octave.test/zero-one/ft/m-4.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8;7,6]; -a(logical (0:1),logical (0:1)) == 6 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/m-5.m --- a/test/octave.test/zero-one/ft/m-5.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a(logical (0:1),2:-1:1) == [6,7]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/m-6.m --- a/test/octave.test/zero-one/ft/m-6.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8;7,6]; -a(logical (0:1),logical ([0,1])) == 6 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/m-7.m --- a/test/octave.test/zero-one/ft/m-7.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a(logical (0:1),[2,1]) == [6,7]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/m-8.m --- a/test/octave.test/zero-one/ft/m-8.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a(logical (0:1),:) == [7,6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/m-9.m --- a/test/octave.test/zero-one/ft/m-9.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8;7,6]; -a(logical (0:1),1) == 7 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/s-1.m --- a/test/octave.test/zero-one/ft/s-1.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = []; -a(0) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/s-2.m --- a/test/octave.test/zero-one/ft/s-2.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = 2; -a(1) == 2 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/s-3.m --- a/test/octave.test/zero-one/ft/s-3.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = 2; -a(1) == 2 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/s-4.m --- a/test/octave.test/zero-one/ft/s-4.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = 2; -all (a(logical ([1,1])) == [2,2]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/v-1.m --- a/test/octave.test/zero-one/ft/v-1.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8,7,6]; -isempty (a(logical ([0,0,0,0]))) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/v-2.m --- a/test/octave.test/zero-one/ft/v-2.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8,7,6]; -all (a(logical ([1,1,1,1])) == [9,8,7,6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/v-3.m --- a/test/octave.test/zero-one/ft/v-3.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8,7,6]; -all (a(logical ([0,1,1,0])) == [8,7]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/v-4.m --- a/test/octave.test/zero-one/ft/v-4.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 0; -do_fortran_indexing = 1; -a = [9,8,7,6]; -all (a(logical ([1,1])) == [9,9]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/ft/zero-one.exp --- a/test/octave.test/zero-one/ft/zero-one.exp Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,186 +0,0 @@ -## Tests with: -## -## prefer_column_vectors == "false" -## do_fortran_indexing == "true" - -## scalar tests - -set test zero-one-ft-s-1 -set prog_output "error:.*" -do_test s-1.m - -set test zero-one-ft-s-2 -set prog_output "ans = *1" -do_test s-2.m - -set test zero-one-ft-s-3 -set prog_output "ans = *1" -do_test s-3.m - -set test zero-one-ft-s-4 -set prog_output "ans = *1" -do_test s-4.m - -## vector tests - -set test zero-one-ft-v-1 -set prog_output "ans = *1" -do_test v-1.m - -set test zero-one-ft-v-2 -set prog_output "ans = *1" -do_test v-2.m - -set test zero-one-ft-v-3 -set prog_output "ans = *1" -do_test v-3.m - -set test zero-one-ft-v-4 -set prog_output "ans = *1" -do_test v-4.m - -## matrix tests - -set test zero-one-ft-m-1 -set prog_output "ans = *1" -do_test m-1.m - -set test zero-one-ft-m-2 -set prog_output "ans = *1" -do_test m-2.m - -set test zero-one-ft-m-3 -set prog_output "ans = *1" -do_test m-3.m - -set test zero-one-ft-m-4 -set prog_output "ans = *1" -do_test m-4.m - -set test zero-one-ft-m-5 -set prog_output "ans = *1" -do_test m-5.m - -set test zero-one-ft-m-6 -set prog_output "ans = *1" -do_test m-6.m - -set test zero-one-ft-m-7 -set prog_output "ans = *1" -do_test m-7.m - -set test zero-one-ft-m-8 -set prog_output "ans = *1" -do_test m-8.m - -set test zero-one-ft-m-9 -set prog_output "ans = *1" -do_test m-9.m - -set test zero-one-ft-m-10 -set prog_output "ans = *1" -do_test m-10.m - -set test zero-one-ft-m-11 -set prog_output "ans = *1" -do_test m-11.m - -set test zero-one-ft-m-12 -set prog_output "ans = *1" -do_test m-12.m - -set test zero-one-ft-m-13 -set prog_output "ans = *1" -do_test m-13.m - -set test zero-one-ft-m-14 -set prog_output "ans = *1" -do_test m-14.m - -set test zero-one-ft-m-15 -set prog_output "ans = *1" -do_test m-15.m - -set test zero-one-ft-m-16 -set prog_output "ans = *1" -do_test m-16.m - -set test zero-one-ft-m-17 -set prog_output "ans = *1" -do_test m-17.m - -set test zero-one-ft-m-18 -set prog_output "ans = *1" -do_test m-18.m - -set test zero-one-ft-m-19 -set prog_output "ans = *1" -do_test m-19.m - -set test zero-one-ft-m-20 -set prog_output "ans = *1" -do_test m-20.m - -set test zero-one-ft-m-21 -set prog_output "ans = *1" -do_test m-21.m - -set test zero-one-ft-m-22 -set prog_output "ans = *1" -do_test m-22.m - -set test zero-one-ft-m-23 -set prog_output "ans = *1" -do_test m-23.m - -set test zero-one-ft-m-24 -set prog_output "ans = *1" -do_test m-24.m - -set test zero-one-ft-m-25 -set prog_output "ans = *1" -do_test m-25.m - -set test zero-one-ft-m-26 -set prog_output "ans = *1" -do_test m-26.m - -set test zero-one-ft-m-27 -set prog_output "ans = *1" -do_test m-27.m - -set test zero-one-ft-m-28 -set prog_output "ans = *1" -do_test m-28.m - -set test zero-one-ft-m-29 -set prog_output "ans = *1" -do_test m-29.m - -set test zero-one-ft-m-30 -set prog_output "ans = *1" -do_test m-30.m - -set test zero-one-ft-m-31 -set prog_output "ans = *1" -do_test m-31.m - -set test zero-one-ft-m-32 -set prog_output "ans = *1" -do_test m-32.m - -set test zero-one-ft-m-33 -set prog_output "ans = *1" -do_test m-33.m - -set test zero-one-ft-m-34 -set prog_output "ans = *1" -do_test m-34.m - -set test zero-one-ft-m-35 -set prog_output "ans = *1" -do_test m-35.m - -set test zero-one-ft-m-36 -set prog_output "ans = *1" -do_test m-36.m diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/m-1.m --- a/test/octave.test/zero-one/tf/m-1.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8;7,6]; -a(logical ([0,0,0,0])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/m-10.m --- a/test/octave.test/zero-one/tf/m-10.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (a(logical (0:1),logical ([1,1])) == [7,6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/m-11.m --- a/test/octave.test/zero-one/tf/m-11.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (a(2:-1:1,logical (0:1)) == [6;8]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/m-12.m --- a/test/octave.test/zero-one/tf/m-12.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (a(2:-1:1,logical ([0,1])) == [6;8]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/m-13.m --- a/test/octave.test/zero-one/tf/m-13.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (all (a(2:-1:1,logical ([1,1])) == [7,6;9,8])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/m-14.m --- a/test/octave.test/zero-one/tf/m-14.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8;7,6]; -a(logical ([0,1]),logical (0:1)) == 6 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/m-15.m --- a/test/octave.test/zero-one/tf/m-15.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (a(logical ([0,1]),2:-1:1) == [6,7]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/m-16.m --- a/test/octave.test/zero-one/tf/m-16.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8;7,6]; -a(logical ([0,1]),logical ([0,1])) == 6 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/m-17.m --- a/test/octave.test/zero-one/tf/m-17.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (a(logical ([0,1]),[2,1]) == [6,7]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/m-18.m --- a/test/octave.test/zero-one/tf/m-18.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (a(logical ([0,1]),:) == [7,6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/m-19.m --- a/test/octave.test/zero-one/tf/m-19.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8;7,6]; -a(logical ([0,1]),1) == 7 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/m-2.m --- a/test/octave.test/zero-one/tf/m-2.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8;7,6]; -a(logical ([1,1,1,1])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/m-20.m --- a/test/octave.test/zero-one/tf/m-20.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (a(logical ([0,1]),logical ([1,1])) == [7,6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/m-21.m --- a/test/octave.test/zero-one/tf/m-21.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (a([2,1],logical (0:1)) == [6;8]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/m-22.m --- a/test/octave.test/zero-one/tf/m-22.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (a([2,1],logical ([0,1])) == [6;8]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/m-23.m --- a/test/octave.test/zero-one/tf/m-23.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (all (a([2,1],logical ([1,1])) == [7,6;9,8])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/m-24.m --- a/test/octave.test/zero-one/tf/m-24.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (a(:,logical (0:1)) == [8;6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/m-25.m --- a/test/octave.test/zero-one/tf/m-25.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (a(:,logical ([0,1])) == [8;6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/m-26.m --- a/test/octave.test/zero-one/tf/m-26.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (all (a(:,logical ([1,1])) == [9,8;7,6])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/m-27.m --- a/test/octave.test/zero-one/tf/m-27.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8;7,6]; -a(1,logical (0:1)) == 8 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/m-28.m --- a/test/octave.test/zero-one/tf/m-28.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8;7,6]; -a(1,logical ([0,1])) == 8 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/m-29.m --- a/test/octave.test/zero-one/tf/m-29.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (a(1,logical ([1,1])) == [9,8]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/m-3.m --- a/test/octave.test/zero-one/tf/m-3.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8;7,6]; -a(logical ([0,1,1,0])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/m-30.m --- a/test/octave.test/zero-one/tf/m-30.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (a(logical ([1,1]),logical (0:1)) == [8;6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/m-31.m --- a/test/octave.test/zero-one/tf/m-31.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (all (a(logical ([1,1]),2:-1:1) == [8,9;6,7])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/m-32.m --- a/test/octave.test/zero-one/tf/m-32.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (a(logical ([1,1]),logical ([0,1])) == [8;6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/m-33.m --- a/test/octave.test/zero-one/tf/m-33.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (all (a(logical ([1,1]),[2,1]) == [8,9;6,7])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/m-34.m --- a/test/octave.test/zero-one/tf/m-34.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (all (a(logical ([1,1]),:) == [9,8;7,6])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/m-35.m --- a/test/octave.test/zero-one/tf/m-35.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (a(logical ([1,1]),1) == [9;7]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/m-36.m --- a/test/octave.test/zero-one/tf/m-36.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (all (a(logical ([1,1]),logical ([1,1])) == [9,8;7,6])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/m-4.m --- a/test/octave.test/zero-one/tf/m-4.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8;7,6]; -a(logical (0:1),logical (0:1)) == 6 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/m-5.m --- a/test/octave.test/zero-one/tf/m-5.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (a(logical (0:1),2:-1:1) == [6,7]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/m-6.m --- a/test/octave.test/zero-one/tf/m-6.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8;7,6]; -a(logical (0:1),logical ([0,1])) == 6 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/m-7.m --- a/test/octave.test/zero-one/tf/m-7.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (a(logical (0:1),[2,1]) == [6,7]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/m-8.m --- a/test/octave.test/zero-one/tf/m-8.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8;7,6]; -all (a(logical (0:1),:) == [7,6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/m-9.m --- a/test/octave.test/zero-one/tf/m-9.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8;7,6]; -a(logical (0:1),1) == 7 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/s-1.m --- a/test/octave.test/zero-one/tf/s-1.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = []; -a(0) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/s-2.m --- a/test/octave.test/zero-one/tf/s-2.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = 2; -a(1) == 2 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/s-3.m --- a/test/octave.test/zero-one/tf/s-3.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = 2; -a(1) == 2 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/s-4.m --- a/test/octave.test/zero-one/tf/s-4.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = 2; -all (a(logical ([1,1])) == [2,2]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/v-1.m --- a/test/octave.test/zero-one/tf/v-1.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8,7,6]; -isempty (a(logical ([0,0,0,0]))) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/v-2.m --- a/test/octave.test/zero-one/tf/v-2.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8,7,6]; -all (a(logical ([1,1,1,1])) == [9,8,7,6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/v-3.m --- a/test/octave.test/zero-one/tf/v-3.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8,7,6]; -all (a(logical ([0,1,1,0])) == [8,7]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/v-4.m --- a/test/octave.test/zero-one/tf/v-4.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 0; -a = [9,8,7,6]; -all (a(logical ([1,1])) == [9,9]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tf/zero-one.exp --- a/test/octave.test/zero-one/tf/zero-one.exp Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,186 +0,0 @@ -## Tests with: -## -## prefer_column_vectors == "true" -## do_fortran_indexing == "false" - -## scalar tests - -set test zero-one-tf-s-1 -set prog_output "error:.*" -do_test s-1.m - -set test zero-one-tf-s-2 -set prog_output "ans = *1" -do_test s-2.m - -set test zero-one-tf-s-3 -set prog_output "ans = *1" -do_test s-3.m - -set test zero-one-tf-s-4 -set prog_output "ans = *1" -do_test s-4.m - -## vector tests - -set test zero-one-tf-v-1 -set prog_output "ans = *1" -do_test v-1.m - -set test zero-one-tf-v-2 -set prog_output "ans = *1" -do_test v-2.m - -set test zero-one-tf-v-3 -set prog_output "ans = *1" -do_test v-3.m - -set test zero-one-tf-v-4 -set prog_output "ans = *1" -do_test v-4.m - -## matrix tests - -set test zero-one-tf-m-1 -set prog_output "error:.*" -do_test m-1.m - -set test zero-one-tf-m-2 -set prog_output "error:.*" -do_test m-2.m - -set test zero-one-tf-m-3 -set prog_output "error:.*" -do_test m-3.m - -set test zero-one-tf-m-4 -set prog_output "ans = *1" -do_test m-4.m - -set test zero-one-tf-m-5 -set prog_output "ans = *1" -do_test m-5.m - -set test zero-one-tf-m-6 -set prog_output "ans = *1" -do_test m-6.m - -set test zero-one-tf-m-7 -set prog_output "ans = *1" -do_test m-7.m - -set test zero-one-tf-m-8 -set prog_output "ans = *1" -do_test m-8.m - -set test zero-one-tf-m-9 -set prog_output "ans = *1" -do_test m-9.m - -set test zero-one-tf-m-10 -set prog_output "ans = *1" -do_test m-10.m - -set test zero-one-tf-m-11 -set prog_output "ans = *1" -do_test m-11.m - -set test zero-one-tf-m-12 -set prog_output "ans = *1" -do_test m-12.m - -set test zero-one-tf-m-13 -set prog_output "ans = *1" -do_test m-13.m - -set test zero-one-tf-m-14 -set prog_output "ans = *1" -do_test m-14.m - -set test zero-one-tf-m-15 -set prog_output "ans = *1" -do_test m-15.m - -set test zero-one-tf-m-16 -set prog_output "ans = *1" -do_test m-16.m - -set test zero-one-tf-m-17 -set prog_output "ans = *1" -do_test m-17.m - -set test zero-one-tf-m-18 -set prog_output "ans = *1" -do_test m-18.m - -set test zero-one-tf-m-19 -set prog_output "ans = *1" -do_test m-19.m - -set test zero-one-tf-m-20 -set prog_output "ans = *1" -do_test m-20.m - -set test zero-one-tf-m-21 -set prog_output "ans = *1" -do_test m-21.m - -set test zero-one-tf-m-22 -set prog_output "ans = *1" -do_test m-22.m - -set test zero-one-tf-m-23 -set prog_output "ans = *1" -do_test m-23.m - -set test zero-one-tf-m-24 -set prog_output "ans = *1" -do_test m-24.m - -set test zero-one-tf-m-25 -set prog_output "ans = *1" -do_test m-25.m - -set test zero-one-tf-m-26 -set prog_output "ans = *1" -do_test m-26.m - -set test zero-one-tf-m-27 -set prog_output "ans = *1" -do_test m-27.m - -set test zero-one-tf-m-28 -set prog_output "ans = *1" -do_test m-28.m - -set test zero-one-tf-m-29 -set prog_output "ans = *1" -do_test m-29.m - -set test zero-one-tf-m-30 -set prog_output "ans = *1" -do_test m-30.m - -set test zero-one-tf-m-31 -set prog_output "ans = *1" -do_test m-31.m - -set test zero-one-tf-m-32 -set prog_output "ans = *1" -do_test m-32.m - -set test zero-one-tf-m-33 -set prog_output "ans = *1" -do_test m-33.m - -set test zero-one-tf-m-34 -set prog_output "ans = *1" -do_test m-34.m - -set test zero-one-tf-m-35 -set prog_output "ans = *1" -do_test m-35.m - -set test zero-one-tf-m-36 -set prog_output "ans = *1" -do_test m-36.m diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/m-1.m --- a/test/octave.test/zero-one/tt/m-1.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8;7,6]; -isempty (a(logical ([0,0,0,0]))) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/m-10.m --- a/test/octave.test/zero-one/tt/m-10.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a(logical (0:1),logical ([1,1])) == [7,6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/m-11.m --- a/test/octave.test/zero-one/tt/m-11.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a(2:-1:1,logical (0:1)) == [6;8]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/m-12.m --- a/test/octave.test/zero-one/tt/m-12.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a(2:-1:1,logical ([0,1])) == [6;8]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/m-13.m --- a/test/octave.test/zero-one/tt/m-13.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (all (a(2:-1:1,logical ([1,1])) == [7,6;9,8])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/m-14.m --- a/test/octave.test/zero-one/tt/m-14.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8;7,6]; -a(logical ([0,1]),logical (0:1)) == 6 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/m-15.m --- a/test/octave.test/zero-one/tt/m-15.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a(logical ([0,1]),2:-1:1) == [6,7]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/m-16.m --- a/test/octave.test/zero-one/tt/m-16.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8;7,6]; -a(logical ([0,1]),logical ([0,1])) == 6 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/m-17.m --- a/test/octave.test/zero-one/tt/m-17.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a(logical ([0,1]),[2,1]) == [6,7]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/m-18.m --- a/test/octave.test/zero-one/tt/m-18.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a(logical ([0,1]),:) == [7,6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/m-19.m --- a/test/octave.test/zero-one/tt/m-19.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8;7,6]; -a(logical ([0,1]),1) == 7 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/m-2.m --- a/test/octave.test/zero-one/tt/m-2.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a(logical ([1,1,1,1])) == [9;7;8;6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/m-20.m --- a/test/octave.test/zero-one/tt/m-20.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a(logical ([0,1]),logical ([1,1])) == [7,6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/m-21.m --- a/test/octave.test/zero-one/tt/m-21.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a([2,1],logical (0:1)) == [6;8]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/m-22.m --- a/test/octave.test/zero-one/tt/m-22.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a([2,1],logical ([0,1])) == [6;8]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/m-23.m --- a/test/octave.test/zero-one/tt/m-23.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (all (a([2,1],logical ([1,1])) == [7,6;9,8])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/m-24.m --- a/test/octave.test/zero-one/tt/m-24.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a(:,logical (0:1)) == [8;6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/m-25.m --- a/test/octave.test/zero-one/tt/m-25.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a(:,logical ([0,1])) == [8;6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/m-26.m --- a/test/octave.test/zero-one/tt/m-26.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (all (a(:,logical ([1,1])) == [9,8;7,6])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/m-27.m --- a/test/octave.test/zero-one/tt/m-27.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8;7,6]; -a(1,logical (0:1)) == 8 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/m-28.m --- a/test/octave.test/zero-one/tt/m-28.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8;7,6]; -a(1,logical ([0,1])) == 8 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/m-29.m --- a/test/octave.test/zero-one/tt/m-29.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a(1,logical ([1,1])) == [9,8]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/m-3.m --- a/test/octave.test/zero-one/tt/m-3.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a(logical ([0,1,1,0])) == [7;8]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/m-30.m --- a/test/octave.test/zero-one/tt/m-30.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a(logical ([1,1]),logical (0:1)) == [8;6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/m-31.m --- a/test/octave.test/zero-one/tt/m-31.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (all (a(logical ([1,1]),2:-1:1) == [8,9;6,7])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/m-32.m --- a/test/octave.test/zero-one/tt/m-32.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a(logical ([1,1]),logical ([0,1])) == [8;6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/m-33.m --- a/test/octave.test/zero-one/tt/m-33.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (all (a(logical ([1,1]),[2,1]) == [8,9;6,7])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/m-34.m --- a/test/octave.test/zero-one/tt/m-34.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (all (a(logical ([1,1]),:) == [9,8;7,6])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/m-35.m --- a/test/octave.test/zero-one/tt/m-35.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a(logical ([1,1]),1) == [9;7]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/m-36.m --- a/test/octave.test/zero-one/tt/m-36.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (all (a(logical ([1,1]),logical ([1,1])) == [9,8;7,6])) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/m-4.m --- a/test/octave.test/zero-one/tt/m-4.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8;7,6]; -a(logical (0:1),logical (0:1)) == 6 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/m-5.m --- a/test/octave.test/zero-one/tt/m-5.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a(logical (0:1),2:-1:1) == [6,7]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/m-6.m --- a/test/octave.test/zero-one/tt/m-6.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8;7,6]; -a(logical (0:1),logical ([0,1])) == 6 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/m-7.m --- a/test/octave.test/zero-one/tt/m-7.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a(logical (0:1),[2,1]) == [6,7]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/m-8.m --- a/test/octave.test/zero-one/tt/m-8.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8;7,6]; -all (a(logical (0:1),:) == [7,6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/m-9.m --- a/test/octave.test/zero-one/tt/m-9.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8;7,6]; -a(logical (0:1),1) == 7 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/s-1.m --- a/test/octave.test/zero-one/tt/s-1.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = []; -a(logical (0)) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/s-2.m --- a/test/octave.test/zero-one/tt/s-2.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = 2; -a(logical (1)) == 2 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/s-3.m --- a/test/octave.test/zero-one/tt/s-3.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = 2; -a(logical (1)) == 2 diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/s-4.m --- a/test/octave.test/zero-one/tt/s-4.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = 2; -all (a(logical ([1,1])) == [2,2]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/v-1.m --- a/test/octave.test/zero-one/tt/v-1.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8,7,6]; -isempty (a(logical ([0,0,0,0]))) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/v-2.m --- a/test/octave.test/zero-one/tt/v-2.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8,7,6]; -all (a(logical ([1,1,1,1])) == [9,8,7,6]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/v-3.m --- a/test/octave.test/zero-one/tt/v-3.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8,7,6]; -all (a(logical ([0,1,1,0])) == [8,7]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/v-4.m --- a/test/octave.test/zero-one/tt/v-4.m Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,4 +0,0 @@ -prefer_column_vectors = 1; -do_fortran_indexing = 1; -a = [9,8,7,6]; -all (a(logical ([1,1])) == [9,9]) diff -r f3c21a1d1c62 -r 4accb5d84412 test/octave.test/zero-one/tt/zero-one.exp --- a/test/octave.test/zero-one/tt/zero-one.exp Wed Jul 09 23:20:19 2003 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,186 +0,0 @@ -## Tests with: -## -## prefer_column_vectors == "true" -## do_fortran_indexing == "true" - -## scalar tests - -set test zero-one-tt-s-1 -set prog_output "error:.*" -do_test s-1.m - -set test zero-one-tt-s-2 -set prog_output "ans = *1" -do_test s-2.m - -set test zero-one-tt-s-3 -set prog_output "ans = *1" -do_test s-3.m - -set test zero-one-tt-s-4 -set prog_output "ans = *1" -do_test s-4.m - -## vector tests - -set test zero-one-tt-v-1 -set prog_output "ans = *1" -do_test v-1.m - -set test zero-one-tt-v-2 -set prog_output "ans = *1" -do_test v-2.m - -set test zero-one-tt-v-3 -set prog_output "ans = *1" -do_test v-3.m - -set test zero-one-tt-v-4 -set prog_output "ans = *1" -do_test v-4.m - -## matrix tests - -set test zero-one-tt-m-1 -set prog_output "ans = *1" -do_test m-1.m - -set test zero-one-tt-m-2 -set prog_output "ans = *1" -do_test m-2.m - -set test zero-one-tt-m-3 -set prog_output "ans = *1" -do_test m-3.m - -set test zero-one-tt-m-4 -set prog_output "ans = *1" -do_test m-4.m - -set test zero-one-tt-m-5 -set prog_output "ans = *1" -do_test m-5.m - -set test zero-one-tt-m-6 -set prog_output "ans = *1" -do_test m-6.m - -set test zero-one-tt-m-7 -set prog_output "ans = *1" -do_test m-7.m - -set test zero-one-tt-m-8 -set prog_output "ans = *1" -do_test m-8.m - -set test zero-one-tt-m-9 -set prog_output "ans = *1" -do_test m-9.m - -set test zero-one-tt-m-10 -set prog_output "ans = *1" -do_test m-10.m - -set test zero-one-tt-m-11 -set prog_output "ans = *1" -do_test m-11.m - -set test zero-one-tt-m-12 -set prog_output "ans = *1" -do_test m-12.m - -set test zero-one-tt-m-13 -set prog_output "ans = *1" -do_test m-13.m - -set test zero-one-tt-m-14 -set prog_output "ans = *1" -do_test m-14.m - -set test zero-one-tt-m-15 -set prog_output "ans = *1" -do_test m-15.m - -set test zero-one-tt-m-16 -set prog_output "ans = *1" -do_test m-16.m - -set test zero-one-tt-m-17 -set prog_output "ans = *1" -do_test m-17.m - -set test zero-one-tt-m-18 -set prog_output "ans = *1" -do_test m-18.m - -set test zero-one-tt-m-19 -set prog_output "ans = *1" -do_test m-19.m - -set test zero-one-tt-m-20 -set prog_output "ans = *1" -do_test m-20.m - -set test zero-one-tt-m-21 -set prog_output "ans = *1" -do_test m-21.m - -set test zero-one-tt-m-22 -set prog_output "ans = *1" -do_test m-22.m - -set test zero-one-tt-m-23 -set prog_output "ans = *1" -do_test m-23.m - -set test zero-one-tt-m-24 -set prog_output "ans = *1" -do_test m-24.m - -set test zero-one-tt-m-25 -set prog_output "ans = *1" -do_test m-25.m - -set test zero-one-tt-m-26 -set prog_output "ans = *1" -do_test m-26.m - -set test zero-one-tt-m-27 -set prog_output "ans = *1" -do_test m-27.m - -set test zero-one-tt-m-28 -set prog_output "ans = *1" -do_test m-28.m - -set test zero-one-tt-m-29 -set prog_output "ans = *1" -do_test m-29.m - -set test zero-one-tt-m-30 -set prog_output "ans = *1" -do_test m-30.m - -set test zero-one-tt-m-31 -set prog_output "ans = *1" -do_test m-31.m - -set test zero-one-tt-m-32 -set prog_output "ans = *1" -do_test m-32.m - -set test zero-one-tt-m-33 -set prog_output "ans = *1" -do_test m-33.m - -set test zero-one-tt-m-34 -set prog_output "ans = *1" -do_test m-34.m - -set test zero-one-tt-m-35 -set prog_output "ans = *1" -do_test m-35.m - -set test zero-one-tt-m-36 -set prog_output "ans = *1" -do_test m-36.m