Mercurial > hg > octave-nkf
view libinterp/octave-value/ov-base-int.h @ 18718:51a0d1c1023c stable
listdlg.m: return Octave value rather than Java int object.(bug #41931).
Make parameter list case-insensitive.
Return empty matrix rather than empty cell list on failure.
* listdlg.m: Use for loop to index into java array to get octave value.
Use strcmpi to parse input options. Correctly return an empty matrix
rather than empty list if dialog fails.
author | Philip Nienhuis <prnienhuis@users.sf.net> |
---|---|
date | Sat, 22 Mar 2014 16:04:32 +0100 |
parents | ebb3ef964372 |
children | 6113e0c6920b |
line wrap: on
line source
/* Copyright (C) 2004-2013 John W. Eaton This file is part of Octave. Octave is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 3 of the License, or (at your option) any later version. Octave is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with Octave; see the file COPYING. If not, see <http://www.gnu.org/licenses/>. */ #if !defined (octave_ov_base_int_h) #define octave_ov_base_int_h 1 #include <cstdlib> #include <iosfwd> #include <string> #include "mx-base.h" #include "oct-alloc.h" #include "str-vec.h" #include "error.h" #include "ov-base.h" #include "ov-base-mat.h" #include "ov-base-scalar.h" #include "ov-typeinfo.h" // base int matrix values. template <class T> class octave_base_int_matrix : public octave_base_matrix<T> { public: octave_base_int_matrix (void) : octave_base_matrix<T> () { } octave_base_int_matrix (const T& nda) : octave_base_matrix<T> (nda) { } ~octave_base_int_matrix (void) { } octave_base_value *clone (void) const { return new octave_base_int_matrix (*this); } octave_base_value *empty_clone (void) const { return new octave_base_int_matrix (); } octave_base_value *try_narrowing_conversion (void); bool is_real_type (void) const { return true; } // void increment (void) { matrix += 1; } // void decrement (void) { matrix -= 1; } void print_raw (std::ostream& os, bool pr_as_read_syntax = false) const; octave_value convert_to_str_internal (bool, bool, char type) const; bool save_ascii (std::ostream& os); bool load_ascii (std::istream& is); bool save_binary (std::ostream& os, bool& ); bool load_binary (std::istream& is, bool swap, oct_mach_info::float_format ); #if defined (HAVE_HDF5) bool save_hdf5 (hid_t loc_id, const char *name, bool); bool load_hdf5 (hid_t loc_id, const char *name); #endif }; // base int scalar values. template <class T> class octave_base_int_scalar : public octave_base_scalar<T> { public: octave_base_int_scalar (void) : octave_base_scalar<T> () { } octave_base_int_scalar (const T& s) : octave_base_scalar<T> (s) { } ~octave_base_int_scalar (void) { } octave_base_value *clone (void) const { return new octave_base_int_scalar (*this); } octave_base_value *empty_clone (void) const { return new octave_base_int_scalar (); } octave_base_value *try_narrowing_conversion (void) { return 0; } bool is_real_type (void) const { return true; } // void increment (void) { scalar += 1; } // void decrement (void) { scalar -= 1; } octave_value convert_to_str_internal (bool, bool, char type) const; bool save_ascii (std::ostream& os); bool load_ascii (std::istream& is); bool save_binary (std::ostream& os, bool& ); bool load_binary (std::istream& is, bool swap, oct_mach_info::float_format ); #if defined (HAVE_HDF5) bool save_hdf5 (hid_t loc_id, const char *name, bool ); bool load_hdf5 (hid_t loc_id, const char *name); #endif }; #endif