;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\300\302!\207" [require smartparens smartparens-ruby] 2)
|
#@37 Wrapper for `crystal-forward-sexp'.
|
(defalias 'sp-crystal-forward-sexp #[0 "\300 \207" [crystal-forward-sexp] 1 (#$ . 490) nil])
|
#@38 Wrapper for `crystal-backward-sexp'.
|
(defalias 'sp-crystal-backward-sexp #[0 "\300 \207" [crystal-backward-sexp] 1 (#$ . 625) nil])
|
#@32 Test if ID is inline.
|
|
(fn ID)
|
(defalias 'sp-crystal-inline-p #[257 "\212\301\302\"\203 \303v\210\301\304\302\"\206 \301\305\302\"?\205O \212\306\303!\210\306\307!\210\310P\311\312!)\262)\206O \212\3131L \314 \210\315 \210\316P\311\312!)\2620\202N \210\302))\207" [inhibit-changing-match-data looking-back nil -1 "^[[:blank:]]*" "= *" forward-symbol 1 " *" t looking-at (error) sp-crystal-backward-sexp sp-crystal-forward-sexp "[^[:blank:]]* *"] 4 (#$ . 763)])
|
#@59 If non-nil, skip inline match.
|
MS, MB, ME.
|
|
(fn MS MB ME)
|
(defalias 'sp-crystal-skip-inline-match-p #[771 "\300!\206 \301!\207" [sp-ruby-method-p sp-crystal-inline-p] 5 (#$ . 1241)])
|
#@94 Test if point is inside string, word or inline.
|
ID, ACTION, CONTEXT.
|
|
(fn ID ACTION CONTEXT)
|
(defalias 'sp-crystal-in-string-word-or-inline-p #[771 "\300#\206 \301\302\"\205 \303!\207" [sp-ruby-in-string-or-word-p looking-back nil sp-crystal-inline-p] 7 (#$ . 1433)])
|
(byte-code "\300\301\302\"\210\303\211\203 \211@\300\304\305B\"\210A\266\202\202 \210\306\307\310\311\312\313\314\315\316\317\320\321\322\323\324\325\326\327&\210\307\330\331\320\332\322\333\326\327& \210\307\334\311\312\335\314\336\316\337\320\340\322\341\324\325\326\327&\210\307\342\311\312\343\314\344\316\345\320\346\322\347\324\325\326\327&\210\307\350\311\312\351\314\352\316\353\320\354\322\355\324\325\326\327&\210\307\356\311\312\357\314\360\316\361\320\362\322\363\324\325\326\327&\210\307\364\311\312\365\314\366\316\367\320\370\322\371\324\325\326\327&\210\307\372\311\312\373\314\374\316\375\320\376\322\377\324\325\326\327&\210\307\201@ \311\312\201A \314\201B \316\201C \320\201D \322\201E \324\325\326\327&\210\307\201F \311\312\201G \314\201H \316\201I \320\201J \322\201K \324\325\326\327&\210\307\201L \311\312\201M \314\201N \316\201O \320\201P \322\201Q \324\325\326\327&\210\307\201R \311\312\201S \314\201T \316\201U \320\201V \322\201W \324\325\326\327&\210\307\201X \311\312\201Y \314\201Z \316\201[ \320\201\\ \322\201] \324\325\326\327&\210\307\201^ \311\312\201_ \314\201` \316\201a \320\201b \322\201c \324\201d \326\327&\210\307\201e \311\312\201f \314\201g \316\201h \320\201i \322\201j \324\201d \326\327&\210\307\201k \311\312\201l \314\201m \316\201n \320\201o \322\201p \324\201d \326\327&\210\307\201q \311\312\201r \314\201s \316\201t \320\201u \322\201v \324\201d \326\327&\210\307\201w \211\312\201x \320\201y \326\327& \266\201z \201{ !\207" [add-to-list sp-navigate-skip-match ((crystal-mode) . sp--ruby-skip-match) (crystal-mode) sp-sexp-suffix (syntax #1="") crystal-mode sp-local-pair "do" "end" :when (("SPC" "RET" "<evil-ret>")) :unless (sp-ruby-in-string-or-word-p sp-in-comment-p) :actions (insert navigate) :pre-handlers (sp-ruby-pre-handler) :post-handlers (sp-ruby-block-post-handler) :skip-match sp-ruby-skip-method-p :suffix #1# "{" "}" (sp-ruby-pre-handler) (sp-ruby-post-handler) "begin" (("SPC" "RET" "<evil-ret>")) (sp-ruby-in-string-or-word-p sp-in-comment-p) (insert navigate) (sp-ruby-pre-handler) (sp-ruby-block-post-handler) "def" (("SPC" "RET" "<evil-ret>")) (sp-ruby-in-string-or-word-p sp-in-comment-p) (insert navigate) (sp-ruby-pre-handler) (sp-ruby-def-post-handler) "class" (("SPC" "RET" "<evil-ret>")) (sp-ruby-in-string-or-word-p sp-in-comment-p) (insert navigate) (sp-ruby-pre-handler) (sp-ruby-def-post-handler) "struct" (("SPC" "RET" "<evil-ret>")) (sp-ruby-in-string-or-word-p sp-in-comment-p) (insert navigate) (sp-ruby-pre-handler) (sp-ruby-def-post-handler) "lib" (("SPC" "RET" "<evil-ret>")) (sp-ruby-in-string-or-word-p sp-in-comment-p) (insert navigate) (sp-ruby-pre-handler) (sp-ruby-def-post-handler) "fun" (("SPC" "RET" "<evil-ret>")) (sp-ruby-in-string-or-word-p sp-in-comment-p) (insert navigate) (sp-ruby-pre-handler) (sp-ruby-def-post-handler) "enum" (("SPC" "RET" "<evil-ret>")) (sp-ruby-in-string-or-word-p sp-in-comment-p) (insert navigate) (sp-ruby-pre-handler) (sp-ruby-def-post-handler) "union" (("SPC" "RET" "<evil-ret>")) (sp-ruby-in-string-or-word-p sp-in-comment-p) (insert navigate) (sp-ruby-pre-handler) (sp-ruby-def-post-handler) "module" (("SPC" "RET" "<evil-ret>")) (sp-ruby-in-string-or-word-p sp-in-comment-p) (insert navigate) (sp-ruby-pre-handler) (sp-ruby-def-post-handler) "macro" (("SPC" "RET" "<evil-ret>")) (sp-ruby-in-string-or-word-p sp-in-comment-p) (insert navigate) (sp-ruby-pre-handler) (sp-ruby-def-post-handler) "case" (("SPC" "RET" "<evil-ret>")) (sp-ruby-in-string-or-word-p sp-in-comment-p) (insert navigate) (sp-ruby-pre-handler) (sp-ruby-def-post-handler) "if" (("SPC" "RET" "<evil-ret>")) (sp-crystal-in-string-word-or-inline-p sp-in-comment-p) (insert navigate) (sp-ruby-pre-handler) (sp-ruby-def-post-handler) sp-crystal-skip-inline-match-p "unless" (("SPC" "RET" "<evil-ret>")) (sp-crystal-in-string-word-or-inline-p sp-in-comment-p) (insert navigate) (sp-ruby-pre-handler) (sp-ruby-def-post-handler) "while" (("SPC" "RET" "<evil-ret>")) (sp-crystal-in-string-word-or-inline-p sp-in-comment-p) (insert navigate) (sp-ruby-pre-handler) (sp-ruby-def-post-handler) "until" (("SPC" "RET" "<evil-ret>")) (sp-crystal-in-string-word-or-inline-p sp-in-comment-p) (insert navigate) (sp-ruby-pre-handler) (sp-ruby-def-post-handler) "|" (sp-ruby-should-insert-pipe-close) (sp-ruby-pre-pipe-handler) provide smartparens-crystal] 19)
|
