Skip to content
Snippets Groups Projects
Forked from cmucl / cmucl
Source project has a limited visibility.
  • ram's avatar
    6f10d865
    Merged systems-work sources as of this date: · 6f10d865
    ram authored
    .../systems-work/code/stream.lisp, 27-May-90 14:11:17, Edit by Chiles and Wlott.
      Changed the semantics of the :listen misc method for streams.  It now
      distinguishes between eof and no obvious input for other reasons.  This was
      necessary to correctly implement READ-CHAR-NO-HANG.
    
      LISTEN no tests the result of calling the :listen misc method for being
      explicitly t.  When it is :eof or nil, LISTEN should return nil.
    
      READ-CHAR-NO-HANG no calls the :listen misc method directly instead of
      calling LISTEN.  When the method returns t or :eof, it calls READ-CHAR to
      appropriately deal with returning the character or screaming because of eof.
    
      Modified the :listen misc method for concatenated streams.  It failed to step
      to the next stream when the current one hit eof.
    
      Modified the :listen misc method for string-input stream.  They never return
      nil since they either have more characters, or they are at :eof.
    
    
    .../code/stream.lisp, 26-Apr-90 18:46:58, Edit by Wlott.
      Make two-way streams force-output on the output side before passing any
      input requests on to the input side.
    
    
    .../systems-work/code/stream.lisp, 22-Mar-90 22:20:05, Edit by Chiles.
      Made the string-input-stream structure definition no longer specify
      :constructor nil in addition to defining one with a name.
    6f10d865
    History
    Merged systems-work sources as of this date:
    ram authored
    .../systems-work/code/stream.lisp, 27-May-90 14:11:17, Edit by Chiles and Wlott.
      Changed the semantics of the :listen misc method for streams.  It now
      distinguishes between eof and no obvious input for other reasons.  This was
      necessary to correctly implement READ-CHAR-NO-HANG.
    
      LISTEN no tests the result of calling the :listen misc method for being
      explicitly t.  When it is :eof or nil, LISTEN should return nil.
    
      READ-CHAR-NO-HANG no calls the :listen misc method directly instead of
      calling LISTEN.  When the method returns t or :eof, it calls READ-CHAR to
      appropriately deal with returning the character or screaming because of eof.
    
      Modified the :listen misc method for concatenated streams.  It failed to step
      to the next stream when the current one hit eof.
    
      Modified the :listen misc method for string-input stream.  They never return
      nil since they either have more characters, or they are at :eof.
    
    
    .../code/stream.lisp, 26-Apr-90 18:46:58, Edit by Wlott.
      Make two-way streams force-output on the output side before passing any
      input requests on to the input side.
    
    
    .../systems-work/code/stream.lisp, 22-Mar-90 22:20:05, Edit by Chiles.
      Made the string-input-stream structure definition no longer specify
      :constructor nil in addition to defining one with a name.