Properly close waitbar in serial computations.

time-shift
Marco Ratto 2010-10-12 08:07:57 +02:00
parent f079411126
commit cc70913b7d
2 changed files with 15 additions and 16 deletions

View File

@ -236,17 +236,6 @@ end
ifil = fout(end).ifil;
if exist('OCTAVE_VERSION')
printf('\n');
diary on;
else
if exist('h')
close(h)
end
end
stock_gend=gend;
stock_data=Y;
save([DirectoryName '/' M_.fname '_data.mat'],'stock_gend','stock_data');

View File

@ -94,12 +94,12 @@ end
DirectoryName = CheckPath('metropolis');
RemoteFlag = 0;
for j=1:length(Parallel),
if Parallel(j).Local==0,
RemoteFlag = 1;
end
end
if whoiam
for j=1:length(Parallel),
if Parallel(j).Local==0,
RemoteFlag = 1;
end
end
ifil=ifil(:,whoiam);
waitbarString = ['Please wait... Bayesian (posterior) subdraws (' int2str(fpar) 'of' int2str(B) ')...'];
if Parallel(ThisMatlab).Local,
@ -318,3 +318,13 @@ OutputFileName_forc_mean;
OutputFileName_forc_point];
% OutputFileName_moments];
end
if exist('OCTAVE_VERSION')
printf('\n');
diary on;
else
if exist('h')
close(h)
end
end