From f1189707363f0f357e5d63e3d13b4c5be91e6791 Mon Sep 17 00:00:00 2001 From: Houtan Bastani <houtan@dynare.org> Date: Wed, 11 Sep 2019 10:11:36 +0200 Subject: [PATCH] remove unnecessary eval statements --- matlab/PosteriorIRF_core1.m | 8 ++------ matlab/stoch_simul.m | 3 +-- 2 files changed, 3 insertions(+), 8 deletions(-) diff --git a/matlab/PosteriorIRF_core1.m b/matlab/PosteriorIRF_core1.m index 7fa1716f6f..f9143a3a1e 100644 --- a/matlab/PosteriorIRF_core1.m +++ b/matlab/PosteriorIRF_core1.m @@ -239,9 +239,7 @@ while fpar<B stock_irf_bvardsge(:,:,:,IRUN) = reshape(tmp_dsgevar,options_.irf,dataset_.vobs,M_.exo_nbr); else stock_irf_bvardsge(:,:,:,IRUN) = reshape(tmp_dsgevar,options_.irf,dataset_.vobs,M_.exo_nbr); - instr = [MhDirectoryName '/' M_.fname '_irf_bvardsge' ... - int2str(NumberOfIRFfiles_dsgevar) '.mat stock_irf_bvardsge;']; - eval(['save ' instr]); + save([MhDirectoryName '/' M_.fname '_irf_bvardsge' int2str(NumberOfIRFfiles_dsgevar) '.mat'], 'stock_irf_bvardsge'); if RemoteFlag==1 OutputFileName_bvardsge = [OutputFileName_bvardsge; {[MhDirectoryName filesep], [M_.fname '_irf_bvardsge' int2str(NumberOfIRFfiles_dsgevar) '.mat']}]; end @@ -255,9 +253,7 @@ while fpar<B stock_irf_dsge = stock_irf_dsge(:,:,:,1:irun); if MAX_nirfs_dsgevar && (fpar == B || IRUN == B) stock_irf_bvardsge = stock_irf_bvardsge(:,:,:,1:IRUN); - instr = [MhDirectoryName '/' M_.fname '_irf_bvardsge' ... - int2str(NumberOfIRFfiles_dsgevar) '.mat stock_irf_bvardsge;']; - eval(['save ' instr]); + save([MhDirectoryName '/' M_.fname '_irf_bvardsge' int2str(NumberOfIRFfiles_dsgevar) '.mat'], 'stock_irf_bvardsge'); NumberOfIRFfiles_dsgevar = NumberOfIRFfiles_dsgevar+1; if RemoteFlag==1 OutputFileName_bvardsge = [OutputFileName_bvardsge; {[MhDirectoryName filesep], [M_.fname '_irf_bvardsge' int2str(NumberOfIRFfiles_dsgevar) '.mat']}]; diff --git a/matlab/stoch_simul.m b/matlab/stoch_simul.m index e76d9577ea..819638f1a6 100644 --- a/matlab/stoch_simul.m +++ b/matlab/stoch_simul.m @@ -248,8 +248,7 @@ if options_.irf for j = 1:nvar assignin('base',[M_.endo_names{i_var(j)} '_' M_.exo_names{i}],... y(i_var(j),:)'); - eval(['oo_.irfs.' M_.endo_names{i_var(j)} '_' ... - M_.exo_names{i} ' = y(i_var(j),:);']); + oo_.irfs.([M_.endo_names{i_var(j)} '_' M_.exo_names{i}]) = y(i_var(j),:); if max(abs(y(i_var(j),:))) >= options_.impulse_responses.plot_threshold irfs = cat(1,irfs,y(i_var(j),:)); if isempty(mylist) -- GitLab