Re: cl-byte-compile-compiler-macro

[Richard Stallman]

         (eval-when-compile . (lambda (&rest body)
                               (list 'quote
    -                            (byte-compile-eval (byte-compile-top-level
    -                                                (cons 'progn body))))))
    +                            (byte-compile-eval (cons 'progn body)))))

What is the reason for removing byte-compile-top-level?

Was the call superfluous before?

    +                    (or (fboundp handler)
    +                        (progn (byte-compile-warn
    +                                "Ignoring byte-compiler handler `%S'" 
handler)
    +                               nil))

I don't think this should warn.  This warning would be generated
whenever you compile calls to these functions and CL is not loaded.
The warning isn't useful, because it describes a circumstance which
does not mean anything is wrong.

So please don't add the warning.