;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\305\306\307\310\311DD\312\313\314\315\316&\207" [require dash lsp-mode lsp-dart-protocol lsp-dart-utils custom-declare-variable lsp-dart-flutter-widget-guides funcall function #[0 "\300\207" [t] 1] "Enable showing ui guides for flutter widgets hierarchy." :type boolean :group lsp-dart] 8) (defconst lsp-dart-flutter-widget-guide-space " ") (defconst lsp-dart-flutter-widget-guide-vertical-line "│") (defconst lsp-dart-flutter-widget-guide-horizontal-line "─") (defconst lsp-dart-flutter-widget-guide-bottom-corner "└") (defconst lsp-dart-flutter-widget-guide-middle-corner "├") #@78 Add to BUFFER at LINE and COL a STRING overlay. (fn BUFFER LINE COL STRING) (defalias 'lsp-dart-flutter-widget-guide--add-overlay-to #[1028 "\212eb\210y\210\301!\210\302g!\230\205+\303``T#\304\305\306#\210\304\307\310\311\312##\262)\207" [lsp-dart-flutter-widget-guide-space move-to-column string make-overlay overlay-put category lsp-dart-flutter-widget-guide display propertize face font-lock-comment-face] 12 (#$ . 740)]) #@62 Return the first non whitepaces position at LINE. (fn LINE) (defalias 'lsp-dart-flutter-widget-guide--first-non-whitespace-pos #[257 "eb\210\211y\210\300 \210\301\302\303i$\207" [back-to-indentation lsp-make-position :line :character] 6 (#$ . 1182)]) #@41 Return the last col at LINE. (fn LINE) (defalias 'lsp-dart-flutter-widget-guide--last-col-at #[257 "eb\210\211y\210\300\210i\207" [nil] 2 (#$ . 1441)]) #@100 Build a widget guide from an OUTLINE. Return nil if the widget guilde does not apply. (fn INPUT0) (defalias 'lsp-dart-flutter-widget-guide--outline->guide #[257 "\300\301\"\300\302\"\300\303\300\304\300\305\"\"\"\306\230\205b\307!?\205P\310\311\312\"\313\310\211\203J\211A\262\242\262\262T\262V\203(B\262\202(\266\211\237\262\211\205`\314!\315\316\317\"\"\262\262\207" [gethash "kind" "children" "line" "start" "range" "NEW_INSTANCE" seq-empty-p nil -map #[257 "\300\301\300\302\300\303\"\"\"\207" [gethash "line" "start" "range"] 8 "\n\n(fn INPUT0)"] 0 lsp-dart-flutter-widget-guide--first-non-whitespace-pos mapcar make-closure #[257 "\301\302\300\303\304!$\207" [V0 lsp-make-range :start :end lsp-dart-flutter-widget-guide--first-non-whitespace-pos] 7 "\n\n(fn IT)"]] 11 (#$ . 1602)]) #@64 Build the widget guides from OUTLINE recursively. (fn INPUT0) (defalias 'lsp-dart-flutter-widget-guide--outline->guides #[257 "\211\300\301\"\302!?\205$\303\304\305\306\307\"!\"\310!\211\203!\311\"\207\266\202\207" [gethash "children" seq-empty-p -flatten-n 1 -non-nil mapcar #[257 "\300!\207" [lsp-dart-flutter-widget-guide--outline->guides] 3 "\n\n(fn IT)"] lsp-dart-flutter-widget-guide--outline->guide -concat] 9 (#$ . 2434)]) #@62 Convert a widget guide GUIDES to a map by line. (fn GUIDES) (defalias 'lsp-dart-flutter-widget-guide--guides->guides-by-line #[257 "\300C\301\302\303\"\"\210\211\242\207" [nil -map make-closure #[257 "\211\301\302\301\303\"\"\301\302\301\304\"\"X\205K\305\300\242\"\211\203.\300\242\236\306C\"\241\266\202DCB\211\300\242\235\204B\300\306\300\242C\"\240\210\266T\262\202\207" [V0 gethash "line" "start" "end" alist-get append] 10 "\n\n(fn INPUT0)"]] 6 (#$ . 2882)]) #@269 Return the widget guides characters list by LINE from GUIDE-LINES. SIZE is the length of the characters list. LAST-LINE-CHAR is the last column position of LINE. ANCHOR is the anchor point of the widget guide at LINE. (fn LINE GUIDE-LINES SIZE LAST-LINE-CHAR ANCHOR) (defalias 'lsp-dart-flutter-widget-guide--build-chars #[1285 "\301\"C\302\303\304#\"\210\305!\306\307\"\310\211\211\242\311\310\211\203M\211A\262\242\262\262T\262\211Y\203E\211\fX\203E\202FB\262\202 \266\211\237\262\311\310\211\203|\211A\262\242\262\262T\262\211\nY\203t\202u\312B\262\202V\266\211\237\262\311\310\211\203\246\211A\262\242\262\262T\262\312\230\204\205B\262\202\205\266\211\237\207" [lsp-dart-flutter-widget-guide-space make-list seq-do make-closure #[257 "\306\307\306\310\"\"\306\311\"\306\312\"\306\307\"\301\2428\300U\2049\n\230\203+\301\242\233\211 \240\207\211\f\230\205\215\301\242\233\211 \240\207\211X\205\213\211U\203f\211\301\2428\203Z\211\301\242\233\211\f\240\266\202\204\301\313\301\242\fC\"\240\210\202\204\211\301\2428\203z\211\301\242\233\211\f\240\266\202\204\301\313\301\242\fC\"\240\210\211T\262\202:\262\207" [V0 V1 lsp-dart-flutter-widget-guide-space lsp-dart-flutter-widget-guide-vertical-line lsp-dart-flutter-widget-guide-bottom-corner lsp-dart-flutter-widget-guide-middle-corner gethash "character" "start" "end" "line" append lsp-dart-flutter-widget-guide-horizontal-line] 11 "\n\n(fn GUIDE)"] lsp-dart-flutter-widget-guide--first-non-whitespace-pos gethash "character" nil 0 ""] 17 (#$ . 3379)]) #@87 Check if there is any widget guide on buffer from uri of OUTLINE-PARAMS. (fn INPUT0) (defalias 'lsp-dart-flutter-widget-guide-check #[257 "\300\301\"\300\302\"\303\304!!\211\205-r\211q\210\305ed\306\307$\210\212\310\311!!\312\313\314#\"\262*\207" [gethash "uri" "outline" find-buffer-visiting lsp--uri-to-path remove-overlays category lsp-dart-flutter-widget-guide lsp-dart-flutter-widget-guide--guides->guides-by-line lsp-dart-flutter-widget-guide--outline->guides seq-do make-closure #[257 "\211@\302\301\"\303\304\305\"!\306\304\307\"!\310!\311W\203 \311\202!]\312%\211\311\313\211\205P\211A\262\242\262\262T\262\314\300\f \\$\210\202/\207" [V0 V1 alist-get -min mapcar #[257 "\300\301!!\300\302!!^\207" [lsp:position-character lsp:range-start lsp:range-end] 5 "\n\n(fn IT)"] -max #[257 "\300\301!!\300\302!!]\207" [lsp:position-character lsp:range-start lsp:range-end] 5 "\n\n(fn IT)"] lsp-dart-flutter-widget-guide--last-col-at 0 lsp-dart-flutter-widget-guide--build-chars nil lsp-dart-flutter-widget-guide--add-overlay-to] 17 "\n\n(fn GUIDES-BY-LINE)"]] 10 (#$ . 4989)]) #@139 Non-nil if Lsp-Dart-Flutter-Widget-Guides mode is enabled. Use the command `lsp-dart-flutter-widget-guides-mode' to change this variable. (defvar lsp-dart-flutter-widget-guides-mode nil (#$ . 6117)) (make-variable-buffer-local 'lsp-dart-flutter-widget-guides-mode) #@643 Mode for displaying flutter widget guide lines. This is a minor mode. If called interactively, toggle the `Lsp-Dart-Flutter-Widget-Guides 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-flutter-widget-guides-mode'. The mode's hook is called both when the mode is enabled and when it is disabled. (fn &optional ARG) (defalias 'lsp-dart-flutter-widget-guides-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\316$\210\317\312\313\306#\210\320\321\203V\322\202W\323\"\210\324\325!\203y\302 \203k\211\302 \232\203y\326\327\203u\330\202v\331\332#\210\210\333 \210\207" [lsp-dart-flutter-widget-guides-mode local-minor-modes current-message toggle 1 nil t boundp delq add-hook lsp-dart-flutter-outline-arrived-hook lsp-dart-flutter-widget-guide-check remove-overlays category lsp-dart-flutter-widget-guide remove-hook run-hooks lsp-dart-flutter-widget-guides-mode-hook lsp-dart-flutter-widget-guides-mode-on-hook lsp-dart-flutter-widget-guides-mode-off-hook called-interactively-p any message "Lsp-Dart-Flutter-Widget-Guides mode %sabled%s" "en" "dis" " in current buffer" force-mode-line-update] 7 (#$ . 6389) (byte-code "\203\n\301!\202 \302C\207" [current-prefix-arg prefix-numeric-value toggle] 2)]) (defvar lsp-dart-flutter-widget-guides-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-flutter-widget-guides-mode-map lsp-dart-flutter-widget-guides-mode-hook variable-documentation put "Hook run after entering or leaving `lsp-dart-flutter-widget-guides-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-flutter-widget-guides-mode boundp provide lsp-dart-flutter-widget-guide] 6)