[elpa] master bfe4333: * packages/stream/stream.el (streamp): Tiny optimization.

[Stefan Monnier]

branch: master
commit bfe4333a8b4574fbc612b18f81dc8a2afbe47a81
Author: Stefan Monnier <address@hidden>
Commit: Stefan Monnier <address@hidden>

    * packages/stream/stream.el (streamp): Tiny optimization.
---
 packages/stream/stream.el |    3 +--
 1 files changed, 1 insertions(+), 2 deletions(-)

diff --git a/packages/stream/stream.el b/packages/stream/stream.el
index edfb3c5..b03aa8a 100644
--- a/packages/stream/stream.el
+++ b/packages/stream/stream.el
@@ -137,8 +137,7 @@ range is infinite."
 
 (defun streamp (stream)
   "Return non-nil if STREAM is a stream, nil otherwise."
-  (and (consp stream)
-       (eq (car stream) stream--identifier)))
+  (eq (car-safe stream) stream--identifier))
 
 (defun stream-empty ()
   "Return an empty stream."