Custom Query (1030 matches)

when checked out per the instructions at:

​http://ccl.clozure.com/manual/chapter2.2.html#obtaining-via-svn

On a debian machine, the files:

ccl/library/x86-win64-syscalls.lisp
ccl/lib/ffi-win64.lisp

Are marked as excutable in the debian filesystem. I believe this to be an error, and I'm assuming this is because they are incorrectly tagged by svn as executables in the repository.

I have not looked on other unix-like OS (darwin?), but I assume the same error occurs.

I think I have a fix for this, just putting it on record in case it turns out to be more complicated:

Welcome to Clozure Common Lisp Version 1.3-dev-r12063  (LinuxX8664)! 
? (defun inner (x &key a) (loop (concatenate x a) (concatenate x a) (concatenate x a))) 
INNER 
? (defun outer (x) (setq x (list (list x) :bogus-key (list (list x) (list x)))) (apply #'inner x) x) 
OUTER 
? (outer 3) 
> Error: Incorrect keyword arguments in (:BOGUS-KEY ((3) (3))) . 
> While executing: INNER, in process listener(1). 
> Type :POP to abort, :R for a list of available restarts. 
> Type :? for other options. 
1 > :b 
 (CA7A78) : 0 (INNER NIL :A NIL) 69 
> Error: value NIL is not of the expected type NUMBER. 
> While executing: CCL::+-2, in process listener(1). 
> Type :POP to abort, :R for a list of available restarts. 
> Type :? for other options. 

Typep doesn't check array type dimensions:

(typep "" '(string 3)) => T, should be nil