;ELC���
;;; Compiled
;;; in Emacs version 28.0.50
;;; with all optimizations.



(byte-code "\300\301!\210\300\302!\210\300\303!\207" [require ess-custom ess-inf ess-utils] 2)
#@72 Message returned if \[ess-r-args-get] cannot find a list of arguments.
(defvar ess-r-args-noargsmsg "No args found." (#$ . 182))
(make-obsolete-variable 'ess-r-args-noargsmsg "Use `eldoc-mode' instead." "ESS 18.10")
#@58 A prefix string that is shown before the arguments list.
(defvar ess-r-args-show-prefix "ARGS: " (#$ . 404))
(make-obsolete-variable 'ess-r-args-show-prefix "Use `eldoc-mode' instead." "ESS 18.10")
#@111 How ess-r-args-show should show the argument list. Possible values
are: 'message' (the default) or 'tooltip'.
(defvar ess-r-args-show-as 'message (#$ . 609))
(make-obsolete-variable 'ess-r-args-show-as "Use `eldoc-mode' instead." "ESS 18.10")
#@107 List of functions names which should *not* trigger \[ess-r-args-show];
Defaults to `ess-S-non-functions'.
(defvar ess-r-args-keep-silent ess-S-non-functions (#$ . 859))
(make-obsolete-variable 'ess-r-args-keep-silent "Use `eldoc-mode' instead." "ESS 18.10")
#@57 Non-nil means re-assign "(" to \[ess-r-args-auto-show].
(defvar ess-r-args-electric-paren nil (#$ . 1123))
(make-obsolete-variable 'ess-r-args-electric-paren "Use `eldoc-mode' instead." "ESS 18.10")
#@135 Returns the name of the R function assuming point is currently
within the argument list or nil if no possible function name is
found.
(defalias 'ess-r-args-current-function #[nil "\212\3021
�\303\304!0\210\202�\210\305\306!\210`\307\310!\210\311`\"\312\313	\"\205%�	+\207" [posend rfunname (error) up-list -1 message "Can't find opening parenthesis." backward-sexp 1 buffer-substring-no-properties posix-string-match "^[a-zA-Z0-9_.]+$"] 3 (#$ . 1329)])
(make-obsolete 'ess-r-args-current-function "See `eldoc-mode'" "ESS 18.10")
#@348 Returns string of arguments and their default values of R
function FUNCTION or nil if no possible function name
found. Calls `ess-r-args-current-function' if no argument given.
If TRIM is non-nill remove tabs and newlines and replace ' = '
with '=' (useful for display in minibuffer to avoid window and
buffer readjustments for multiline string).
(defalias 'ess-r-args-get #[(&optional function trim) "\204�\302 \205\"�	\204�\303\304!\205\"�\305\306!\210\307\310\311!A@\312#\207" [function ess-current-process-name ess-r-args-current-function called-interactively-p any ess-force-buffer-current "R process to use: " mapconcat #[(arg) "@\301AQ\207" [arg "="] 3] ess-function-arguments ", "] 4 (#$ . 1869)])
(make-obsolete 'ess-r-args-get "See `eldoc-mode'" "ESS 18.10")
#@121 Show arguments and their default values of R function. Calls
\[ess-r-args-current-function] if called without argument.
(defalias 'ess-r-args-show #[(&optional function) "\305\306!\210\204�\307 \305\310\"\210\205=�	\311=\312\n?\"P\305\313\f\"\210\f\205<�\n\2043�\314\f!\202<�\315\311!\210\316\f\317\320#*\207" [function ess-r-args-show-as tt ess-r-args-show-prefix args ess-message "(ess-r-args-show): start" ess-r-args-current-function ".... function='%s'" tooltip ess-r-args-get "(ess-r-args-show): args='%s'" message require ess-tooltip-show-at-point 0 30] 4 (#$ . 2653) "*"])
(make-obsolete 'ess-r-args-show "See `eldoc-mode'" "ESS 18.10")
#@156 Typically assigned to "(": If there's an ess-process, automatically show arguments
and their default values of an R function. Built on \[ess-r-args-show].
(defalias 'ess-r-args-auto-show #[nil "\302c\210?\205�	\205�\303	!\205�\304 \207" [eldoc-mode ess-local-process-name "(" ess-get-process ess-r-args-show] 2 (#$ . 3313) nil])
(make-obsolete 'ess-r-args-auto-show "See `eldoc-mode'" "ESS 18.10")
#@112 Insert arguments and their default values of function. Calls
ess-r-args-current-function if no argument given.
(defalias 'ess-r-args-insert #[(&optional function) "\204�\303 \205�\304!`\211c\210	b*\207" [function pointpos args ess-r-args-current-function ess-r-args-get] 3 (#$ . 3722) "*"])
(byte-code "\300\301\302\303#\210\304\305!\207" [make-obsolete ess-r-args-insert "See `eldoc-mode'" "ESS 18.10" provide ess-r-args] 4)