Mercurial > hg > octave-nkf
diff src/ov-struct.cc @ 5341:4bea82210dcd
[project @ 2005-05-06 17:11:47 by jwe]
author | jwe |
---|---|
date | Fri, 06 May 2005 17:11:47 +0000 |
parents | 6ba182a85dea |
children | f9ab8e67ce7a |
line wrap: on
line diff
--- a/src/ov-struct.cc +++ b/src/ov-struct.cc @@ -987,10 +987,9 @@ Octave_map::iterator i = m.begin (); while (i != m.end ()) { - Cell val = map.contents (i); - octave_value tmp = (map.numel () == 1) ? val(0) : octave_value (val); + octave_value val = map.contents (i); - bool b = save_ascii_data (os, tmp, m.key (i), infnan_warned, + bool b = save_ascii_data (os, val, m.key (i), infnan_warned, strip_nan_and_inf, 0, 0); if (! b) @@ -1069,10 +1068,9 @@ Octave_map::iterator i = m.begin (); while (i != m.end ()) { - Cell val = map.contents (i); - octave_value tmp = (map.numel () == 1) ? val(0) : octave_value (val); + octave_value val = map.contents (i); - bool b = save_binary_data (os, tmp, m.key (i), "", 0, save_as_floats); + bool b = save_binary_data (os, val, m.key (i), "", 0, save_as_floats); if (! b) return os; @@ -1153,10 +1151,9 @@ Octave_map::iterator i = m.begin (); while (i != m.end ()) { - Cell val = map.contents (i); - octave_value tmp = (map.numel () == 1) ? val(0) : octave_value (val); + octave_value val = map.contents (i); - bool retval2 = add_hdf5_data (data_hid, tmp, m.key (i), "", false, + bool retval2 = add_hdf5_data (data_hid, val, m.key (i), "", false, save_as_floats); if (! retval2)