(defparameter ext::UCS4BE 'ext::UCS-4BE)