"Translate all *umls-files* to optimized import format."
(make-noneng-index-file extension)
(dolist (f (remove "MRXW_NONENG.RRF" *umls-files* :test #'string= :key #'fil))
- (when verbose (format t "UMLS Import: translating file ~S.~%" f))
+ (when verbose (format t "UMLS Import: translating file ~S.~%" (fil f)))
(translate-umls-file f extension)))
(defun translate-umls-file (file extension)