Re: [Axiom-developer] clisp and sbcl

[Waldek Hebisch]

> On Mon, 28 May 2007, Waldek Hebisch wrote:
> 
> | (defun |evalSharpOne| (x |#1|) (declare (special |#1|))
> |    (EVAL `(let () (declare (special |#1|) ,x))))
> 
> Have you tried this variant?  It looks "reasonable" to me.
> 

There is a little problem with parentheses, it should be:

(defun |evalSharpOne| (x |#1|)
   (declare (special |#1|))
   (EVAL `(let () (declare (special |#1|)) ,x)))

Using version above compiler warnings go away.  But I did not
put it trough full test cycle.

-- 
                              Waldek Hebisch
address@hidden