Mercurial > octave
view gui/src/symbol-information.h @ 15045:1ffaad442161 gui
Source code formatting (80-column lines, mostly whitespace changes)
author | Jordi Gutiérrez Hermoso <jordigh@octave.org> |
---|---|
date | Sat, 28 Jul 2012 21:53:45 -0400 |
parents | 6c40719cd9e2 |
children | 6889217b9d78 |
line wrap: on
line source
/* OctaveGUI - A graphical user interface for Octave * Copyright (C) 2011 Jacob Dawid (jacob.dawid@googlemail.com) * * This program 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. * * This program 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 this program. If not, see <http://www.gnu.org/licenses/>. */ #ifndef SYMBOLINFORMATION_H #define SYMBOLINFORMATION_H #include <QString> #include <QHash> #include <sstream> // Octave includes #undef PACKAGE_BUGREPORT #undef PACKAGE_NAME #undef PACKAGE_STRING #undef PACKAGE_TARNAME #undef PACKAGE_VERSION #undef PACKAGE_URL #include "octave/config.h" #include "octave/cmd-edit.h" #include "octave/error.h" #include "octave/file-io.h" #include "octave/input.h" #include "octave/lex.h" #include "octave/load-path.h" #include "octave/octave.h" #include "octave/oct-hist.h" #include "octave/oct-map.h" #include "octave/oct-obj.h" #include "octave/ops.h" #include "octave/ov.h" #include "octave/ov-usr-fcn.h" #include "octave/symtab.h" #include "octave/pt.h" #include "octave/pt-eval.h" #include "octave/config.h" #include "octave/Range.h" #include "octave/toplev.h" #include "octave/procstream.h" #include "octave/sighandlers.h" #include "octave/debug.h" #include "octave/sysdep.h" #include "octave/ov.h" #include "octave/unwind-prot.h" #include "octave/utils.h" #include "octave/variables.h" /** * \struct symbol_information * \brief Meta-information over a symbol-table entry. * \author Jacob Dawid * This struct is used to store meta information over a symbol entry. * It reduces memory consumption, since it only stores relevant data * about a symbol-table entry that will be used in the model for the * graphical user interface. */ typedef struct symbol_information { enum Scope { local = 0, global = 1, persistent = 2, hidden = 3 }; QString _symbol; QString _type; QString _value; QString _dimension; Scope _scope; /** Hashes the symbol information for quickly comparing it. */ int hash () const { return qHash (_symbol) + qHash (_type) + qHash (_value) + qHash (_dimension) + (int)_scope; } /** Compares two symbol information objects. */ bool equals (const symbol_information& other) const { if (hash () == other.hash ()) { return _symbol == other._symbol && _type == other._type && _value == other._value && _scope == other._scope && _dimension == other._dimension; } } /** Extracts meta information from a given symbol record. */ bool from_symbol_record (const symbol_table::symbol_record& symbol_record) { if (symbol_record.is_local () && !symbol_record.is_global () && !symbol_record.is_hidden ()) _scope = local; else if (symbol_record.is_global ()) _scope = global; else if (symbol_record.is_persistent ()) _scope = persistent; else if (symbol_record.is_hidden ()) _scope = hidden; _symbol = QString (symbol_record.name ().c_str ()); _type = QString (symbol_record.varval ().type_name ().c_str ()); octave_value ov = symbol_record.varval (); // In case we have really large matrices or strings, cut them down // for performance reasons. QString short_value_string; bool use_short_value_string = false; if (ov.is_matrix_type () || ov.is_cell ()) { if (ov.rows () * ov.columns () > 10) { use_short_value_string = true; short_value_string = QString ("%1x%2 items").arg (ov.rows ()).arg (ov.columns ()); } } else if (ov.is_string ()) { if (ov.string_value ().length () > 40) { use_short_value_string = true; short_value_string = QString::fromStdString (ov.string_value ().substr (0, 40)); } } if (use_short_value_string) { _value = short_value_string; } else { std::stringstream buffer; ov.print (buffer, true); _value = QString::fromStdString (buffer.str ()); } _value.replace("\n", " "); if (ov.is_string ()) _dimension = QString ("%1").arg (ov.string_value ().length ()); else if (ov.is_range ()) _dimension = QString ("%1 : %2 : %3").arg (ov.range_value ().base ()) .arg (ov.range_value ().inc ()) .arg (ov.range_value ().limit ()); else if (ov.is_matrix_type () || ov.is_cell ()) _dimension = QString ("%1x%2").arg (ov.rows ()) .arg (ov.columns ()); else if (ov.is_function_handle ()) // See code for func2str for a possible solution _dimension = QString ("func handle"); else if (ov.is_inline_function ()) // See code for formula for a possible solution _dimension = QString ("inline func"); else _dimension = "1"; return true; } } symbol_information; #endif // SYMBOLINFORMATION_H