emacs-diffs
[Top][All Lists]
Advanced

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

feature/native-comp 81c34a3 4/4: Update copyright years plus two style n


From: Andrea Corallo
Subject: feature/native-comp 81c34a3 4/4: Update copyright years plus two style nits
Date: Sun, 16 Feb 2020 12:47:12 -0500 (EST)

branch: feature/native-comp
commit 81c34a35aab53978bc2f3608dff3751030d0e914
Author: Andrea Corallo <address@hidden>
Commit: Andrea Corallo <address@hidden>

    Update copyright years plus two style nits
---
 lisp/emacs-lisp/comp.el     | 10 +++++-----
 src/comp.c                  |  2 +-
 src/comp.h                  |  2 +-
 test/src/comp-test-funcs.el |  2 +-
 test/src/comp-tests.el      |  2 +-
 5 files changed, 9 insertions(+), 9 deletions(-)

diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el
index 67fc8f3..80a5422 100644
--- a/lisp/emacs-lisp/comp.el
+++ b/lisp/emacs-lisp/comp.el
@@ -2,7 +2,7 @@
 
 ;; Author: Andrea Corallo <address@hidden>
 
-;; Copyright (C) 2019 Free Software Foundation, Inc.
+;; Copyright (C) 2019-2020 Free Software Foundation, Inc.
 
 ;; Keywords: lisp
 ;; Package: emacs
@@ -1587,8 +1587,8 @@ PRE-LAMBDA and POST-LAMBDA are called in pre or 
post-order if non nil."
                ;; Note: this last is just a property of the code generated
                ;; by the byte-compiler.
                (cl-assert (= (comp-mvar-array-idx arg) 0))
-               (setf (comp-mvar-slot arg) i)
-               (setf (comp-mvar-array-idx arg) arr-idx))))
+               (setf (comp-mvar-slot arg) i
+                     (comp-mvar-array-idx arg) arr-idx))))
 
 (defun comp-propagate-prologue (backward)
   "Prologue for the propagate pass.
@@ -1682,8 +1682,8 @@ Here goes everything that can be done not iteratively 
(read once).
          (cl-loop with slot = (comp-mvar-slot lval)
                   for arg in rest
                   do
-                  (setf (comp-mvar-array-idx arg) arr-idx)
-                  (setf (comp-mvar-slot arg) slot)))))))
+                  (setf (comp-mvar-array-idx arg) arr-idx
+                        (comp-mvar-slot arg) slot)))))))
 
 (defun comp-propagate* ()
   "Propagate for set* and phi operands.
diff --git a/src/comp.c b/src/comp.c
index d95a87b..2f24b10 100644
--- a/src/comp.c
+++ b/src/comp.c
@@ -1,5 +1,5 @@
 /* Compile elisp into native code.
-   Copyright (C) 2019 Free Software Foundation, Inc.
+   Copyright (C) 2019-2020 Free Software Foundation, Inc.
 
 Author: Andrea Corallo <address@hidden>
 
diff --git a/src/comp.h b/src/comp.h
index ddebbbc..6019831 100644
--- a/src/comp.h
+++ b/src/comp.h
@@ -1,5 +1,5 @@
 /* Elisp native compiler definitions
-Copyright (C) 2012-2019 Free Software Foundation, Inc.
+Copyright (C) 2019-2020 Free Software Foundation, Inc.
 
 This file is part of GNU Emacs.
 
diff --git a/test/src/comp-test-funcs.el b/test/src/comp-test-funcs.el
index cbf2878..46d324b 100644
--- a/test/src/comp-test-funcs.el
+++ b/test/src/comp-test-funcs.el
@@ -1,6 +1,6 @@
 ;;; comp-test-funcs.el --- compilation unit tested by comp-tests.el -*- 
lexical-binding: t; -*-
 
-;; Copyright (C) 2019 Free Software Foundation, Inc.
+;; Copyright (C) 2019-2020 Free Software Foundation, Inc.
 
 ;; Author: Andrea Corallo <address@hidden>
 
diff --git a/test/src/comp-tests.el b/test/src/comp-tests.el
index 15a39c4..fc6543b 100644
--- a/test/src/comp-tests.el
+++ b/test/src/comp-tests.el
@@ -1,6 +1,6 @@
 ;;; comp-tests.el --- unit tests for src/comp.c      -*- lexical-binding: t; 
-*-
 
-;; Copyright (C) 2019 Free Software Foundation, Inc.
+;; Copyright (C) 2019-2020 Free Software Foundation, Inc.
 
 ;; Author: Andrea Corallo <address@hidden>
 



reply via email to

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