# HG changeset patch # User jwe # Date 1069740448 0 # Node ID bf7272f8ba8cc230689686503874a4aa4d8d8275 # Parent 55211d6748c42400b0810c8196b6950da13e8e19 [project @ 2003-11-25 06:05:20 by jwe] diff -r 55211d6748c4 -r bf7272f8ba8c liboctave/Array-util.cc --- a/liboctave/Array-util.cc Tue Nov 25 05:51:29 2003 +0000 +++ b/liboctave/Array-util.cc Tue Nov 25 06:07:28 2003 +0000 @@ -310,8 +310,8 @@ } dim_vector -get_zero_len_size (const dim_vector& frozen_lengths, - const dim_vector& dimensions) +get_zero_len_size (const dim_vector& /* frozen_lengths */, + const dim_vector& /* dimensions */) { dim_vector retval; assert (0); diff -r 55211d6748c4 -r bf7272f8ba8c liboctave/ChangeLog --- a/liboctave/ChangeLog Tue Nov 25 05:51:29 2003 +0000 +++ b/liboctave/ChangeLog Tue Nov 25 06:07:28 2003 +0000 @@ -1,5 +1,11 @@ 2003-11-24 John W. Eaton + * dbleQR.cc (QR::init): Use separate pwork pointers. + * CmplxQR.cc (ComplexQR::init): Likewise. + + * oct-group.cc (octave_group::getgrnam): Pass correct args to + two-arg getgrnam version. + * Array.cc (assignN): Allow single indexing to work. (Array::range_error (const char*, const Array&)): Report index values. @@ -9,6 +15,9 @@ * DASRT.cc (ddasrt_f, ddasrt_g): Likewise. * DASPK.cc (ddaspk_psol): Likewise. * lo-mappers.cc (imag): Likewise. + * Array-util.cc (get_zero_len_size): Likewise. + * kpse.cc (path_search, path_find_first_of): Likewise. + * cmd-edit.cc (do_generate_filename_completions): Likewise. * dim-vector.h (dim_vector::all_ones): New function. diff -r 55211d6748c4 -r bf7272f8ba8c liboctave/CmplxQR.cc --- a/liboctave/CmplxQR.cc Tue Nov 25 05:51:29 2003 +0000 +++ b/liboctave/CmplxQR.cc Tue Nov 25 06:07:28 2003 +0000 @@ -124,7 +124,7 @@ lwork = 32 * n2; work.resize (lwork); - pwork = work.fortran_vec (); + Complex *pwork2 = work.fortran_vec (); F77_XFCN (zungqr, ZUNGQR, (m, n2, min_mn, tmp_data, m, ptau, pwork, lwork, info)); diff -r 55211d6748c4 -r bf7272f8ba8c liboctave/cmd-edit.cc --- a/liboctave/cmd-edit.cc Tue Nov 25 05:51:29 2003 +0000 +++ b/liboctave/cmd-edit.cc Tue Nov 25 06:07:28 2003 +0000 @@ -556,7 +556,7 @@ } string_vector -default_command_editor::do_generate_filename_completions (const std::string& text) +default_command_editor::do_generate_filename_completions (const std::string&) { // XXX FIXME XXX return string_vector (); diff -r 55211d6748c4 -r bf7272f8ba8c liboctave/dbleQR.cc --- a/liboctave/dbleQR.cc Tue Nov 25 05:51:29 2003 +0000 +++ b/liboctave/dbleQR.cc Tue Nov 25 06:07:28 2003 +0000 @@ -115,10 +115,10 @@ lwork = 32 * n2; work.resize (lwork); - pwork = work.fortran_vec (); + double *pwork2 = work.fortran_vec (); F77_XFCN (dorgqr, DORGQR, (m, n2, min_mn, tmp_data, m, ptau, - pwork, lwork, info)); + pwork2, lwork, info)); if (f77_exception_encountered) (*current_liboctave_error_handler) diff -r 55211d6748c4 -r bf7272f8ba8c liboctave/kpse.cc --- a/liboctave/kpse.cc Tue Nov 25 05:51:29 2003 +0000 +++ b/liboctave/kpse.cc Tue Nov 25 06:07:28 2003 +0000 @@ -848,7 +848,7 @@ static string_vector path_search (const std::string& path, const std::string& name, - bool must_exist, bool all) + bool /* must_exist */, bool all) { string_vector ret_list; bool done = false; @@ -1025,7 +1025,7 @@ static string_vector path_find_first_of (const std::string& path, const string_vector& names, - bool must_exist, bool all) + bool /* must_exist */, bool all) { string_vector ret_list; bool done = false; diff -r 55211d6748c4 -r bf7272f8ba8c liboctave/oct-group.cc --- a/liboctave/oct-group.cc Tue Nov 25 05:51:29 2003 +0000 +++ b/liboctave/oct-group.cc Tue Nov 25 06:07:28 2003 +0000 @@ -117,7 +117,7 @@ octave_group::getgrnam (const std::string& nm) { std::string msg; - return getgrnam (msg); + return getgrnam (nm, msg); } octave_group diff -r 55211d6748c4 -r bf7272f8ba8c src/ChangeLog --- a/src/ChangeLog Tue Nov 25 05:51:29 2003 +0000 +++ b/src/ChangeLog Tue Nov 25 06:07:28 2003 +0000 @@ -1,3 +1,5 @@ +2003-11-25 John W. Eaton + 2003-11-24 John W. Eaton * version.h (OCTAVE_VERSION): Now 2.1.52. @@ -6,6 +8,8 @@ * ov.h (octave_value::all_strings): Pass second arg to rep function. * DLD-FUNCTIONS/dasrt.cc (dasrt_user_f): Delete unused arg names. + * ls-hdf5.h (hdf5_streambase::hdf5_streambase): Likewise. + * ls-hdf5.cc (read_hdf5_data): Likewise. * ls-utils.cc (get_save_type): Likewise. * parse.y (Fassignin): Likewise. * utils.cc (empty_arg): Likewise. @@ -22,8 +26,8 @@ * pt-check.cc (tree_checker::visit_subplot_axes): Likewise. * pr-output.cc (octave_print_internal (std::ostream&, double, bool), octave_print_internal (std::ostream&, const Complex&, bool), - octave_print_internal (std::ostream& const charNDArray&, bool, - int, bool): Likewise. + octave_print_internal (std::ostream&, const ArrayN&, + bool, int): Likewise. * oct-stream.cc (octave_scan<> (std::istream&, const scanf_format_elt&, char*): Likewise * TEMPLATE-INST/Array-tc.cc (resize_fill_value): diff -r 55211d6748c4 -r bf7272f8ba8c src/ls-hdf5.cc --- a/src/ls-hdf5.cc Tue Nov 25 05:51:29 2003 +0000 +++ b/src/ls-hdf5.cc Tue Nov 25 06:07:28 2003 +0000 @@ -785,7 +785,7 @@ // job anyway. (c.f. load -import documentation.) std::string read_hdf5_data (std::istream& is, - const std::string& filename, bool& global, + const std::string& /* filename */, bool& global, octave_value& tc, std::string& doc, bool import) { std::string retval; diff -r 55211d6748c4 -r bf7272f8ba8c src/ls-hdf5.h --- a/src/ls-hdf5.h Tue Nov 25 05:51:29 2003 +0000 +++ b/src/ls-hdf5.h Tue Nov 25 06:07:28 2003 +0000 @@ -41,7 +41,7 @@ hdf5_fstreambase () { file_id = -1; } - hdf5_fstreambase (const char *name, int mode, int prot = 0) + hdf5_fstreambase (const char *name, int mode, int /* prot */ = 0) { if (mode == std::ios::in) file_id = H5Fopen (name, H5F_ACC_RDONLY, H5P_DEFAULT); diff -r 55211d6748c4 -r bf7272f8ba8c src/pr-output.cc --- a/src/pr-output.cc Tue Nov 25 05:51:29 2003 +0000 +++ b/src/pr-output.cc Tue Nov 25 06:07:28 2003 +0000 @@ -1965,7 +1965,7 @@ void octave_print_internal (std::ostream& os, const charNDArray& nda, - bool pr_as_read_syntax, int /* extra_indent */, + bool pr_as_read_syntax, int extra_indent, bool pr_as_string) { switch (nda.ndims ()) @@ -1984,7 +1984,7 @@ void octave_print_internal (std::ostream& os, const ArrayN& nda, - bool pr_as_read_syntax, int extra_indent) + bool pr_as_read_syntax, int /* extra_indent */) { // XXX FIXME XXX -- this mostly duplicates the code in the // PRINT_ND_ARRAY macro.