Custom Query (1030 matches)

Environment: CCL version 1.11-r16635 64bit under Windows 10 64bit

Possible issue: The Format function's F directive's k parameter fails to move the decimal point of the floating point argument to the right when preceded by a tilde and 2 consecutive commas. This fails in Clozure, but works in SBCL v1.3.15 64bit and in Clisp 2.49 when tested.

Example1: The Clozure prompt is "?".

? (format t "10 Percent ~,,2f ~%" .10)
10 Percent 0.1
NIL

Example2: The SBCL prompt is an asterisk "*". Clisp produces the same result.

* (format t "10 Percent ~,,2f ~%" .10)
10 Percent 10.0
NIL

Other scenarios seem to work fine...

Example3: Clozure produces the same result as SBCL Example4 if a 1 is entered for the d parameter (decimal digits) between the two commas.

? (format t "10 Percent ~,1,2f ~%" .10)
10 Percent 10.0
NIL

Example4: SBCL produces the same result as Clozure Example3 when entering a 1 between the two commas.

* (format t "10 Percent ~,1,2f ~%" .10)
10 Percent 10.0
NIL

Example5: Clozure "?" & SBCL "*" produce the same results when entering a 0 between the two commas.

? (format t "10 Percent ~,0,2f ~%" .10)
10 Percent 10.
NIL

* (format t "10 Percent ~,0,2f ~%" .10)
10 Percent 10.
NIL

Reference:

CLHS: 22.3.3.1 Tilde F: Fixed-Format Floating-Point.

"The full form is ~w,d,k,overflowchar,padcharF. The parameter w is the width of the field to be printed; d is the number of digits to print after the decimal point; k is a scale factor that defaults to zero."

​http://www.lispworks.com/documentation/HyperSpec/Body/22_cca.htm

Compiling a file with code such as following causes a full warning and a tertiary value of T from COMPILE-FILE.

(declaim (ftype (function () nil) arg-missing)) (defun arg-missing ()

(error "missing arg!"))

(defstruct foo

(bar (arg-missing)))

I just had an annoying bug that turned out to be due to gensyms being only unique for a given thread. I see that this was explicitly changed here:

http://trac.clozure.com/ccl/changeset/6016

But I maintain this is a bug (and different from other Common Lisp implementations).