Mercurial > octave-nkf

comparison src/ov.cc @ 4584:f7697d703481

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2003-10-31 19:47:35 by jwe]
author jwe
date Fri, 31 Oct 2003 19:47:36 +0000
parents db5a24d54915
children 7b957b442818
comparison
equal deleted inserted replaced
4583:70da2b8c91dd 4584:f7697d703481
837 octave_value::length (void) const 837 octave_value::length (void) const
838 { 838 {
839 int retval = 0; 839 int retval = 0;
840 840
841 dim_vector dv = dims (); 841 dim_vector dv = dims ();
842 842
843 for (int i = 0; i < dv.length (); i++) 843 for (int i = 0; i < dv.length (); i++)
844 { 844 {
845 if (dv(i) < 0) 845 if (dv(i) < 0)
846 { 846 {
847 retval = -1; 847 retval = -1;
848 break;
849 }
850
851 if (dv(i) == 0)
852 {
853 retval = 0;
848 break; 854 break;
849 } 855 }
850 856
851 if (dv(i) > retval) 857 if (dv(i) > retval)
852 retval = dv(i); 858 retval = dv(i);