(if (or ucs-code (null drep-ucs-ccs))
(unless (eq (char-feature drep-chr '=>ucs) ucs)
(put-char-attribute drep-chr '=>ucs ucs))
(if (or ucs-code (null drep-ucs-ccs))
(unless (eq (char-feature drep-chr '=>ucs) ucs)
(put-char-attribute drep-chr '=>ucs ucs))