diff options
| author | Richard M. Stallman <rms@gnu.org> | 2008-02-06 17:49:56 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 2008-02-06 17:49:56 +0000 |
| commit | 27c335693403393b7c38be96e85bf6629972ed2b (patch) | |
| tree | 8563be25bcc607a1b94168054788e779767b8c44 /lisp/mh-e/mh-seq.el | |
| parent | 64137f20978c133c6f74d9aea65b240edc76be3a (diff) | |
| download | emacs-27c335693403393b7c38be96e85bf6629972ed2b.tar.gz | |
(mh-make-seq, mh-seq-name): Use defsubst.
Diffstat (limited to 'lisp/mh-e/mh-seq.el')
| -rw-r--r-- | lisp/mh-e/mh-seq.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/mh-e/mh-seq.el b/lisp/mh-e/mh-seq.el index 87c59cd8136..fd64d8a6902 100644 --- a/lisp/mh-e/mh-seq.el +++ b/lisp/mh-e/mh-seq.el @@ -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)) |