remove unused output from functions

parent c15602c6
Pipeline #701 failed with stages
in 70 minutes and 25 seconds
......@@ -12,7 +12,7 @@ function [eigenvalues_,result,info] = check(M, options, oo)
% - result [integer] scalar, equal to 1 if Blanchard and Kahn conditions are satisfied, zero otherwise.
% - info [integer] scalar or vector, error code as returned by resol routine.
% Copyright (C) 2001-2018 Dynare Team
% Copyright (C) 2001-2019 Dynare Team
%
% This file is part of Dynare.
%
......@@ -42,7 +42,7 @@ end
oo.dr=set_state_space(oo.dr,M,options);
[dr,info,M,options,oo] = resol(1,M,options,oo);
[dr,info,M,options,~] = resol(1,M,options,oo);
if info(1) ~= 0 && info(1) ~= 3 && info(1) ~= 4
print_info(info, 0, options);
......
......@@ -2,7 +2,7 @@ function clear_persistent_variables(folder, writelistofroutinestobecleared)
% Clear all the functions with persistent variables in directory folder (and subdirectories).
% Copyright (C) 2015-2017 Dynare Team
% Copyright (C) 2015-2019 Dynare Team
%
% This file is part of Dynare.
%
......@@ -33,11 +33,11 @@ DYNARE_FOLDER = strrep(which('dynare'),'dynare.m','');
if writelistofroutinestobecleared
if ~exist('list_of_functions_to_be_cleared.m') || isolder(sprintf('%slist_of_functions_to_be_cleared.m', DYNARE_FOLDER), DYNARE_FOLDER)
if isunix() || ismac()
[status, output] = system(sprintf('grep -lr ^persistent %s', folder));
[~, output] = system(sprintf('grep -lr ^persistent %s', folder));
list_of_files = strsplit(output);
list_of_files(find(cellfun(@isempty, list_of_files))) = [];
else
[status, output] = system(sprintf('findstr /B/S/M persistent %s\\*', folder));
[~, output] = system(sprintf('findstr /B/S/M persistent %s\\*', folder));
list_of_files = strsplit(output);
list_of_files(find(cellfun(@isempty, list_of_files))) = [];
i = 1; mobius = true;
......@@ -52,11 +52,11 @@ if writelistofroutinestobecleared
end
end
end
[paths, list_of_functions, extensions] = cellfun(@fileparts, list_of_files, 'UniformOutput',false);
[~, list_of_functions, ~] = cellfun(@fileparts, list_of_files, 'UniformOutput',false);
cellofchar2mfile(sprintf('%slist_of_functions_to_be_cleared.m', DYNARE_FOLDER), list_of_functions)
end
return
end
list_of_functions_to_be_cleared;
clear(list_of_functions{:});
\ No newline at end of file
clear(list_of_functions{:});
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment