From 7cecfe934c86d839ccd3a027fd8d65edf31a4ace Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?S=C3=A9bastien=20Villemot?= <sebastien@dynare.org>
Date: Tue, 15 Apr 2025 17:29:08 +0200
Subject: [PATCH] Testsuite: simplify block/bytecode test
---
tests/block_bytecode/ls2003.mod | 23 ++++++++++-------------
1 file changed, 10 insertions(+), 13 deletions(-)
diff --git a/tests/block_bytecode/ls2003.mod b/tests/block_bytecode/ls2003.mod
index 38ce2bccd6..3fa05a9c26 100644
--- a/tests/block_bytecode/ls2003.mod
+++ b/tests/block_bytecode/ls2003.mod
@@ -47,20 +47,17 @@ nstbc_psi = 0;
nstbc_theta = 2.95;
-@#if !block && !bytecode && !use_dll
-model;
-@#elseif block && !bytecode && !use_dll
-model(block, cutoff=0);
-@#elseif !block && bytecode
-model(bytecode);
-@#elseif block && bytecode
-model(block, bytecode, cutoff=0);
-@#elseif !block && use_dll
-model(use_dll);
-@#else
-model(block, use_dll, cutoff=0);
+@#if block
+model_options(block);
+@#endif
+@#if bytecode
+model_options(bytecode);
+@#endif
+@#if use_dll
+model_options(use_dll);
@#endif
+model;
// Block of type “Solve two boundaries complete” (linear)
y = y(+1) - (tau +alpha*(2-alpha)*(1-tau))*(R-pie(+1))-alpha*(tau +alpha*(2-alpha)*(1-tau))*dq(+1) + alpha*(2-alpha)*((1-tau)/tau)*(y_s-y_s(+1))-A(+1);
pie = exp(-rr/400)*pie(+1)+alpha*exp(-rr/400)*dq(+1)-alpha*dq+(k/(tau+alpha*(2-alpha)*(1-tau)))*y+alpha*(2-alpha)*(1-tau)/(tau*(tau+alpha*(2-alpha)*(1-tau)))*y_s;
@@ -218,4 +215,4 @@ shocks;
end;
perfect_foresight_setup(periods=20);
-perfect_foresight_solver(no_homotopy, markowitz=0, stack_solve_algo = @{stack_solve_algo});
+perfect_foresight_solver(no_homotopy, stack_solve_algo = @{stack_solve_algo});
--
GitLab