simple-style-warning

[Vladimir Sedach]

Is there a portable way to create a simple-style-warning condition
that when signaled with WARN won't cause SLIME to claim that file
compilation failed, that works for all/most CL implementations?

I'm trying to use this:

(define-condition simple-style-warning (style-warning simple-warning)
())

(found in one of KMP's usenet posts:
http://groups.google.com/group/comp.lang.lisp/browse_thread/thread/c55278c8da409bda/bea4d994f8c2e0bb?lnk=gst&q=style-warning#bea4d994f8c2e0bb)

but it works inconsistently in SBCL and CCL.

Thank you,
Vladimir

[Stas Boukarev]

Post by Vladimir Sedach
Is there a portable way to create a simple-style-warning condition
that when signaled with WARN won't cause SLIME to claim that file
compilation failed, that works for all/most CL implementations?
(define-condition simple-style-warning (style-warning simple-warning)
())
http://groups.google.com/group/comp.lang.lisp/browse_thread/thread/c55278c8da409bda/bea4d994f8c2e0bb?lnk=gst&q=style-warning#bea4d994f8c2e0bb)
but it works inconsistently in SBCL and CCL.

Slime claims that compilation is failed when the third value, failure-p,
of COMPILE-FILE is T. And it's specified to return T whenever "error or
warning (other than style-warning)" were signalled.

[Martin Simmons]

Post by Vladimir Sedach
Is there a portable way to create a simple-style-warning condition
that when signaled with WARN won't cause SLIME to claim that file
compilation failed, that works for all/most CL implementations?
(define-condition simple-style-warning (style-warning simple-warning)
())
http://groups.google.com/group/comp.lang.lisp/browse_thread/thread/c55278c8da409bda/bea4d994f8c2e0bb?lnk=gst&q=style-warning#bea4d994f8c2e0bb)
but it works inconsistently in SBCL and CCL.

In what way inconsistently? I would expect that to work.

[Vladimir Sedach]

So from what I understand now, the way to accomplish a
"simple-style-warning" without having compile-file return failure-p is
to define a subclass of style-warning with the format-control/arg
slots and a :report function myself. Is this correct?

Vladimir

[Martin Simmons]

Post by Vladimir Sedach
So from what I understand now, the way to accomplish a
"simple-style-warning" without having compile-file return failure-p is
to define a subclass of style-warning with the format-control/arg
slots and a :report function myself. Is this correct?

That is unexpected to me.

What exactly is the problem when you define simple-style-warning to inherit
from style-warning and simple-warning?

[Vladimir Sedach]

I think I tracked this problem down to a bug in Clozure. Thanks for
the help everybody.

Vladimir

Post by Martin Simmons

Post by Vladimir Sedach
So from what I understand now, the way to accomplish a
"simple-style-warning" without having compile-file return failure-p is
to define a subclass of style-warning with the format-control/arg
slots and a :report function myself. Is this correct?

That is unexpected to me.
What exactly is the problem when you define simple-style-warning to inherit
from style-warning and simple-warning?
--
Martin Simmons
LispWorks Ltd
http://www.lispworks.com/