stepan
/
dynare
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Modify get_directory_description to return a flat cell

time-shift
Sébastien Villemot 2013-12-09 18:54:12 +01:00
parent 2d966208c4
commit b840af9fa5
2 changed files with 12 additions and 16 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
matlab/utilities/tests/get_directory_description.m
View File

@ -24,10 +24,11 @@ file = 1;
for f=1:length(dd) for f=1:length(dd)
if ~(isequal(dd(f).name,'.') || isequal(dd(f).name,'..')) if ~(isequal(dd(f).name,'.') || isequal(dd(f).name,'..'))
if dd(f).isdir if dd(f).isdir
flist(file) = { get_directory_description([ basedir filesep dd(f).name]) }; r = get_directory_description([ basedir filesep dd(f).name]);
flist = { flist{:} r{:} };
else else
flist(file) = { [basedir filesep dd(f).name] }; flist{length(flist)+1} = [basedir filesep dd(f).name];
end end
file = file + 1; file = file + 1;
end end
end end

21
matlab/utilities/tests/run_unitary_tests.m
View File

@ -20,22 +20,17 @@ function [report, time] = run_unitary_tests(listoffiles)
report = {}; report = {};
for f=1:length(listoffiles) for f=1:length(listoffiles)
if iscell(listoffiles{f}) if isequal(listoffiles{f}(end-1:end),'.m') && isempty(strfind(listoffiles{f},'.#'))
info = run_unitary_tests(listoffiles{f}); if is_unitary_test_available(listoffiles{f})
report = [report; info]; disp(['***** Process unitary tests in ' listoffiles{f}])
else [check, info] = mtest(listoffiles{f});
if isequal(listoffiles{f}(end-1:end),'.m') && isempty(strfind(listoffiles{f},'.#')) report = [report; info];
if is_unitary_test_available(listoffiles{f}) else
disp(['***** Process unitary tests in ' listoffiles{f}]) disp(['Booh! No unitary tests available in ' listoffiles{f}])
[check, info] = mtest(listoffiles{f});
report = [report; info];
else
disp(['Booh! No unitary tests available in ' listoffiles{f}])
end
end end
end end
end end
if nargout>1 if nargout>1
time = clock; time = clock;
end end