emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/pyim 210d56e: * pyim-dhashcache.el (pyim-dhashcache-pu


From: ELPA Syncer
Subject: [elpa] externals/pyim 210d56e: * pyim-dhashcache.el (pyim-dhashcache-put): 保存之前不做 equal 判断.
Date: Sun, 5 Dec 2021 03:57:34 -0500 (EST)

branch: externals/pyim
commit 210d56ee60e6875e8e8e0c52b4ed7ac27d40c251
Author: Feng Shu <tumashu@163.com>
Commit: Feng Shu <tumashu@163.com>

    * pyim-dhashcache.el (pyim-dhashcache-put): 保存之前不做 equal 判断.
    
    因为词条使用 text property :noexport 来标记,equal 无法判断。
---
 pyim-dhashcache.el | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/pyim-dhashcache.el b/pyim-dhashcache.el
index 51a9bb5..3379caa 100644
--- a/pyim-dhashcache.el
+++ b/pyim-dhashcache.el
@@ -372,7 +372,10 @@ code 对应的中文词条了。
   (pyim-dcache-save-variable 'pyim-dhashcache-iword2count))
 
 (defmacro pyim-dhashcache-put (cache code &rest body)
-  "这个用于保存词条,删除词条以及调整词条位置."
+  "将 BODY 的返回值保存到 CACHE 对应的 CODE 中。
+
+注意事项:这个宏是一个指代宏,其中 orig-value 在这个宏中有特殊含
+义,代表原来 code 对应的取值。"
   (declare (indent 0))
   (let ((key (make-symbol "key"))
         (table (make-symbol "table"))
@@ -382,8 +385,7 @@ code 对应的中文词条了。
             (orig-value (gethash ,key ,table))
             ,new-value)
        (setq ,new-value (progn ,@body))
-       (unless (equal orig-value ,new-value)
-         (puthash ,key ,new-value ,table)))))
+       (puthash ,key ,new-value ,table))))
 
 (defun pyim-dhashcache-update-iword2count (word &optional _prepend 
wordcount-handler)
   "保存词频到缓存."



reply via email to

[Prev in Thread] Current Thread [Next in Thread]