Mercurial > hg > octave-lyh
diff src/ov-list.cc @ 5275:23b37da9fd5b
[project @ 2005-04-08 16:07:35 by jwe]
author | jwe |
---|---|
date | Fri, 08 Apr 2005 16:07:37 +0000 |
parents | e35b034d3523 |
children | 4c8a2e4e0717 |
line wrap: on
line diff
--- a/src/ov-list.cc +++ b/src/ov-list.cc @@ -49,11 +49,11 @@ octave_list::octave_list (const Cell& c) : octave_base_value (), data () { - int n = c.length (); + octave_idx_type n = c.length (); data.resize (dim_vector (1, n)); - for (int i = 0; i < n; i++) + for (octave_idx_type i = 0; i < n; i++) data(i) = c(i); } @@ -147,7 +147,7 @@ { octave_value retval; - int n = type.length (); + octave_idx_type n = type.length (); octave_value t_rhs = rhs; @@ -194,9 +194,9 @@ { octave_value_list i = idx.front (); - int len = i.length (); + octave_idx_type len = i.length (); - for (int k = 0; k < len; k++) + for (octave_idx_type k = 0; k < len; k++) data.set_index (i(k).index_vector ()); ::assign (data, Cell (t_rhs), Cell::resize_fill_value ()); @@ -230,7 +230,7 @@ if (! error_state) { - int n = data.length (); + octave_idx_type n = data.length (); if (i > 0) { @@ -254,7 +254,7 @@ { size_t retval = 0; - for (int i = 0; i < numel (); i++) + for (octave_idx_type i = 0; i < numel (); i++) retval += data(i).byte_size (); return retval; @@ -265,11 +265,11 @@ { octave_value_list retval; - int n = data.length (); + octave_idx_type n = data.length (); retval.resize (n); - for (int i = 0; i < n; i++) + for (octave_idx_type i = 0; i < n; i++) retval(i) = data(i); return retval; @@ -286,7 +286,7 @@ { unwind_protect::begin_frame ("octave_list_print"); - int n = data.length (); + octave_idx_type n = data.length (); if (n > 0) { @@ -296,7 +296,7 @@ increment_indent_level (); - for (int i = 0; i < n; i++) + for (octave_idx_type i = 0; i < n; i++) { OSSTREAM buf; @@ -633,7 +633,7 @@ { octave_value_list lst; - for (int i = 0; i < len; i++) + for (octave_idx_type i = 0; i < len; i++) { octave_value t2; bool dummy; @@ -679,7 +679,7 @@ // recursively add each element of the list to this group octave_value_list lst = list_value (); - for (int i = 0; i < lst.length (); ++i) + for (octave_idx_type i = 0; i < lst.length (); ++i) { // should we use lst.name_tags () to label the elements? char s[20];