;; Don't allow empty .fasls, and assume other empty files
;; are source files.
(when (and (or should-be-fasl-p (not (eql 0 (file-length stream))))
;; Don't allow empty .fasls, and assume other empty files
;; are source files.
(when (and (or should-be-fasl-p (not (eql 0 (file-length stream))))