;ELC
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.



(byte-code "\300\301!\210\300\302!\210\303\304\305\"\207" [require ob org-compat add-to-list org-babel-tangle-lang-exts ("awk" . "awk")] 3)
#@37 Name of the awk executable command.
(defvar org-babel-awk-command "awk" (#$ . 224))
#@78 Expand BODY according to PARAMS, return the expanded body.

(fn BODY PARAMS)
(defalias 'org-babel-expand-body:awk #[514 "
\207" [] 3 (#$ . 314)])
#@121 Execute a block of Awk code with org-babel.
This function is called by `org-babel-execute-src-block'.

(fn BODY PARAMS)
(defalias 'org-babel-execute:awk #[514 "\301\302!\210\303
\236A\304\236A\305\236A\306\"\307\310!\311\312\313\"\314\315\"\216r\211q\210c\210)r\211q\210\316\317\211\317\320%\210*\210\211\262
\321\236A\211\205l\307\322!\323!\311\312\313\"\314\324\"\216r\211q\210\325!c\210)r\211q\210\316\317\211\317\320%\210*\210
\266\202\262
\326\327\330\331\nF\332\333\334
!\"C#\335#\336\203\245\311\337\313\"r\211q\210\314\340\"\216\341p#\210\342 *\262
\202\251\343\344\"\211\205-
\345	\235?\205-
\346	\235\204
\347	\235\204
\350	\235\204
\351	\235\204
\352	\235\204
\353	\235\204
\354	\235\204\373\355	\235\204\373\356	\235\204\373\357	\235\203
\360	\235\204
\211\202-
\307\361!\311\312\313\"\314\362\"\216r\211q\210c\210)r\211q\210\316\317\211\317\320%\210*\210\363
!\262
\262
\364\365\236A\366\f\236A\"\364\367\f\236A\370
\236A\"#\207" [org-babel-awk-command message "executing Awk source code block" :result-params :cmd-line :in-file org-babel-expand-body:awk org-babel-temp-file "awk-" generate-new-buffer " *temp file*" t make-closure #[0 "\301\300!\205	\302\300!\207" [V0 buffer-name kill-buffer] 2] write-region nil 0 :stdin "awk-stdin-" org-babel-ref-resolve #[0 "\301\300!\205	\302\300!\207" [V0 buffer-name kill-buffer] 2] org-babel-awk-var-to-awk mapconcat identity append "-f" mapcar #[257 "\300\301@\302A!#\207" [format "-v %s='%s'" org-babel-awk-var-to-awk] 6 "\n\n(fn PAIR)"] org-babel--get-vars " " org-babel-reassemble-table " *temp*" #[0 "\301\300!\205	\302\300!\207" [V0 buffer-name kill-buffer] 2] call-process-shell-command buffer-string org-babel-eval "" "none" "scalar" "verbatim" "html" "code" "pp" "file" "output" "raw" "org" "drawer" "table" "awk-results-" #[0 "\301\300!\205	\302\300!\207" [V0 buffer-name kill-buffer] 2] org-babel-import-elisp-from-file org-babel-pick-name :colname-names :colnames :rowname-names :rownames] 19 (#$ . 467)])
#@86 Return a printed value of VAR suitable for parsing with awk.

(fn VAR &optional SEP)
(defalias 'org-babel-awk-var-to-awk #[513 "\300<\203@<\203\301\302\206\303\304F\"\207<\203$\305
\306#\207\211!\207" [#[257 "\211;\203\207\300\301\"\207" [format "%S"] 4 "\n\n(fn V)"] orgtbl-to-generic :sep "	" :fmt mapconcat "\n"] 9 (#$ . 2512)])
(provide 'ob-awk)