<html><head><meta http-equiv="Content-Type" content="text/html charset=windows-1252"></head><body style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space;"><br><div><div>On Mar 5, 2016, at 8:39 AM, Dmitry Igrishin <<a href="mailto:dfigrish@gmail.com">dfigrish@gmail.com</a>> wrote:</div><br class="Apple-interchange-newline"><blockquote type="cite"><div dir="ltr"><br><div class="gmail_extra"><br><div class="gmail_quote">2016-03-05 16:25 GMT+03:00 Dmitry Igrishin <span dir="ltr"><<a href="mailto:dfigrish@gmail.com" target="_blank">dfigrish@gmail.com</a>></span>:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div dir="ltr"><div>Hello,</div><div><br></div><div>The *default-external-parameter* doesn't considered by</div><div>count-characters-in-octet-vector, decode-string-from-octets,</div><div>encode-string-to-octets, string-size-in-octets functions which</div><div>has the :external-format parameter. I believe that</div><div>*default-external-parameter* should affect the behaviour of</div><div>all functions with :external-format parameter, right?</div></div></blockquote><div>Sorry, I meant the *default-external-format* special variable...</div></div></div></div></blockquote></div><br><div>This is a bug in ccl::lookup-character-encoding. Here’s a patch:</div><div><br></div><div>(in-package :ccl)</div><div><br></div><div>(let ((ccl::*warn-if-redefine-kernel* nil))</div><div> (defun lookup-character-encoding (name)</div><div> (gethash (or name *default-external-format*) *character-encodings*)))</div><div><br></div><div>rg</div><div><br></div></body></html>