#lang rash (require racket-makefile/rash) (makefile rash-coreutils (target all (displayln "Use make clean, make zip, etc.")) (target clean (for-each (λ (f) (displayln f) (rm-f f)) (list-files "." #px"([.]bak|~)$" #:recursive #t)) (for-each (λ (d) (displayln d) (rm-rf d)) (list-dirs "." #px"(compiled|doc|docs)$" #:recursive #t)) (unless (directory-exists? "scrbl") (make-directory "scrbl")) (for-each (λ (f) (displayln f) (rm-f f)) (list-files "scrbl" #px"[.](css|js|html)$"))) (target zip (deps clean) (zip-package)) )