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

Chizi123
2018-11-19 a4b9172aefa91861b587831e06f55b1e19f3f3be
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
;ELC
;;; Compiled
;;; in Emacs version 26.1
;;; with all optimizations.
 
;;; This file uses dynamic docstrings, first added in Emacs 19.29.
 
;;; This file does not contain utf-8 non-ASCII characters,
;;; and so can be loaded in Emacs versions earlier than 23.
 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
 
(byte-code "\300\301!\210\302\303\203 @\304\305\306\307E\"\266\211T\262A\262\202\210\207" [require smartparens (elixir-mode) 0 add-to-list sp-sexp-suffix regexp ""] 8)
#@193 Return non-nil if the "do" keyword is part of definition.
 
ID is the opening delimiter.
 
Definitions are the constructions of the form defmodule-do-end,
def-do-end and similar pairs.
 
(fn ID)
(defalias 'sp-elixir-def-p #[257 "\212\211\300\232\205 \301 \210\302\303!)\207" ["do" back-to-indentation looking-at "\\(?:c\\(?:ase\\|ond\\)\\|def\\(?:m\\(?:acrop?\\|odule\\)\\|p\\)?\\|for\\|if\\|quote\\|receive\\|try\\|unless\\|with\\)"] 3 (#$ . 587)])
#@64 Test if "do" is part of definition.
MS, MB, ME.
 
(fn MS MB ME)
(defalias 'sp-elixir-skip-def-p #[771 "\300!\207" [sp-elixir-def-p] 5 (#$ . 1041)])
#@92 Insert "do" keyword and indent the new block.
ID, ACTION, CONTEXT.
 
(fn ID ACTION CONTEXT)
(defalias 'sp-elixir-do-block-post-handler #[771 "\300=\205(\301 \212\302v\210\211`\302\223\210)\212\303 \210)\212\304c\210)\305\306 \"\210\211\302\211\223\262\207" [insert make-marker nil newline " do" indent-region line-beginning-position] 7 (#$ . 1195)])
#@143 Insert empty "do" keyword and indent the new block.
 
This is used for receive-do-end expression.
ID, ACTION, CONTEXT.
 
(fn ID ACTION CONTEXT)
(defalias 'sp-elixir-empty-do-block-post-handler #[771 "\300=\2051\301 \212\302v\210\211`\302\223\210)\212\303y\210\302\210\304c\210)\212\305 \210)\306\307 \"\210\310 \210\211\302\211\223\262\207" [insert make-marker nil -1 " do" newline indent-region line-beginning-position indent-according-to-mode] 7 (#$ . 1555)])
(byte-code "\300\301\302\303\304\305\306\307\310\311&    \210\301\312\303\304\313\314\315\310\316&    \210\301\317\303\304\320\314\321\310\322&    \210\301\323\303\304\324\314\325\310\326&    \210\301\327\303\304\330\314\331&\210\301\332\303\304\333\314\334\310\335&    \210\301\336\303\304\337\314\340\310\341&    \210\301\342\303\304\343\314\344\310\345&    \210\301\346\303\304\347\314\350&\266\351\352!\207" [elixir-mode sp-local-pair "do" "end" :when (("SPC" "RET" "<evil-ret>")) :skip-match sp-elixir-skip-def-p :unless (sp-in-comment-p sp-in-string-p) "def" (("SPC" "RET" "<evil-ret>")) :post-handlers (sp-elixir-do-block-post-handler) (sp-in-comment-p sp-in-string-p) "defp" (("SPC" "RET" "<evil-ret>")) (sp-elixir-do-block-post-handler) (sp-in-comment-p sp-in-string-p) "defmodule" (("SPC" "RET" "<evil-ret>")) (sp-elixir-do-block-post-handler) (sp-in-comment-p sp-in-string-p) "fn" (("SPC" "RET" "<evil-ret>")) ("| ") "if" (("SPC" "RET" "<evil-ret>")) (sp-elixir-do-block-post-handler) (sp-in-comment-p sp-in-string-p) "unless" (("SPC" "RET" "<evil-ret>")) (sp-elixir-do-block-post-handler) (sp-in-comment-p sp-in-string-p) "case" (("SPC" "RET" "<evil-ret>")) (sp-elixir-do-block-post-handler) (sp-in-comment-p sp-in-string-p) "receive" (("RET" "<evil-ret>")) (sp-elixir-empty-do-block-post-handler) provide smartparens-elixir] 11)