Skip to content
Snippets Groups Projects
Select Git revision
  • c6cd5b40d95544ac46795dfbdf585d92ee6b0430
  • master default protected
  • 6.x protected
  • madysson
  • 5.x protected
  • asm
  • time-varying-information-set
  • 4.6 protected
  • dynare_minreal
  • dragonfly
  • various_fixes
  • 4.5 protected
  • clang+openmp
  • exo_steady_state
  • declare_vars_in_model_block
  • julia
  • error_msg_undeclared_model_vars
  • static_aux_vars
  • slice
  • aux_func
  • penalty
  • 6.4 protected
  • 6.3 protected
  • 6.2 protected
  • 6.1 protected
  • 6.0 protected
  • 6-beta2 protected
  • 6-beta1 protected
  • 5.5 protected
  • 5.4 protected
  • 5.3 protected
  • 5.2 protected
  • 5.1 protected
  • 5.0 protected
  • 5.0-rc1 protected
  • 4.7-beta3 protected
  • 4.7-beta2 protected
  • 4.7-beta1 protected
  • 4.6.4 protected
  • 4.6.3 protected
  • 4.6.2 protected
41 results

check_list_of_variables.m

Blame
  • WarningConsolidation.cc 2.48 KiB
    /*
     * Copyright © 2012-2017 Dynare Team
     *
     * This file is part of Dynare.
     *
     * Dynare 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.
     *
     * Dynare 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 Dynare.  If not, see <http://www.gnu.org/licenses/>.
     */
    
    #include "WarningConsolidation.hh"
    #include <ostream>
    
    WarningConsolidation
    &
    operator<<(WarningConsolidation &wcc, const string &warning)
    {
      if (wcc.no_warn)
        return wcc;
    
      cerr << warning;
      wcc.addWarning(warning);
      return wcc;
    };
    
    WarningConsolidation &
    operator<<(WarningConsolidation &wcc, const Dynare::location &loc)
    {
      if (wcc.no_warn)
        return wcc;
    
      stringstream ostr;
      Dynare::position last = loc.end - 1;
      ostr << loc.begin;
      if (last.filename
          && (!loc.begin.filename
              || *loc.begin.filename != *last.filename))
        ostr << '-' << last;
      else if (loc.begin.line != last.line)
        ostr << '-' << last.line  << '.' << last.column;
      else if (loc.begin.column != last.column)
        ostr << '-' << last.column;
    
      cerr << ostr.str();
      wcc.addWarning(ostr.str());
      return wcc;
    };
    
    WarningConsolidation &
    operator<<(WarningConsolidation &wcc, ostream & (*pf)(ostream &))
    {
      if (wcc.no_warn)
        return wcc;
    
      cerr << pf;
      wcc.addWarning(pf);
      return wcc;
    }
    
    void
    WarningConsolidation::writeOutput(ostream &output) const
    {
      if (warnings.str().empty())
        return;
    
      output << "disp([char(10) 'Dynare Preprocessor Warning(s) Encountered:']);" << endl;
    
      bool writedisp = true;
      string warningsstr = warnings.str();
      for (size_t i = 0; i < warningsstr.length(); i++)
        {
          if (writedisp)
            {
              output << "disp('     ";
              writedisp = false;
            }
    
          if (warningsstr[i] != '\n')
            output << warningsstr[i];
          else
            {
              output << "');" << endl;
              if (i+1 < warningsstr.length())
                writedisp = true;
            }
        }
    }
    
    int
    WarningConsolidation::countWarnings() const
    {
      size_t p = 0;
      int n = 0;
      while ((p = warnings.str().find('\n', p)) != string::npos)
        {
          p++;
          n++;
        }
      return n;
    }