;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (defvar js2r--iife-regexp "^(function (") #@70 Wrap the entire buffer in an immediately invoked function expression (defalias 'js2r-wrap-buffer-in-iife #[0 "\212\3021\f\303!0\202\210\202\203\304\305!\210eb\210\306c\210 \203$\307c\210\310c\210db\210\310c\210\311 \210\312c\210\313ed\")\207" [js2r--iife-regexp js2r-use-strict (error) search-backward-regexp error "Buffer already contains an immediately invoked function expression." "(function () {\n" "\"use strict\";\n" "\n" delete-blank-lines "\n}());" indent-region] 3 (#$ . 129) nil]) #@72 Returns the (beginning . end) of the name at cursor, or active region. (defalias 'js2r--selected-name-positions #[0 "\302 \303\211\304!>\204\302`S!\262\203\304!>\204\"\305\306!\210\307 \203-\310 \311 B\207\312!\304! >\204@\313\314\315D\"\210\316H\\\262\317\320!\210`B\207" [cl-struct-js2-name-node-tags cl-struct-js2-node-tags js2-node-at-point nil type-of error "Point is not on an identifier." use-region-p region-beginning region-end js2-node-abs-pos signal wrong-type-argument js2-node 3 skip-syntax-backward ".w_"] 8 (#$ . 636)]) #@72 Create shortcut for marked global by injecting it in the wrapping IIFE (defalias 'js2r-inject-global-in-iife #[0 "\301 \210\212\302 \211@A\303\"\304!\305\211\306!\204\307\310!\210\311 \210\312u\210c\210\313\314!\204/\315c\210\316\317!\210`\262\320u\210\321 \210\305u\210`\262c\210\313\314!\204N\315c\210\322\323%\266\207)\207" [js2r--iife-regexp js2r--guard js2r--selected-name-positions buffer-substring-no-properties buster--global-shortcut nil search-backward-regexp error "No immediately invoked function expression found." deactivate-mark 11 looking-at ")" ", " search-forward "{" -1 forward-list replace-string t] 13 (#$ . 1197) nil]) (provide 'js2r-iife)