(dolist (type '(single multiple))
(let* ((tablesym (intern (format "uni-confusables-char-table-%s" type)))
(oursym (intern (format "gen-confusables-char-table-%s" type)))
(ourtable (symbol-value oursym))
(dolist (type '(single multiple))
(let* ((tablesym (intern (format "uni-confusables-char-table-%s" type)))
(oursym (intern (format "gen-confusables-char-table-%s" type)))
(ourtable (symbol-value oursym))