From a1a42b69ee494b7cfab285e0eb4fe66d8e831af8 Mon Sep 17 00:00:00 2001
From: Michel Juillard <michel.juillard@mjui.fr>
Date: Sun, 20 Nov 2011 20:16:02 +0100
Subject: [PATCH] unit_root_vars now sets the options_.diffuse_filter and
 options_.steadystate.nocheck

---
 ComputingTasks.cc | 11 +++++++++++
 ComputingTasks.hh |  7 +++++++
 ParsingDriver.cc  |  3 ++-
 3 files changed, 20 insertions(+), 1 deletion(-)

diff --git a/ComputingTasks.cc b/ComputingTasks.cc
index 5e34a655..06062450 100644
--- a/ComputingTasks.cc
+++ b/ComputingTasks.cc
@@ -371,6 +371,17 @@ RplotStatement::writeOutput(ostream &output, const string &basename) const
   output << "rplot(var_list_);\n";
 }
 
+UnitRootVarsStatement::UnitRootVarsStatement(void)
+{
+}
+
+void
+UnitRootVarsStatement::writeOutput(ostream &output, const string &basename) const
+{
+  output << "options_.diffuse_filter = 1;" << endl
+	 << "options_.steadystate.nocheck = 1;" << endl;
+}
+
 PeriodsStatement::PeriodsStatement(int periods_arg) : periods(periods_arg)
 {
 }
diff --git a/ComputingTasks.hh b/ComputingTasks.hh
index 3f66bd03..2c7a0e86 100644
--- a/ComputingTasks.hh
+++ b/ComputingTasks.hh
@@ -126,6 +126,13 @@ public:
   virtual void writeOutput(ostream &output, const string &basename) const;
 };
 
+class UnitRootVarsStatement : public Statement
+{
+public:
+  UnitRootVarsStatement(void);
+  virtual void writeOutput(ostream &output, const string &basename) const;
+};
+
 class PeriodsStatement : public Statement
 {
 private:
diff --git a/ParsingDriver.cc b/ParsingDriver.cc
index eff84af4..73fc785f 100644
--- a/ParsingDriver.cc
+++ b/ParsingDriver.cc
@@ -1179,7 +1179,8 @@ ParsingDriver::estimated_params_bounds()
 void
 ParsingDriver::set_unit_root_vars()
 {
-  warning("'unit_root_vars' is now obsolete and has no effect; use option 'diffuse_filter' of 'estimation' instead");
+  mod_file->addStatement(new UnitRootVarsStatement());
+  warning("'unit_root_vars' is now obsolete; use option 'diffuse_filter' of 'estimation' instead");
   symbol_list.clear();
 }