(print "Debug starts") ; (print (make-csv '(("r1c1" "r1c2") ("r2c1" "r2c2")))) (define path '("/usr/local/var/mlisp")) (for d path (if (is-dir? d) (for f (ls-dir d) (if (regex-search? f "^.*\.l(i)?sp$") (include (+ d "/" f)) '()) ) ())) (print (regex-search? "test.lsp" "^.*\.l(i)?sp$")) (print "Debug ends")