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