Gecko [ goons4good.org ]

Name	Size	Permission	Date
ob-C.elc	5.8 KB	-rw-r--r--	2023-06-07 04:05
ob-R.elc	12.73 KB	-rw-r--r--	2023-06-07 04:05
ob-asymptote.elc	3.74 KB	-rw-r--r--	2023-06-07 04:05
ob-awk.elc	3.67 KB	-rw-r--r--	2023-06-07 04:05
ob-calc.elc	2.33 KB	-rw-r--r--	2023-06-07 04:05
ob-clojure.elc	2.28 KB	-rw-r--r--	2023-06-07 04:05
ob-comint.elc	5.39 KB	-rw-r--r--	2023-06-07 04:05
ob-css.elc	1015 B	-rw-r--r--	2023-06-07 04:05
ob-ditaa.elc	2.24 KB	-rw-r--r--	2023-06-07 04:05
ob-dot.elc	2.26 KB	-rw-r--r--	2023-06-07 04:05
ob-emacs-lisp.elc	2 KB	-rw-r--r--	2023-06-07 04:05
ob-eval.elc	6.81 KB	-rw-r--r--	2023-06-07 04:05
ob-exp.elc	11.14 KB	-rw-r--r--	2023-06-07 04:05
ob-fortran.elc	5.01 KB	-rw-r--r--	2023-06-07 04:05
ob-gnuplot.elc	7.35 KB	-rw-r--r--	2023-06-07 04:05
ob-haskell.elc	8.04 KB	-rw-r--r--	2023-06-07 04:05
ob-io.elc	3.54 KB	-rw-r--r--	2023-06-07 04:05
ob-java.elc	2.21 KB	-rw-r--r--	2023-06-07 04:05
ob-js.elc	5.71 KB	-rw-r--r--	2023-06-07 04:05
ob-keys.elc	2.9 KB	-rw-r--r--	2023-06-07 04:05
ob-latex.elc	5.73 KB	-rw-r--r--	2023-06-07 04:05
ob-ledger.elc	2.01 KB	-rw-r--r--	2023-06-07 04:05
ob-lilypond.elc	13.27 KB	-rw-r--r--	2023-06-07 04:05
ob-lisp.elc	2.75 KB	-rw-r--r--	2023-06-07 04:05
ob-lob.elc	5.11 KB	-rw-r--r--	2023-06-07 04:05
ob-matlab.elc	644 B	-rw-r--r--	2023-06-07 04:05
ob-maxima.elc	3.78 KB	-rw-r--r--	2023-06-07 04:05
ob-mscgen.elc	1.54 KB	-rw-r--r--	2023-06-07 04:05
ob-ocaml.elc	4.9 KB	-rw-r--r--	2023-06-07 04:05
ob-octave.elc	10.16 KB	-rw-r--r--	2023-06-07 04:05
ob-org.elc	1.81 KB	-rw-r--r--	2023-06-07 04:05
ob-perl.elc	3.35 KB	-rw-r--r--	2023-06-07 04:05
ob-picolisp.elc	4.65 KB	-rw-r--r--	2023-06-07 04:05
ob-plantuml.elc	2.41 KB	-rw-r--r--	2023-06-07 04:05
ob-python.elc	10.22 KB	-rw-r--r--	2023-06-07 04:05
ob-ref.elc	6.52 KB	-rw-r--r--	2023-06-07 04:05
ob-ruby.elc	8.15 KB	-rw-r--r--	2023-06-07 04:05
ob-sass.elc	1.87 KB	-rw-r--r--	2023-06-07 04:05
ob-scala.elc	3.72 KB	-rw-r--r--	2023-06-07 04:05
ob-scheme.elc	4.81 KB	-rw-r--r--	2023-06-07 04:05
ob-screen.elc	4.45 KB	-rw-r--r--	2023-06-07 04:05
ob-sh.elc	8.2 KB	-rw-r--r--	2023-06-07 04:05
ob-shen.elc	1.95 KB	-rw-r--r--	2023-06-07 04:05
ob-sql.elc	4.43 KB	-rw-r--r--	2023-06-07 04:05
ob-sqlite.elc	4.53 KB	-rw-r--r--	2023-06-07 04:05
ob-table.elc	3.06 KB	-rw-r--r--	2023-06-07 04:05
ob-tangle.elc	15.92 KB	-rw-r--r--	2023-06-07 04:05
ob.elc	83.02 KB	-rw-r--r--	2023-06-07 04:05
org-agenda.elc	332.2 KB	-rw-r--r--	2023-06-07 04:05
org-archive.elc	15.6 KB	-rw-r--r--	2023-06-07 04:05
org-ascii.elc	20.83 KB	-rw-r--r--	2023-06-07 04:05
org-attach.elc	15.96 KB	-rw-r--r--	2023-06-07 04:05
org-bbdb.elc	9.43 KB	-rw-r--r--	2023-06-07 04:05
org-beamer.elc	22.08 KB	-rw-r--r--	2023-06-07 04:06
org-bibtex.elc	22.8 KB	-rw-r--r--	2023-06-07 04:06
org-capture.elc	50.89 KB	-rw-r--r--	2023-06-07 04:06
org-clock.elc	82.74 KB	-rw-r--r--	2023-06-07 04:06
org-colview.elc	48.44 KB	-rw-r--r--	2023-06-07 04:06
org-compat.elc	13.95 KB	-rw-r--r--	2023-06-07 04:06
org-crypt.elc	6.28 KB	-rw-r--r--	2023-06-07 04:06
org-ctags.elc	12.31 KB	-rw-r--r--	2023-06-07 04:06
org-datetree.elc	5.63 KB	-rw-r--r--	2023-06-07 04:06
org-docbook.elc	37.55 KB	-rw-r--r--	2023-06-07 04:06
org-docview.elc	1.72 KB	-rw-r--r--	2023-06-07 04:06
org-element.elc	112.74 KB	-rw-r--r--	2023-06-07 04:06
org-entities.elc	24.46 KB	-rw-r--r--	2023-06-07 04:06
org-eshell.elc	1.72 KB	-rw-r--r--	2023-06-07 04:06
org-exp-blocks.elc	11.32 KB	-rw-r--r--	2023-06-07 04:06
org-exp.elc	101.9 KB	-rw-r--r--	2023-06-07 04:06
org-faces.elc	27.45 KB	-rw-r--r--	2023-06-07 04:06
org-feed.elc	18.7 KB	-rw-r--r--	2023-06-07 04:06
org-footnote.elc	23.09 KB	-rw-r--r--	2023-06-07 04:06
org-freemind.elc	27.16 KB	-rw-r--r--	2023-06-07 04:07
org-gnus.elc	9.12 KB	-rw-r--r--	2023-06-07 04:07
org-habit.elc	11.52 KB	-rw-r--r--	2023-06-07 04:07
org-html.elc	78.9 KB	-rw-r--r--	2023-06-07 04:07
org-icalendar.elc	22.37 KB	-rw-r--r--	2023-06-07 04:07
org-id.elc	19.69 KB	-rw-r--r--	2023-06-07 04:07
org-indent.elc	15.89 KB	-rw-r--r--	2023-06-07 04:07
org-info.elc	1.61 KB	-rw-r--r--	2023-06-07 04:07
org-inlinetask.elc	12.14 KB	-rw-r--r--	2023-06-07 04:07
org-install.el	452 B	-rw-r--r--	2013-02-07 02:17
org-irc.elc	5.82 KB	-rw-r--r--	2023-06-07 04:07
org-jsinfo.elc	7.39 KB	-rw-r--r--	2023-06-07 04:07
org-latex.elc	82.79 KB	-rw-r--r--	2023-06-07 04:07
org-list.elc	83.65 KB	-rw-r--r--	2023-06-07 04:07
org-loaddefs.el	77.97 KB	-rw-r--r--	2013-03-08 03:16
org-lparse.elc	64.82 KB	-rw-r--r--	2023-06-07 04:07
org-mac-message.elc	6.3 KB	-rw-r--r--	2023-06-07 04:07
org-macs.elc	15.89 KB	-rw-r--r--	2023-06-07 04:07
org-mew.elc	3.1 KB	-rw-r--r--	2023-06-07 04:07
org-mhe.elc	5.49 KB	-rw-r--r--	2023-06-07 04:07
org-mks.elc	3.52 KB	-rw-r--r--	2023-06-07 04:08
org-mobile.elc	35.47 KB	-rw-r--r--	2023-06-07 04:08
org-mouse.elc	31.66 KB	-rw-r--r--	2023-06-07 04:08
org-odt.elc	94.04 KB	-rw-r--r--	2023-06-07 04:08
org-pcomplete.elc	10.83 KB	-rw-r--r--	2023-06-07 04:08
org-plot.elc	9.96 KB	-rw-r--r--	2023-06-07 04:08
org-protocol.elc	18.56 KB	-rw-r--r--	2023-06-07 04:08
org-publish.elc	39.08 KB	-rw-r--r--	2023-06-07 04:08
org-remember.elc	36.16 KB	-rw-r--r--	2023-06-07 04:08
org-rmail.elc	2.84 KB	-rw-r--r--	2023-06-07 04:08
org-special-blocks.elc	2.76 KB	-rw-r--r--	2023-06-07 04:08
org-src.elc	32.03 KB	-rw-r--r--	2023-06-07 04:08
org-table.elc	161.1 KB	-rw-r--r--	2023-06-07 04:08
org-taskjuggler.elc	17.22 KB	-rw-r--r--	2023-06-07 04:08
org-timer.elc	12.76 KB	-rw-r--r--	2023-06-07 04:08
org-version.el	718 B	-rw-r--r--	2013-02-28 01:01
org-vm.elc	4.16 KB	-rw-r--r--	2023-06-07 04:08
org-w3m.elc	4.29 KB	-rw-r--r--	2023-06-07 04:08
org-wl.elc	7.07 KB	-rw-r--r--	2023-06-07 04:08
org-xoxo.elc	2.49 KB	-rw-r--r--	2023-06-07 04:09
org.elc	732.44 KB	-rw-r--r--	2023-06-07 04:09

Rename

;ELC���
;;; Compiled by mockbuild@buildfarm06.corp.cloudlinux.com on Wed Jun  7 08:05:17 2023
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/org/ob-haskell.el
;;; in Emacs version 24.3.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.

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

(byte-code "\300\301!\210\300\302!\210\300\303!\210\304\305\306\"\207" [require ob ob-comint comint add-to-list org-babel-tangle-lang-exts ("haskell" . "hs")] 3)
(defvar org-babel-default-header-args:haskell nil)
(defvar org-babel-haskell-lhs2tex-command "lhs2tex")
(defvar org-babel-haskell-eoe "\"org-babel-haskell-eoe\"")
#@34 Execute a block of Haskell code.
(defalias 'org-babel-execute:haskell #[(body params) "\306\307\"A\310\311\312\313\"\"\306\314\"A\315\f\316!#\317	\"\212\320 2\321\216\322	!\2043�\323\324	\"\210	q\210\325\326\211345\3276B6\330\216\331\332p!!b\210`d7\21187{487|\210*\333
!c\210\334\326\335\"\2109c\210\334\326\335\"\210:b\210\212\336\3379!\326\335#\205\212�\336;\326\335#)\204\227�\340\332p!!\210\202t�\331\332p!!b\2104c\210)
\203\301�\341\342\343\344\337
\206\261�\325!#5\"\203\301�5\345\225\326O3\3465;\".3\310\3479\350\310\3333\"!\235A\"<\351\352\232\203\356�\353\354\350<A!\343#\202\371�\355\232\205\371�\356<@!\357\306\360\"A\306\360\"A\"\357\306\361\"A\306\361\"A\"#.\207" [params session vars result-type body full-body assoc :session mapcar cdr org-babel-get-header :var :result-type org-babel-expand-body:generic org-babel-variable-assignments:haskell org-babel-haskell-initiate-session match-data ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) org-babel-comint-buffer-livep error "Buffer %s does not exist or has no process" "" nil #[(text) "	P\211\207" [string-buffer text] 2] ((byte-code "A\301\207" [comint-output-filter-functions nil] 1)) process-mark get-buffer-process org-babel-trim comint-send-input t re-search-forward regexp-quote accept-process-output string-match replace-regexp-in-string "\n" "[
\n]+" 0 split-string org-babel-haskell-read-string reverse org-babel-reassemble-table output mapconcat identity value org-babel-haskell-table-or-string org-babel-pick-name :colname-names :rowname-names save-match-data-internal raw dangling-text string-buffer comint-output-filter-functions end start org-babel-haskell-eoe comint-last-input-end comint-prompt-regexp results] 9 (#$ . 878)])
#@41 Strip \"s from around a haskell string.
(defalias 'org-babel-haskell-read-string #[(string) "\301\302\"\203\f�\303\304\"\207\207" [string string-match "^\"\$[^�]+\$\"$" match-string 1] 3 (#$ . 2680)])
#@140 Initiate a haskell session.
If there is not a current inferior-process-buffer in SESSION
then create one.  Return the initialized session.
(defalias 'org-babel-haskell-initiate-session #[(&optional session params) "\301\302!\210\303\304!\206�\305 \306\216\307 \210\310\311!\210p*\207" [#1=#:wconfig require inf-haskell get-buffer "*haskell*" current-window-configuration ((set-window-configuration #1#)) run-haskell sleep-for 0.25] 2 (#$ . 2893)])
#@25 Load BODY into SESSION.
(defalias 'org-babel-load-session:haskell #[(session body params) "\306 \307\216\310	\n\"\311\312!\313P\314\315!r
q\210\316\216c\210\317\f!\210\320 \210\321 \210+,\207" [#1=#:wconfig session params buffer load-file #2=#:temp-buffer current-window-configuration ((set-window-configuration #1#)) org-babel-prep-session:haskell org-babel-temp-file "haskell-load-" ".hs" generate-new-buffer " *temp*" ((byte-code "\301!\203\n�\302!\210\301\207" [#2# buffer-name kill-buffer] 2)) write-file haskell-mode inferior-haskell-load-file body] 3 (#$ . 3349)])
#@62 Prepare SESSION according to the header arguments in PARAMS.
(defalias 'org-babel-prep-session:haskell #[(session params) "\305 \306\216\307	!\212\310 \311\216\312\n!\204�\313\314\n\"\210\nq\210\315\316\317\f!\"\210+p+\207" [#1=#:wconfig session buffer save-match-data-internal params current-window-configuration ((set-window-configuration #1#)) org-babel-haskell-initiate-session match-data ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) org-babel-comint-buffer-livep error "Buffer %s does not exist or has no process" mapc #[(line) "c\210\301\302\303\"\207" [line comint-send-input nil t] 3] org-babel-variable-assignments:haskell] 4 (#$ . 3936)])
#@68 Return list of haskell statements assigning the block's variables.
(defalias 'org-babel-variable-assignments:haskell #[(params) "\301\302\301\303\304\305\"\"\"\207" [params mapcar #[(pair) "\301\302@\303A!#\207" [pair format "let %s = %s" org-babel-haskell-var-to-haskell] 5] cdr org-babel-get-header :var] 7 (#$ . 4637)])
#@167 Convert RESULTS to an Emacs-lisp table or string.
If RESULTS look like a table, then convert them into an
Emacs-lisp table, otherwise return the results as a string.
(defalias 'org-babel-haskell-table-or-string #[(results) "\301!\207" [results org-babel-script-escape] 2 (#$ . 4970)])
#@156 Convert an elisp value VAR into a haskell variable.
The elisp VAR is converted to a string of haskell source code
specifying a variable of the same value.
(defalias 'org-babel-haskell-var-to-haskell #[(var) "<\203�\301\302\303\304#\305Q\207\306\307\"\207" [var "[" mapconcat org-babel-haskell-var-to-haskell ", " "]" format "%S"] 5 (#$ . 5263)])
#@401 Export to a .lhs file with all haskell code blocks escaped.
When called with a prefix argument the resulting
.lhs file will be exported to a .tex file.  This function will
create two new files, base-name.lhs and base-name.tex where
base-name is the name of the current org-mode file.

Note that all standard Babel literate programming
constructs (header arguments, no-web syntax etc...) are ignored.
(defalias 'org-babel-haskell-export-to-lhs #[(&optional arg) "\306 \307\310\311 !\312\313!\211\314P\315P\n\316P5\n\315P67\317\3205!\321\3206!\26089:\322;\f\323\324\325!!<=\326\216r<q\210c\210eb\210\327	\322\330#\203\227�\331 >\332\216\333\334!G;*\335\331 >\336\216\337:\204y�\340\341\333\342!\"\203�\333\343!\202\204�\344\333\343!!\345Q*\330\211#\210\346\347\224\347\225;#\210\202N�)r<q\210\350\322\211=\322\347%\210,\212\351\f!\210\352\322!\210\353\322!\210\354\f!\210\351
!\210eb\210\342y\210\355c\210\327\356\322\330#\203\341�\335\331 >\357\216\344\333\347!!*\330\211#\210\202\305�\306 \360 \210\353\322!\210)\354
!\2105\323\324\325!!?@\361\216r?q\210c\210)r?q\210\350\322\211@\322\347%\210,A\204!\3515!\2020\362\3638\"\210\3648!\210\3516!.\207" [contents haskell-regexp base-name tmp-file tmp-org-file tmp-tex-file buffer-string "^\$[ 	]*\$#\\+begin_src[ 	]haskell*\$.*\$?[
\n]\$[^�]*?\$[
\n][ 	]*#\\+end_src.*" file-name-sans-extension buffer-file-name org-babel-temp-file "haskell-" ".org" ".tex" ".lhs" " " org-babel-process-file-name " > " nil get-buffer-create generate-new-buffer-name " *temp file*" ((byte-code "\301!\203\n�\302!\210\301\207" [#1=#:temp-buffer buffer-name kill-buffer] 2)) re-search-forward t match-data ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) match-string 1 replace-match ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) "#+begin_latex\n\\begin{code}\n" string-match "-i" 2 3 org-remove-indentation "\n\\end{code}\n#+end_latex\n" indent-code-rigidly 0 write-region find-file org-export-as-latex kill-buffer delete-file "%include polycode.fmt\n" "^[ 	]+\\\\begin{code}[^�]+\\\\end{code}" ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) save-buffer ((byte-code "\301!\203\n�\302!\210\301\207" [#2=#:temp-buffer buffer-name kill-buffer] 2)) message "running %s" shell-command lhs-file tex-file org-babel-haskell-lhs2tex-command command org-src-preserve-indentation preserve-indentp indentation #1# #3=#:temp-file save-match-data-internal #2# #4=#:temp-file arg] 7 (#$ . 5620) "P"])
(provide 'ob-haskell)