Implement and document stream-peek

[factor.git] / basis / io / streams / null / null.factor

diff --git a/basis/io/streams/null/null.factor b/basis/io/streams/null/null.factor
index 2b62ec938a4b5598a9e4bf22e5eb2e51c8813544..040301013a5245d7d37ed1aa07672be8be51d31a 100644 (file)
--- a/basis/io/streams/null/null.factor
+++ b/basis/io/streams/null/null.factor
@@ -14,6 +14,8 @@ M: null-reader stream-readln drop f ;
 M: null-reader stream-read1 drop f ;
 M: null-reader stream-read-until 2drop f f ;
 M: null-reader stream-read 2drop f ;
+M: null-reader stream-peek1 drop f ;
+M: null-reader stream-peek 2drop f ;
 
 M: null-writer stream-element-type drop +byte+ ;
 M: null-writer stream-write1 2drop ;