aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/vc/diff-mode.el
diff options
context:
space:
mode:
authorStefan Monnier2011-02-26 10:19:08 -0500
committerStefan Monnier2011-02-26 10:19:08 -0500
commita9de04fa62f123413d82b7b7b1e7a77705eb82dd (patch)
tree84292e07c3583dee99376669fb799d8c93cdd5ff /lisp/vc/diff-mode.el
parent876c194cbac17a6220dbf406b0a602325978011c (diff)
downloademacs-a9de04fa62f123413d82b7b7b1e7a77705eb82dd.tar.gz
emacs-a9de04fa62f123413d82b7b7b1e7a77705eb82dd.zip
Compute freevars in cconv-analyse.
* lisp/emacs-lisp/cconv.el: Compute freevars in cconv-analyse. (cconv-mutated, cconv-captured): Remove. (cconv-captured+mutated, cconv-lambda-candidates): Don't give them a global value. (cconv-freevars-alist): New var. (cconv-freevars): Remove. (cconv--lookup-let): Remove. (cconv-closure-convert-function): Extract from cconv-closure-convert-rec. (cconv-closure-convert-rec): Adjust to above changes. (fboundp): New function. (cconv-analyse-function, form): Rewrite. * lisp/emacs-lisp/bytecomp.el (byte-compile-initial-macro-environment): Handle declare-function here. (byte-compile-obsolete): Remove. (byte-compile-arglist-warn): Check late defsubst here. (byte-compile-file-form): Simplify. (byte-compile-file-form-defsubst): Remove. (byte-compile-macroexpand-declare-function): Rename from byte-compile-declare-function, turn it into a macro-expander. (byte-compile-normal-call): Check obsolescence. (byte-compile-quote-form): Remove. (byte-compile-defmacro): Revert to trunk's definition which seems to work just as well and handles `declare'. * lisp/emacs-lisp/byte-run.el (make-obsolete): Don't modify byte-compile. * lisp/Makefile.in (BIG_STACK_DEPTH): Increase to 1200. (compile-onefile): Pass $(BIG_STACK_OPTS) before "-l bytecomp". * lisp/emacs-lisp/macroexp.el: Use lexbind. (macroexpand-all-1): Check macro obsolescence. * lisp/vc/diff-mode.el: Use lexbind. * lisp/follow.el (follow-calc-win-end): Simplify.
Diffstat (limited to 'lisp/vc/diff-mode.el')
-rw-r--r--lisp/vc/diff-mode.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/vc/diff-mode.el b/lisp/vc/diff-mode.el
index 13d10f02b41..59e442a89c3 100644
--- a/lisp/vc/diff-mode.el
+++ b/lisp/vc/diff-mode.el
@@ -1,4 +1,4 @@
1;;; diff-mode.el --- a mode for viewing/editing context diffs 1;;; diff-mode.el --- a mode for viewing/editing context diffs -*- lexical-binding: t -*-
2 2
3;; Copyright (C) 1998-2011 Free Software Foundation, Inc. 3;; Copyright (C) 1998-2011 Free Software Foundation, Inc.
4 4
@@ -1278,7 +1278,7 @@ a diff with \\[diff-reverse-direction].
1278 (add-hook 'after-change-functions 'diff-after-change-function nil t) 1278 (add-hook 'after-change-functions 'diff-after-change-function nil t)
1279 (add-hook 'post-command-hook 'diff-post-command-hook nil t)) 1279 (add-hook 'post-command-hook 'diff-post-command-hook nil t))
1280 ;; Neat trick from Dave Love to add more bindings in read-only mode: 1280 ;; Neat trick from Dave Love to add more bindings in read-only mode:
1281 (lexical-let ((ro-bind (cons 'buffer-read-only diff-mode-shared-map))) 1281 (let ((ro-bind (cons 'buffer-read-only diff-mode-shared-map)))
1282 (add-to-list 'minor-mode-overriding-map-alist ro-bind) 1282 (add-to-list 'minor-mode-overriding-map-alist ro-bind)
1283 ;; Turn off this little trick in case the buffer is put in view-mode. 1283 ;; Turn off this little trick in case the buffer is put in view-mode.
1284 (add-hook 'view-mode-hook 1284 (add-hook 'view-mode-hook