;ELC   
;;; Compiled
;;; in Emacs version 24.5.1
;;; 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.

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


(require 'ob)
#@37 Name of the sed executable command.
(defvar org-babel-sed-command "sed" (#$ . 424))
(add-to-list 'org-babel-tangle-lang-exts '("sed" . "sed"))
#@32 Sed specific header arguments.
(defconst org-babel-header-args:sed '((:cmd-line . :any) (:in-file . :any)) (#$ . 573))
#@54 Default arguments for evaluating a sed source block.
(defvar org-babel-default-header-args:sed nil (#$ . 698))
#@221 Execute a block of sed code with Org Babel.
BODY is the source inside a sed source block and PARAMS is an
association list over the source block configurations.  This
function is called by `org-babel-execute-src-block'.
(defalias 'org-babel-execute:sed #[(body params) "\306\307!\210\310\236A\311\236A\312\236A\313\314!\211\315\316\317!!:\320\216rq\210;c\210)rq\210\321\322\211:\322\323%\210,\f)<\324\236A\211=\205z \313\325!\326=!>\211?\315\316\317!!@A\327\216r@q\210>c\210)r@q\210\321\322\211A\322\323%\210,?*)=\330\331\332\322B\333\334<\"\nF\"\335#C\336=\203\260 \337\340!DrDq\210\341\216\342C=p#\210\343 +\202\265 \344C\345\"\211E\205H	F\346F\235?\205G\347F\235\204\350F\235\204\351F\235\204\352F\235\204\353F\235\204\354F\235\204\355F\235\204\f\356F\235\204\f\357F\235\204\f\360F\235\203\361F\235\204E\202G\313\362!\211?\315\316\317!!GH\363\216rGq\210Ec\210)rGq\210\321\322\211H\322\323%\210,\364?!)))\365\366\236A\367\236A\"\365\370\236A\371\236A\"#.\207" [params result-params cmd-line in-file file #1=#:temp-buffer message "executing sed source code block" :result-params :cmd-line :in-file org-babel-temp-file "sed-" get-buffer-create generate-new-buffer-name " *temp file*" ((byte-code "\301!\203\n \302!\210\301\207" [#1# buffer-name kill-buffer] 2)) write-region nil 0 :stdin "sed-stdin-" org-babel-ref-resolve ((byte-code "\301!\203\n \302!\210\301\207" [#2=#:temp-buffer buffer-name kill-buffer] 2)) mapconcat identity remq format "--file=\"%s\"" " " org-babel-reassemble-table generate-new-buffer " *temp*" ((byte-code "\301!\203\n \302!\210\301\207" [#3=#:temp-buffer 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" "sed-results-" ((byte-code "\301!\203\n \302!\210\301\207" [#4=#:temp-buffer buffer-name kill-buffer] 2)) org-babel-import-elisp-from-file org-babel-pick-name :colname-names :colnames :rowname-names :rownames #5=#:temp-file body code-file stdin res tmp #2# #6=#:temp-file org-babel-sed-command cmd #3# results #7=#:--params #4# #8=#:temp-file] 9 (#$ . 816)])
(provide 'ob-sed)
