emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] master 14ef453 1/3: Don't define *, ** and ** in ielm as r


From: Lars Ingebrigtsen
Subject: [Emacs-diffs] master 14ef453 1/3: Don't define *, ** and ** in ielm as real variables
Date: Thu, 20 Jun 2019 11:11:24 -0400 (EDT)

branch: master
commit 14ef4539bb580fe029fb2d3769dc4450f9289db8
Author: Lars Ingebrigtsen <address@hidden>
Commit: Lars Ingebrigtsen <address@hidden>

    Don't define *, ** and ** in ielm as real variables
    
    * lisp/ielm.el: (*, **, ***): Change defvars into compiler
    directives instead of real variable definitions to avoid polluting
    the global Emacs namespace.
    (*1, *2, *3): Ditto.
---
 lisp/ielm.el | 41 +++++++++++++++--------------------------
 1 file changed, 15 insertions(+), 26 deletions(-)

diff --git a/lisp/ielm.el b/lisp/ielm.el
index c7a31a2..b8b0e26 100644
--- a/lisp/ielm.el
+++ b/lisp/ielm.el
@@ -122,38 +122,27 @@ such as `edebug-defun' to work with such inputs."
   :type 'hook
   :group 'ielm)
 
-(defvar * nil
-  "Most recent value evaluated in IELM.")
+;; Most recent value evaluated in IELM.
+(defvar *)
 
-(defvar ** nil
-  "Second-most-recent value evaluated in IELM.")
+;; Second-most-recent value evaluated in IELM.
+(defvar **)
 
-(defvar *** nil
-  "Third-most-recent value evaluated in IELM.")
+;; Third-most-recent value evaluated in IELM.
+(defvar ***)
 
 (defvar ielm-match-data nil
   "Match data saved at the end of last command.")
 
-(defvar *1 nil
-  "During IELM evaluation, most recent value evaluated in IELM.
-Normally identical to `*'.  However, if the working buffer is an IELM
-buffer, distinct from the process buffer, then `*' gives the value in
-the working buffer, `*1' the value in the process buffer.
-The intended value is only accessible during IELM evaluation.")
-
-(defvar *2 nil
-  "During IELM evaluation, second-most-recent value evaluated in IELM.
-Normally identical to `**'.  However, if the working buffer is an IELM
-buffer, distinct from the process buffer, then `**' gives the value in
-the working buffer, `*2' the value in the process buffer.
-The intended value is only accessible during IELM evaluation.")
-
-(defvar *3 nil
-  "During IELM evaluation, third-most-recent value evaluated in IELM.
-Normally identical to `***'.  However, if the working buffer is an IELM
-buffer, distinct from the process buffer, then `***' gives the value in
-the working buffer, `*3' the value in the process buffer.
-The intended value is only accessible during IELM evaluation.")
+;; During IELM evaluation, *1 is the most recent value evaluated in
+;; IELM.  Normally identical to `*'.  However, if the working buffer
+;; is an IELM buffer, distinct from the process buffer, then `*' gives
+;; the value in the working buffer, `*1' the value in the process
+;; buffer.  The intended value is only accessible during IELM
+;; evaluation.  *2 and *3 are the same for ** and ***.
+(defvar *1)
+(defvar *2)
+(defvar *3)
 
 ;;; System variables
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]