X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Foctets.lisp;h=014f2e2d91bcde65f70957aa071617109527e77d;hb=975f1932acc3a8e90fb31d2b055bfbdde78ea927;hp=f95bf76ec8fb4d9b568b34a5a501a1bdad778c6f;hpb=5465e5e0ec897a751a4ba4751cb84394995c07cf;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)))