Changeset 7733


Ignore:
Timestamp:
Nov 25, 2007, 2:30:40 AM (12 years ago)
Author:
gb
Message:

Reformat a comment.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/working-0711/ccl/level-1/l1-streams.lisp

    r7624 r7733  
    6262;;; stream's current position, if that makes sense.  Return NIL
    6363;;; if it doesn't make sense.
    64 ;;; Catch cases where this is used when STREAM-ERRORs (SOCKET-ERRORs)
    65 ;;; are signaled on non-STREAMs.
     64;;; Some things (SOCKET-ERRORs) are signaled as STREAM-ERRORs
     65;;; whose STREAM args aren't streams.  That's wrong, but
     66;;; defining this method on T keeps things from blowing up worse.
    6667(defmethod stream-surrounding-characters ((s t))
    6768  (declare (ignore s))
Note: See TracChangeset for help on using the changeset viewer.