[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-commit] emacs/lisp/mh-e mh-seq.el [EMACS_22_BASE]
From: |
Richard M. Stallman |
Subject: |
[Emacs-commit] emacs/lisp/mh-e mh-seq.el [EMACS_22_BASE] |
Date: |
Wed, 06 Feb 2008 17:49:49 +0000 |
CVSROOT: /cvsroot/emacs
Module name: emacs
Branch: EMACS_22_BASE
Changes by: Richard M. Stallman <rms> 08/02/06 17:49:49
Modified files:
lisp/mh-e : mh-seq.el
Log message:
(mh-make-seq, mh-seq-name): Use defsubst.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/mh-e/mh-seq.el?cvsroot=emacs&only_with_tag=EMACS_22_BASE&r1=1.33.2.2&r2=1.33.2.3
Patches:
Index: mh-seq.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/mh-e/mh-seq.el,v
retrieving revision 1.33.2.2
retrieving revision 1.33.2.3
diff -u -b -r1.33.2.2 -r1.33.2.3
--- mh-seq.el 7 Jan 2008 01:52:41 -0000 1.33.2.2
+++ mh-seq.el 6 Feb 2008 17:49:49 -0000 1.33.2.3
@@ -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))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-commit] emacs/lisp/mh-e mh-seq.el [EMACS_22_BASE],
Richard M. Stallman <=