Changeset 15771


Ignore:
Timestamp:
Mar 8, 2013, 2:57:15 AM (6 years ago)
Author:
gb
Message:

Not sure if there's a way to wait longer to inconvenience/irritate the
reporter more, but fix ticket:1061 (more accurately, fix a different bug
introduced in a previous fix.)

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/lib/read.lisp

    r15734 r15771  
    103103                                                 (etypecase il
    104104                                                   (list (car il))
    105                                                    ((vector t) (aref il 0))))))
     105                                                   (vector (aref il 0))))))
    106106                         ((null dl))
    107107                       (rplaca dl (length il)))
Note: See TracChangeset for help on using the changeset viewer.