X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Foctets.lisp;h=014f2e2d91bcde65f70957aa071617109527e77d;hb=8643c93d4db277f6e1cb880a42407ff29e19f618;hp=f95bf76ec8fb4d9b568b34a5a501a1bdad778c6f;hpb=57d7dd0f59b9df89feb1175b0efc449bb0b8d400;p=sbcl.git diff --git a/src/code/octets.lisp b/src/code/octets.lisp index f95bf76..014f2e2 100644 --- a/src/code/octets.lisp +++ b/src/code/octets.lisp @@ -603,7 +603,7 @@ one-past-the-end" ;; two-byte sequence `"initial (length 3)" ;; "non-continuation"' -- `#xef #x32') ;; signal only part of that sequence as - ;; erronous. + ;; erroneous. (loop for i from 1 below (min len remaining-bytes) always (valid-secondary-p i)) (enough-bytes-left-p len)))