mirror of https://github.com/Chizi123/.emacs.d.git

Chizi123
2018-11-18 c655eea759be1db69c5e6b45c228139d8390122a
commit | author | age
5cb5f7 1 ;ELC
C 2 ;;; Compiled
3 ;;; in Emacs version 26.1
4 ;;; with all optimizations.
5
6 ;;; This file uses dynamic docstrings, first added in Emacs 19.29.
7
8 ;;; This file does not contain utf-8 non-ASCII characters,
9 ;;; and so can be loaded in Emacs versions earlier than 23.
10
11 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
12 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
13
14
15 (byte-code "\300\301!\210\300\302!\210\303\211\203\211@\304\305\306\307E\"\210A\266\202\202    \210\304\310\311\306\312E\"\207" [require smartparens rx (ess-mode inferior-ess-mode) add-to-list sp-sexp-suffix regexp "" sp-sexp-prefix ess-mode "\\(?:[[:word:]]\\|\\s_\\)*"] 7)
16 #@145 Remove spaces before opening parenthesis in a function call.
17 Remove redundant space around commas.
18 ID, ACTION, CONTEXT.
19
20 (fn ID ACTION CONTEXT)
21 (defalias 'sp-ess-pre-handler #[771 "\300\232\203\234\301\302!\212\211\303\304\"\303\305\"GZ\262b\210\306\307\310\"\203&\311\312\310\313#\210\211\303\305\"\262\314\235\203D\211\303\304\"\262b\210\311\315\310\313#\210\202\232\211\303\316\"\262\317\235\203z\211\303\305\"\262\320\232\203z\306\321\310\"\203z\212\322 \210\323\324\325\")\326\235\204z\311\312\310\313#\210\202\232\327\330!\204\207\306\330\310\"\203\215\331 \210\202\232\306\332\333 \334#\203\232\335\336!\210)\210\337\232\205\301 \212\211\303\340\"\262b\210\327\341!\203\272\311\312\310\313#\210\211\303\305\"\262\342\235\203\327\211\303\304\"\262b\210\311\315\310\313#\202\211\303\316\"\262\343\235\203\361\327\344!\204\361\311\315\310\313#\202\323\324\325\"\345\235\204\327\346!\203\311\312\310\313#\202\327\332!\205\335\336!)\262\207" [slurp-forward sp-get-thing back plist-get :beg :prefix looking-back "\\s([[:space:]]+" nil cycle-spacing 0 single-shot ("if" "for" "while") 1 :op ("[" "(") "" "[^%,]\\S)[[:space:]]+" sp-backward-sexp thing-at-point word noprop ("if" "for" "while") looking-at "%" just-one-space "[[:space:]]*,[[:space:]]*" line-beginning-position greedy replace-match ", " slurp-backward :end "[[:space:]]+\\s)" ("if" "for" "while") ("{" "%") "\\s)" ("if" "for" "while") "[[:space:]]*[^{]\\(?:\\s)\\|(\\|[[]\\)"] 9 (#$ . 686)])
22 #@68 Open new brace or bracket with indentation.
23 ARGS.
24
25 (fn &rest ARGS)
26 (defalias 'sp-ess-open-sexp-indent #[128 "\301\302!\203\302 \203\212\303 \210)\304\305\"\205(\306\307\305\310#\207\311 \210\312 \210\313y\210\312 \207" [ess-roxy-str fboundp ess-roxy-entry-p ess-roxy-indent-on-newline looking-back nil cycle-spacing 3 t newline indent-according-to-mode -1] 5 (#$ . 2201)])
27 #@85 Test if looking back at `ess-roxy-re'.
28 ID, ACTION, CONTEXT.
29
30 (fn ID ACTION CONTEXT)
31 (defalias 'sp-ess-roxy-str-p #[771 "\301\300!\205\302=\205\303!\207" [ess-roxy-re boundp insert sp--looking-back-p] 5 (#$ . 2586)])
32 (byte-code "\300\301\302\303\304\305\306\307&\210\301\310\303\304\311\306\312&\210\301\313\303\304\314\306\315&\210\301\316\303\317\320%\266\300\301\321\322\323\324\325\326&\210\301\327\322\323\330\325\331&\210\301\332\322\323\333\325\334&\210\301\335\322\323\336\325\337&\210\301\340\322\323\341\325\342&\210\301\343\322\323\344\325\345\346\347&    \210\301\350\322\323\351\325\352&\210\301\353\322\323\354\325\355&\210\301\356\322\323\357\306\360\325\356&    \210\301\361\322\323\362\306\363\325\364&    \210\301\365\322\323\366\306\367\325\370&    \210\301\371\322\323\372\306\373\325\374&    \210\301\375\322\323\376\325\377&\210\301\201@\322\323\201A\325\201B&\210\301\201C\322\323\201D\325\201E\306\201F\346\347& \266\201G\201H!\207" [ess-mode sp-local-pair "{" nil :pre-handlers (sp-ess-pre-handler) :post-handlers ((sp-ess-open-sexp-indent "M-j")) "(" (sp-ess-pre-handler) ((sp-ess-open-sexp-indent "M-j")) "[" (sp-ess-pre-handler) ((sp-ess-open-sexp-indent "M-j")) "'" :unless (sp-ess-roxy-str-p sp-in-comment-p sp-in-string-quotes-p) "\\strong{" "}" :when (sp-in-comment-p) :trigger "\\strong" "\\emph{" (sp-in-comment-p) "\\emph" "\\code{" (sp-in-comment-p) "\\code" "\\url{" (sp-in-comment-p) "\\url" "\\link{" (sp-in-comment-p) "\\link" "\\href{" (sp-in-comment-p) "\\href" :suffix "{[^}]*}" "\\email{" (sp-in-comment-p) "\\email" "\\pkg{" (sp-in-comment-p) "\\pkg" "\\item{" (sp-in-comment-p) ((sp-ess-open-sexp-indent "M-j")) "\\enumerate{" (sp-in-comment-p) ((sp-ess-open-sexp-indent "M-j")) "\\enumerate" "\\itemize{" (sp-in-comment-p) ((sp-ess-open-sexp-indent "M-j")) "\\itemize" "\\describe{" (sp-in-comment-p) ((sp-ess-open-sexp-indent "M-j")) "\\describe" "\\eqn{" (sp-in-comment-p) "\\eqn" "\\deqn{" (sp-in-comment-p) "\\deqn" "\\tabular{" (sp-in-comment-p) "\\tabular" ((sp-ess-open-sexp-indent "M-j")) provide smartparens-ess] 13)