Ignore:
Timestamp:
Dec 17, 2010, 8:20:39 PM (9 years ago)
Author:
gz
Message:

Merge code coverage fixes (r14476, r14477) into 1.6

Location:
release/1.6/source
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • release/1.6/source

  • release/1.6/source/library/cover.lisp

    r14299 r14493  
    688688          (multiple-value-bind (start end) (decode-file-range (code-note-acode-range note))
    689689            (when (and start
    690                        (setq start (position-if-not #'whitespacep acode :start start :end end)))
     690                       (setq start (position-if-not #'whitespacep acode :start start :end end :key #'code-char)))
    691691              (fill styles (style-for-coverage (code-note-code-coverage note))
    692692                    :start start
Note: See TracChangeset for help on using the changeset viewer.