| | 475 | |
| | 476 | ;;; Stream operations which all streams are required to support or ignore |
| | 477 | ;;; I'm afraid these will appear in the :WHICH-OPERATIONS even though they |
| | 478 | ;;; aren't "really supported" |
| | 479 | |
| | 480 | ;These 3 are ignored since we don't have buffered output |
| | 481 | (DEFMETHOD (STREAM-MIXIN :CLEAR-OUTPUT) () |
| | 482 | NIL) |
| | 483 | |
| | 484 | (DEFMETHOD (STREAM-MIXIN :FORCE-OUTPUT) () |
| | 485 | NIL) |
| | 486 | |
| | 487 | (DEFMETHOD (STREAM-MIXIN :FINISH) () |
| | 488 | NIL) |
| | 489 | |
| | 490 | (DEFMETHOD (STREAM-MIXIN :CLOSE) (&OPTIONAL IGNORE) |
| | 491 | NIL) |
| | 492 | |
| | 493 | (DEFMETHOD (STREAM-MIXIN :LINE-IN) (&OPTIONAL LEADER) |
| | 494 | (STREAM-DEFAULT-HANDLER SELF ':LINE-IN LEADER NIL)) |
