anchor.diff:  
   
   ;;;-----------------------------------------------------------------------------
  -;;; BUFFER FLUSH-OUTPUT
  +;;; Buffer FLUSH-OUTPUT
   ;;;-----------------------------------------------------------------------------
   
   (defmethod buffer-flush-output ((buffer single-channel-buffer) &optional timeout)
  
positive.code: 
  
  ;;;-----------------------------------------------------------------------------
  ;;; BUFFER CLEAR-INPUT
  ;;;-----------------------------------------------------------------------------
  
  (defmethod buffer-clear-input ((buffer single-channel-buffer))
  
negative.code:   (values buffer))
  
  
  ;;;-----------------------------------------------------------------------------
  ;;; Buffer DEVICE-READ
  ;;;-----------------------------------------------------------------------------
  