[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 70a5679: * lisp/emacs-lisp/seq.el: Fix a byte-compi
From: |
Nicolas Petton |
Subject: |
[Emacs-diffs] master 70a5679: * lisp/emacs-lisp/seq.el: Fix a byte-compiler warnings related to pcase. |
Date: |
Tue, 16 Jun 2015 21:50:23 +0000 |
branch: master
commit 70a567971a930f104b47200fcdb01a858846d41d
Author: Nicolas Petton <address@hidden>
Commit: Nicolas Petton <address@hidden>
* lisp/emacs-lisp/seq.el: Fix a byte-compiler warnings related to pcase.
---
lisp/emacs-lisp/seq.el | 8 ++++----
1 files changed, 4 insertions(+), 4 deletions(-)
diff --git a/lisp/emacs-lisp/seq.el b/lisp/emacs-lisp/seq.el
index 0aa0f09..2d20de6 100644
--- a/lisp/emacs-lisp/seq.el
+++ b/lisp/emacs-lisp/seq.el
@@ -249,7 +249,7 @@ TYPE must be one of following symbols: vector, string or
list.
(`vector (apply #'vconcat seqs))
(`string (apply #'concat seqs))
(`list (apply #'append (append seqs '(nil))))
- (t (error "Not a sequence type name: %S" type))))
+ (_ (error "Not a sequence type name: %S" type))))
(defun seq-mapcat (function seq &optional type)
"Concatenate the result of applying FUNCTION to each element of SEQ.
@@ -323,7 +323,7 @@ TYPE can be one of the following symbols: vector, string or
list."
(`vector (vconcat seq))
(`string (concat seq))
(`list (append seq nil))
- (t (error "Not a sequence type name: %S" type))))
+ (_ (error "Not a sequence type name: %S" type))))
(defun seq--drop-list (list n)
"Return a list from LIST without its first N elements.
@@ -379,7 +379,7 @@ This is an optimization for lists in `seq-take-while'."
,(seq--elt-safe args (1+ index)))
bindings)
(setq rest-marker t)))
- (t
+ (_
(push `(app (pcase--flip seq--elt-safe ,index) ,name) bindings))))
(setq index (1+ index)))
bindings))
@@ -413,7 +413,7 @@ BINDINGS."
(seq-drop ,seq ,index))
bindings)
(setq rest-marker t)))
- (t
+ (_
(push `(,name (seq--elt-safe ,seq ,index)) bindings))))
(setq index (1+ index)))
bindings))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master 70a5679: * lisp/emacs-lisp/seq.el: Fix a byte-compiler warnings related to pcase.,
Nicolas Petton <=