blob: 3dbdc4664807d00d3aa6a047332bc6373e65b933 (plain)

ofs	hex dump	ascii
0000	3b 45 4c 43 17 00 00 00 0a 3b 3b 3b 20 43 6f 6d 70 69 6c 65 64 20 62 79 20 6c 75 6b 65 40 48 50	;ELC.....;;;.Compiled.by.luke@HP
0020	2d 64 76 36 34 32 36 75 73 2d 75 31 30 31 30 20 6f 6e 20 53 75 6e 20 46 65 62 20 32 37 20 31 32	-dv6426us-u1010.on.Sun.Feb.27.12
0040	3a 35 37 3a 32 38 20 32 30 31 31 0a 3b 3b 3b 20 66 72 6f 6d 20 66 69 6c 65 20 2f 68 6f 6d 65 2f	:57:28.2011.;;;.from.file./home/
0060	6c 75 6b 65 2f 2e 65 6d 61 63 73 2e 64 2f 6f 72 67 2d 37 2e 34 2f 6c 69 73 70 2f 6f 62 2d 68 61	luke/.emacs.d/org-7.4/lisp/ob-ha
0080	73 6b 65 6c 6c 2e 65 6c 0a 3b 3b 3b 20 69 6e 20 45 6d 61 63 73 20 76 65 72 73 69 6f 6e 20 32 33	skell.el.;;;.in.Emacs.version.23
00a0	2e 31 2e 31 0a 3b 3b 3b 20 77 69 74 68 20 61 6c 6c 20 6f 70 74 69 6d 69 7a 61 74 69 6f 6e 73 2e	.1.1.;;;.with.all.optimizations.
00c0	0a 0a 3b 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 75 73 65 73 20 64 79 6e 61 6d 69 63 20 64 6f 63	..;;;.This.file.uses.dynamic.doc
00e0	73 74 72 69 6e 67 73 2c 20 66 69 72 73 74 20 61 64 64 65 64 20 69 6e 20 45 6d 61 63 73 20 31 39	strings,.first.added.in.Emacs.19
0100	2e 32 39 2e 0a 28 69 66 20 28 61 6e 64 20 28 62 6f 75 6e 64 70 20 27 65 6d 61 63 73 2d 76 65 72	.29..(if.(and.(boundp.'emacs-ver
0120	73 69 6f 6e 29 0a 09 20 28 3c 20 28 61 72 65 66 20 65 6d 61 63 73 2d 76 65 72 73 69 6f 6e 20 28	sion)...(<.(aref.emacs-version.(
0140	31 2d 20 28 6c 65 6e 67 74 68 20 65 6d 61 63 73 2d 76 65 72 73 69 6f 6e 29 29 29 20 3f 41 29 0a	1-.(length.emacs-version))).?A).
0160	09 20 28 6f 72 20 28 61 6e 64 20 28 62 6f 75 6e 64 70 20 27 65 70 6f 63 68 3a 3a 76 65 72 73 69	..(or.(and.(boundp.'epoch::versi
0180	6f 6e 29 20 65 70 6f 63 68 3a 3a 76 65 72 73 69 6f 6e 29 0a 09 20 20 20 20 20 28 73 74 72 69 6e	on).epoch::version).......(strin
01a0	67 2d 6c 65 73 73 70 20 65 6d 61 63 73 2d 76 65 72 73 69 6f 6e 20 22 31 39 2e 32 39 22 29 29 29	g-lessp.emacs-version."19.29")))
01c0	0a 20 20 20 20 28 65 72 72 6f 72 20 22 60 6f 62 2d 68 61 73 6b 65 6c 6c 2e 65 6c 27 20 77 61 73	.....(error."`ob-haskell.el'.was
01e0	20 63 6f 6d 70 69 6c 65 64 20 66 6f 72 20 45 6d 61 63 73 20 31 39 2e 32 39 20 6f 72 20 6c 61 74	.compiled.for.Emacs.19.29.or.lat
0200	65 72 22 29 29 0a 0a 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b	er"))..;;;;;;;;;;;;;;;;;;;;;;;;;
0220	3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
0240	3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 0a 0a 0a 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 31 5c 33 30	;;;;;;;;;;...(byte-code."\301\30
0260	32 21 5c 32 31 30 5c 33 30 31 5c 33 30 33 21 5c 32 31 30 5c 33 30 31 5c 33 30 34 21 5c 32 31 30	2!\210\301\303!\210\301\304!\210
0280	5c 33 30 35 5c 33 30 36 5c 33 30 37 5c 22 5c 32 31 30 5c 33 31 30 08 42 10 5c 33 31 31 5c 33 31	\305\306\307\"\210\310.B.\311\31
02a0	30 21 5c 32 30 34 20 00 5c 33 31 32 5c 33 31 30 5c 33 31 33 5c 22 5c 32 31 30 5c 33 31 34 08 42	0!\204..\312\310\313\"\210\314.B
02c0	10 5c 33 31 31 5c 33 31 34 21 5c 32 30 34 2f 00 5c 33 31 32 5c 33 31 34 5c 33 31 35 5c 22 5c 32	.\311\314!\204/.\312\314\315\"\2
02e0	31 30 5c 33 31 36 08 42 10 5c 33 31 31 5c 33 31 36 21 5c 32 30 34 3e 00 5c 33 31 32 5c 33 31 36	10\316.B.\311\316!\204>.\312\316
0300	5c 33 31 37 5c 22 5c 32 31 30 5c 33 31 33 5c 32 30 37 22 20 5b 63 75 72 72 65 6e 74 2d 6c 6f 61	\317\"\210\313\207".[current-loa
0320	64 2d 6c 69 73 74 20 72 65 71 75 69 72 65 20 6f 62 20 6f 62 2d 63 6f 6d 69 6e 74 20 63 6f 6d 69	d-list.require.ob.ob-comint.comi
0340	6e 74 20 61 64 64 2d 74 6f 2d 6c 69 73 74 20 6f 72 67 2d 62 61 62 65 6c 2d 74 61 6e 67 6c 65 2d	nt.add-to-list.org-babel-tangle-
0360	6c 61 6e 67 2d 65 78 74 73 20 28 22 68 61 73 6b 65 6c 6c 22 20 2e 20 22 68 73 22 29 20 6f 72 67	lang-exts.("haskell"..."hs").org
0380	2d 62 61 62 65 6c 2d 64 65 66 61 75 6c 74 2d 68 65 61 64 65 72 2d 61 72 67 73 3a 68 61 73 6b 65	-babel-default-header-args:haske
03a0	6c 6c 20 64 65 66 61 75 6c 74 2d 62 6f 75 6e 64 70 20 73 65 74 2d 64 65 66 61 75 6c 74 20 6e 69	ll.default-boundp.set-default.ni
03c0	6c 20 6f 72 67 2d 62 61 62 65 6c 2d 68 61 73 6b 65 6c 6c 2d 6c 68 73 32 74 65 78 2d 63 6f 6d 6d	l.org-babel-haskell-lhs2tex-comm
03e0	61 6e 64 20 22 6c 68 73 32 74 65 78 22 20 6f 72 67 2d 62 61 62 65 6c 2d 68 61 73 6b 65 6c 6c 2d	and."lhs2tex".org-babel-haskell-
0400	65 6f 65 20 22 5c 22 6f 72 67 2d 62 61 62 65 6c 2d 68 61 73 6b 65 6c 6c 2d 65 6f 65 5c 22 22 5d	eoe."\"org-babel-haskell-eoe\""]
0420	20 33 29 0a 23 40 33 34 20 45 78 65 63 75 74 65 20 61 20 62 6c 6f 63 6b 20 6f 66 20 48 61 73 6b	.3).#@34.Execute.a.block.of.Hask
0440	65 6c 6c 20 63 6f 64 65 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 6f 72 67 2d 62 61 62 65 6c 2d	ell.code...(defalias.'org-babel-
0460	65 78 65 63 75 74 65 3a 68 61 73 6b 65 6c 6c 20 23 5b 28 62 6f 64 79 20 70 61 72 61 6d 73 29 20	execute:haskell.#[(body.params).
0480	22 5c 33 30 36 5c 33 30 37 08 5c 22 41 19 5c 33 31 30 5c 33 31 31 5c 33 31 32 08 5c 33 31 33 5c	"\306\307.\"A.\310\311\312.\313\
04a0	22 5c 22 1a 5c 33 30 36 5c 33 31 34 08 5c 22 41 1b 5c 33 31 35 5c 66 08 5c 33 31 36 08 21 23 1d	"\".\306\314.\"A.\315\f.\316.!#.
04c0	5c 33 31 37 09 08 5c 22 19 5c 32 31 32 5c 33 32 30 20 1e 37 5c 33 32 31 5c 32 31 36 5c 33 32 32	\317..\".\212\320..7\321\216\322
04e0	09 21 5c 32 30 34 33 00 5c 33 32 33 5c 33 32 34 09 5c 22 5c 32 31 30 09 71 5c 32 31 30 5c 33 32	.!\2043.\323\324.\"\210.q\210\32
0500	35 5c 33 32 36 5c 32 31 31 1e 38 1e 39 1e 3a 5c 33 32 37 5c 33 33 30 21 5c 32 31 31 1e 3b 5c 32	5\326\211.8.9.:\327\330!\211.;\2
0520	30 35 4a 00 5c 33 33 30 4b 1e 3c 5c 33 33 31 5c 32 31 36 5c 33 33 30 5c 33 33 32 4d 5c 32 31 30	05J.\330K.<\331\216\330\332M\210
0540	5c 33 33 33 5c 33 33 34 5c 33 33 30 5c 22 5c 32 31 30 5c 33 33 35 5c 32 31 36 5c 33 33 36 5c 33	\333\334\330\"\210\335\216\336\3
0560	33 37 70 21 21 62 5c 32 31 30 60 64 1e 3d 5c 32 31 31 1e 3e 0e 3d 7b 16 39 0e 3e 0e 3d 7c 5c 32	37p!!b\210`d.=\211.>.={.9.>.=|\2
0580	31 30 2a 5c 33 34 30 0d 21 63 5c 32 31 30 5c 33 34 31 5c 33 32 36 5c 33 34 32 5c 22 5c 32 31 30	10*\340.!c\210\341\326\342\"\210
05a0	0e 3f 63 5c 32 31 30 5c 33 34 31 5c 33 32 36 5c 33 34 32 5c 22 5c 32 31 30 0e 40 62 5c 32 31 30	.?c\210\341\326\342\"\210.@b\210
05c0	5c 32 31 32 5c 33 34 33 0e 41 5c 33 32 36 5c 33 34 32 23 5c 32 30 35 5c 32 33 34 00 5c 33 34 33	\212\343.A\326\342#\205\234.\343
05e0	5c 33 34 34 0e 3f 21 5c 33 32 36 5c 33 34 32 23 29 5c 32 30 34 5c 32 35 31 00 5c 33 34 35 5c 33	\344.?!\326\342#)\204\251.\345\3
0600	33 37 70 21 21 5c 32 31 30 5c 32 30 32 5c 32 30 36 00 5c 33 33 36 5c 33 33 37 70 21 21 62 5c 32	37p!!\210\202\206.\336\337p!!b\2
0620	31 30 0e 39 63 5c 32 31 30 2c 0d 5c 32 30 33 5c 33 32 33 00 5c 33 34 36 5c 33 34 37 5c 33 35 30	10.9c\210,.\203\323.\346\347\350
0640	5c 33 35 31 5c 33 34 34 0d 5c 32 30 36 5c 33 30 33 00 5c 33 32 35 21 23 0e 3a 5c 22 5c 32 30 33	\351\344.\206\303.\325!#.:\"\203
0660	5c 33 32 33 00 0e 3a 5c 33 35 32 5c 32 32 35 5c 33 32 36 4f 16 38 5c 33 35 33 0e 3a 0e 41 5c 22	\323..:\352\225\326O.8\353.:.A\"
0680	2e 06 1e 38 5c 33 31 30 5c 33 35 34 0e 3f 5c 33 35 35 5c 33 31 30 5c 33 34 30 0e 38 5c 22 21 5c	...8\310\354.?\355\310\340.8\"!\
06a0	32 33 35 41 5c 22 1e 42 5c 33 35 36 0b 5c 33 35 37 5c 32 33 32 5c 32 30 33 00 01 5c 33 36 30 5c	235A\".B\356.\357\232\203..\360\
06c0	33 36 31 5c 33 35 35 0e 42 41 21 5c 33 35 30 23 5c 32 30 32 0b 01 0b 5c 33 36 32 5c 32 33 32 5c	361\355.BA!\350#\202...\362\232\
06e0	32 30 35 0b 01 5c 33 36 33 0e 42 40 21 5c 33 36 34 5c 33 30 36 5c 33 36 35 08 5c 22 41 5c 33 30	205..\363.B@!\364\306\365.\"A\30
0700	36 5c 33 36 35 08 5c 22 41 5c 22 5c 33 36 34 5c 33 30 36 5c 33 36 36 08 5c 22 41 5c 33 30 36 5c	6\365.\"A\"\364\306\366.\"A\306\
0720	33 36 36 08 5c 22 41 5c 22 23 2e 07 5c 32 30 37 22 20 5b 70 61 72 61 6d 73 20 73 65 73 73 69 6f	366.\"A\"#..\207".[params.sessio
0740	6e 20 76 61 72 73 20 72 65 73 75 6c 74 2d 74 79 70 65 20 62 6f 64 79 20 66 75 6c 6c 2d 62 6f 64	n.vars.result-type.body.full-bod
0760	79 20 61 73 73 6f 63 20 3a 73 65 73 73 69 6f 6e 20 6d 61 70 63 61 72 20 63 64 72 20 6f 72 67 2d	y.assoc.:session.mapcar.cdr.org-
0780	62 61 62 65 6c 2d 67 65 74 2d 68 65 61 64 65 72 20 3a 76 61 72 20 3a 72 65 73 75 6c 74 2d 74 79	babel-get-header.:var.:result-ty
07a0	70 65 20 6f 72 67 2d 62 61 62 65 6c 2d 65 78 70 61 6e 64 2d 62 6f 64 79 3a 67 65 6e 65 72 69 63	pe.org-babel-expand-body:generic
07c0	20 6f 72 67 2d 62 61 62 65 6c 2d 76 61 72 69 61 62 6c 65 2d 61 73 73 69 67 6e 6d 65 6e 74 73 3a	.org-babel-variable-assignments:
07e0	68 61 73 6b 65 6c 6c 20 6f 72 67 2d 62 61 62 65 6c 2d 68 61 73 6b 65 6c 6c 2d 69 6e 69 74 69 61	haskell.org-babel-haskell-initia
0800	74 65 2d 73 65 73 73 69 6f 6e 20 6d 61 74 63 68 2d 64 61 74 61 20 28 28 62 79 74 65 2d 63 6f 64	te-session.match-data.((byte-cod
0820	65 20 22 5c 33 30 31 08 5c 33 30 32 5c 22 5c 32 30 37 22 20 5b 73 61 76 65 2d 6d 61 74 63 68 2d	e."\301.\302\"\207".[save-match-
0840	64 61 74 61 2d 69 6e 74 65 72 6e 61 6c 20 73 65 74 2d 6d 61 74 63 68 2d 64 61 74 61 20 65 76 61	data-internal.set-match-data.eva
0860	70 6f 72 61 74 65 5d 20 33 29 29 20 6f 72 67 2d 62 61 62 65 6c 2d 63 6f 6d 69 6e 74 2d 62 75 66	porate].3)).org-babel-comint-buf
0880	66 65 72 2d 6c 69 76 65 70 20 65 72 72 6f 72 20 22 62 75 66 66 65 72 20 25 73 20 64 6f 65 73 6e	fer-livep.error."buffer.%s.doesn
08a0	27 74 20 65 78 69 73 74 20 6f 72 20 68 61 73 20 6e 6f 20 70 72 6f 63 65 73 73 22 20 22 22 20 6e	't.exist.or.has.no.process"."".n
08c0	69 6c 20 66 62 6f 75 6e 64 70 20 6d 79 2d 66 69 6c 74 20 28 28 62 79 74 65 2d 63 6f 64 65 20 22	il.fboundp.my-filt.((byte-code."
08e0	08 5c 32 30 33 0b 00 5c 33 30 32 09 4d 5c 32 31 30 5c 32 30 32 0f 00 5c 33 30 33 5c 33 30 32 21	.\203..\302.M\210\202..\303\302!
0900	5c 32 31 30 5c 33 30 32 5c 32 30 37 22 20 5b 23 31 3d 23 3a 2d 2d 63 6c 2d 6c 65 74 66 2d 62 6f	\210\302\207".[#1=#:--cl-letf-bo
0920	75 6e 64 2d 2d 20 23 32 3d 23 3a 2d 2d 63 6c 2d 6c 65 74 66 2d 73 61 76 65 2d 2d 20 6d 79 2d 66	und--.#2=#:--cl-letf-save--.my-f
0940	69 6c 74 20 66 6d 61 6b 75 6e 62 6f 75 6e 64 5d 20 32 29 29 20 23 5b 28 74 65 78 74 29 20 22 08	ilt.fmakunbound].2)).#[(text).".
0960	09 50 5c 32 31 31 10 5c 32 30 37 22 20 5b 73 74 72 69 6e 67 2d 62 75 66 66 65 72 20 74 65 78 74	.P\211.\207".[string-buffer.text
0980	5d 20 32 5d 20 61 64 64 2d 68 6f 6f 6b 20 63 6f 6d 69 6e 74 2d 6f 75 74 70 75 74 2d 66 69 6c 74	].2].add-hook.comint-output-filt
09a0	65 72 2d 66 75 6e 63 74 69 6f 6e 73 20 28 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 30 5c 33	er-functions.((byte-code."\300\3
09c0	30 31 5c 33 30 32 5c 22 5c 32 30 37 22 20 5b 72 65 6d 6f 76 65 2d 68 6f 6f 6b 20 63 6f 6d 69 6e	01\302\"\207".[remove-hook.comin
09e0	74 2d 6f 75 74 70 75 74 2d 66 69 6c 74 65 72 2d 66 75 6e 63 74 69 6f 6e 73 20 6d 79 2d 66 69 6c	t-output-filter-functions.my-fil
0a00	74 5d 20 33 29 29 20 70 72 6f 63 65 73 73 2d 6d 61 72 6b 20 67 65 74 2d 62 75 66 66 65 72 2d 70	t].3)).process-mark.get-buffer-p
0a20	72 6f 63 65 73 73 20 6f 72 67 2d 62 61 62 65 6c 2d 74 72 69 6d 20 63 6f 6d 69 6e 74 2d 73 65 6e	rocess.org-babel-trim.comint-sen
0a40	64 2d 69 6e 70 75 74 20 74 20 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 72 65 67 65	d-input.t.re-search-forward.rege
0a60	78 70 2d 71 75 6f 74 65 20 61 63 63 65 70 74 2d 70 72 6f 63 65 73 73 2d 6f 75 74 70 75 74 20 73	xp-quote.accept-process-output.s
0a80	74 72 69 6e 67 2d 6d 61 74 63 68 20 72 65 70 6c 61 63 65 2d 72 65 67 65 78 70 2d 69 6e 2d 73 74	tring-match.replace-regexp-in-st
0aa0	72 69 6e 67 20 22 5c 6e 22 20 22 5b 0d 5c 6e 5d 2b 22 20 30 20 73 70 6c 69 74 2d 73 74 72 69 6e	ring."\n"."[.\n]+".0.split-strin
0ac0	67 20 6f 72 67 2d 62 61 62 65 6c 2d 68 61 73 6b 65 6c 6c 2d 72 65 61 64 2d 73 74 72 69 6e 67 20	g.org-babel-haskell-read-string.
0ae0	72 65 76 65 72 73 65 20 6f 72 67 2d 62 61 62 65 6c 2d 72 65 61 73 73 65 6d 62 6c 65 2d 74 61 62	reverse.org-babel-reassemble-tab
0b00	6c 65 20 6f 75 74 70 75 74 20 6d 61 70 63 6f 6e 63 61 74 20 69 64 65 6e 74 69 74 79 20 76 61 6c	le.output.mapconcat.identity.val
0b20	75 65 20 6f 72 67 2d 62 61 62 65 6c 2d 68 61 73 6b 65 6c 6c 2d 74 61 62 6c 65 2d 6f 72 2d 73 74	ue.org-babel-haskell-table-or-st
0b40	72 69 6e 67 20 6f 72 67 2d 62 61 62 65 6c 2d 70 69 63 6b 2d 6e 61 6d 65 20 3a 63 6f 6c 6e 61 6d	ring.org-babel-pick-name.:colnam
0b60	65 2d 6e 61 6d 65 73 20 3a 72 6f 77 6e 61 6d 65 2d 6e 61 6d 65 73 20 73 61 76 65 2d 6d 61 74 63	e-names.:rowname-names.save-matc
0b80	68 2d 64 61 74 61 2d 69 6e 74 65 72 6e 61 6c 20 72 61 77 20 64 61 6e 67 6c 69 6e 67 2d 74 65 78	h-data-internal.raw.dangling-tex
0ba0	74 20 73 74 72 69 6e 67 2d 62 75 66 66 65 72 20 23 31 23 20 23 32 23 20 65 6e 64 20 73 74 61 72	t.string-buffer.#1#.#2#.end.star
0bc0	74 20 6f 72 67 2d 62 61 62 65 6c 2d 68 61 73 6b 65 6c 6c 2d 65 6f 65 20 63 6f 6d 69 6e 74 2d 6c	t.org-babel-haskell-eoe.comint-l
0be0	61 73 74 2d 69 6e 70 75 74 2d 65 6e 64 20 63 6f 6d 69 6e 74 2d 70 72 6f 6d 70 74 2d 72 65 67 65	ast-input-end.comint-prompt-rege
0c00	78 70 20 72 65 73 75 6c 74 73 5d 20 39 20 28 23 24 20 2e 20 31 30 36 35 29 5d 29 0a 23 40 34 31	xp.results].9.(#$...1065)]).#@41
0c20	20 53 74 72 69 70 20 5c 22 73 20 66 72 6f 6d 20 61 72 6f 75 6e 64 20 61 20 68 61 73 6b 65 6c 6c	.Strip.\"s.from.around.a.haskell
0c40	20 73 74 72 69 6e 67 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 6f 72 67 2d 62 61 62 65 6c 2d 68	.string...(defalias.'org-babel-h
0c60	61 73 6b 65 6c 6c 2d 72 65 61 64 2d 73 74 72 69 6e 67 20 23 5b 28 73 74 72 69 6e 67 29 20 22 5c	askell-read-string.#[(string)."\
0c80	33 30 31 5c 33 30 32 08 5c 22 5c 32 30 33 5c 66 00 5c 33 30 33 5c 33 30 34 08 5c 22 5c 32 30 37	301\302.\"\203\f.\303\304.\"\207
0ca0	08 5c 32 30 37 22 20 5b 73 74 72 69 6e 67 20 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 5e 5c 22	.\207".[string.string-match."^\"
0cc0	5c 5c 28 5b 5e 00 5d 2b 5c 5c 29 5c 22 24 22 20 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 31 5d 20	\\([^.]+\\)\"$".match-string.1].
0ce0	33 20 28 23 24 20 2e 20 33 31 30 35 29 5d 29 0a 23 40 31 34 30 20 49 6e 69 74 69 61 74 65 20 61	3.(#$...3105)]).#@140.Initiate.a
0d00	20 68 61 73 6b 65 6c 6c 20 73 65 73 73 69 6f 6e 2e 0a 49 66 20 74 68 65 72 65 20 69 73 20 6e 6f	.haskell.session..If.there.is.no
0d20	74 20 61 20 63 75 72 72 65 6e 74 20 69 6e 66 65 72 69 6f 72 2d 70 72 6f 63 65 73 73 2d 62 75 66	t.a.current.inferior-process-buf
0d40	66 65 72 20 69 6e 20 53 45 53 53 49 4f 4e 0a 74 68 65 6e 20 63 72 65 61 74 65 20 6f 6e 65 2e 20	fer.in.SESSION.then.create.one..
0d60	20 52 65 74 75 72 6e 20 74 68 65 20 69 6e 69 74 69 61 6c 69 7a 65 64 20 73 65 73 73 69 6f 6e 2e	.Return.the.initialized.session.
0d80	1f 0a 28 64 65 66 61 6c 69 61 73 20 27 6f 72 67 2d 62 61 62 65 6c 2d 68 61 73 6b 65 6c 6c 2d 69	..(defalias.'org-babel-haskell-i
0da0	6e 69 74 69 61 74 65 2d 73 65 73 73 69 6f 6e 20 23 5b 28 26 6f 70 74 69 6f 6e 61 6c 20 73 65 73	nitiate-session.#[(&optional.ses
0dc0	73 69 6f 6e 20 70 61 72 61 6d 73 29 20 22 5c 33 30 30 5c 33 30 31 21 5c 32 31 30 5c 33 30 32 5c	sion.params)."\300\301!\210\302\
0de0	33 30 33 21 5c 32 30 36 5c 66 00 5c 33 30 34 5c 32 31 33 5c 32 30 37 22 20 5b 72 65 71 75 69 72	303!\206\f.\304\213\207".[requir
0e00	65 20 69 6e 66 2d 68 61 73 6b 65 6c 6c 20 67 65 74 2d 62 75 66 66 65 72 20 22 2a 68 61 73 6b 65	e.inf-haskell.get-buffer."*haske
0e20	6c 6c 2a 22 20 28 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 30 20 5c 32 31 30 5c 33 30 31 5c	ll*".((byte-code."\300.\210\301\
0e40	33 30 32 21 5c 32 31 30 70 5c 32 30 37 22 20 5b 72 75 6e 2d 68 61 73 6b 65 6c 6c 20 73 6c 65 65	302!\210p\207".[run-haskell.slee
0e60	70 2d 66 6f 72 20 30 2e 32 35 5d 20 32 29 29 5d 20 32 20 28 23 24 20 2e 20 33 33 31 38 29 5d 29	p-for.0.25].2))].2.(#$...3318)])
0e80	0a 23 40 32 35 20 4c 6f 61 64 20 42 4f 44 59 20 69 6e 74 6f 20 53 45 53 53 49 4f 4e 2e 1f 0a 28	.#@25.Load.BODY.into.SESSION...(
0ea0	64 65 66 61 6c 69 61 73 20 27 6f 72 67 2d 62 61 62 65 6c 2d 6c 6f 61 64 2d 73 65 73 73 69 6f 6e	defalias.'org-babel-load-session
0ec0	3a 68 61 73 6b 65 6c 6c 20 23 5b 28 73 65 73 73 69 6f 6e 20 62 6f 64 79 20 70 61 72 61 6d 73 29	:haskell.#[(session.body.params)
0ee0	20 22 5c 33 30 30 5c 32 31 33 5c 32 30 37 22 20 5b 28 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33	."\300\213\207".[((byte-code."\3
0f00	30 36 08 09 5c 22 1a 5c 33 30 37 5c 33 31 30 21 5c 33 31 31 50 1b 5c 33 31 32 5c 33 31 33 21 1c	06..\".\307\310!\311P.\312\313!.
0f20	72 5c 66 71 5c 32 31 30 5c 33 31 34 5c 32 31 36 0d 63 5c 32 31 30 5c 33 31 35 0b 21 5c 32 31 30	r\fq\210\314\216.c\210\315.!\210
0f40	5c 33 31 36 20 5c 32 31 30 5c 33 31 37 20 5c 32 31 30 2b 5c 6e 2a 5c 32 30 37 22 20 5b 73 65 73	\316.\210\317.\210+\n*\207".[ses
0f60	73 69 6f 6e 20 70 61 72 61 6d 73 20 62 75 66 66 65 72 20 6c 6f 61 64 2d 66 69 6c 65 20 23 31 3d	sion.params.buffer.load-file.#1=
0f80	23 3a 74 65 6d 70 2d 62 75 66 66 65 72 20 62 6f 64 79 20 6f 72 67 2d 62 61 62 65 6c 2d 70 72 65	#:temp-buffer.body.org-babel-pre
0fa0	70 2d 73 65 73 73 69 6f 6e 3a 68 61 73 6b 65 6c 6c 20 6f 72 67 2d 62 61 62 65 6c 2d 74 65 6d 70	p-session:haskell.org-babel-temp
0fc0	2d 66 69 6c 65 20 22 68 61 73 6b 65 6c 6c 2d 6c 6f 61 64 2d 22 20 22 2e 68 73 22 20 67 65 6e 65	-file."haskell-load-".".hs".gene
0fe0	72 61 74 65 2d 6e 65 77 2d 62 75 66 66 65 72 20 22 20 2a 74 65 6d 70 2a 22 20 28 28 62 79 74 65	rate-new-buffer.".*temp*".((byte
1000	2d 63 6f 64 65 20 22 5c 33 30 31 08 21 5c 32 30 33 5c 6e 00 5c 33 30 32 08 21 5c 32 31 30 5c 33	-code."\301.!\203\n.\302.!\210\3
1020	30 31 5c 32 30 37 22 20 5b 23 31 23 20 62 75 66 66 65 72 2d 6e 61 6d 65 20 6b 69 6c 6c 2d 62 75	01\207".[#1#.buffer-name.kill-bu
1040	66 66 65 72 5d 20 32 29 29 20 77 72 69 74 65 2d 66 69 6c 65 20 68 61 73 6b 65 6c 6c 2d 6d 6f 64	ffer].2)).write-file.haskell-mod
1060	65 20 69 6e 66 65 72 69 6f 72 2d 68 61 73 6b 65 6c 6c 2d 6c 6f 61 64 2d 66 69 6c 65 5d 20 33 29	e.inferior-haskell-load-file].3)
1080	29 5d 20 31 20 28 23 24 20 2e 20 33 37 31 38 29 5d 29 0a 23 40 36 32 20 50 72 65 70 61 72 65 20	)].1.(#$...3718)]).#@62.Prepare.
10a0	53 45 53 53 49 4f 4e 20 61 63 63 6f 72 64 69 6e 67 20 74 6f 20 74 68 65 20 68 65 61 64 65 72 20	SESSION.according.to.the.header.
10c0	61 72 67 75 6d 65 6e 74 73 20 69 6e 20 50 41 52 41 4d 53 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20	arguments.in.PARAMS...(defalias.
10e0	27 6f 72 67 2d 62 61 62 65 6c 2d 70 72 65 70 2d 73 65 73 73 69 6f 6e 3a 68 61 73 6b 65 6c 6c 20	'org-babel-prep-session:haskell.
1100	23 5b 28 73 65 73 73 69 6f 6e 20 70 61 72 61 6d 73 29 20 22 5c 33 30 30 5c 32 31 33 5c 32 30 37	#[(session.params)."\300\213\207
1120	22 20 5b 28 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 34 08 21 19 5c 32 31 32 5c 33 30 35 20	".[((byte-code."\304.!.\212\305.
1140	1a 5c 33 30 36 5c 32 31 36 5c 33 30 37 09 21 5c 32 30 34 15 00 5c 33 31 30 5c 33 31 31 09 5c 22	.\306\216\307.!\204..\310\311.\"
1160	5c 32 31 30 09 71 5c 32 31 30 5c 33 31 32 5c 33 31 33 5c 33 31 34 0b 21 5c 22 5c 32 31 30 2b 70	\210.q\210\312\313\314.!\"\210+p
1180	29 5c 32 30 37 22 20 5b 73 65 73 73 69 6f 6e 20 62 75 66 66 65 72 20 73 61 76 65 2d 6d 61 74 63	)\207".[session.buffer.save-matc
11a0	68 2d 64 61 74 61 2d 69 6e 74 65 72 6e 61 6c 20 70 61 72 61 6d 73 20 6f 72 67 2d 62 61 62 65 6c	h-data-internal.params.org-babel
11c0	2d 68 61 73 6b 65 6c 6c 2d 69 6e 69 74 69 61 74 65 2d 73 65 73 73 69 6f 6e 20 6d 61 74 63 68 2d	-haskell-initiate-session.match-
11e0	64 61 74 61 20 28 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 31 08 5c 33 30 32 5c 22 5c 32 30	data.((byte-code."\301.\302\"\20
1200	37 22 20 5b 73 61 76 65 2d 6d 61 74 63 68 2d 64 61 74 61 2d 69 6e 74 65 72 6e 61 6c 20 73 65 74	7".[save-match-data-internal.set
1220	2d 6d 61 74 63 68 2d 64 61 74 61 20 65 76 61 70 6f 72 61 74 65 5d 20 33 29 29 20 6f 72 67 2d 62	-match-data.evaporate].3)).org-b
1240	61 62 65 6c 2d 63 6f 6d 69 6e 74 2d 62 75 66 66 65 72 2d 6c 69 76 65 70 20 65 72 72 6f 72 20 22	abel-comint-buffer-livep.error."
1260	62 75 66 66 65 72 20 25 73 20 64 6f 65 73 6e 27 74 20 65 78 69 73 74 20 6f 72 20 68 61 73 20 6e	buffer.%s.doesn't.exist.or.has.n
1280	6f 20 70 72 6f 63 65 73 73 22 20 6d 61 70 63 20 23 5b 28 6c 69 6e 65 29 20 22 08 63 5c 32 31 30	o.process".mapc.#[(line).".c\210
12a0	5c 33 30 31 5c 33 30 32 5c 33 30 33 5c 22 5c 32 30 37 22 20 5b 6c 69 6e 65 20 63 6f 6d 69 6e 74	\301\302\303\"\207".[line.comint
12c0	2d 73 65 6e 64 2d 69 6e 70 75 74 20 6e 69 6c 20 74 5d 20 33 5d 20 6f 72 67 2d 62 61 62 65 6c 2d	-send-input.nil.t].3].org-babel-
12e0	76 61 72 69 61 62 6c 65 2d 61 73 73 69 67 6e 6d 65 6e 74 73 3a 68 61 73 6b 65 6c 6c 5d 20 34 29	variable-assignments:haskell].4)
1300	29 5d 20 31 20 28 23 24 20 2e 20 34 32 34 38 29 5d 29 0a 23 40 36 37 20 52 65 74 75 72 6e 20 6c	)].1.(#$...4248)]).#@67.Return.l
1320	69 73 74 20 6f 66 20 68 61 73 6b 65 6c 6c 20 73 74 61 74 65 6d 65 6e 74 73 20 61 73 73 69 67 6e	ist.of.haskell.statements.assign
1340	69 6e 67 20 74 68 65 20 62 6c 6f 63 6b 27 73 20 76 61 72 69 61 62 6c 65 73 1f 0a 28 64 65 66 61	ing.the.block's.variables..(defa
1360	6c 69 61 73 20 27 6f 72 67 2d 62 61 62 65 6c 2d 76 61 72 69 61 62 6c 65 2d 61 73 73 69 67 6e 6d	lias.'org-babel-variable-assignm
1380	65 6e 74 73 3a 68 61 73 6b 65 6c 6c 20 23 5b 28 70 61 72 61 6d 73 29 20 22 5c 33 30 31 5c 33 30	ents:haskell.#[(params)."\301\30
13a0	32 5c 33 30 31 5c 33 30 33 5c 33 30 34 08 5c 33 30 35 5c 22 5c 22 5c 22 5c 32 30 37 22 20 5b 70	2\301\303\304.\305\"\"\"\207".[p
13c0	61 72 61 6d 73 20 6d 61 70 63 61 72 20 23 5b 28 70 61 69 72 29 20 22 5c 33 30 31 5c 33 30 32 08	arams.mapcar.#[(pair)."\301\302.
13e0	40 5c 33 30 33 08 41 21 23 5c 32 30 37 22 20 5b 70 61 69 72 20 66 6f 72 6d 61 74 20 22 6c 65 74	@\303.A!#\207".[pair.format."let
1400	20 25 73 20 3d 20 25 73 22 20 6f 72 67 2d 62 61 62 65 6c 2d 68 61 73 6b 65 6c 6c 2d 76 61 72 2d	.%s.=.%s".org-babel-haskell-var-
1420	74 6f 2d 68 61 73 6b 65 6c 6c 5d 20 35 5d 20 63 64 72 20 6f 72 67 2d 62 61 62 65 6c 2d 67 65 74	to-haskell].5].cdr.org-babel-get
1440	2d 68 65 61 64 65 72 20 3a 76 61 72 5d 20 37 20 28 23 24 20 2e 20 34 38 38 38 29 5d 29 0a 23 40	-header.:var].7.(#$...4888)]).#@
1460	31 36 37 20 43 6f 6e 76 65 72 74 20 52 45 53 55 4c 54 53 20 74 6f 20 61 6e 20 45 6d 61 63 73 2d	167.Convert.RESULTS.to.an.Emacs-
1480	6c 69 73 70 20 74 61 62 6c 65 20 6f 72 20 73 74 72 69 6e 67 2e 0a 49 66 20 52 45 53 55 4c 54 53	lisp.table.or.string..If.RESULTS
14a0	20 6c 6f 6f 6b 20 6c 69 6b 65 20 61 20 74 61 62 6c 65 2c 20 74 68 65 6e 20 63 6f 6e 76 65 72 74	.look.like.a.table,.then.convert
14c0	20 74 68 65 6d 20 69 6e 74 6f 20 61 6e 0a 45 6d 61 63 73 2d 6c 69 73 70 20 74 61 62 6c 65 2c 20	.them.into.an.Emacs-lisp.table,.
14e0	6f 74 68 65 72 77 69 73 65 20 72 65 74 75 72 6e 20 74 68 65 20 72 65 73 75 6c 74 73 20 61 73 20	otherwise.return.the.results.as.
1500	61 20 73 74 72 69 6e 67 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 6f 72 67 2d 62 61 62 65 6c 2d	a.string...(defalias.'org-babel-
1520	68 61 73 6b 65 6c 6c 2d 74 61 62 6c 65 2d 6f 72 2d 73 74 72 69 6e 67 20 23 5b 28 72 65 73 75 6c	haskell-table-or-string.#[(resul
1540	74 73 29 20 22 5c 33 30 31 08 21 5c 32 30 37 22 20 5b 72 65 73 75 6c 74 73 20 6f 72 67 2d 62 61	ts)."\301.!\207".[results.org-ba
1560	62 65 6c 2d 73 63 72 69 70 74 2d 65 73 63 61 70 65 5d 20 32 20 28 23 24 20 2e 20 35 32 32 30 29	bel-script-escape].2.(#$...5220)
1580	5d 29 0a 23 40 31 35 36 20 43 6f 6e 76 65 72 74 20 61 6e 20 65 6c 69 73 70 20 76 61 6c 75 65 20	]).#@156.Convert.an.elisp.value.
15a0	56 41 52 20 69 6e 74 6f 20 61 20 68 61 73 6b 65 6c 6c 20 76 61 72 69 61 62 6c 65 2e 0a 54 68 65	VAR.into.a.haskell.variable..The
15c0	20 65 6c 69 73 70 20 56 41 52 20 69 73 20 63 6f 6e 76 65 72 74 65 64 20 74 6f 20 61 20 73 74 72	.elisp.VAR.is.converted.to.a.str
15e0	69 6e 67 20 6f 66 20 68 61 73 6b 65 6c 6c 20 73 6f 75 72 63 65 20 63 6f 64 65 0a 73 70 65 63 69	ing.of.haskell.source.code.speci
1600	66 79 69 6e 67 20 61 20 76 61 72 69 61 62 6c 65 20 6f 66 20 74 68 65 20 73 61 6d 65 20 76 61 6c	fying.a.variable.of.the.same.val
1620	75 65 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 6f 72 67 2d 62 61 62 65 6c 2d 68 61 73 6b 65 6c	ue...(defalias.'org-babel-haskel
1640	6c 2d 76 61 72 2d 74 6f 2d 68 61 73 6b 65 6c 6c 20 23 5b 28 76 61 72 29 20 22 08 3c 5c 32 30 33	l-var-to-haskell.#[(var).".<\203
1660	0e 00 5c 33 30 31 5c 33 30 32 5c 33 30 33 08 5c 33 30 34 23 5c 33 30 35 51 5c 32 30 37 5c 33 30	..\301\302\303.\304#\305Q\207\30
1680	36 5c 33 30 37 08 5c 22 5c 32 30 37 22 20 5b 76 61 72 20 22 5b 22 20 6d 61 70 63 6f 6e 63 61 74	6\307.\"\207".[var."[".mapconcat
16a0	20 6f 72 67 2d 62 61 62 65 6c 2d 68 61 73 6b 65 6c 6c 2d 76 61 72 2d 74 6f 2d 68 61 73 6b 65 6c	.org-babel-haskell-var-to-haskel
16c0	6c 20 22 2c 20 22 20 22 5d 22 20 66 6f 72 6d 61 74 20 22 25 53 22 5d 20 35 20 28 23 24 20 2e 20	l.",."."]".format."%S"].5.(#$...
16e0	35 35 31 33 29 5d 29 0a 23 40 34 30 31 20 45 78 70 6f 72 74 20 74 6f 20 61 20 2e 6c 68 73 20 66	5513)]).#@401.Export.to.a..lhs.f
1700	69 6c 65 20 77 69 74 68 20 61 6c 6c 20 68 61 73 6b 65 6c 6c 20 63 6f 64 65 20 62 6c 6f 63 6b 73	ile.with.all.haskell.code.blocks
1720	20 65 73 63 61 70 65 64 2e 0a 57 68 65 6e 20 63 61 6c 6c 65 64 20 77 69 74 68 20 61 20 70 72 65	.escaped..When.called.with.a.pre
1740	66 69 78 20 61 72 67 75 6d 65 6e 74 20 74 68 65 20 72 65 73 75 6c 74 69 6e 67 0a 2e 6c 68 73 20	fix.argument.the.resulting..lhs.
1760	66 69 6c 65 20 77 69 6c 6c 20 62 65 20 65 78 70 6f 72 74 65 64 20 74 6f 20 61 20 2e 74 65 78 20	file.will.be.exported.to.a..tex.
1780	66 69 6c 65 2e 20 20 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 77 69 6c 6c 0a 63 72 65 61 74 65	file...This.function.will.create
17a0	20 74 77 6f 20 6e 65 77 20 66 69 6c 65 73 2c 20 62 61 73 65 2d 6e 61 6d 65 2e 6c 68 73 20 61 6e	.two.new.files,.base-name.lhs.an
17c0	64 20 62 61 73 65 2d 6e 61 6d 65 2e 74 65 78 20 77 68 65 72 65 0a 62 61 73 65 2d 6e 61 6d 65 20	d.base-name.tex.where.base-name.
17e0	69 73 20 74 68 65 20 6e 61 6d 65 20 6f 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 6f 72 67 2d 6d	is.the.name.of.the.current.org-m
1800	6f 64 65 20 66 69 6c 65 2e 0a 0a 4e 6f 74 65 20 74 68 61 74 20 61 6c 6c 20 73 74 61 6e 64 61 72	ode.file...Note.that.all.standar
1820	64 20 42 61 62 65 6c 20 6c 69 74 65 72 61 74 65 20 70 72 6f 67 72 61 6d 6d 69 6e 67 0a 63 6f 6e	d.Babel.literate.programming.con
1840	73 74 72 75 63 74 73 20 28 68 65 61 64 65 72 20 61 72 67 75 6d 65 6e 74 73 2c 20 6e 6f 2d 77 65	structs.(header.arguments,.no-we
1860	62 20 73 79 6e 74 61 78 20 65 74 63 2e 2e 2e 29 20 61 72 65 20 69 67 6e 6f 72 65 64 2e 1f 0a 28	b.syntax.etc...).are.ignored...(
1880	64 65 66 61 6c 69 61 73 20 27 6f 72 67 2d 62 61 62 65 6c 2d 68 61 73 6b 65 6c 6c 2d 65 78 70 6f	defalias.'org-babel-haskell-expo
18a0	72 74 2d 74 6f 2d 6c 68 73 20 23 5b 28 26 6f 70 74 69 6f 6e 61 6c 20 61 72 67 29 20 22 5c 33 30	rt-to-lhs.#[(&optional.arg)."\30
18c0	36 20 18 5c 33 30 37 19 5c 33 31 30 5c 33 31 31 20 21 1a 5c 33 31 32 5c 33 31 33 21 5c 32 31 31	6..\307.\310\311.!.\312\313!\211
18e0	1b 5c 33 31 34 50 1c 0b 5c 33 31 35 50 1d 5c 6e 5c 33 31 36 50 1e 35 5c 6e 5c 33 31 35 50 1e 36	.\314P..\315P.\n\316P.5\n\315P.6
1900	0e 37 5c 33 31 37 5c 33 32 30 0e 35 21 5c 33 32 31 5c 33 32 30 0e 36 21 5c 32 36 30 05 1e 38 0e	.7\317\320.5!\321\320.6!\260..8.
1920	39 1e 3a 5c 33 32 32 1e 3b 5c 66 5c 33 32 33 5c 33 32 34 5c 33 32 35 21 21 1e 3c 1e 3d 5c 33 32	9.:\322.;\f\323\324\325!!.<.=\32
1940	36 5c 32 31 36 72 0e 3c 71 5c 32 31 30 08 63 5c 32 31 30 65 62 5c 32 31 30 5c 33 32 37 09 5c 33	6\216r.<q\210.c\210eb\210\327.\3
1960	32 32 5c 33 33 30 23 5c 32 30 33 5c 32 32 37 00 5c 33 33 31 20 1e 3e 5c 33 33 32 5c 32 31 36 5c	22\330#\203\227.\331..>\332\216\
1980	33 33 33 5c 33 33 34 21 47 16 3b 2a 5c 33 33 35 5c 33 33 31 20 1e 3e 5c 33 33 36 5c 32 31 36 5c	333\334!G.;*\335\331..>\336\216\
19a0	33 33 37 0e 3a 5c 32 30 34 79 00 5c 33 34 30 5c 33 34 31 5c 33 33 33 5c 33 34 32 21 5c 22 5c 32	337.:\204y.\340\341\333\342!\"\2
19c0	30 33 7f 00 5c 33 33 33 5c 33 34 33 21 5c 32 30 32 5c 32 30 34 00 5c 33 34 34 5c 33 33 33 5c 33	03..\333\343!\202\204.\344\333\3
19e0	34 33 21 21 5c 33 34 35 51 2a 5c 33 33 30 5c 32 31 31 23 5c 32 31 30 5c 33 34 36 5c 33 34 37 5c	43!!\345Q*\330\211#\210\346\347\
1a00	32 32 34 5c 33 34 37 5c 32 32 35 0e 3b 23 5c 32 31 30 5c 32 30 32 4e 00 29 72 0e 3c 71 5c 32 31	224\347\225.;#\210\202N.)r.<q\21
1a20	30 5c 33 35 30 5c 33 32 32 5c 32 31 31 0e 3d 5c 33 32 32 5c 33 34 37 25 5c 32 31 30 2c 5c 32 31	0\350\322\211.=\322\347%\210,\21
1a40	32 5c 33 35 31 5c 66 21 5c 32 31 30 5c 33 35 32 5c 33 32 32 21 5c 32 31 30 5c 33 35 33 20 5c 32	2\351\f!\210\352\322!\210\353.\2
1a60	31 30 5c 33 35 34 5c 66 21 5c 32 31 30 5c 33 35 31 0d 21 5c 32 31 30 65 62 5c 32 31 30 5c 33 34	10\354\f!\210\351.!\210eb\210\34
1a80	32 79 5c 32 31 30 5c 33 35 35 63 5c 32 31 30 5c 33 32 37 5c 33 35 36 5c 33 32 32 5c 33 33 30 23	2y\210\355c\210\327\356\322\330#
1aa0	5c 32 30 33 5c 33 34 30 00 5c 33 33 35 5c 33 33 31 20 1e 3e 5c 33 35 37 5c 32 31 36 5c 33 34 34	\203\340.\335\331..>\357\216\344
1ac0	5c 33 33 33 5c 33 34 37 21 21 2a 5c 33 33 30 5c 32 31 31 23 5c 32 31 30 5c 32 30 32 5c 33 30 34	\333\347!!*\330\211#\210\202\304
1ae0	00 5c 33 30 36 20 10 5c 33 36 30 20 5c 32 31 30 5c 33 35 33 20 5c 32 31 30 29 5c 33 35 34 0d 21	.\306..\360.\210\353.\210)\354.!
1b00	5c 32 31 30 0e 35 5c 33 32 33 5c 33 32 34 5c 33 32 35 21 21 1e 3f 1e 40 5c 33 36 31 5c 32 31 36	\210.5\323\324\325!!.?.@\361\216
1b20	72 0e 3f 71 5c 32 31 30 08 63 5c 32 31 30 29 72 0e 3f 71 5c 32 31 30 5c 33 35 30 5c 33 32 32 5c	r.?q\210.c\210)r.?q\210\350\322\
1b40	32 31 31 0e 40 5c 33 32 32 5c 33 34 37 25 5c 32 31 30 2c 0e 41 5c 32 30 34 1f 01 5c 33 35 31 0e	211.@\322\347%\210,.A\204..\351.
1b60	35 21 5c 32 30 32 2e 01 5c 33 36 32 5c 33 36 33 0e 38 5c 22 5c 32 31 30 5c 33 36 34 0e 38 21 5c	5!\202..\362\363.8\"\210\364.8!\
1b80	32 31 30 5c 33 35 31 0e 36 21 2e 0b 5c 32 30 37 22 20 5b 63 6f 6e 74 65 6e 74 73 20 68 61 73 6b	210\351.6!..\207".[contents.hask
1ba0	65 6c 6c 2d 72 65 67 65 78 70 20 62 61 73 65 2d 6e 61 6d 65 20 74 6d 70 2d 66 69 6c 65 20 74 6d	ell-regexp.base-name.tmp-file.tm
1bc0	70 2d 6f 72 67 2d 66 69 6c 65 20 74 6d 70 2d 74 65 78 2d 66 69 6c 65 20 62 75 66 66 65 72 2d 73	p-org-file.tmp-tex-file.buffer-s
1be0	74 72 69 6e 67 20 22 5e 5c 5c 28 5b 20 09 5d 2a 5c 5c 29 23 5c 5c 2b 62 65 67 69 6e 5f 73 72 63	tring."^\\([..]*\\)#\\+begin_src
1c00	5b 20 09 5d 68 61 73 6b 65 6c 6c 2a 5c 5c 28 2e 2a 5c 5c 29 3f 5b 0d 5c 6e 5d 5c 5c 28 5b 5e 00	[..]haskell*\\(.*\\)?[.\n]\\([^.
1c20	5d 2a 3f 5c 5c 29 5b 0d 5c 6e 5d 5b 20 09 5d 2a 23 5c 5c 2b 65 6e 64 5f 73 72 63 2e 2a 22 20 66	]*?\\)[.\n][..]*#\\+end_src.*".f
1c40	69 6c 65 2d 6e 61 6d 65 2d 73 61 6e 73 2d 65 78 74 65 6e 73 69 6f 6e 20 62 75 66 66 65 72 2d 66	ile-name-sans-extension.buffer-f
1c60	69 6c 65 2d 6e 61 6d 65 20 6f 72 67 2d 62 61 62 65 6c 2d 74 65 6d 70 2d 66 69 6c 65 20 22 68 61	ile-name.org-babel-temp-file."ha
1c80	73 6b 65 6c 6c 2d 22 20 22 2e 6f 72 67 22 20 22 2e 74 65 78 22 20 22 2e 6c 68 73 22 20 22 20 22	skell-".".org".".tex".".lhs"."."
1ca0	20 6f 72 67 2d 62 61 62 65 6c 2d 70 72 6f 63 65 73 73 2d 66 69 6c 65 2d 6e 61 6d 65 20 22 20 3e	.org-babel-process-file-name.".>
1cc0	20 22 20 6e 69 6c 20 67 65 74 2d 62 75 66 66 65 72 2d 63 72 65 61 74 65 20 67 65 6e 65 72 61 74	.".nil.get-buffer-create.generat
1ce0	65 2d 6e 65 77 2d 62 75 66 66 65 72 2d 6e 61 6d 65 20 22 20 2a 74 65 6d 70 20 66 69 6c 65 2a 22	e-new-buffer-name.".*temp.file*"
1d00	20 28 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 31 08 21 5c 32 30 33 5c 6e 00 5c 33 30 32 08	.((byte-code."\301.!\203\n.\302.
1d20	21 5c 32 31 30 5c 33 30 31 5c 32 30 37 22 20 5b 23 31 3d 23 3a 74 65 6d 70 2d 62 75 66 66 65 72	!\210\301\207".[#1=#:temp-buffer
1d40	20 62 75 66 66 65 72 2d 6e 61 6d 65 20 6b 69 6c 6c 2d 62 75 66 66 65 72 5d 20 32 29 29 20 72 65	.buffer-name.kill-buffer].2)).re
1d60	2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 74 20 6d 61 74 63 68 2d 64 61 74 61 20 28 28 62	-search-forward.t.match-data.((b
1d80	79 74 65 2d 63 6f 64 65 20 22 5c 33 30 31 08 5c 33 30 32 5c 22 5c 32 30 37 22 20 5b 73 61 76 65	yte-code."\301.\302\"\207".[save
1da0	2d 6d 61 74 63 68 2d 64 61 74 61 2d 69 6e 74 65 72 6e 61 6c 20 73 65 74 2d 6d 61 74 63 68 2d 64	-match-data-internal.set-match-d
1dc0	61 74 61 20 65 76 61 70 6f 72 61 74 65 5d 20 33 29 29 20 6d 61 74 63 68 2d 73 74 72 69 6e 67 20	ata.evaporate].3)).match-string.
1de0	31 20 72 65 70 6c 61 63 65 2d 6d 61 74 63 68 20 28 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30	1.replace-match.((byte-code."\30
1e00	31 08 5c 33 30 32 5c 22 5c 32 30 37 22 20 5b 73 61 76 65 2d 6d 61 74 63 68 2d 64 61 74 61 2d 69	1.\302\"\207".[save-match-data-i
1e20	6e 74 65 72 6e 61 6c 20 73 65 74 2d 6d 61 74 63 68 2d 64 61 74 61 20 65 76 61 70 6f 72 61 74 65	nternal.set-match-data.evaporate
1e40	5d 20 33 29 29 20 22 23 2b 62 65 67 69 6e 5f 6c 61 74 65 78 5c 6e 5c 5c 62 65 67 69 6e 7b 63 6f	].3))."#+begin_latex\n\\begin{co
1e60	64 65 7d 5c 6e 22 20 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 2d 69 22 20 32 20 33 20 6f 72 67	de}\n".string-match."-i".2.3.org
1e80	2d 72 65 6d 6f 76 65 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 22 5c 6e 5c 5c 65 6e 64 7b 63 6f 64	-remove-indentation."\n\\end{cod
1ea0	65 7d 5c 6e 23 2b 65 6e 64 5f 6c 61 74 65 78 5c 6e 22 20 69 6e 64 65 6e 74 2d 63 6f 64 65 2d 72	e}\n#+end_latex\n".indent-code-r
1ec0	69 67 69 64 6c 79 20 30 20 77 72 69 74 65 2d 72 65 67 69 6f 6e 20 66 69 6e 64 2d 66 69 6c 65 20	igidly.0.write-region.find-file.
1ee0	6f 72 67 2d 65 78 70 6f 72 74 2d 61 73 2d 6c 61 74 65 78 20 6b 69 6c 6c 2d 62 75 66 66 65 72 20	org-export-as-latex.kill-buffer.
1f00	64 65 6c 65 74 65 2d 66 69 6c 65 20 22 25 69 6e 63 6c 75 64 65 20 70 6f 6c 79 63 6f 64 65 2e 66	delete-file."%include.polycode.f
1f20	6d 74 5c 6e 22 20 22 5e 5b 20 09 5d 2b 5c 5c 5c 5c 62 65 67 69 6e 7b 63 6f 64 65 7d 5b 5e 00 5d	mt\n"."^[..]+\\\\begin{code}[^.]
1f40	2b 5c 5c 5c 5c 65 6e 64 7b 63 6f 64 65 7d 22 20 28 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30	+\\\\end{code}".((byte-code."\30
1f60	31 08 5c 33 30 32 5c 22 5c 32 30 37 22 20 5b 73 61 76 65 2d 6d 61 74 63 68 2d 64 61 74 61 2d 69	1.\302\"\207".[save-match-data-i
1f80	6e 74 65 72 6e 61 6c 20 73 65 74 2d 6d 61 74 63 68 2d 64 61 74 61 20 65 76 61 70 6f 72 61 74 65	nternal.set-match-data.evaporate
1fa0	5d 20 33 29 29 20 73 61 76 65 2d 62 75 66 66 65 72 20 28 28 62 79 74 65 2d 63 6f 64 65 20 22 5c	].3)).save-buffer.((byte-code."\
1fc0	33 30 31 08 21 5c 32 30 33 5c 6e 00 5c 33 30 32 08 21 5c 32 31 30 5c 33 30 31 5c 32 30 37 22 20	301.!\203\n.\302.!\210\301\207".
1fe0	5b 23 32 3d 23 3a 74 65 6d 70 2d 62 75 66 66 65 72 20 62 75 66 66 65 72 2d 6e 61 6d 65 20 6b 69	[#2=#:temp-buffer.buffer-name.ki
2000	6c 6c 2d 62 75 66 66 65 72 5d 20 32 29 29 20 6d 65 73 73 61 67 65 20 22 72 75 6e 6e 69 6e 67 20	ll-buffer].2)).message."running.
2020	25 73 22 20 73 68 65 6c 6c 2d 63 6f 6d 6d 61 6e 64 20 6c 68 73 2d 66 69 6c 65 20 74 65 78 2d 66	%s".shell-command.lhs-file.tex-f
2040	69 6c 65 20 6f 72 67 2d 62 61 62 65 6c 2d 68 61 73 6b 65 6c 6c 2d 6c 68 73 32 74 65 78 2d 63 6f	ile.org-babel-haskell-lhs2tex-co
2060	6d 6d 61 6e 64 20 63 6f 6d 6d 61 6e 64 20 6f 72 67 2d 73 72 63 2d 70 72 65 73 65 72 76 65 2d 69	mmand.command.org-src-preserve-i
2080	6e 64 65 6e 74 61 74 69 6f 6e 20 70 72 65 73 65 72 76 65 2d 69 6e 64 65 6e 74 70 20 69 6e 64 65	ndentation.preserve-indentp.inde
20a0	6e 74 61 74 69 6f 6e 20 23 31 23 20 23 33 3d 23 3a 74 65 6d 70 2d 66 69 6c 65 20 73 61 76 65 2d	ntation.#1#.#3=#:temp-file.save-
20c0	6d 61 74 63 68 2d 64 61 74 61 2d 69 6e 74 65 72 6e 61 6c 20 23 32 23 20 23 34 3d 23 3a 74 65 6d	match-data-internal.#2#.#4=#:tem
20e0	70 2d 66 69 6c 65 20 61 72 67 5d 20 37 20 28 23 24 20 2e 20 35 38 37 30 29 20 22 50 22 5d 29 0a	p-file.arg].7.(#$...5870)."P"]).
2100	28 70 72 6f 76 69 64 65 20 27 6f 62 2d 68 61 73 6b 65 6c 6c 29 0a	(provide.'ob-haskell).