8 lines
179 B
Common Lisp
8 lines
179 B
Common Lisp
;; function to remove file & directory
|
|
(defun my-files-rm ()
|
|
(delete-file "input.txt")
|
|
(delete-directory "docs"))
|
|
|
|
(my-files-rm)
|
|
(cd "~/") ;; change to home dir
|
|
(my-files-rm)
|