Current File : //proc/thread-self/root/kunden/usr/share/emacs/27.2/lisp/cedet/semantic/wisent/python.elc |
;ELC
;;; Compiled
;;; in Emacs version 27.2
;;; with all optimizations.
;;; This file contains utf-8 non-ASCII characters,
;;; and so cannot be loaded into Emacs 22 or earlier.
(and (boundp 'emacs-version)
(< (aref emacs-version (1- (length emacs-version))) ?A)
(string-lessp emacs-version "23")
(error "`%s' was compiled for Emacs 23 or later" #$))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(byte-code "\300\301!\210\300\302\303\304#\210\300\305!\210\300\306!\210\300\307!\210\300\310!\210\300\311!\210\300\312!\207" [require rx python nil t semantic/wisent semantic/wisent/python-wy semantic/find semantic/dep semantic/ctxt semantic/format] 4)
#@68 Evaluate some Python code that determines the system include path.
(defalias 'semantic-python-get-system-include-path #[nil "\300\301\302\303\304\305\306!\307\310#\"\"\207" [delq nil mapcar #[(dir) "\301!\205 \207" [dir file-directory-p] 2] split-string python-shell-internal-send-string "import sys;print ('\\n'.join(sys.path))" "\n" t] 8 (#$ . 662)])
(byte-code "\305\300\306\307\310\311\310\312\313\314\315\316&\210\317\320 BC\321\322#\210\323\324\322\"\210)\325\320\322\326!\327\204? \n\211\262\204? \262\f\205= \330\f\"\262\203j \211\204j \304N\203Y \330\304N\"\211\262\204? \211\331N\206c \211\332N\262\262\202? \266\203\333\334#\210\325\320\322\300#\207" [semantic-python-dependency-system-include-path #3=#:tmp0 mode-local-active-mode major-mode mode-local-symbol-table custom-declare-variable (when (and (featurep 'python) (not noninteractive)) (semantic-python-get-system-include-path)) "The system include path used by Python language." :group python semantic :type (repeat (directory :tag "Directory")) :set #[(sym val) "\303 \"\210 \304\305\nBC\306\307#\210\310\311\307\"\210)\312\313!\205 \310\313\307\"\207" [sym val #1=#:tmp0 set-default mode-local-bind semantic-dependency-system-include-path #2=(mode-variable-flag t) python-mode mode-local-map-mode-buffers #[nil "\302\301!\210\211\207" [#1# semantic-dependency-system-include-path make-local-variable] 2] fboundp semantic-decoration-unparsed-include-do-reset] 4] mode-local-bind semantic-dependency-system-include-path #2# python-mode mode-local-map-mode-buffers #[nil "\302\301!\210\211\207" [#3# semantic-dependency-system-include-path make-local-variable] 2] put symbol-name nil intern-soft mode-local-parent derived-mode-parent variable-documentation "System path to search for include files."] 12)
#@47 Regexp matching beginning of a Python string.
(defconst wisent-python-string-start-re "[uU]?[rR]?['\"]" (#$ . 2469))
#@43 Regexp matching a complete Python string.
(defconst wisent-python-string-re "[Uu]?[Rr]?\\(?:'''\\(?:\\\\'\\|[^']\\|'\\{1,2\\}[^']\\)*'''\\|'\\(?:\\\\'\\|[^']\\)*'\\|\"\"\"\\(?:\\\\\"\\|[^\"]\\|\"\\{1,2\\}[^\"]\\)*\"\"\"\\|\"\\(?:\\\\\"\\|[^\"]\\)*\"\\)" (#$ . 2592))
#@67 Non-nil when expanding a paren block for Python lexical analyzer.
(defvar wisent-python-EXPANDING-block nil (#$ . 2865))
#@134 Return non-nil if implicit line joining is active.
That is, if inside an expression in parentheses, square brackets or
curly braces.
(defalias 'wisent-python-implicit-line-joining-p #[nil "\207" [wisent-python-EXPANDING-block] 1 (#$ . 2993)])
#@54 Move point at the end of the Python string at point.
(defalias 'wisent-python-forward-string #[nil "\303!\203\"