;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (byte-code "\300\301!\210\300\302!\210\300\303!\210\300\304!\210\300\305!\210\306\307\310\311\312DD\313\314\315\316\317&\210\306\320\310\311\321DD\322\314\315\316\317&\210\323\324\325\326\316\317%\207" [require dash lsp-lens lsp-dart-protocol lsp-dart-dap lsp-dart-test-support custom-declare-variable lsp-dart-main-code-lens funcall function #[0 "\300\207" [t] 1] "Enable the main code lens overlays." :type boolean :group lsp-dart lsp-dart-test-code-lens #[0 "\300\207" [t] 1] "Enable the test code lens overlays." custom-declare-face lsp-dart-code-lens-separator ((t :height 0.3)) "The face used for separate test code lens overlays."] 8) #@63 Return the main outline if exists in OUTLINES. (fn OUTLINES) (defalias 'lsp-dart-code-lens--find-main-outline #[257 "\300\301\"\211\203 \207\302\303\"@\207" [seq-find #[257 "\300\301\300\302\"\"\211\303\230\207" [gethash "name" "element" "main"] 6 "\n\n(fn INPUT0)"] seq-map #[257 "\300\301\"\211\205 \302!\207" [gethash "children" lsp-dart-code-lens--find-main-outline] 4 "\n\n(fn INPUT0)"]] 5 (#$ . 731)]) #@220 Build a String action to overlay. LABEL is teh text to display. HELP-ECHO is the mouse hover text. ACTION-FN is the function to be called with ACTION-ARGS when clicked. (fn LABEL HELP-ECHO ACTION-FN &rest ACTION-ARGS) (defalias 'lsp-dart-code-lens--build-action #[899 "\300\301\302\303\304\305\306\307 \310\311\312\313##\210\211\262\314\315& \207" [propertize pointer hand help-echo mouse-face lsp-lens-mouse-face local-map make-sparse-keymap define-key [mouse-1] make-closure #[0 "\302\300\301\"\207" [V0 V1 apply] 3 nil nil] font-lock-face lsp-lens-face] 21 (#$ . 1154)]) #@121 Run Dart/Flutter application from PATH. If TEST-FILE? debug tests otherwise debug application. (fn PATH TEST-FILE\=\?) (defalias 'lsp-dart-code-lens--run-application #[514 "\211\203\300 \203 \301!\207\302!\207\300 \203\303!\207\304!\207" [lsp-dart-flutter-project-p lsp-dart-dap-debug-flutter-test lsp-dart-dap-debug-dart-test lsp-dart-dap-run-flutter lsp-dart-dap-run-dart] 4 (#$ . 1745)]) #@123 Debug Dart/Flutter application from PATH. If TEST-FILE? debug tests otherwise debug application. (fn PATH TEST-FILE\=\?) (defalias 'lsp-dart-code-lens--debug-application #[514 "\211\203\300 \203 \301!\207\302!\207\300 \203\303!\207\304!\207" [lsp-dart-flutter-project-p lsp-dart-dap-debug-flutter-test lsp-dart-dap-debug-dart-test lsp-dart-dap-debug-flutter lsp-dart-dap-debug-dart] 4 (#$ . 2153)]) #@80 Build main overlay code lens for BUFFER from main outline. (fn INPUT0 INPUT1) (defalias 'lsp-dart-code-lens--build-main-overlay #[514 "\300\301\"\300\302\300\303\"\"\304!\211A\262\242b\210\305 \306 #\307\310\"\311\312\n!!\313\314\315\316#\317\320\321#\210\317\322\323\324\203F\325\202G\326\327\312!\n%\313\330\315\331#\323\332 \203b\333\202c\334\335\312!%\336\260#\207" [gethash "range" "character" "start" lsp--range-to-region line-beginning-position make-overlay make-string 32 lsp-dart-test-file-p buffer-file-name propertize " " font-lock-face lsp-dart-code-lens-separator overlay-put lsp-dart-main-code-lens t before-string lsp-dart-code-lens--build-action "Run" "mouse-1: Run tests" "mouse-1: Run application" lsp-dart-code-lens--run-application "|" lsp-lens-face "Debug" "mouse-1: Debug tests" "mouse-1: Debug application" lsp-dart-code-lens--debug-application "\n"] 27 (#$ . 2568)]) #@139 Build an overlay in BUFFER for a test NAMES of KIND. TEST-RANGE is the test method range. RANGE is the overlay range to build. (fn TEST) (defalias 'lsp-dart-code-lens--build-test-overlay #[257 "\300\301\"\211A\262\242\300\211\302\"\303\"\304\"b\210\305 \306\307\"\310p#\311\312\313\314#\315\316\317#\210\315\320\321\322\323\324$\311\325\313\326#\321\327\330\331$\332\260#\207" [plist-get :element-range lsp--region-to-range :start :character line-beginning-position make-string 32 make-overlay propertize " " font-lock-face lsp-dart-code-lens-separator overlay-put lsp-dart-test-code-lens t before-string lsp-dart-code-lens--build-action "Run" "mouse-1: Run this test" lsp-dart-test--run "|" lsp-lens-face "Debug" "mouse-1: Debug this test" lsp-dart-test--debug "\n"] 22 (#$ . 3502)]) #@71 Check URI and outline for main method adding lens to it. (fn INPUT0) (defalias 'lsp-dart--main-code-lens-check #[257 "\300\301\"\300\302\300\303\"\"\304\305!!\306!\205-rq\210\307ed\310\311$\210\211\205,\212\312\"))\207" [gethash "uri" "children" "outline" find-buffer-visiting lsp--uri-to-path lsp-dart-code-lens--find-main-outline remove-overlays lsp-dart-main-code-lens t lsp-dart-code-lens--build-main-overlay] 10 (#$ . 4315)]) #@42 Add lens to the given TESTS. (fn TESTS) (defalias 'lsp-dart--set-test-lens #[257 "\212\300ed\301\302$\210\303\304\")\207" [remove-overlays lsp-dart-test-code-lens t seq-do #[257 "\300!\207" [lsp-dart-code-lens--build-test-overlay] 3 "\n\n(fn TEST)"]] 6 (#$ . 4763)]) #@125 Non-nil if Lsp-Dart-Main-Code-Lens mode is enabled. Use the command `lsp-dart-main-code-lens-mode' to change this variable. (defvar lsp-dart-main-code-lens-mode nil (#$ . 5040)) (make-variable-buffer-local 'lsp-dart-main-code-lens-mode) #@628 Mode for displaying code lens on main methods. This is a minor mode. If called interactively, toggle the `Lsp-Dart-Main-Code-Lens mode' mode. If the prefix argument is positive, enable the mode, and if it is zero or negative, disable the mode. If called from Lisp, toggle the mode if ARG is `toggle'. Enable the mode if ARG is nil, omitted, or is a positive number. Disable the mode if ARG is a negative number. To check whether the minor mode is enabled in the current buffer, evaluate `lsp-dart-main-code-lens-mode'. The mode's hook is called both when the mode is enabled and when it is disabled. (fn &optional ARG) (defalias 'lsp-dart-main-code-lens-mode #[256 "\302 \303=\203 ?\202\247\203\304W\203\305\202\306\307\301!\2031\310\300 \"\2031\300 B\203?\311\312\313\305\306$\210\202L\314ed\315\306$\210\316\312\313\306#\210\317\320\203V\321\202W\322\"\210\323\324!\203y\302 \203k\211\302 \232\203y\325\326\203u\327\202v\330\331#\210\210\332 \210\207" [lsp-dart-main-code-lens-mode local-minor-modes current-message toggle 1 nil t boundp delq add-hook lsp-dart-outline-arrived-hook lsp-dart--main-code-lens-check remove-overlays lsp-dart-main-code-lens remove-hook run-hooks lsp-dart-main-code-lens-mode-hook lsp-dart-main-code-lens-mode-on-hook lsp-dart-main-code-lens-mode-off-hook called-interactively-p any message "Lsp-Dart-Main-Code-Lens mode %sabled%s" "en" "dis" " in current buffer" force-mode-line-update] 7 (#$ . 5284) (byte-code "\203\n\301!\202 \302C\207" [current-prefix-arg prefix-numeric-value toggle] 2)]) (defvar lsp-dart-main-code-lens-mode-hook nil) (byte-code "\301\302N\204\f\303\301\302\304#\210\303\301\305\306#\210\303\301\307\310C#\210\311\312\310\313\300!\205#\310\211%\207" [lsp-dart-main-code-lens-mode-map lsp-dart-main-code-lens-mode-hook variable-documentation put "Hook run after entering or leaving `lsp-dart-main-code-lens-mode'.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it. (This is true for all hook variables.)" custom-type hook standard-value nil add-minor-mode lsp-dart-main-code-lens-mode boundp] 6) #@125 Non-nil if Lsp-Dart-Test-Code-Lens mode is enabled. Use the command `lsp-dart-test-code-lens-mode' to change this variable. (defvar lsp-dart-test-code-lens-mode nil (#$ . 7424)) (make-variable-buffer-local 'lsp-dart-test-code-lens-mode) #@628 Mode for displaying code lens on main methods. This is a minor mode. If called interactively, toggle the `Lsp-Dart-Test-Code-Lens mode' mode. If the prefix argument is positive, enable the mode, and if it is zero or negative, disable the mode. If called from Lisp, toggle the mode if ARG is `toggle'. Enable the mode if ARG is nil, omitted, or is a positive number. Disable the mode if ARG is a negative number. To check whether the minor mode is enabled in the current buffer, evaluate `lsp-dart-test-code-lens-mode'. The mode's hook is called both when the mode is enabled and when it is disabled. (fn &optional ARG) (defalias 'lsp-dart-test-code-lens-mode #[256 "\302 \303=\203 ?\202\247\203\304W\203\305\202\306\307\301!\2031\310\300 \"\2031\300 B\203b\311\312\313\"\210\311\314\313\"\210\311\315\316\"\210\311\317\320\"\210\311\321\322\"\210\311\323\324\"\210\311\325\326\"\210\327\330\331\305\306$\210\202\222\311\312\332\"\210\311\314\332\"\210\311\315\332\"\210\311\317\332\"\210\311\321\332\"\210\311\323\332\"\210\311\325\332\"\210\333ed\334\306$\210\335\330\331\306#\210\336\337\203\234\340\202\235\341\"\210\342\343!\203\277\302 \203\261\211\302 \232\203\277\344\345\203\273\346\202\274\347\350#\210\210\351 \210\207" [lsp-dart-test-code-lens-mode local-minor-modes current-message toggle 1 nil t boundp delq lsp-dart-define-key "t t" lsp-dart-run-test-at-point "t T" "t f" lsp-dart-run-test-file "t l" lsp-dart-run-last-test "t L" lsp-dart-debug-last-test "t a" lsp-dart-run-all-tests "t v" lsp-dart-visit-last-test add-hook lsp-dart-tests-added-hook lsp-dart--set-test-lens ignore remove-overlays lsp-dart-test-code-lens remove-hook run-hooks lsp-dart-test-code-lens-mode-hook lsp-dart-test-code-lens-mode-on-hook lsp-dart-test-code-lens-mode-off-hook called-interactively-p any message "Lsp-Dart-Test-Code-Lens mode %sabled%s" "en" "dis" " in current buffer" force-mode-line-update] 7 (#$ . 7668) (byte-code "\203\n\301!\202 \302C\207" [current-prefix-arg prefix-numeric-value toggle] 2)]) (defvar lsp-dart-test-code-lens-mode-hook nil) (byte-code "\301\302N\204\f\303\301\302\304#\210\303\301\305\306#\210\303\301\307\310C#\210\311\312\310\313\300!\205#\310\211%\210\314\315!\207" [lsp-dart-test-code-lens-mode-map lsp-dart-test-code-lens-mode-hook variable-documentation put "Hook run after entering or leaving `lsp-dart-test-code-lens-mode'.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it. (This is true for all hook variables.)" custom-type hook standard-value nil add-minor-mode lsp-dart-test-code-lens-mode boundp provide lsp-dart-code-lens] 6)