cl-stream/unistd-stream

diff --git a/unistd-input-stream.lisp b/unistd-input-stream.lisp
index 8edd774..43cc26d 100644
--- a/unistd-input-stream.lisp
+++ b/unistd-input-stream.lisp
@@ -9,7 +9,7 @@
   (cffi:foreign-alloc :unsigned-char
                       :count (stream-input-buffer-size stream)))
 
-(defmethod discard-stream-input-buffer ((stream unistd-input-stream))
+(defmethod stream-discard-input-buffer ((stream unistd-input-stream))
   (cffi:foreign-free (stream-input-buffer stream))
   (setf (stream-input-buffer stream) nil))
 
diff --git a/unistd-output-stream.lisp b/unistd-output-stream.lisp
index b69ddb6..84d6065 100644
--- a/unistd-output-stream.lisp
+++ b/unistd-output-stream.lisp
@@ -9,7 +9,7 @@
   (cffi:foreign-alloc :unsigned-char
                       :count (stream-output-buffer-size stream)))
 
-(defmethod discard-stream-output-buffer ((stream unistd-output-stream))
+(defmethod stream-discard-output-buffer ((stream unistd-output-stream))
   (cffi:foreign-free (stream-output-buffer stream))
   (setf (stream-output-buffer stream) nil))