Mercurial > hg > octave-nkf

comparison libinterp/octave-value/ov-perm.cc @ 18590:bae00174787c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
avoid GCC warnings * pt-funcall.cc (tree_funcall::dup): Delete unused parameter names. * ov-perm.cc (octave_perm_matrix::save_ascii, octave_perm_matrix::load_ascii): Delete unused typedef. * ov-base-diag.cc (octave_base_diag<DMT, MT>::do_index_op): Likewise.
author Lasse Schuirmann <lasse@schuirmann.net> and Kai T. Ohlhus <k.ohlhus@gmail.com>
date Mon, 24 Feb 2014 09:07:39 +0100
parents bcd71a2531d3
children 491b0adfec95
comparison
equal deleted inserted replaced
18588:932aca9a7c57 18590:bae00174787c
258 } 258 }
259 259
260 bool 260 bool
261 octave_perm_matrix::save_ascii (std::ostream& os) 261 octave_perm_matrix::save_ascii (std::ostream& os)
262 { 262 {
263 typedef octave_int<octave_idx_type> idx_int_type;
264
265 os << "# size: " << matrix.rows () << "\n"; 263 os << "# size: " << matrix.rows () << "\n";
266 os << "# orient: " << (matrix.is_col_perm () ? 'c' : 'r') << '\n'; 264 os << "# orient: " << (matrix.is_col_perm () ? 'c' : 'r') << '\n';
267 265
268 Array<octave_idx_type> pvec = matrix.pvec (); 266 Array<octave_idx_type> pvec = matrix.pvec ();
269 octave_idx_type n = pvec.length (); 267 octave_idx_type n = pvec.length ();
275 } 273 }
276 274
277 bool 275 bool
278 octave_perm_matrix::load_ascii (std::istream& is) 276 octave_perm_matrix::load_ascii (std::istream& is)
279 { 277 {
280 typedef octave_int<octave_idx_type> idx_int_type;
281 octave_idx_type n; 278 octave_idx_type n;
282 bool success = true; 279 bool success = true;
283 char orient; 280 char orient;
284 281
285 if (extract_keyword (is, "size", n, true) 282 if (extract_keyword (is, "size", n, true)