Mercurial > hg > octave-nkf
diff liboctave/ArrayN.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/liboctave/ArrayN.cc +++ b/liboctave/ArrayN.cc @@ -56,18 +56,18 @@ { os << "data:"; - Array<int> ra_idx (n_dims, 0); + Array<octave_idx_type> ra_idx (n_dims, 0); // Number of times the first 2d-array is to be displayed. - int m = 1; + octave_idx_type m = 1; for (int i = 2; i < n_dims; i++) m *= a_dims(i); if (m == 1) { - int rows = 0; - int cols = 0; + octave_idx_type rows = 0; + octave_idx_type cols = 0; switch (n_dims) { @@ -75,10 +75,10 @@ rows = a_dims(0); cols = a_dims(1); - for (int j = 0; j < rows; j++) + for (octave_idx_type j = 0; j < rows; j++) { ra_idx(0) = j; - for (int k = 0; k < cols; k++) + for (octave_idx_type k = 0; k < cols; k++) { ra_idx(1) = k; os << " " << a.elem(ra_idx); @@ -90,7 +90,7 @@ default: rows = a_dims(0); - for (int k = 0; k < rows; k++) + for (octave_idx_type k = 0; k < rows; k++) { ra_idx(0) = k; os << " " << a.elem(ra_idx); @@ -102,8 +102,8 @@ } else { - int rows = a_dims(0); - int cols = a_dims(1); + octave_idx_type rows = a_dims(0); + octave_idx_type cols = a_dims(1); for (int i = 0; i < m; i++) { @@ -114,11 +114,11 @@ os << ra_idx(n_dims - 1) + 1 << ") = \n"; - for (int j = 0; j < rows; j++) + for (octave_idx_type j = 0; j < rows; j++) { ra_idx(0) = j; - for (int k = 0; k < cols; k++) + for (octave_idx_type k = 0; k < cols; k++) { ra_idx(1) = k; os << " " << a.elem(ra_idx);