function [d1,d2] = get_date_of_a_file(filename)
0001 function [d1,d2] = get_date_of_a_file(filename) 0002 %function [d1,d2] = get_date_of_a_file(filename) 0003 0004 % Copyright (C) 2008-2009 Dynare Team 0005 % 0006 % This file is part of Dynare. 0007 % 0008 % Dynare is free software: you can redistribute it and/or modify 0009 % it under the terms of the GNU General Public License as published by 0010 % the Free Software Foundation, either version 3 of the License, or 0011 % (at your option) any later version. 0012 % 0013 % Dynare is distributed in the hope that it will be useful, 0014 % but WITHOUT ANY WARRANTY; without even the implied warranty of 0015 % MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 0016 % GNU General Public License for more details. 0017 % 0018 % You should have received a copy of the GNU General Public License 0019 % along with Dynare. If not, see <http://www.gnu.org/licenses/>. 0020 0021 info = dir(filename); 0022 if isempty(info) 0023 error(['get_date_of_a_file:: I''m not able to find ' filename '!']) 0024 end 0025 d1 = info.datenum; 0026 if nargout>1 0027 d2 = info.date; 0028 end