blob: 4b8710c87103f9d9c6eebff2853cc8624fd19278 (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 39 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:29.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 6c 65	luke/.emacs.d/org-7.4/lisp/ob-le
0080	64 67 65 72 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 2e	dger.el.;;;.in.Emacs.version.23.
00a0	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 0a	1.1.;;;.with.all.optimizations..
00c0	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 73	.;;;.This.file.uses.dynamic.docs
00e0	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 2e	trings,.first.added.in.Emacs.19.
0100	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 73	29..(if.(and.(boundp.'emacs-vers
0120	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 31	ion)...(<.(aref.emacs-version.(1
0140	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 09	-.(length.emacs-version))).?A)..
0160	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 6f	.(or.(and.(boundp.'epoch::versio
0180	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 67	n).epoch::version).......(string
01a0	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 0a	-lessp.emacs-version."19.29"))).
01c0	20 20 20 20 28 65 72 72 6f 72 20 22 60 6f 62 2d 6c 65 64 67 65 72 2e 65 6c 27 20 77 61 73 20 63	....(error."`ob-ledger.el'.was.c
01e0	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 65 72	ompiled.for.Emacs.19.29.or.later
0200	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 3b 3b	"))..;;;;;;;;;;;;;;;;;;;;;;;;;;;
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 0a 0a 0a 28 72 65 71 75 69 72 65 20 27 6f 62 29 0a 23 40 36 35 20 44 65	;;;;;;;;...(require.'ob).#@65.De
0260	66 61 75 6c 74 20 61 72 67 75 6d 65 6e 74 73 20 74 6f 20 75 73 65 20 77 68 65 6e 20 65 76 61 6c	fault.arguments.to.use.when.eval
0280	75 61 74 69 6e 67 20 61 20 6c 65 64 67 65 72 20 73 6f 75 72 63 65 20 62 6c 6f 63 6b 2e 1f 0a 28	uating.a.ledger.source.block...(
02a0	64 65 66 76 61 72 20 6f 72 67 2d 62 61 62 65 6c 2d 64 65 66 61 75 6c 74 2d 68 65 61 64 65 72 2d	defvar.org-babel-default-header-
02c0	61 72 67 73 3a 6c 65 64 67 65 72 20 27 28 28 3a 72 65 73 75 6c 74 73 20 2e 20 22 6f 75 74 70 75	args:ledger.'((:results..."outpu
02e0	74 22 29 20 28 3a 63 6d 64 6c 69 6e 65 20 2e 20 22 62 61 6c 22 29 29 20 28 23 24 20 2e 20 36 30	t").(:cmdline..."bal")).(#$...60
0300	36 29 29 0a 23 40 31 31 30 20 45 78 65 63 75 74 65 20 61 20 62 6c 6f 63 6b 20 6f 66 20 4c 65 64	6)).#@110.Execute.a.block.of.Led
0320	67 65 72 20 65 6e 74 72 69 65 73 20 77 69 74 68 20 6f 72 67 2d 62 61 62 65 6c 2e 20 20 54 68 69	ger.entries.with.org-babel...Thi
0340	73 20 66 75 6e 63 74 69 6f 6e 20 69 73 0a 63 61 6c 6c 65 64 20 62 79 20 60 6f 72 67 2d 62 61 62	s.function.is.called.by.`org-bab
0360	65 6c 2d 65 78 65 63 75 74 65 2d 73 72 63 2d 62 6c 6f 63 6b 27 2e 1f 0a 28 64 65 66 61 6c 69 61	el-execute-src-block'...(defalia
0380	73 20 27 6f 72 67 2d 62 61 62 65 6c 2d 65 78 65 63 75 74 65 3a 6c 65 64 67 65 72 20 23 5b 28 62	s.'org-babel-execute:ledger.#[(b
03a0	6f 64 79 20 70 61 72 61 6d 73 29 20 22 5c 33 30 36 5c 33 30 37 21 5c 32 31 30 5c 33 31 30 5c 33	ody.params)."\306\307!\210\310\3
03c0	31 31 5c 33 31 32 08 5c 22 41 5c 32 30 36 0e 00 5c 33 31 33 21 5c 33 31 31 5c 33 31 34 08 5c 22	11\312.\"A\206..\313!\311\314.\"
03e0	41 5c 33 31 35 5c 33 31 36 21 5c 33 31 35 5c 33 31 37 21 19 1a 1b 1c 5c 6e 5c 33 32 30 5c 33 32	A\315\316!\315\317!....\n\320\32
0400	31 5c 33 32 32 21 21 1d 1e 24 5c 33 32 33 5c 32 31 36 72 0d 71 5c 32 31 30 0e 25 63 5c 32 31 30	1\322!!..$\323\216r.q\210.%c\210
0420	29 72 0d 71 5c 32 31 30 5c 33 32 34 5c 33 32 35 5c 32 31 31 0e 24 5c 33 32 35 5c 33 32 36 25 5c	)r.q\210\324\325\211.$\325\326%\
0440	32 31 30 2c 5c 33 30 36 5c 33 32 37 5c 33 33 30 5c 33 33 31 5c 6e 21 5c 33 33 32 0b 5c 32 36 30	210,\306\327\330\331\n!\332.\260
0460	05 21 5c 32 31 30 5c 33 32 30 5c 33 32 31 5c 33 33 33 21 21 1e 26 5c 33 33 34 5c 32 31 36 0e 26	.!\210\320\321\333!!.&\334\216.&
0480	1e 26 5c 33 33 35 5c 33 32 37 5c 33 33 30 5c 33 33 31 5c 6e 21 5c 33 33 32 0b 5c 33 33 36 5c 33	.&\335\327\330\331\n!\332.\336\3
04a0	33 31 09 21 5c 32 36 30 07 21 5c 32 31 30 29 72 0e 26 71 5c 32 31 30 2b 5c 33 33 37 5c 33 34 30	31.!\260.!\210)r.&q\210+\337\340
04c0	21 1e 27 72 0e 27 71 5c 32 31 30 5c 33 34 31 5c 32 31 36 5c 33 34 32 09 21 5c 32 31 30 5c 33 34	!.'r.'q\210\341\216\342.!\210\34
04e0	33 20 2e 07 5c 32 30 37 22 20 5b 70 61 72 61 6d 73 20 6f 75 74 2d 66 69 6c 65 20 69 6e 2d 66 69	3...\207".[params.out-file.in-fi
0500	6c 65 20 63 6d 64 6c 69 6e 65 20 72 65 73 75 6c 74 2d 70 61 72 61 6d 73 20 23 31 3d 23 3a 74 65	le.cmdline.result-params.#1=#:te
0520	6d 70 2d 62 75 66 66 65 72 20 6d 65 73 73 61 67 65 20 22 65 78 65 63 75 74 69 6e 67 20 4c 65 64	mp-buffer.message."executing.Led
0540	67 65 72 20 73 6f 75 72 63 65 20 63 6f 64 65 20 62 6c 6f 63 6b 22 20 73 70 6c 69 74 2d 73 74 72	ger.source.code.block".split-str
0560	69 6e 67 20 61 73 73 6f 63 20 3a 72 65 73 75 6c 74 73 20 22 22 20 3a 63 6d 64 6c 69 6e 65 20 6f	ing.assoc.:results."".:cmdline.o
0580	72 67 2d 62 61 62 65 6c 2d 74 65 6d 70 2d 66 69 6c 65 20 22 6c 65 64 67 65 72 2d 22 20 22 6c 65	rg-babel-temp-file."ledger-"."le
05a0	64 67 65 72 2d 6f 75 74 70 75 74 2d 22 20 67 65 74 2d 62 75 66 66 65 72 2d 63 72 65 61 74 65 20	dger-output-".get-buffer-create.
05c0	67 65 6e 65 72 61 74 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	generate-new-buffer-name.".*temp
05e0	20 66 69 6c 65 2a 22 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	.file*".((byte-code."\301.!\203\
0600	6e 00 5c 33 30 32 08 21 5c 32 31 30 5c 33 30 31 5c 32 30 37 22 20 5b 23 31 23 20 62 75 66 66 65	n.\302.!\210\301\207".[#1#.buffe
0620	72 2d 6e 61 6d 65 20 6b 69 6c 6c 2d 62 75 66 66 65 72 5d 20 32 29 29 20 77 72 69 74 65 2d 72 65	r-name.kill-buffer].2)).write-re
0640	67 69 6f 6e 20 6e 69 6c 20 30 20 22 6c 65 64 67 65 72 22 20 22 20 2d 66 20 22 20 6f 72 67 2d 62	gion.nil.0."ledger".".-f.".org-b
0660	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 22 20 22 20 2a 73 74	abel-process-file-name.".".".*st
0680	72 69 6e 67 2d 6f 75 74 70 75 74 2a 22 20 28 28 6b 69 6c 6c 2d 62 75 66 66 65 72 20 73 74 61 6e	ring-output*".((kill-buffer.stan
06a0	64 61 72 64 2d 6f 75 74 70 75 74 29 29 20 73 68 65 6c 6c 2d 63 6f 6d 6d 61 6e 64 20 22 20 3e 20	dard-output)).shell-command.".>.
06c0	22 20 67 65 6e 65 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	".generate-new-buffer.".*temp*".
06e0	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 21	((byte-code."\301.!\203\n.\302.!
0700	5c 32 31 30 5c 33 30 31 5c 32 30 37 22 20 5b 23 32 3d 23 3a 74 65 6d 70 2d 62 75 66 66 65 72 20	\210\301\207".[#2=#:temp-buffer.
0720	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 69 6e 73	buffer-name.kill-buffer].2)).ins
0740	65 72 74 2d 66 69 6c 65 2d 63 6f 6e 74 65 6e 74 73 20 62 75 66 66 65 72 2d 73 74 72 69 6e 67 20	ert-file-contents.buffer-string.
0760	23 33 3d 23 3a 74 65 6d 70 2d 66 69 6c 65 20 62 6f 64 79 20 73 74 61 6e 64 61 72 64 2d 6f 75 74	#3=#:temp-file.body.standard-out
0780	70 75 74 20 23 32 23 5d 20 39 20 28 23 24 20 2e 20 37 37 38 29 5d 29 0a 28 64 65 66 61 6c 69 61	put.#2#].9.(#$...778)]).(defalia
07a0	73 20 27 6f 72 67 2d 62 61 62 65 6c 2d 70 72 65 70 2d 73 65 73 73 69 6f 6e 3a 6c 65 64 67 65 72	s.'org-babel-prep-session:ledger
07c0	20 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 33 30 31 21 5c 32	.#[(session.params)."\300\301!\2
07e0	30 37 22 20 5b 65 72 72 6f 72 20 22 4c 65 64 67 65 72 20 64 6f 65 73 20 6e 6f 74 20 73 75 70 70	07".[error."Ledger.does.not.supp
0800	6f 72 74 20 73 65 73 73 69 6f 6e 73 22 5d 20 32 5d 29 0a 28 70 72 6f 76 69 64 65 20 27 6f 62 2d	ort.sessions"].2]).(provide.'ob-
0820	6c 65 64 67 65 72 29 0a	ledger).