[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/stream 76ed94e 27/36: Fix seq-empty-p for streams
From: |
Stefan Monnier |
Subject: |
[elpa] externals/stream 76ed94e 27/36: Fix seq-empty-p for streams |
Date: |
Tue, 1 Dec 2020 17:22:52 -0500 (EST) |
branch: externals/stream
commit 76ed94eeea7ee5bb6529617dbe20e41629a66cb9
Author: Nicolas Petton <nicolas@petton.fr>
Commit: Nicolas Petton <nicolas@petton.fr>
Fix seq-empty-p for streams
* packages/stream/stream.el (seq-empty-p): New method for streams.
* packages/stream/tests/stream-tests.el (stream-seq-empty-test): New
regression
test.
---
stream.el | 3 +++
tests/stream-tests.el | 4 ++++
2 files changed, 7 insertions(+)
diff --git a/stream.el b/stream.el
index 810adf9..b412807 100644
--- a/stream.el
+++ b/stream.el
@@ -225,6 +225,9 @@ elements in the STREAMS in order."
(cl-defmethod seqp ((_stream stream))
t)
+(cl-defmethod seq-empty-p ((stream stream))
+ (stream-empty-p stream))
+
(cl-defmethod seq-elt ((stream stream) n)
"Return the element of STREAM at index N."
(while (> n 0)
diff --git a/tests/stream-tests.el b/tests/stream-tests.el
index 473074b..decf3ad 100644
--- a/tests/stream-tests.el
+++ b/tests/stream-tests.el
@@ -40,6 +40,10 @@
(should (streamp (stream-empty)))
(should (stream-empty-p (stream-empty))))
+(ert-deftest stream-seq-empty-test ()
+ (should (seq-empty-p (stream-empty)))
+ (should-not (seq-empty-p (stream-range))))
+
(ert-deftest stream-make-test ()
(should (streamp (stream-range)))
(should (not (stream-empty-p (stream-range))))) ;; Should use stream-list or
something
- [elpa] externals/stream a8aa25c 07/36: * packages/stream/stream.el: Update stream.el to version 2.0.1., (continued)
- [elpa] externals/stream a8aa25c 07/36: * packages/stream/stream.el: Update stream.el to version 2.0.1., Stefan Monnier, 2020/12/01
- [elpa] externals/stream 2b2ba28 14/36: update stream.el to the latest version, Stefan Monnier, 2020/12/01
- [elpa] externals/stream 00e523f 15/36: Add stream stream-delay and stream-of-directory-files, Stefan Monnier, 2020/12/01
- [elpa] externals/stream ac42cc1 18/36: Fix some quoting problems in doc strings, Stefan Monnier, 2020/12/01
- [elpa] externals/stream a36469b 17/36: Add some more basic stream operations, Stefan Monnier, 2020/12/01
- [elpa] externals/stream f8e6639 20/36: * stream/stream.el (stream--generalizer): Accept more arguments, Stefan Monnier, 2020/12/01
- [elpa] externals/stream 873ee4e 23/36: Fix errors detected by tests added in last commit, Stefan Monnier, 2020/12/01
- [elpa] externals/stream cbf7e78 30/36: * stream/stream-x.el: Update copyright, Stefan Monnier, 2020/12/01
- [elpa] externals/stream f1fce5e 35/36: * packages/stream/stream.el: Bump version to 2.2.5., Stefan Monnier, 2020/12/01
- [elpa] externals/stream 05b20e1 25/36: Add file "stream-x.el" to the stream package, Stefan Monnier, 2020/12/01
- [elpa] externals/stream 76ed94e 27/36: Fix seq-empty-p for streams,
Stefan Monnier <=
- [elpa] externals/stream 89f61bf 33/36: * packages/stream/stream.el (stream--force): Small fix (Bug#37888)., Stefan Monnier, 2020/12/01
- [elpa] externals/stream d531a58 19/36: Avoid recursive stream-append in stream-concatenate, Stefan Monnier, 2020/12/01
- [elpa] externals/stream 40e5fb1 26/36: Remove an outdated test, Stefan Monnier, 2020/12/01
- [elpa] externals/stream 9c7aef0 34/36: * [stream] Update copyright years, Stefan Monnier, 2020/12/01
- [elpa] externals/stream f7701f8 31/36: Update copyrights of some packages, Stefan Monnier, 2020/12/01
- [elpa] externals/stream 3354b2a 29/36: * stream/tests/stream-tests.el: Require 'generator', Stefan Monnier, 2020/12/01
- [elpa] externals/stream a3f3da1 32/36: Drop forced lambda's from stream (Bug#30626), Stefan Monnier, 2020/12/01
- [elpa] externals/stream 0b2a49f 16/36: * packages/stream/stream.el: Bump version number., Stefan Monnier, 2020/12/01
- [elpa] externals/stream 0055487 36/36: * .gitignore: New file, Stefan Monnier, 2020/12/01