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 2b8e6fba9c
commit b907844152
1 changed files with 10 additions and 3 deletions

View File

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