Mercurial > hg > octave-jordi
diff src/ov-bool-mat.cc @ 5275:23b37da9fd5b
[project @ 2005-04-08 16:07:35 by jwe]
author | jwe |
---|---|
date | Fri, 08 Apr 2005 16:07:37 +0000 |
parents | 8ca032643f55 |
children | bd32f770c09a |
line wrap: on
line diff
--- a/src/ov-bool-mat.cc +++ b/src/ov-bool-mat.cc @@ -76,8 +76,8 @@ { boolMatrix bm = matrix.matrix_value (); - int nr = bm.rows (); - int nc = bm.cols (); + octave_idx_type nr = bm.rows (); + octave_idx_type nc = bm.cols (); if (nr == 1 && nc == 1) retval = new octave_bool (bm (0, 0)); @@ -160,7 +160,7 @@ NDArray tmp = array_value (); os << "# ndims: " << d.length () << "\n"; - for (int i=0; i < d.length (); i++) + for (int i = 0; i < d.length (); i++) os << " " << d (i); os << "\n" << tmp; @@ -191,13 +191,13 @@ keywords[1] = "rows"; std::string kw; - int val = 0; + octave_idx_type val = 0; if (extract_keyword (is, keywords, kw, val, true)) { if (kw == "ndims") { - int mdims = val; + int mdims = static_cast<int> (val); if (mdims >= 0) { @@ -217,7 +217,7 @@ } boolNDArray btmp (dv); - for (int i = 0; i < btmp.nelem (); i++) + for (octave_idx_type i = 0; i < btmp.nelem (); i++) btmp.elem (i) = (tmp.elem (i) != 0.); matrix = btmp; @@ -230,8 +230,8 @@ } else if (kw == "rows") { - int nr = val; - int nc = 0; + octave_idx_type nr = val; + octave_idx_type nc = 0; if (nr >= 0 && extract_keyword (is, "columns", nc) && nc >= 0) { @@ -245,9 +245,9 @@ success = false; } - boolMatrix btmp (nr,nc); - for (int j = 0; j < nc; j++) - for (int i = 0; i < nr; i++) + boolMatrix btmp (nr, nc); + for (octave_idx_type j = 0; j < nc; j++) + for (octave_idx_type i = 0; i < nr; i++) btmp.elem (i,j) = (tmp.elem (i, j) != 0.); matrix = btmp; @@ -286,7 +286,7 @@ // Use negative value for ndims to differentiate with old format!! FOUR_BYTE_INT tmp = - d.length(); os.write (X_CAST (char *, &tmp), 4); - for (int i=0; i < d.length (); i++) + for (int i = 0; i < d.length (); i++) { tmp = d(i); os.write (X_CAST (char *, &tmp), 4); @@ -294,10 +294,10 @@ boolNDArray m = bool_array_value (); bool *mtmp = m.fortran_vec (); - int nel = m.nelem (); + octave_idx_type nel = m.nelem (); OCTAVE_LOCAL_BUFFER (char, htmp, nel); - for (int i = 0; i < nel; i++) + for (octave_idx_type i = 0; i < nel; i++) htmp[i] = (mtmp[i] ? 1 : 0); os.write (htmp, nel); @@ -346,13 +346,13 @@ dv(0) = 1; } - int nel = dv.numel (); + octave_idx_type nel = dv.numel (); OCTAVE_LOCAL_BUFFER (char, htmp, nel); if (! is.read (htmp, nel)) return false; boolNDArray m(dv); bool *mtmp = m.fortran_vec (); - for (int i = 0; i < nel; i++) + for (octave_idx_type i = 0; i < nel; i++) mtmp[i] = (htmp[i] ? 1 : 0); matrix = m; @@ -392,11 +392,11 @@ return false; } - int nel = m.nelem (); + octave_idx_type nel = m.nelem (); bool *mtmp = m.fortran_vec (); hbool_t htmp[nel]; - for (int i = 0; i < nel; i++) + for (octave_idx_type i = 0; i < nel; i++) htmp[i] = mtmp[i]; retval = H5Dwrite (data_hid, H5T_NATIVE_HBOOL, H5S_ALL, H5S_ALL, @@ -451,7 +451,7 @@ dv(j) = hdims[i]; } - int nel = dv.numel (); + octave_idx_type nel = dv.numel (); hbool_t htmp[nel]; if (H5Dread (data_hid, H5T_NATIVE_HBOOL, H5S_ALL, H5S_ALL, H5P_DEFAULT, htmp) >= 0) @@ -459,7 +459,7 @@ retval = true; boolNDArray btmp (dv); - for (int i = 0; i < nel; i++) + for (octave_idx_type i = 0; i < nel; i++) btmp.elem (i) = htmp[i]; matrix = btmp;