[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] trunk r115167: * lisp/emacs-lisp/byte-run.el (eval-when-co
From: |
Stefan Monnier |
Subject: |
[Emacs-diffs] trunk r115167: * lisp/emacs-lisp/byte-run.el (eval-when-compile): Fix edebug spec. |
Date: |
Thu, 21 Nov 2013 02:46:04 +0000 |
User-agent: |
Bazaar (2.6b2) |
------------------------------------------------------------
revno: 115167
revision-id: address@hidden
parent: address@hidden
fixes bug: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=14646
committer: Stefan Monnier <address@hidden>
branch nick: trunk
timestamp: Wed 2013-11-20 21:46:00 -0500
message:
* lisp/emacs-lisp/byte-run.el (eval-when-compile): Fix edebug spec.
(make-obsolete): Remove interactive spec.
modified:
lisp/ChangeLog changelog-20091113204419-o5vbwnq5f7feedwu-1432
lisp/emacs-lisp/byte-run.el byterun.el-20091113204419-o5vbwnq5f7feedwu-2586
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog 2013-11-21 00:21:50 +0000
+++ b/lisp/ChangeLog 2013-11-21 02:46:00 +0000
@@ -1,3 +1,9 @@
+2013-11-21 Stefan Monnier <address@hidden>
+
+ * emacs-lisp/byte-run.el (eval-when-compile): Fix edebug spec
+ (bug#14646).
+ (make-obsolete): Remove interactive spec.
+
2013-11-21 Glenn Morris <address@hidden>
* startup.el (command-line-1): Use path-separator with -L.
@@ -29,8 +35,8 @@
* obsolete/rcompile.el: Mark obsolete.
* progmodes/compile.el (compilation-start)
- (compilation-goto-locus, compilation-find-file): Pass
- no-display-ok and handle nil value from display-buffer.
+ (compilation-goto-locus, compilation-find-file):
+ Pass no-display-ok and handle nil value from display-buffer.
(Bug#13594)
* window.el (display-buffer-alist, display-buffer): Document the
=== modified file 'lisp/emacs-lisp/byte-run.el'
--- a/lisp/emacs-lisp/byte-run.el 2013-11-04 20:06:02 +0000
+++ b/lisp/emacs-lisp/byte-run.el 2013-11-21 02:46:00 +0000
@@ -112,10 +112,10 @@
''edebug-form-spec (list 'quote spec)))))
defun-declarations-alist)
"List associating properties of macros to their macro expansion.
-Each element of the list takes the form (PROP FUN) where FUN is
-a function. For each (PROP . VALUES) in a macro's declaration,
-the FUN corresponding to PROP is called with the function name
-and the VALUES and should return the code to use to set this property.")
+Each element of the list takes the form (PROP FUN) where FUN is a function.
+For each (PROP . VALUES) in a macro's declaration, the FUN corresponding
+to PROP is called with the macro name, the macro's arglist, and the VALUES
+and should return the code to use to set this property.")
(put 'defmacro 'doc-string-elt 3)
(put 'defmacro 'lisp-indent-function 2)
@@ -285,7 +285,6 @@
(declare (advertised-calling-convention
;; New code should always provide the `when' argument.
(obsolete-name current-name when) "23.1"))
- (interactive "aMake function obsolete: \nxObsoletion replacement: ")
(put obsolete-name 'byte-obsolete-info
;; The second entry used to hold the `byte-compile' handler, but
;; is not used any more nowadays.
@@ -392,7 +391,7 @@
"Like `progn', but evaluates the body at compile time if you're compiling.
Thus, the result of the body appears to the compiler as a quoted constant.
In interpreted code, this is entirely equivalent to `progn'."
- (declare (debug t) (indent 0))
+ (declare (debug (def-body)) (indent 0))
(list 'quote (eval (cons 'progn body) lexical-binding)))
(defmacro eval-and-compile (&rest body)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] trunk r115167: * lisp/emacs-lisp/byte-run.el (eval-when-compile): Fix edebug spec.,
Stefan Monnier <=