Changeset 5204


Ignore:
Timestamp:
Sep 13, 2006, 5:08:44 AM (18 years ago)
Author:
Gary Byers
Message:

READ-LINE changes for BASIC-STREAMs.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/ccl/lib/streams.lisp

    r5026 r5204  
    4040          (let* ((ioblock (basic-stream-ioblock input-stream)))
    4141            (with-ioblock-input-locked (ioblock)
    42               (%ioblock-read-line ioblock)))
     42              (funcall (ioblock-read-line-function ioblock) ioblock)))
    4343          (stream-read-line input-stream))
    4444      (if eof
Note: See TracChangeset for help on using the changeset viewer.