From d00e02fc8f31e48b450a3997efc8c8c6fa3259be Mon Sep 17 00:00:00 2001 From: Stelian Ionescu Date: Mon, 25 Jun 2007 19:12:01 +0200 Subject: [PATCH] Minor fix: using UB8-VECTOR instead of VECTOR in read-sequence. Signed-off-by: Stelian Ionescu --- io.streams/gray-stream-methods.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/io.streams/gray-stream-methods.lisp b/io.streams/gray-stream-methods.lisp index b887af8..1126e57 100644 --- a/io.streams/gray-stream-methods.lisp +++ b/io.streams/gray-stream-methods.lisp @@ -144,7 +144,7 @@ (%read-into-simple-array-ub8 stream seq start end)) (string (%read-into-string stream seq start end)) - (vector + (ub8-vector (%read-into-vector stream seq start end))))) #+clisp @@ -157,7 +157,7 @@ (etypecase seq (ub8-sarray (%read-into-simple-array-ub8 stream seq start end)) - (vector + (ub8-vector (%read-into-vector stream seq start end))))) #+clisp -- 2.11.4.GIT