Re: ccl += weak hash

Thanks, Ben. Committed and released as version 6.4.1.

On Mar 29, 2013, at 5:38 AM, Ben Hyde <[email protected]> wrote:

> diff --git a/sql/utils.lisp b/sql/utils.lisp
> index 39ee349..2f3c1db 100644
> --- a/sql/utils.lisp
> +++ b/sql/utils.lisp
> @@ -443,7 +443,7 @@ removed. keys are searched with #'MEMBER"
>     ;;clearing mechanism. If you are on an implementation that doesn't support
>     ;;weak hash tables then you're memory may accumulate.
> 
> -    #-(or sbcl allegro clisp lispworks)
> +    #-(or sbcl allegro clisp lispworks ccl)
>     (warn "UNSAFE! use of weak hash on implementation without support. (see clsql/sql/utils.lisp to add)")
> 
>     (make-hash-table
> @@ -451,6 +451,7 @@ removed. keys are searched with #'MEMBER"
>       #+clisp     :weak      #+clisp :value
>       #+lispworks :weak-kind #+lispworks :value
>       #+sbcl :weakness #+sbcl :value
> +      #+ccl :weak #+ccl :value
>       ,@args)
>     ))
>