Index: trace.m =================================================================== RCS file: /cvs/octave/scripts/linear-algebra/trace.m,v retrieving revision 1.19 diff --unified -r1.19 trace.m --- trace.m 24 Jan 2008 07:40:58 -0000 1.19 +++ trace.m 24 Jan 2008 11:30:54 -0000 @@ -45,6 +45,9 @@ %!assert(trace ([1, 2; 3, 4]) == 5); %!assert(trace ([1, 2; 3, 4; 5, 6]) == 5); %!assert(trace ([1, 3, 5; 2, 4, 6]) == 5); +%!assert(trace ([]), 0); +%!assert(trace (randn(1,0)), 0); +%! %!error trace (); %!error trace (1, 2); - +%!error trace(reshape(1:9,[1,3,3]));