view libinterp/corefcn/workspace-element.h @ 20620:e5f36a7854a5

Remove fuzzy matching from odeset/odeget. * levenshtein.cc: Deleted file. * libinterp/corefcn/module.mk: Remove levenshtein.cc from build system. * fuzzy_compare.m: Deleted file. * scripts/ode/module.mk: Remove fuzzy_compare.m from build system * odeget.m: Reword docstring. Use a persistent cellstr variable to keep track of all options. Replace fuzzy_compare() calls with combination of strcmpi and strncmpi. Report errors relative to function odeget rather than OdePkg. Rewrite and extend BIST tests. Add input validation BIST tests. * odeset.m: Reword docstring. Use a persistent cellstr variable to keep track of all options. Replace fuzzy_compare() calls with combination of strcmpi and strncmpi. Report errors relative to function odeset rather than OdePkg. Use more meaningful variables names and create intermediate variables with logical names to help make code readable. Remove interactive input when multiple property names match and just issue an error. Rewrite BIST tests. * ode_struct_value_check.m: Remove input checking for private function which must always be invoked correctly by caller. Use intermediate variables opt and val to make the code more understandable. Consolidate checks on values into single if statements. Use 'val == fix (val)' to check for integer. * __unimplemented__.m: Removed odeset, odeget, ode45 from list.
author Rik <rik@octave.org>
date Fri, 09 Oct 2015 12:03:23 -0700
parents 4197fc428c7d
children
line wrap: on
line source

/*

Copyright (C) 2013-2015 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_workspace_element_h)
#define octave_workspace_element_h 1

#include <string>

class workspace_element
{
public:

  workspace_element (char scope_arg = 'l',
                     const std::string& symbol_arg = "<name>",
                     const std::string& class_name_arg = "<class>",
                     const std::string& value_arg = "<value>",
                     const std::string& dimension_arg = "<dimension>",
                     bool complex_flag_arg = false)
    : xscope (scope_arg), xsymbol (symbol_arg),
      xclass_name (class_name_arg), xvalue (value_arg),
      xdimension (dimension_arg), xcomplex_flag (complex_flag_arg)
  { }

  workspace_element (const workspace_element& ws_elt)
    : xscope (ws_elt.xscope), xsymbol (ws_elt.xsymbol),
      xclass_name (ws_elt.xclass_name), xvalue (ws_elt.xvalue),
      xdimension (ws_elt.xdimension), xcomplex_flag (ws_elt.xcomplex_flag)
  { }

  workspace_element operator = (const workspace_element& ws_elt)
  {
    if (this != &ws_elt)
      {
        xscope = ws_elt.xscope;
        xsymbol = ws_elt.xsymbol;
        xclass_name = ws_elt.xclass_name;
        xvalue = ws_elt.xvalue;
        xdimension = ws_elt.xdimension;
        xcomplex_flag = ws_elt.xcomplex_flag;
      }

    return *this;
  }

  ~workspace_element (void) { }

  char scope (void) const { return xscope; }

  std::string symbol (void) const { return xsymbol; }

  std::string class_name (void) const { return xclass_name; }

  std::string value (void) const { return xvalue; }

  std::string dimension (void) const { return xdimension; }

  bool complex_flag (void) const { return xcomplex_flag; }

private:

  // [g]lobal, [p]ersistent, [l]ocal
  char xscope;
  std::string xsymbol;
  std::string xclass_name;
  std::string xvalue;
  std::string xdimension;
  bool xcomplex_flag;
};

#endif