Custom Query (1030 matches)

Incremental search (control-s and control-r) currently moves the point to the found text, but it doesn't highlight the found text. It would be nice if it highlighted the found text. For bonus points, highlight all the occurrences of found text in the window (using a distinct highlight for the occurrence where the point is).

I'm calling this an enhancement, but it might be considered a defect, at least the first part.

Hi,

a user of Hunchentoot has reported problems with Clozure CL and MD5, and I was able to track this down to a problem in CCL (tested with 1.8 on Linux):

Welcome to Clozure Common Lisp Version 1.8-r15286M  (LinuxX8632)!
? (defun foo ()
  (let ((block (make-array 16)))
    (loop for index of-type (integer 0 16) from 0 below 16
          do (print index)
             (setf (aref block index) #x00000000))))
FOO
? (foo)

0 
1 
2 
3 
4 
5 
6 
7 
8 
9 
10 
11 
12 
13 
14 
15 
16 
> Error: Array index 16 out of bounds for #<SIMPLE-VECTOR 16> .
> While executing: FOO, in process listener(1).
> Type :POP to abort, :R for a list of available restarts.
> Type :? for other options.

If the type declaration in the loop is omitted, the problem does not occur.

% openmcl
Welcome to Clozure Common Lisp Version 1.6-dev-r14031M (LinuxX8664)!
? (defun one (B)
  (DECLARE (TYPE (INTEGER 51357426816569 68500595286128) B))
  (LOGAND B -2))
ONE
? (defun two (B)
  (LOGAND B -2))
TWO
? (- (one 67660763903986) (two 67660763903986))
-63262717391456