Changeset 11648


Ignore:
Timestamp:
Jan 29, 2009, 3:07:15 PM (10 years ago)
Author:
gz
Message:

merge r11646 from trunk

File:
1 edited

Legend:

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

    r11074 r11648  
    119119      (if (and (not start) (not end))
    120120        (stream-write-string stream string)
    121         (stream-write-string stream string start end)))
     121        (stream-write-string stream string start (or end (length string)))))
    122122    string))
    123123
Note: See TracChangeset for help on using the changeset viewer.