newLISP 遍历目录树,清理编译目录
下面的代码将当前目录下所有子目录里面的dll, pdb, obj和lib文件全部删除。文件名clean.lsp;; remove *.lib, *.dll, *.pdb and *.obj in current folder;; then handle sub folders(define (clean-folder dir-path) (println "enter " dir-path) (let (fs (directory dir-path "\....