;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)
|
