Mercurial > hg > octave-nkf
changeset 3518:2dcc5f58ca0c
[project @ 2000-02-01 23:11:59 by jwe]
author | jwe |
---|---|
date | Tue, 01 Feb 2000 23:11:59 +0000 |
parents | ef5c83d6bffc |
children | 957d7d6ab0e0 |
files | liboctave/ChangeLog liboctave/data-conv.cc |
diffstat | 2 files changed, 5 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/liboctave/ChangeLog +++ b/liboctave/ChangeLog @@ -2,6 +2,8 @@ * data-conv.cc (LS_DO_WRITE): Cast arg to ostream::write to char*. (LS_DO_READ): Likewise, for istream::read. + (write_doubles): Likewise. + (read_doubles): Likewise. * oct-env.cc (octave_env::do_polite_directory_format): Use operator== and substr method to do limited-length string
--- a/liboctave/data-conv.cc +++ b/liboctave/data-conv.cc @@ -717,7 +717,7 @@ case LS_FLOAT: { volatile float *ptr = X_CAST (float *, data); - is.read (data, 4 * len); + is.read (X_CAST (char *, data), 4 * len); do_float_format_conversion (X_CAST (float *, data), len, fmt); float tmp = ptr[0]; for (int i = len - 1; i > 0; i--) @@ -727,7 +727,7 @@ break; case LS_DOUBLE: // No conversion necessary. - is.read (data, 8 * len); + is.read (X_CAST (char *, data), 8 * len); do_double_format_conversion (data, len, fmt); break; @@ -774,7 +774,7 @@ { char tmp_type = X_CAST (char, type); os.write (&tmp_type, 1); - os.write (data, 8 * len); + os.write (X_CAST (char *, data), 8 * len); } break;