[lift-devel] Slime warnings
Gary King
gwking at metabang.com
Tue Sep 2 13:39:07 UTC 2008
I haven't pushed the changes yet, but I think I have a fix that works
in SBCL 1.0.20 (and fails to work in SBCL 1.0.12). It involves using
> (defmacro muffle-redefinition-warnings (&body body)
> "Evaluate the body so that redefinition warnings will not be
> signaled. (suppored in Allegro, Clozure CL, CLisp, and Lispworks)"
> #+allegro
> `(excl:without-redefinition-warnings
> , at body)
> #+(or ccl mcl)
> `(let ((ccl::*warn-if-redefine* nil)
> ;;?? FIXME not sure if this should be here or not...
> (ccl::*record-source-file* nil))
> , at body)
> #+clisp
> `(let ((custom:*suppress-check-redefinition* t))
> , at body)
> #+lispworks
> `(let ((lw:*handle-warn-on-redefinition* :quiet))
> , at body)
> #+sbcl
> ;; from http://www.sbcl.info/manual/Controlling-Verbosity.html
> `(locally (declare (sb-ext:muffle-conditions sb-ext:compiler-note
> sb-ext::style-warning))
> , at body)
> #-(or allegro ccl clisp mcl sbcl)
> `(progn , at body))
>
that I've stolen from metatilities-base. The earlier versions of SBCL
don't seem to respect the declaration. I'm looking into this.
On Sep 1, 2008, at 3:22 PM, Vyacheslav Akhmechet wrote:
> On Mon, Sep 1, 2008 at 1:18 PM, Gary King <gwking at metabang.com> wrote:
>> I actually thought that this was fixed and I certainly want it to
>> be. Which
>> lisp implementation is exhibiting this behavior?
> I'm using SBCL 1.0.11 (on Ubuntu) and Slime 2007-12-02.
> _______________________________________________
> lift-devel mailing list
> lift-devel at common-lisp.net
> http://common-lisp.net/cgi-bin/mailman/listinfo/lift-devel
--
Gary Warren King, metabang.com
Cell: (413) 559 8738
Fax: (206) 338-4052
gwkkwg on Skype * garethsan on AIM
More information about the lift-devel
mailing list