Lines Matching refs:files
52 ;;; This was originally generated directory-files, but there were
53 ;;; too many files there that were not actually compiled. The
56 (defvar find-gc-source-files
122 (files find-gc-source-files)
124 (while files
125 (message "Compiling %s..." (car files))
128 (car files)))
130 (insert-file-contents (concat "/tmp/esrc/" (car files) ".rtl"))
137 (message "%s : %s" (car files) name)
146 (delete-file (concat "/tmp/esrc/" (car files) ".rtl"))
147 (setq files (cdr files)))))