;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (byte-code "\300\301!\210\302\303\304\305\306\301\307\310&\210\311\312\313\314\315DD\316\317\320\306\303&\210\311\321\313\314\322DD\323\317\324\306\303&\210\311\325\313\314\326DD\327\317\324\306\303&\210\311\330\313\314\331DD\332\317\333\306\303&\210\311\334\313\314\335DD\336\317\337\306\303&\210\311\340\313\314\341DD\342\317\333\306\303&\210\311\343\313\314\344DD\345\317\333\306\303&\207" [require lsp-mode custom-declare-group lsp-rf nil "Settings for Robot Framework Language Server." :group :link (url-link "https://github.com/tomi/vscode-rf-language-server") custom-declare-variable lsp-rf-language-server-start-command funcall function #[0 "\300\207" [("~/.nvm/versions/node/v9.11.2/bin/node" "~/.vscode/extensions/tomiturtiainen.rf-intellisense-2.8.0/server/server.js")] 1] "Path to the server.js file of the rf-intellisense server.\nAccepts a list of strings (path/to/interpreter path/to/server.js)" :type list lsp-rf-language-server-include-paths #[0 "\300\207" [#1=[]] 1] "An array of files that should be included by the parser.\nGlob patterns as strings are accepted (eg. *.robot between double quotes)" lsp-string-vector lsp-rf-language-server-exclude-paths #[0 "\300\207" [#1#] 1] "An array of files that should be ignored by the parser.\nGlob patterns as strings are accepted (eg. *bad.robot between double quotes)" lsp-rf-language-server-dir #[0 "\300\207" [#2="~/.vscode/extensions/tomiturtiainen.rf-intellisense-2.8.0/server/library-docs/"] 1 #2#] "Libraries directory for libraries in `lsp-rf-language-server-libraries'" string lsp-rf-language-server-libraries #[0 "\300\207" [["BuiltIn-3.1.1" "Collections-3.0.4"]] 1] "Libraries whose keywords are suggested with `auto-complete'." (repeat string) lsp-rf-language-server-log-level #[0 "\300\207" [#3="debug"] 1 #3#] "What language server log messages are printed." lsp-rf-language-server-trace-server #[0 "\300\207" [#4="verbose"] 1 #4#] "Traces the communication between VSCode and the rfLanguageServer service."] 8) #@13 (fn DIRS) (defalias 'parse-rf-language-server-library-dirs #[257 "\300\301\302\"!\207" [vconcat mapcar #[257 "\301!\302Q\207" [lsp-rf-language-server-dir expand-file-name ".json"] 4 "\n\n(fn X)"]] 5 (#$ . 2085)]) (defalias 'expand-start-command #[0 "\301\302\"\207" [lsp-rf-language-server-start-command mapcar expand-file-name] 3]) #@52 Convert a VECTOR of globs to a regex. (fn VECTOR) (defalias 'parse-rf-language-server-globs-to-regex #[257 "\300\301\"\302\303\"\304\305Q\207" [mapcan lsp-glob-to-regexps s-join "\\|" "\\(?:" "\\)"] 6 (#$ . 2430)]) #@71 Creates regexp to select files from workspace directory. (fn VECTOR) (defalias 'parse-rf-language-server-include-path-regex #[257 "\211\300=\203\n\301\202 \211\302!\207" [[] ["*.robot" "*.resource"] parse-rf-language-server-globs-to-regex] 4 (#$ . 2655)]) #@68 Creates regexp to select files from workspace directory. (fn SEQ) (defalias 'parse-rf-language-server-exclude-paths #[257 "\301=\203\207\302\303\"\207" [lsp-rf-language-server-exclude-paths [] cl-delete-if #[257 "\302!\303\304\305#)\207" [lsp-rf-language-server-exclude-paths inhibit-changing-match-data parse-rf-language-server-globs-to-regex nil t string-match] 8 "\n\n(fn X)"]] 4 (#$ . 2921)]) (byte-code "\300\301!\210\302\303\304\305\306 !\307\310\311\312\313\314\315\316&\n!\207" [lsp-register-custom-settings (("rfLanguageServer.trace.server" lsp-rf-language-server-trace-server) ("rfLanguageServer.logLevel" lsp-rf-language-server-log-level) ("rfLanguageServer.libraries" lsp-rf-language-server-libraries) ("rfLanguageServer.excludePaths" lsp-rf-language-server-exclude-paths) ("rfLanguageServer.includePaths" lsp-rf-language-server-include-paths)) lsp-register-client make-lsp-client :new-connection lsp-stdio-connection expand-start-command :major-modes (robot-mode) :server-id rf-intellisense :library-folders-fn #[257 "\301!\207" [lsp-rf-language-server-libraries parse-rf-language-server-library-dirs] 3 "\n\n(fn WORKSPACE)"] :initialized-fn #[257 "\211\302\303\304!!\210\305\306\307\310\311\312\313H\314 !\"!!D\")\207" [lsp--cur-workspace lsp-rf-language-server-include-paths lsp--set-configuration lsp-configuration-section "rfLanguageServer" lsp-request "buildFromFiles" :files vconcat parse-rf-language-server-exclude-paths directory-files-recursively 4 parse-rf-language-server-include-path-regex] 10 "\n\n(fn WORKSPACE)"]] 12) (defconst lsp-rf-plist-value-when-compiled nil) (provide 'lsp-rf)