;ELC ;;; Compiled ;;; in Emacs version 29.3 ;;; with all optimizations. (require 'compat-31)#@512 Return compatibility function symbol for FUN. If the Emacs version provides a sufficiently recent version of FUN, the symbol FUN is returned itself. Otherwise the macro returns the symbol of a compatibility function which supports the behavior and calling convention of the current stable Emacs version. For example Compat 29.1 will provide compatibility functions which implement the behavior and calling convention of Emacs 29.1. See also `compat-call' to directly call compatibility functions. (fn FUN) (defalias 'compat-function '(macro . #[257 "\300\301\302\"!\303\304!\203\202D\207" [intern format "compat--%s" function fboundp] 5 (#$ . 105)]))#@675 Call compatibility function or macro FUN with ARGS. A good example function is `plist-get' which was extended with an additional predicate argument in Emacs 29.1. The compatibility function, which supports this additional argument, can be obtained via (compat-function plist-get) and called via (compat-call plist-get plist prop predicate). It is not possible to directly call (plist-get plist prop predicate) on Emacs older than 29.1, since the original `plist-get' function does not yet support the predicate argument. Note that the Compat library never overrides existing functions. See also `compat-function' to lookup compatibility functions. (fn FUN &rest ARGS) (defalias 'compat-call '(macro . #[385 "\300\301\302\"!\303!\203\211\202B\207" [intern format "compat--%s" fboundp] 6 (#$ . 775)])) (provide 'compat)