Fixes for Octave compatibility.

git-svn-id: https://www.dynare.org/svn/dynare/trunk@2746 ac1d8469-bf42-47a9-8791-bf33cf982152
time-shift
ratto 2009-06-09 10:03:29 +00:00
parent 787ee74238
commit 04b82bba12
1 changed files with 4 additions and 3 deletions

View File

@ -50,7 +50,7 @@ load([MhDirectoryName '/' M_.fname '_mh_history.mat'])
mcfiles = [];
for blck = 1:nblck
mcfiles = cat(3,mcfiles,dir([MhDirectoryName '/' M_.fname '_mh*_blck' int2str(blck) '.mat']));
mcfiles = cat(3,mcfiles,dir([MhDirectoryName ,filesep, M_.fname '_mh*_blck' int2str(blck) '.mat']));
end
NumberOfMcFilesPerBlock = size(mcfiles,1);
@ -102,8 +102,9 @@ if isnumeric(options_.parallel),% | isunix, % for the moment exclude unix platfo
else
[fout, nBlockPerCPU, totCPU] = masterParallel(options_.parallel, 1, npar,{},'McMCDiagnostics_core', localVars);
UDIAG = [];
for j=1:totCPU,
UDIAG = fout(1).UDIAG;
for j=2:totCPU,
UDIAG = cat(3,UDIAG ,fout(j).UDIAG);
end