Deprecation warnings don't print for me in CCL. I see this:

Compiler warning: In a toplevel form: Nonspecific warning While executing: PARENSCRIPT::WARN-DEPRECATED, in process worker(13).

If, however, I change 'simple-style-warning to 'simple-warning in WARN-DEPRECATED, I see this:

Warning: LABEL is deprecated, use BLOCK instead While executing: PARENSCRIPT::WARN-DEPRECATED, in process worker(13).

Much better. It would be helpful, though, if there were a way to track down the offending form. Grepping my code doesn't reveal any use of LABEL, for example, so I'm not sure what's triggering the warning. Is there or could there be a way to do this?

Daniel

p.s. A clue to the bug: if I change 'simple-style-warning to 'style-warning and call warn-deprecated from the REPL, I get this:

:format-control is an invalid initarg to initialize-instance for #<standard-class style-warning>. Valid initargs: (:function-name :source-note :warning-type :args). [Condition of type ccl::simple-program-error]