Changeset 14605

Timestamp:

01/19/14 19:13:56 (8 years ago)

Author:

Mark Evenson

Message:

Fix missing default method for gray-streams:stream-finish-output.

Thanks to Anton Vodonosov. See <​http://abcl.org/trac/ticket/342>.

File:

• trunk/abcl/src/org/armedbear/lisp/gray-streams.lisp (modified) (1 diff)

trunk/abcl/src/org/armedbear/lisp/gray-streams.lisp

@@ -315 +315 @@
   nil)
 
+(defmethod stream-finish-output (stream)
+  (declare (ignore stream))
+  nil)
+
 (defmethod stream-clear-output (stream)
   (declare (ignore stream))