Lisp warnings in Maxima sessions



Jussi,

This is an (Lisp) implementation dependent thing, and SBCL certainly
produces a great amount of output.  This should probably find it's way into
a FAQ somewhere, or even into the initialization for Maxima since this
question comes up a lot.

Try this at the Maxima prompt:

:lisp (declaim (sb-ext:muffle-warnings sb-ext:compiler-note
cl:style-warning))

Unfortunately, since I am currently running Maxima with CLISP, I cannot test
it.  Seems to work in straight SBCL though.

Hope that helps,
Zach S

PS.  Weird, but it doesn't get rid of the "redifining a function"
style-warnings.  Not sure why.


On Tue, Sep 9, 2008 at 12:55 PM, Jussi Eloranta <Jussi.Eloranta at csun.edu>wrote:

> Hi,
>
> Is there anyway to disable lisp warnings in Maxima sessions? For example
> with SBCL:
>
> ; in: LAMBDA NIL;     (LET* ((MAXIMA::FILENAME (MAXIMA::WXPLOT-FILENAME
> NIL));          (MAXIMA::*WINDOWS-OS* T);          (MAXIMA::ARGS (CONS
> `(# MAXIMA::$TITLE ,#) MAXIMA::ARGS));          (MAXIMA::ARGS (CONS
> '(MAXIMA::$GR2D) (MAPCAR #'# MAXIMA::ARGS))));     (SETQ
> MAXIMA::IMAGES;             (CONS (FORMAT NIL "~a.png" MAXIMA::FILENAME)
> MAXIMA::IMAGES));     (MAXIMA::$APPLY
> 'MAXIMA::$DRAW;                     (APPEND;
> `((MAXIMA::MLIST MAXIMA::SIMP);                        (#
> MAXIMA::$TERMINAL MAXIMA::$PNG);                        (#
> MAXIMA::$PIC_WIDTH ,#) (# MAXIMA::$PIC_HEIGHT
> ,#);                        (# MAXIMA::$FILE_NAME
> ,MAXIMA::FILENAME));                      (LIST MAXIMA::ARGS)))); ;
> caught STYLE-WARNING:;   using the lexical binding of the symbol
> *WINDOWS-OS*, not the;   dynamic binding, even though the symbol name
> follows the usual naming;   convention (names like *FOO*) for special
> variables; ; caught STYLE-WARNING:;   The variable *WINDOWS-OS* is
> defined but never used.; in: LAMBDA NIL;     (LET* ((MAXIMA::FILENAME
> (MAXIMA::WXPLOT-FILENAME NIL));          (MAXIMA::*WINDOWS-OS*
> T);          (MAXIMA::ARGS (CONS `(# MAXIMA::$TITLE ,#)
> MAXIMA::ARGS));          (MAXIMA::ARGS (CONS '(MAXIMA::$GR3D) (MAPCAR
> #'# MAXIMA::ARGS))));     (SETQ MAXIMA::IMAGES;             (CONS
> (FORMAT NIL "~a.png" MAXIMA::FILENAME) MAXIMA::IMAGES));
> (MAXIMA::$APPLY 'MAXIMA::$DRAW
>
> ....etc.... Lots of stuff.  If one works with wxmaxima, for example,
> then printing will waste a lot of paper since it prints out everything.
>
> Jussi Eloranta
> Cal State Northridge
>
> _______________________________________________
> Maxima mailing list
> Maxima at math.utexas.edu
> http://www.math.utexas.edu/mailman/listinfo/maxima
>