From 7581960fb22273adcd69a77688740d4b9f53300d Mon Sep 17 00:00:00 2001
From: Marco Ratto <marco.ratto@jrc.ec.europa.eu>
Date: Fri, 12 Feb 2010 17:38:15 +0100
Subject: [PATCH] use of parallel info to redirect to masterParallelman when
 requested by the user

---
 matlab/masterParallel.m | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/matlab/masterParallel.m b/matlab/masterParallel.m
index d8f709b922..12c15c1180 100644
--- a/matlab/masterParallel.m
+++ b/matlab/masterParallel.m
@@ -1,4 +1,4 @@
-function [fOutVar,nBlockPerCPU, totCPU] = masterParallel(Parallel,fBlock,nBlock,NamFileInput,fname,fInputVar,fGlobalVar)
+function [fOutVar,nBlockPerCPU, totCPU] = masterParallel(Parallel,fBlock,nBlock,NamFileInput,fname,fInputVar,fGlobalVar,Parallel_info)
 % Top-level function called on the master computer when parallelizing a task.
 %
 % The number of parallelized threads will be equal to (nBlock-fBlock+1).
@@ -47,6 +47,12 @@ function [fOutVar,nBlockPerCPU, totCPU] = masterParallel(Parallel,fBlock,nBlock,
 % along with Dynare.  If not, see <http://www.gnu.org/licenses/>.
 
 % Determine my hostname and my working directory
+if ~isempty(Parallel_info)
+    if Parallel_info.leaveSlaveOpen,
+        [fOutVar,nBlockPerCPU, totCPU] = masterParallelMan(Parallel,fBlock,nBlock,NamFileInput,fname,fInputVar,fGlobalVar);
+        return
+    end        
+end
 DyMo=pwd;
 fInputVar.DyMo=DyMo;
 if isunix || (~matlab_ver_less_than('7.4') && ismac) ,
-- 
GitLab