;ELC ;;; Compiled ;;; in Emacs version 26.3 ;;; 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!\204\304\303\305\"\210\302\306!\204\304\306\307\"\210\300\207" [require expand-region-core fboundp python-syntax-context defalias python-info-ppss-context python-indent-offset python-indent] 3) #@42 Characters that delimit a Python string. (defvar er--python-string-delimiter "'\"" (#$ . 640)) #@69 Regular expression string to match the beginning of a Python block. (defvar er--python-block-start-regex "\\_<\\(?:\\(?:class\\|def\\|e\\(?:l\\(?:if\\|se\\)\\|xcept\\)\\|f\\(?:inally\\|or\\)\\|if\\|try\\|w\\(?:hile\\|ith\\)\\)\\)\\_>" (#$ . 741)) #@193 Mark the Python string that surrounds point. If the optional MARK-INSIDE is not nil, only mark the region between the string delimiters, otherwise the region includes the delimiters as well. (defalias 'er/mark-python-string #[(mark-inside) "\304 \206\304 \3058\205\3068)\211\205O b\210\n\307w\210\304 \206%\304 \3058\205/\3068)\2039\310u\210\202 \203A\n\307x\210\311`!\210 b\210 \205O\n\307w)\207" [ppss beginning-of-string er--python-string-delimiter mark-inside syntax-ppss 3 8 nil 1 set-mark] 3 (#$ . 995)]) #@105 Mark the inside of the Python string that surrounds point. Command that wraps `er/mark-python-string'. (defalias 'er/mark-inside-python-string #[nil "\300\301!\207" [er/mark-python-string t] 2 (#$ . 1533) nil]) #@106 Mark the outside of the Python string that surrounds point. Command that wraps `er/mark-python-string'. (defalias 'er/mark-outside-python-string #[nil "\300\301!\207" [er/mark-python-string nil] 2 (#$ . 1752) nil]) #@49 Mark the Python statement that surrounds point. (defalias 'er/mark-python-statement #[nil "\300 \210\301`!\210\302 \207" [python-nav-end-of-statement set-mark python-nav-beginning-of-statement] 2 (#$ . 1974) nil]) #@190 Mark the Python block that surrounds point. If the optional NEXT-INDENT-LEVEL is given, select the surrounding block that is defined at an indentation that is less than NEXT-INDENT-LEVEL. (defalias 'er/mark-python-block #[(&optional next-indent-level) "\304 \210\206\305 !\203\306 \n\\\202\306 \306 Y\203%\307 !\210\202\310`!\210\306 \311y\210d\312 U\204Y\306 V\204P\305\313!\204P\305 !\204Y\306 V\203Y\311y\210\304 \210\202/\314\315!\210\316 *\207" [next-indent-level er--python-block-start-regex python-indent-offset block-indentation back-to-indentation looking-at current-indentation re-search-backward set-mark 1 point-at-eol "^[[:space:]]*$" python-util-forward-comment -1 exchange-point-and-mark] 2 (#$ . 2195) nil]) #@113 Mark the Python block that surrounds the Python block around point. Command that wraps `er/mark-python-block'. (defalias 'er/mark-outer-python-block #[nil "\300\301 !\207" [er/mark-python-block current-indentation] 2 (#$ . 2948) nil]) (defalias 'er/mark-python-block-and-decorator #[nil "\300 \210\301 \204\301\302!\2051\301\302!\203\302y\210\300 \210\202\303`!\210\301 \203,\304y\210\202!\305 \210\306 \207" [back-to-indentation er--python-looking-at-decorator -1 set-mark nil python-nav-end-of-block exchange-point-and-mark] 2 nil nil]) (defalias 'er--python-looking-at-decorator #[(&optional line-offset) "\212\203y\210\301 \210\302\303!)\207" [line-offset back-to-indentation looking-at "@"] 2]) #@65 Adds python-mode-specific expansions for buffers in python-mode (defalias 'er/add-python-mode-expansions #[nil "\303\304\301!\210\305\304\302!\210\306\307\306\310\311\n\"\"\"\211)\207" [try-expand-list-additions expand-region-skip-whitespace er/try-expand-list (er/mark-inside-python-string er/mark-outside-python-string er/mark-python-statement er/mark-python-block er/mark-python-block-and-decorator er/mark-outer-python-block) make-local-variable nil remove er/mark-inside-quotes er/mark-outside-quotes append] 7 (#$ . 3668)]) (byte-code "\300\301\302\"\210\303\304!\207" [er/enable-mode-expansions python-mode er/add-python-mode-expansions provide python-el-fgallina-expansions] 3)