bug#44221: 28.0.50; native-compile fails on cl-lib if delete-region has around advice

[Dale Sedivec]

1. Start with emacs -Q

2. Enter IELM

3. Add trivial advice to `delete-region':

    (define-advice delete-region (:around (orig-fun &rest args) my:test)
      (apply orig-fun args))

4. Attempt native compilation of cl-lib:

    (require 'find-func)
    (native-compile (find-library-name "cl-lib"))

Expected result: cl-lib experiences native compilation

Actual result:

    *** Eval error ***  Internal native compiler error: 
"/Users/dale/Applications/Emacs.app/Contents/Resources/lisp/emacs-lisp/cl-lib.el.gz",
 "not a subr", #[128 "\300\301\302#\207" [apply delete-region@my:test #<subr 
delete-region> nil] 5 nil "r"]

I discovered this via the volatile-highlights package, which advises
`delete-region', among other things.



In GNU Emacs 28.0.50 (build 1, x86_64-apple-darwin19.6.0, NS appkit-1894.60 
Version 10.15.7 (Build 19H2))
of 2020-10-24 built on dale
Repository revision: 4a6642ca23dad20a2dab928a869213e9b31767b7
Repository branch: feature/native-comp
Windowing system distributor 'Apple', version 10.3.1894
System Description:  Mac OS X 10.15.7

Configured using:
'configure --without-x --with-modules --with-threads --with-xwidgets
--with-zlib --with-xml2 --with-json --with-cairo --with-gnutls
--with-xpm --with-jpeg --with-tiff --with-gif --with-png --with-rsvg
--with-nativecomp --with-ns --enable-ns-self-contained 'CFLAGS=-O2
-I/opt/local/include/gcc10' LDFLAGS=-L/opt/local/lib/gcc10'

Configured features:
PNG RSVG GLIB NOTIFY KQUEUE ACL GNUTLS LIBXML2 ZLIB TOOLKIT_SCROLL_BARS
XIM NS MODULES NATIVE_COMP THREADS XWIDGETS JSON PDUMPER LCMS2

Important settings:
  value of $LC_COLLATE: C
  value of $LANG: en_US.UTF-8
  locale-coding-system: utf-8-unix

Major mode: IELM

Minor modes in effect:
  tooltip-mode: t
  global-eldoc-mode: t
  eldoc-mode: t
  electric-indent-mode: t
  mouse-wheel-mode: t
  tool-bar-mode: t
  menu-bar-mode: t
  file-name-shadow-mode: t
  global-font-lock-mode: t
  font-lock-mode: t
  blink-cursor-mode: t
  auto-composition-mode: t
  auto-encryption-mode: t
  auto-compression-mode: t
  line-number-mode: t
  transient-mark-mode: t

Load-path shadows:
None found.

Features:
(shadow sort mail-extr emacsbug message rmc puny dired dired-loaddefs
rfc822 mml mml-sec epa derived epg epg-config gnus-util rmail
rmail-loaddefs auth-source eieio eieio-core eieio-loaddefs
password-cache json map mm-decode mm-bodies mm-encode mail-parse rfc2231
mailabbrev gmm-utils mailheader sendmail rfc2047 rfc2045 ietf-drums
mm-util mail-prsvr mail-utils shortdoc delsel rect thingatpt help-fns
radix-tree debug backtrace find-func easy-mmode compile
text-property-search jka-compr cl-print time-date ielm comp warnings
subr-x rx cl-seq cl-macs cl-extra help-mode seq byte-opt gv cl-loaddefs
cl-lib bytecomp byte-compile cconv easymenu pp comint ansi-color ring
tooltip eldoc electric uniquify ediff-hook vc-hooks lisp-float-type
mwheel term/ns-win ns-win ucs-normalize mule-util term/common-win
tool-bar dnd fontset image regexp-opt fringe tabulated-list replace
newcomment text-mode elisp-mode lisp-mode prog-mode register page
tab-bar menu-bar rfn-eshadow isearch timer select scroll-bar mouse
jit-lock font-lock syntax facemenu font-core term/tty-colors frame
minibuffer cl-generic cham georgian utf-8-lang misc-lang vietnamese
tibetan thai tai-viet lao korean japanese eucjp-ms cp51932 hebrew greek
romanian slovak czech european ethiopic indian cyrillic chinese
composite charscript charprop case-table epa-hook jka-cmpr-hook help
simple abbrev obarray cl-preloaded nadvice button loaddefs faces
cus-face pcase macroexp files window text-properties overlay sha1 md5
base64 format env code-pages mule custom widget hashtable-print-readable
backquote threads xwidget-internal kqueue cocoa ns lcms2 multi-tty
make-network-process nativecomp emacs)

Memory information:
((conses 16 95905 5526)
(symbols 48 8846 1)
(strings 32 26468 3168)
(string-bytes 1 924776)
(vectors 16 16741)
(vector-slots 8 331347 53548)
(floats 8 76 182)
(intervals 56 446 0)
(buffers 992 17))


-- 
Dale Sedivec
dsedivec@emphasys-software.com