pro clean, no_src=no_src if n_elements(no_src) eq 0 then no_src=0 ; cleanup if no_src eq 0 then spawn, 'rm -f ./src/*' spawn, 'rm -f ./out/*' spawn, 'rmdir out' if no_src eq 0 then spawn, 'rmdir src' spawn, 'rm -f tmp' spawn, 'rm -f tst.map' spawn, 'rm -f dlist*' end