summaryrefslogtreecommitdiff
path: root/lisp/subr.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/subr.el')
-rw-r--r--lisp/subr.el6
1 files changed, 6 insertions, 0 deletions
diff --git a/lisp/subr.el b/lisp/subr.el
index 3330fa20379..c72752eb8f2 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -426,6 +426,12 @@ Non-strings in LIST are ignored."
(setq list (cdr list)))
list)
+;; Remove this since we don't know how to handle it in the byte-compiler yet.
+;; (defmacro with-lexical-binding (&rest body)
+;; "Execute the statements in BODY using lexical binding."
+;; `(let ((internal-interpreter-environment '(t)))
+;; ,@body))
+
(defun assq-delete-all (key alist)
"Delete from ALIST all elements whose car is `eq' to KEY.
Return the modified alist.