Convert a list of bytes to a list of characters.
(bytes->charlist bytes) → lst
Function:
(defun bytes->charlist (bytes) (declare (xargs :guard (byte-listp bytes))) (let ((__function__ 'bytes->charlist)) (declare (ignorable __function__)) (if (endp bytes) nil (cons (code-char (car bytes)) (bytes->charlist (cdr bytes))))))
Theorem:
(defthm character-listp-of-bytes->charlist (implies (byte-listp bytes) (b* ((lst (bytes->charlist bytes))) (character-listp lst))) :rule-classes :rewrite)