From 8db501749d47964b436bc63cafb80a17bfd42396 Mon Sep 17 00:00:00 2001
From: Piotr Szarmanski
Date: Sun, 25 Sep 2022 19:54:42 +0200
Subject: Add parallel decoder.

---
 tests/encode-tests.lisp | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'tests/encode-tests.lisp')

diff --git a/tests/encode-tests.lisp b/tests/encode-tests.lisp
index c6b50d4..6c04444 100644
--- a/tests/encode-tests.lisp
+++ b/tests/encode-tests.lisp
@@ -37,11 +37,11 @@
              "urn:eris:BIAD77QDJMFAKZYH2DXBUZYAP3MXZ3DJZVFYQ5DFWC6T65WSFCU5S2IT4YZGJ7AC4SYQMP2DM2ANS2ZTCP3DJJIRV733CRAAHOSWIYZM3M"))
 
 ;; simple gray stream class for this particular construction.
-(defclass null-stream (fundamental-binary-stream)
+(defclass null-stream (fundamental-binary-input-stream)
   ((counter :initform 0 :accessor counter)
    (max-counter :initarg :max-counter)))
 
-(defmethod stream-read-sequence ((stream null-stream) seq &optional start end)
+(defmethod stream-read-sequence ((stream null-stream) seq start end &key)
   (with-slots (counter max-counter) stream
     (if (eql counter max-counter)
         0
-- 
cgit v1.2.3