mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-30 19:53:09 +00:00
Code Issues Releases Activity

(mh-make-seq, mh-seq-name): Use defsubst.

Browse Source
This commit is contained in:
Richard M. Stallman 2008-02-06 17:49:56 +00:00
parent 64137f2097
commit 27c3356934
2 changed files with 14 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
lisp/mh-e/ChangeLog
View File

@ -1,3 +1,13 @@
2008-02-06 Richard Stallman <rms@gnu.org>
* mh-seq.el (mh-make-seq, mh-seq-name): Use defsubst.
* mh-acros.el (mh-do-in-gnu-emacs, mh-do-in-xemacs)
(with-mh-folder-updating, mh-in-show-buffer)
(mh-iterate-on-messages-in-region, mh-iterate-on-range):
(mh-do-at-event-location): Add debug decls.
(mh-seq-msgs): Use defsubst.
2008-02-05 Juanma Barranquero <lekktu@gmail.com>
* mh-e.el (mh-scan-format-file-check, mh-adaptive-cmd-note-flag-check):

8
lisp/mh-e/mh-seq.el
View File

@ -53,13 +53,13 @@
;;; Macros
(defmacro mh-make-seq (name msgs)
(defsubst mh-make-seq (name msgs)
"Create sequence NAME with the given MSGS."
(list 'cons name msgs))
(cons name msgs))
(defmacro mh-seq-name (sequence)
(defsubst mh-seq-name (sequence)
"Extract sequence name from the given SEQUENCE."
(list 'car sequence))
(car sequence))