(defmethod (setf stream-position) (value (stream cbuffer-stream-mixin)) (cbuffer-checkbounds (stream-cbuffer stream) value t) (setf (slot-value stream 'pos) value))