summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/byte-run.el
diff options
context:
space:
mode:
authorPhilip Kaludercic <philipk@posteo.net>2022-10-18 21:53:25 +0200
committerPhilip Kaludercic <philipk@posteo.net>2022-10-18 21:53:25 +0200
commit65fa87329ce577d1ee907c0716b48aac8c0d7d27 (patch)
tree9593429442e7e4fa4f522a9b62a102d9c1cf3fed /lisp/emacs-lisp/byte-run.el
parent5ceb88e6ebf14cee3f97b0c7b8557e4b1e23de5b (diff)
parentab1b491f8373742a051aaf554c4604f2b976b414 (diff)
downloademacs-65fa87329ce577d1ee907c0716b48aac8c0d7d27.tar.gz
emacs-65fa87329ce577d1ee907c0716b48aac8c0d7d27.tar.bz2
emacs-65fa87329ce577d1ee907c0716b48aac8c0d7d27.zip
Merge remote-tracking branch 'origin/master' into feature/package+vc
Diffstat (limited to 'lisp/emacs-lisp/byte-run.el')
-rw-r--r--lisp/emacs-lisp/byte-run.el5
1 files changed, 5 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/byte-run.el b/lisp/emacs-lisp/byte-run.el
index 9db84c31b88..a33808ab92d 100644
--- a/lisp/emacs-lisp/byte-run.el
+++ b/lisp/emacs-lisp/byte-run.el
@@ -481,6 +481,11 @@ convention was modified."
(puthash (indirect-function function) signature
advertised-signature-table))
+(defun get-advertised-calling-convention (function)
+ "Get the advertised SIGNATURE of FUNCTION.
+Return t if there isn't any."
+ (gethash function advertised-signature-table t))
+
(defun make-obsolete (obsolete-name current-name when)
"Make the byte-compiler warn that function OBSOLETE-NAME is obsolete.
OBSOLETE-NAME should be a function name or macro name (a symbol).