From 04ba15e5cc6d0225a9884c2084f9bad9e535dd7f Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?S=C3=A9bastien=20Villemot?= <sebastien@dynare.org>
Date: Tue, 4 May 2021 17:18:20 +0200
Subject: [PATCH] Preprocessor: forbid check and stoch_simul in
 block-decomposed mode with mfs > 0

Closes: #1726
---
 matlab/dr_block.m                    |  5 ++++-
 preprocessor                         |  2 +-
 tests/block_bytecode/lola_common.inc | 14 ++++++--------
 3 files changed, 11 insertions(+), 10 deletions(-)

diff --git a/matlab/dr_block.m b/matlab/dr_block.m
index 21d8ab254b..0f6069bb53 100644
--- a/matlab/dr_block.m
+++ b/matlab/dr_block.m
@@ -1,8 +1,11 @@
 function [dr,info,M_,options_,oo_] = dr_block(dr,task,M_,options_,oo_,varargin)
 % function [dr,info,M_,options_,oo_] = dr_block(dr,task,M_,options_,oo_,varargin)
-% computes the reduced form solution of a rational expectations model
+% computes the reduced form solution of a rational expectations block-decomposed model
 % (first order approximation of the stochastic model around the deterministic steady state).
 %
+% NB: This code does not work with option mfs > 0. The preprocessor has a check to avoid this
+%     configuration. See also #1726.
+%
 % INPUTS
 %   dr         [matlab structure] Decision rules for stochastic simulations.
 %   task       [integer]          if task = 0 then dr_block computes decision rules.
diff --git a/preprocessor b/preprocessor
index 7765efe95b..3c4d647cc3 160000
--- a/preprocessor
+++ b/preprocessor
@@ -1 +1 @@
-Subproject commit 7765efe95bff0d724ccbc97c0b3f543577395017
+Subproject commit 3c4d647cc33a14d3648ad0989557cf687a650487
diff --git a/tests/block_bytecode/lola_common.inc b/tests/block_bytecode/lola_common.inc
index ab335ac0c2..ae582cea50 100644
--- a/tests/block_bytecode/lola_common.inc
+++ b/tests/block_bytecode/lola_common.inc
@@ -716,13 +716,12 @@ tauc2=tauc;
 
 end;
 
-%========================================================
-% compute initial steady state and check eigenvalues 
-%========================================================
+%==============================
+% compute initial steady state
+%==============================
 
 resid;
 steady(solve_algo=3);
-check;
 
 @#if deterministic
 
@@ -930,13 +929,12 @@ tauw2=tauw;
 tauc2=tauc;
 end;
 
-%========================================================
-% compute final steady state and check eigenvalues 
-%========================================================
+%============================
+% compute final steady state
+%============================
 
 resid;
 steady(solve_algo=3);
-check;
 
 
 shocks;     
-- 
GitLab