emacs-diffs
[Top][All Lists]
Advanced

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

feature/native-comp 08682cc: ; Remove two unnecessary quotes


From: Andrea Corallo
Subject: feature/native-comp 08682cc: ; Remove two unnecessary quotes
Date: Sun, 21 Mar 2021 04:39:30 -0400 (EDT)

branch: feature/native-comp
commit 08682ccc3154eaae993dbcb71a6498d1c06d80ae
Author: Andrea Corallo <akrl@sdf.org>
Commit: Andrea Corallo <akrl@sdf.org>

    ; Remove two unnecessary quotes
    
        * lisp/emacs-lisp/comp-cstr.el (comp-cstr-=): Remove unnecessary
        quote.
        * lisp/emacs-lisp/comp.el (comp-compile-ctxt-to-file): Likewise.
---
 lisp/emacs-lisp/comp-cstr.el | 2 +-
 lisp/emacs-lisp/comp.el      | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/emacs-lisp/comp-cstr.el b/lisp/emacs-lisp/comp-cstr.el
index d0b842e..7f5d34b 100644
--- a/lisp/emacs-lisp/comp-cstr.el
+++ b/lisp/emacs-lisp/comp-cstr.el
@@ -873,7 +873,7 @@ Non memoized version of `comp-cstr-intersection-no-mem'."
                  for v in (valset cstr)
                  do
                  (when-let* ((ok (floatp v))
-                             (truncated (ignore-error 'overflow-error
+                             (truncated (ignore-error overflow-error
                                           (truncate v)))
                              (ok (= v truncated)))
                    (push (cons truncated truncated) (range cstr))))
diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el
index ca4be0f..76b4733 100644
--- a/lisp/emacs-lisp/comp.el
+++ b/lisp/emacs-lisp/comp.el
@@ -3606,7 +3606,7 @@ Prepare every function for final compilation and drive 
the C back-end."
              (comp-ctxt-funcs-h comp-ctxt))
     (unless (file-exists-p dir)
       ;; In case it's created in the meanwhile.
-      (ignore-error 'file-already-exists
+      (ignore-error file-already-exists
         (make-directory dir t)))
     (comp--compile-ctxt-to-file name)))
 



reply via email to

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