Current File : //kunden/usr/share/emacs/27.2/lisp/org/ob-io.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\302\303\304\"\207" [require ob add-to-list org-babel-tangle-lang-exts ("io" . "io")] 3)
(defvar org-babel-default-header-args:io nil)
#@51 Name of the command to use for executing Io code.
(defvar org-babel-io-command "io" (#$ . 568))
#@120 Execute a block of Io code with org-babel.
This function is called by `org-babel-execute-src-block'.

(fn BODY PARAMS)
(defalias 'org-babel-execute:io #[514 "\300\301!\210\302
!\303
@!\3048\305\236A\306\"\307$\310
\311\312\n\236A\313\236A\"\311\314\236A\315\f\236A\"#\207" [message "executing Io source code block" org-babel-process-params org-babel-io-initiate-session 2 :result-type org-babel-expand-body:generic org-babel-io-evaluate org-babel-reassemble-table org-babel-pick-name :colname-names :colnames :rowname-names :rownames] 15 (#$ . 671)])
(defvar org-babel-io-wrapper-method "(\n%s\n) asString print\n")
#@258 Evaluate BODY in external Io process.
If RESULT-TYPE equals `output' then return standard output as a string.
If RESULT-TYPE equals `value' then return the value of the last statement
in BODY as elisp.

(fn SESSION BODY &optional RESULT-TYPE RESULT-PARAMS)
(defalias 'org-babel-io-evaluate #[1026 "\203\302\303!\210
\304\267\202\326\305
\235\203\306\"\207\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\306\324Q\325\"\207\307\310!\326	\"
\311\312!\313\314\315\316\317!\327\"\321$\216r\211q\210c\210)r\211q\210\322\323\211\323\314%\210*\266\306\324Q\325\"\330
\235?\205\321\331
\235\204\312\332
\235\204\312\333
\235\204\312\334
\235\204\312\335
\235\204\312\336
\235\204\312\337
\235\204\304\340
\235\204\304\341
\235\204\304\342
\235\203\316\343
\235\204\316
\202\321\344!\262
\262
\207\323\207" [org-babel-io-command org-babel-io-wrapper-method error "Sessions are not (yet) supported for Io" #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (output 14 value 75)) "repl" org-babel-eval org-babel-temp-file "io-" 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 " " "" format [buffer-name kill-buffer] "none" "scalar" "verbatim" "html" "code" "pp" "file" "output" "raw" "org" "drawer" "table" org-babel-script-escape] 14 (#$ . 1311)])
#@93 Prepare SESSION according to the header arguments specified in PARAMS.

(fn SESSION PARAMS)
(defalias 'org-babel-prep-session:io #[514 "\300\301!\207" [error "Sessions are not (yet) supported for Io"] 4 (#$ . 2786)])
#@167 If there is not a current inferior-process-buffer in SESSION
then create.  Return the initialized session.  Sessions are not
supported in Io.

(fn &optional SESSION)
(defalias 'org-babel-io-initiate-session #[256 "\300\207" [nil] 2 (#$ . 3010)])
(provide 'ob-io)