Custom Query (1030 matches)

FORMAT prints one digit too many after decimal point for ~e directive (CLHS 22.3.3.2). E.g.:

$ ./lx86cl 
Welcome to Clozure Common Lisp Version 1.9-r16078  (LinuxX8632)!
? (loop for d in '(1 2 3 4 5 6) do (format t "~,ve ~,ve~%" d 1.2345678e-10 d 1.2345678e+10))
1.23E-10 1.23E+10
1.235E-10 1.235E+10
1.2346E-10 1.2346E+10
1.23457E-10 1.23457E+10
1.234568E-10 1.234568E+10
1.2345679E-10 1.2345678E+10
NIL

On the other hand SBCL 1.0.55.0 is correct from what I can tell:

* (loop for d in '(1 2 3 4 5 6) do (format t "~,ve ~,ve~%" d 1.2345678e-10 d 1.2345678e+10))
1.2e-10 1.2e+10
1.23e-10 1.23e+10
1.235e-10 1.235e+10
1.2346e-10 1.2346e+10
1.23457e-10 1.23457e+10
1.234568e-10 1.234568e+10
NIL

Hi,

I have installed the latest ccl:

$ uname -a
Darwin localbox 11.4.2 Darwin Kernel Version 11.4.2: Thu Aug 23 16:25:48 PDT 2012; root:xnu-1699.32.7~1/RELEASE_X86_64 x86_64

$ /usr/local/ccl-1.9/dx86cl64
Welcome to Clozure Common Lisp Version 1.9-r15759  (DarwinX8664)!

And I'm having issues with conditional read time (#+) working incorrectly. You can reproduce the issues trying to load nibbles or ironclad:

nibbles:

$ /usr/local/ccl-1.9/dx86cl64
(quicklWelcome to Clozure Common Lisp Version 1.9-r15759  (DarwinX8664)!
? (quicklisp:quickload "nibbles" :verbose t)
To load "nibbles":
  Load 1 ASDF system:
    nibbles
; Loading "nibbles"
Read error between positions 70 and 91 in /Users/rogersm/quicklisp/dists/quicklisp/software/nibbles-20121125-git/sbcl-opt/nib-tran.lisp.
> Error: There is no package named "SB-C" .
> While executing: CCL::%PARSE-TOKEN, in process listener(1).
> Type :GO to continue, :POP to abort, :R for a list of available restarts.
> If continued: Retry finding package with name "SB-C".


> Type :? for other options.

A possible solution is to apply this patch to nibbles package:

sbcl-opt/nib-tran.lisp
@@ -2,8 +2,9 @@
 
 (cl:in-package :nibbles)
 
-#+sbcl (progn
+#+sbcl
 
+(progn
 (sb-c:deftransform %check-bound ((vector bound offset n-bytes)
 				 ((simple-array (unsigned-byte 8) (*)) index
 				  (and fixnum sb-vm:word)

But nowhere in Hyperspec says a return carriage should be added.

ironclad:

$ /usr/local/ccl-1.9/dx86cl64
(quicklWelcome to Clozure Common Lisp Version 1.9-r15759  (DarwinX8664)!
? (quicklisp:quickload "ironclad" :verbose t)
To load "ironclad":
  Load 1 ASDF system:
    ironclad
; Loading "ironclad"
Read error between positions 70 and 91 in /Users/rogersm/quicklisp/dists/quicklisp/software/nibbles-20121125-git/sbcl-opt/nib-tran.lisp.
> Error: There is no package named "SB-C" .
> While executing: CCL::%PARSE-TOKEN, in process listener(1).
> Type :GO to continue, :POP to abort, :R for a list of available restarts.
> If continued: Retry finding package with name "SB-C".
> Type :? for other options.

Both issues do not occur in:

$ /usr/local/ccl-1.8/dx86cl64
Welcome to Clozure Common Lisp Version 1.8-r15286M  (DarwinX8664)!

When a hemlock window is resized, the text is relocated so that the cursor is in the middle of the window. The cursor should remain stationary relative to the upper edge of the window.