(defun cbuffer-byte (buf pos) (when (cbuffer-checkbounds buf pos t) (mem-aref (cbuffer-data buf) :uchar pos)))