Mercurial > hg > octave-lyh
view src/TEMPLATE-INST/Array-tc.cc @ 8730:474f64ab905f
src/TEMPLATE-INST/Array-tc.cc: undo previous change
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Thu, 12 Feb 2009 03:44:41 -0500 |
parents | d5af326a3ede |
children | a669df7beb73 |
line wrap: on
line source
/* Copyright (C) 1996, 1997, 1999, 2000, 2002, 2003, 2004, 2005, 2006, 2007 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/>. */ // Instantiate Arrays of octave_values. #ifdef HAVE_CONFIG_H #include <config.h> #endif #include "Array.h" #include "Array.cc" #include "Array2.h" #include "ArrayN.h" #include "ArrayN.cc" #include "DiagArray2.h" #include "DiagArray2.cc" #include "oct-obj.h" #include "oct-sort.cc" // FIXME -- these comparisons don't look right. Where do we sort // octave_value objects and expect them to be character strings? template <> bool octave_sort<octave_value>::ascending_compare (const octave_value& a, const octave_value& b) { return (a.string_value () < b.string_value ()); } template <> bool octave_sort<octave_value>::descending_compare (const octave_value& a, const octave_value& b) { return (a.string_value () > b.string_value ()); } INSTANTIATE_ARRAY_SORT (octave_value); INSTANTIATE_ARRAY (octave_value, OCTINTERP_API); template class OCTINTERP_API Array2<octave_value>; template class OCTINTERP_API ArrayN<octave_value>; /* ;;; Local Variables: *** ;;; mode: C++ *** ;;; End: *** */