Changeset 223


Ignore:
Timestamp:
08/18/11 12:22:15 (3 years ago)
Author:
rjs
Message:

Version 12.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/lisp/lmwin/stream.lisp

    r222 r223  
    474474  (FUNCALL-SELF ':EXPOSE))
    475475
     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))
     495
    476496
    477497(DEFFLAVOR GRAPHICS-MIXIN () ()
Note: See TracChangeset for help on using the changeset viewer.