;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (require 'yasnippet) (defvar js2r--space-str " \n") (defalias 'js2r--skip-region-whitespace #[0 "`\301 W\211\204 \302 \210\303w\210\302 \210\303x\210\211\205\302 \207" [js2r--space-str mark exchange-point-and-mark nil] 3]) (defalias 'js2r-unwrap #[0 "\301 \210\302\211\303 \203\304 \210`\305 ^\262`\305 ]\262\202@\306\307 !\310!\262\211\310!\311!>\2048\312\313\314D\"\210\315H\\\262\266\202\306\316\"!\310!\310!\311!>\204\\\312\313\314D\"\210\315H\\\262\212b\210\317Z!\210b\210\317Z!\210)\320ed\"\207" [cl-struct-js2-node-tags js2r--guard nil use-region-p js2r--skip-region-whitespace mark js2-node-parent-stmt js2-node-at-point js2-node-abs-pos type-of signal wrong-type-argument js2-node 3 js2r--first-common-ancestor-in-region delete-char indent-region] 10 nil nil]) #@16 (fn BEG END) (defalias 'js2r-wrap-in-for-loop #[514 "\301 \210`\302 ^\262`\302 ]\262\303\304\305#)\207" [yas-wrap-around-region js2r--skip-region-whitespace mark t yas-expand-snippet "for (var i = 0, l = ${1:length}; i < l; i++) {\n$0\n}"] 6 (#$ . 894) "r"]) (provide 'js2r-wrapping)