CL

(with-open-file ("path-to-file" :direction :input)
(#| read-line などごにょごにょ |#)))

ごにょごにょのエラーを検出したい場合

(with-open-file ("path-to-file" :direction :input)
(handler-case
(#| read-line などごにょごにょ |#)
((or error-type-1 error-type-2 ...) (condition)
(#| 回復可能なエラー処理 |#))
(serious-condition (condition)
(#| 回復不能なエラーの処理 |#))))