``` (values (array-element-type (make-array 0 :element-type 'base-char)) (upgraded-array-element-type 'base-char)) => CHARACTER BASE-CHAR ```