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



(byte-code "\300\301!\210\300\302!\210\303\304\305\"\207" [require ob sha1 add-to-list org-babel-tangle-lang-exts ("processing" . "pde")] 3)
#@62 Default arguments when evaluating a Processing source block.
(defvar org-babel-default-header-args:processing '((:results . "html") (:exports . "results")) (#$ . 225))
#@37 Filename of the processing.js file.
(defvar org-babel-processing-processing-js-filename "processing.js" (#$ . 399))
#@76 Show the sketch of the Processing block under point in an external viewer.
(defalias 'org-babel-processing-view-sketch #[0 "\303\304!\210\305 \211@\306\230\203r\211A@\307\3108!\311\312!#\313\314\306\315\"\262
\316\317!\313\315\320#)\266\203\203>\321
!\210\202\211\262
\211\322\317!\323R\324\325\315\"\326\327\"\216r\211q\210c\210)r\211q\210\330\313\211\313\331%\210*\210\332
!\210\333 \210\334 )\207\335\336!\207" [org-babel-temporary-directory temporary-file-directory inhibit-changing-match-data require processing-mode org-babel-get-src-block-info "processing" org-babel-process-params 2 org-babel-expand-body:generic org-babel-variable-assignments:processing nil make-temp-file t "-" file-name-nondirectory string-match delete-directory "/" ".pde" generate-new-buffer " *temp file*" make-closure #[0 "\301\300!\205	\302\300!\207" [V0 buffer-name kill-buffer] 2] write-region 0 find-file processing-sketch-run kill-buffer message "Not inside a Processing source block."] 13 (#$ . 521) nil])
#@113 Execute a block of Processing code.
This function is called by `org-babel-execute-src-block'.

(fn BODY PARAMS)
(defalias 'org-babel-execute:processing #[514 "\301\302!#\303\304!P\305\306\307\310\311\260	\207" [org-babel-processing-processing-js-filename org-babel-expand-body:generic org-babel-variable-assignments:processing "ob-" sha1 "<script src=\"" "\"></script>\n <script type=\"text/processing\" data-processing-target=\"" "\">\n" "\n</script> <canvas id=\"" "\"></canvas>"] 13 (#$ . 1542)])
#@116 Return an error if the :session header argument is set.
Processing does not support sessions.

(fn SESSION PARAMS)
(defalias 'org-babel-prep-session:processing #[514 "\300\301!\207" [error "Processing does not support sessions"] 4 (#$ . 2059)])
#@84 Return list of processing statements assigning the block's variables.

(fn PARAMS)
(defalias 'org-babel-variable-assignments:processing #[257 "\300\301\302!\"\207" [mapcar org-babel-processing-var-to-processing org-babel--get-vars] 5 (#$ . 2310)])
#@159 Convert an elisp value into a Processing variable.
The elisp value PAIR is converted into Processing code specifying
a variable of the same value.

(fn PAIR)
(defalias 'org-babel-processing-var-to-processing #[257 "\211@
A\2119\203\300
!\202\211\262
\211\250\203\301\302#\207\303
!\203)\301\304#\207\211;\2034\301\305#\207\211<\203]\211@<\204]\306
!\211\307=\203L\310\202M\311\312\313\314\"\315#\301\316$\207\211<\205\201\306
!\211\307=\203o\310\202p\311\312\313\317\"\320#\301\321$\266\203\207" [symbol-name format "int %S=%S;" floatp "float %S=%S;" "String %S=\"%s\";" org-babel-processing-define-type String "\"%s\"" "%s" mapconcat make-closure #[257 "\301\300\"\207" [V0 format] 4 "\n\n(fn E)"] ", " "%s[] %S={%s};" #[257 "\301\302\303\304\300\"\305#\306Q\207" [V0 "{" mapconcat make-closure #[257 "\301\300\"\207" [V0 format] 4 "\n\n(fn E)"] ", " "}"] 6 "\n\n(fn ROW)"] "," "%S[][] %S={%s};"] 11 (#$ . 2566)])
#@209 Determine type of DATA.

DATA is a list.  Return type as a symbol.

The type is `String' if any element in DATA is a string.
Otherwise, it is either `float', if some elements are floats, or
`int'.

(fn DATA)
(defalias 'org-babel-processing-define-type #[257 "\300C\301C\211\302\303#\240\210\3042\211\242!0\207" [int nil make-closure #[257 "\211\211\2034\211@\211<\203\300\301\242!\240\210\202-\211;\203#\302\303\304\"\210\202-\305
!\203-\300\306\240\210
A\266\202\202
\300\242\207" [V0 V1 throw exit String floatp float] 6 "\n\n(fn ROW)"] exit] 8 (#$ . 3524)])
(provide 'ob-processing)