v4 dynare.m: looking automatically for .dyn and .mod files
git-svn-id: https://www.dynare.org/svn/dynare/dynare_v4@693 ac1d8469-bf42-47a9-8791-bf33cf982152time-shift
parent
4da4c9933c
commit
52590d6a65
|
@ -15,14 +15,24 @@ end
|
|||
% Testing if file have extension
|
||||
% If no extension defalut .mod is added
|
||||
if isempty(strfind(fname,'.'))
|
||||
fname=[fname '.mod'];
|
||||
% Checking file extension
|
||||
fname1 = [fname '.dyn'];
|
||||
d = dir(fname1);
|
||||
if length(d) == 0
|
||||
fname1 = [fname '.mod'];
|
||||
end
|
||||
fname = fname1;
|
||||
% Checking file extension
|
||||
else
|
||||
if ~strcmp(upper(fname(size(fname,2)-3:size(fname,2))),'.MOD') ...
|
||||
&& ~strcmp(upper(fname(size(fname,2)-3:size(fname,2))),'.DYN')
|
||||
error ('Argument is a file name with .mod or .dyn extension');
|
||||
end;
|
||||
end;
|
||||
d = dir(fname);
|
||||
if length(d) == 0
|
||||
disp(['DYNARE: can''t open ' fname])
|
||||
return
|
||||
end
|
||||
dynareroot = strrep(which('dynare.m'),'dynare.m','');
|
||||
command = [dynareroot 'dynare_m ' fname] ;
|
||||
for i=2:nargin
|
||||
|
|
Loading…
Reference in New Issue