Mercurial > octave-nkf

comparison src/ov-re-sparse.cc @ 5828:22e23bee74c8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2006-05-23 06:05:14 by jwe]
author jwe
date Tue, 23 May 2006 06:05:14 +0000
parents faafc2d98b8d
children da843f35775c
comparison
equal deleted inserted replaced
5827:1fe78adb91bc 5828:22e23bee74c8
254 254
255 int nr = d(0); 255 int nr = d(0);
256 int nc = d(1); 256 int nc = d(1);
257 int nz = nzmax (); 257 int nz = nzmax ();
258 258
259 FOUR_BYTE_INT itmp; 259 int32_t itmp;
260 // Use negative value for ndims to be consistent with other formats 260 // Use negative value for ndims to be consistent with other formats
261 itmp= -2; 261 itmp= -2;
262 os.write (reinterpret_cast<char *> (&itmp), 4); 262 os.write (reinterpret_cast<char *> (&itmp), 4);
263 263
264 itmp= nr; 264 itmp= nr;
311 311
312 bool 312 bool
313 octave_sparse_matrix::load_binary (std::istream& is, bool swap, 313 octave_sparse_matrix::load_binary (std::istream& is, bool swap,
314 oct_mach_info::float_format fmt) 314 oct_mach_info::float_format fmt)
315 { 315 {
316 FOUR_BYTE_INT nz, nc, nr, tmp; 316 int32_t nz, nc, nr, tmp;
317 char ctmp; 317 char ctmp;
318 318
319 if (! is.read (reinterpret_cast<char *> (&tmp), 4)) 319 if (! is.read (reinterpret_cast<char *> (&tmp), 4))
320 return false; 320 return false;
321 321