[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/international/mule.el
From: |
Kenichi Handa |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/international/mule.el |
Date: |
Wed, 15 Jan 2003 00:57:33 -0500 |
Index: emacs/lisp/international/mule.el
diff -c emacs/lisp/international/mule.el:1.173
emacs/lisp/international/mule.el:1.174
*** emacs/lisp/international/mule.el:1.173 Fri Jan 3 15:11:15 2003
--- emacs/lisp/international/mule.el Wed Jan 15 00:57:31 2003
***************
*** 604,613 ****
;; reduced to ~1k. (`optimize-char-table' might win if
;; permutations were eliminated, but that's probably a small
;; effect and not easy to test.)
! (let ((existing (car (member v cache))))
! (if existing
! (aset char-coding-system-table k existing)
! (push v cache))))
char-coding-system-table))
(optimize-char-table char-coding-system-table))
--- 604,614 ----
;; reduced to ~1k. (`optimize-char-table' might win if
;; permutations were eliminated, but that's probably a small
;; effect and not easy to test.)
! (if v
! (let ((existing (car (member v cache))))
! (if existing
! (aset char-coding-system-table k existing)
! (push v cache)))))
char-coding-system-table))
(optimize-char-table char-coding-system-table))
- [Emacs-diffs] Changes to emacs/lisp/international/mule.el,
Kenichi Handa <=