Custom Query (1030 matches)

I wrote some code to exercise CCL's math functions and found that there were cases where intermediate computations were causing floating point overflows.

Functions affected are exp, tan, atan, tanh and atanh:

exp: fails for very large negative real rationals.

tanh: fails for complex arguments with very large real parts.

atanh: fails for numbers of the form 1 + iy for very small y.

tan and atan: analogous failures as for tanh and atanh.

I'm attaching (i) the code to exercise the functions (you just load it into Lisp) and (ii) a file of patches that fix the issues. (Apart from the exp issue, these are present in the fix to 869 - sorry.)

The *default-external-format* doesn't considered by count-characters-in-octet-vector, decode-string-from-octets, encode-string-to-octets, string-size-in-octets functions which has the :external-format parameter.

There are patch suggested by Ron Garret:

(in-package :ccl)

(let ((ccl::*warn-if-redefine-kernel* nil))
  (defun lookup-character-encoding (name)
    (gethash (or name *default-external-format*) *character-encodings*)))

at ​http://ccl.clozure.com

the dead link to ​http://trac.clozure.com/openmcl/register

should probably link to http://trac.clozure.com/ccl/register

Peace

--Devon