Re: feature/native-comp 711b2c8 2/2: * lisp/loadup.el: Don't load pcase on native builds (bug#47025).

[Stefan Monnier]

> -(if (byte-code-function-p (symbol-function 'macroexpand-all))
> +(if (or (byte-code-function-p (symbol-function 'macroexpand-all))
> +        (subr-native-elisp-p (symbol-function 'macroexpand-all)))

BTW, I find this rather ugly.

I think for this specific case, I will be able to come up with a better
(less ad-hoc/circumstantial) test, but I wonder if this kind of test was
also needed in enough other places that we might think about providing
some other test (like `function-interpreted-p` maybe?).


        Stefan