Test the existence of the files and folder before deletion.

time-shift
Stéphane Adjemian (Scylla) 2014-04-22 15:19:16 +02:00
parent 0cd6c9917e
commit f183c047d5
1 changed files with 10 additions and 3 deletions

View File

@ -19,11 +19,18 @@ function clean()
a = dir('*.mod'); a = dir('*.mod');
for i = 1:length(a) for i = 1:length(a)
[junk,basename,extension] = fileparts(a(i).name); [junk,basename,extension] = fileparts(a(i).name);
delete([basename '.m']); if exist([basename '.m'])
delete([basename '.log']); delete([basename '.m']);
rmdir(basename,'s'); end
if exist([basename '.log'])
delete([basename '.log']);
end
if exist(basename,'dir')
rmdir(basename,'s');
end
if exist([basename '_steadystate.m']) if exist([basename '_steadystate.m'])
movefile([basename '_steadystate.m'],['protect_' basename '_steadystate.m']); movefile([basename '_steadystate.m'],['protect_' basename '_steadystate.m']);
end end