;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (require 'ess-s-lang) #@32 Variables to customize for S4. (defvar S4-customize-alist (append '((ess-local-customize-alist quote S4-customize-alist) (ess-dialect . "S4") (ess-change-sp-regexp . ess-S-change-sp-regexp) (ess-help-sec-keys-alist . ess-help-S3-sec-keys-alist) (ess-object-name-db-file . "ess-s4-namedb.el") (inferior-ess-program . inferior-S4-program) (inferior-ess-objects-command . ".SmodeObs(%d, pattern=\"%s\")\n") (inferior-ess-help-command . "help(\"%s\")\n") (inferior-ess-help-filetype) (inferior-ess-search-list-command . ".SmodePaths()\n") (ess-load-command . ".SmodeLoad(\"%s\")\n") (inferior-ess-dump-command . ".SmodeDump(\"%s\", \"%s\")\n") (inferior-ess-start-file) (inferior-ess-start-args . "") (ess-STERM . "iESS")) S+common-cust-alist) (#$ . 109)) #@56 Call 'S version 4', from Bell Labs. New way to do it. (defalias 'S4 #[nil "\304\305\306\np#!\210\307 \210 \205\310 !\207" [S4-customize-alist ess-customize-alist ess-dialect inferior-ess-language-start ess-write-to-dribble-buffer format "\n(S4): ess-dialect=%s, buf=%s\n" inferior-ess ess-eval-linewise] 5 (#$ . 867) nil]) #@66 Major mode for editing S4 source. See `ess-mode' for more help. (defalias 'S4-mode #[(&optional proc-name) "\304\n\"\210 \205 \305 \207" [S4-customize-alist ess-customize-alist proc-name ess-imenu-use-S ess-mode ess-imenu-S] 3 (#$ . 1201) nil]) (provide 'ess-s4-d)