Skip to content

Commit

Permalink
Return nil when no end-of-line in supplied vector
Browse files Browse the repository at this point in the history
  • Loading branch information
t-sin committed Sep 11, 2015
1 parent e799855 commit 853fd4e
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/eol.lisp
Original file line number Diff line number Diff line change
Expand Up @@ -53,7 +53,7 @@
(defun eol-guess-from-vector (buffer)
(let ((len (length buffer)))
(loop for i of-type fixnum from 0 below len
finally (return (lf-keyword))
finally (return nil)
do (if (eq (aref buffer (the fixnum i))
(the fixnum (char-code #\Return)))
(if (and (< (1+ (the fixnum i)) len)
Expand Down

0 comments on commit 853fd4e

Please sign in to comment.