Mercurial > octave-nkf

comparison src/ov-re-mat.cc @ 6974:9e32bb109980

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-10-08 11:06:47 by jwe]
author jwe
date Mon, 08 Oct 2007 11:06:48 +0000
parents b319df52ba87
children 45d6cc5a0359
comparison
equal deleted inserted replaced
6973:6fcc2f5b2c7d 6974:9e32bb109980
253 253
254 return retval; 254 return retval;
255 } 255 }
256 256
257 bool 257 bool
258 octave_matrix::save_ascii (std::ostream& os, bool& infnan_warned) 258 octave_matrix::save_ascii (std::ostream& os)
259 { 259 {
260 dim_vector d = dims (); 260 dim_vector d = dims ();
261 261
262 if (d.length () > 2) 262 if (d.length () > 2)
263 { 263 {
264 NDArray tmp = array_value (); 264 NDArray tmp = array_value ();
265
266 if (! infnan_warned && tmp.any_element_is_inf_or_nan ())
267 {
268 warning ("save: Inf or NaN values may not be reloadable");
269 infnan_warned = true;
270 }
271 265
272 os << "# ndims: " << d.length () << "\n"; 266 os << "# ndims: " << d.length () << "\n";
273 267
274 for (int i=0; i < d.length (); i++) 268 for (int i=0; i < d.length (); i++)
275 os << " " << d (i); 269 os << " " << d (i);