(defparameter ext::UCS4 'ext::UCS-4)