A UTF-8 string input stream over a binary stream for Common Lisp
(with-open-file (f #P"data.txt.zst" :direction :input :element-type '(unsigned-byte 8))
(with-decompressing-stream (zstd-s f)
(let ((s (make-utf8-input-stream zstd-s)))
(print (read-line s))
(print (read-line s)))))