%PDF- %PDF-
Mini Shell

Mini Shell

Direktori : /usr/local/share/emacs/27.2/lisp/org/
Upload File :
Create Path :
Current File : //usr/local/share/emacs/27.2/lisp/org/ob-awk.elc

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

;;; This file uses dynamic docstrings, first added in Emacs 19.29.

;;; This file does not contain utf-8 non-ASCII characters,
;;; and so can be loaded in Emacs versions earlier than 23.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


(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" (#$ . 548))
#@78 Expand BODY according to PARAMS, return the expanded body.

(fn BODY PARAMS)
(defalias 'org-babel-expand-body:awk #[514 "\207" [] 3 (#$ . 638)])
#@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!\211\311\312!\313\314\315\316\317!\320\"\321$\216r\211q\210c\210)r\211q\210\322\323\211\323\314%\210*\266\211\262\324\236A\211\205|\307\325!\326!\311\312!\313\314\315\316\317!\327\"\321$\216r\211q\210\330!c\210)r\211q\210\322\323\211\323\314%\210*\266\266\202\262\331\332\333\334\nF\335\336\337
!\"C#\340#\341\203\273\311\342!r\211q\210\313\314\315\316\317!\343\"\321$\216\344p#\210\345 *\262\202\277\346\347\"\211\205C\350\235?\205A\351\235\204\352\235\204\353\235\204\354\235\204\355\235\204\356\235\204\357\235\204\360\235\204\361\235\204\362\235\203\363\235\204\202A\307\364!\211\311\312!\313\314\315\316\317!\365\"\321$\216r\211q\210c\210)r\211q\210\322\323\211\323\314%\210*\266\366!\262\262\262\367\370\236A\371\f\236A\"\367\372\f\236A\373
\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*" make-byte-code 0 "\301\300!\205	\302\300!\207" vconcat vector [buffer-name kill-buffer] 2 write-region nil :stdin "awk-stdin-" org-babel-ref-resolve [buffer-name kill-buffer] 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*" [buffer-name kill-buffer] call-process-shell-command buffer-string org-babel-eval "" "none" "scalar" "verbatim" "html" "code" "pp" "file" "output" "raw" "org" "drawer" "table" "awk-results-" [buffer-name kill-buffer] org-babel-import-elisp-from-file org-babel-pick-name :colname-names :colnames :rowname-names :rownames] 21 (#$ . 791)])
#@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\"\202+<\203(\305\306#\202+\211!\207" [#[257 "\211;\203\207\300\301\"\207" [format "%S"] 4 "\n\n(fn V)"] orgtbl-to-generic :sep "	" :fmt mapconcat "\n"] 9 (#$ . 2783)])
(provide 'ob-awk)

Zerion Mini Shell 1.0