blob: be6816c977dfa1f7259036c3cafaf8a2e57f76ad (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 0a 3b 3b 3b 20 69 6e 20 45 6d 61	;ELC.....;;;.Compiled.;;;.in.Ema
0020	63 73 20 76 65 72 73 69 6f 6e 20 32 35 2e 33 2e 31 0a 3b 3b 3b 20 77 69 74 68 20 61 6c 6c 20 6f	cs.version.25.3.1.;;;.with.all.o
0040	70 74 69 6d 69 7a 61 74 69 6f 6e 73 2e 0a 0a 3b 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 75 73 65	ptimizations...;;;.This.file.use
0060	73 20 64 79 6e 61 6d 69 63 20 64 6f 63 73 74 72 69 6e 67 73 2c 20 66 69 72 73 74 20 61 64 64 65	s.dynamic.docstrings,.first.adde
0080	64 20 69 6e 20 45 6d 61 63 73 20 31 39 2e 32 39 2e 0a 0a 3b 3b 3b 20 54 68 69 73 20 66 69 6c 65	d.in.Emacs.19.29...;;;.This.file
00a0	20 64 6f 65 73 20 6e 6f 74 20 63 6f 6e 74 61 69 6e 20 75 74 66 2d 38 20 6e 6f 6e 2d 41 53 43 49	.does.not.contain.utf-8.non-ASCI
00c0	49 20 63 68 61 72 61 63 74 65 72 73 2c 0a 3b 3b 3b 20 61 6e 64 20 73 6f 20 63 61 6e 20 62 65 20	I.characters,.;;;.and.so.can.be.
00e0	6c 6f 61 64 65 64 20 69 6e 20 45 6d 61 63 73 20 76 65 72 73 69 6f 6e 73 20 65 61 72 6c 69 65 72	loaded.in.Emacs.versions.earlier
0100	20 74 68 61 6e 20 32 33 2e 0a 0a 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b	.than.23...;;;;;;;;;;;;;;;;;;;;;
0120	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	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
0140	3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 0a 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b	;;;;;;;;;;;;;;.;;;;;;;;;;;;;;;;;
0160	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	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
0180	3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 0a 0a 0a 28 62 79 74 65 2d 63 6f 64 65 20	;;;;;;;;;;;;;;;;;;...(byte-code.
01a0	22 5c 33 30 30 5c 33 30 31 21 5c 32 30 34 19 00 5c 33 30 32 5c 33 30 31 5c 33 30 33 5c 33 30 34	"\300\301!\204..\302\301\303\304
01c0	42 5c 22 5c 32 31 30 5c 33 30 35 5c 33 30 31 5c 33 30 36 5c 33 30 37 23 5c 32 31 30 5c 33 31 30	B\"\210\305\301\306\307#\210\310
01e0	5c 33 30 31 5c 33 31 31 5c 33 31 32 23 5c 32 31 30 5c 33 30 30 5c 33 31 33 21 5c 32 30 34 32 00	\301\311\312#\210\300\313!\2042.
0200	5c 33 30 32 5c 33 31 33 5c 33 30 33 5c 33 31 34 42 5c 22 5c 32 31 30 5c 33 30 35 5c 33 31 33 5c	\302\313\303\314B\"\210\305\313\
0220	33 30 36 5c 33 31 35 23 5c 32 31 30 5c 33 31 30 5c 33 31 33 5c 33 31 31 5c 33 30 31 23 5c 32 31	306\315#\210\310\313\311\301#\21
0240	30 5c 33 31 36 5c 33 31 37 21 5c 32 30 37 22 20 5b 66 62 6f 75 6e 64 70 20 69 66 2d 6c 65 74 2a	0\316\317!\207".[fboundp.if-let*
0260	20 64 65 66 61 6c 69 61 73 20 6d 61 63 72 6f 20 23 5b 36 34 32 20 22 5c 33 30 30 5c 33 30 31 04	.defalias.macro.#[642."\300\301.
0280	21 5c 33 30 32 5c 33 30 33 06 06 21 40 5c 32 31 31 3c 5c 32 30 34 13 00 5c 32 31 31 43 5c 32 36	!\302\303..!@\211<\204..\211C\26
02a0	32 01 40 05 05 42 42 42 45 5c 32 30 37 22 20 5b 6c 65 74 2a 20 69 6e 74 65 72 6e 61 6c 2d 2d 62	2.@..BBBE\207".[let*.internal--b
02c0	75 69 6c 64 2d 62 69 6e 64 69 6e 67 73 20 69 66 20 6c 61 73 74 5d 20 39 20 22 50 72 6f 63 65 73	uild-bindings.if.last].9."Proces
02e0	73 20 42 49 4e 44 49 4e 47 53 20 61 6e 64 20 69 66 20 61 6c 6c 20 76 61 6c 75 65 73 20 61 72 65	s.BINDINGS.and.if.all.values.are
0300	20 6e 6f 6e 2d 6e 69 6c 20 65 76 61 6c 20 54 48 45 4e 2c 20 65 6c 73 65 20 45 4c 53 45 2e 5c 6e	.non-nil.eval.THEN,.else.ELSE.\n
0320	41 72 67 75 6d 65 6e 74 20 42 49 4e 44 49 4e 47 53 20 69 73 20 61 20 6c 69 73 74 20 6f 66 20 74	Argument.BINDINGS.is.a.list.of.t
0340	75 70 6c 65 73 20 77 68 6f 73 65 20 63 61 72 20 69 73 20 61 20 73 79 6d 62 6f 6c 20 74 6f 20 62	uples.whose.car.is.a.symbol.to.b
0360	65 5c 6e 62 6f 75 6e 64 20 61 6e 64 20 28 6f 70 74 69 6f 6e 61 6c 6c 79 29 20 75 73 65 64 20 69	e\nbound.and.(optionally).used.i
0380	6e 20 54 48 45 4e 2c 20 61 6e 64 20 69 74 73 20 63 61 64 72 20 69 73 20 61 20 73 65 78 70 20 74	n.THEN,.and.its.cadr.is.a.sexp.t
03a0	6f 20 62 65 5c 6e 65 76 61 6c 6c 65 64 20 74 6f 20 73 65 74 20 73 79 6d 62 6f 6c 27 73 20 76 61	o.be\nevalled.to.set.symbol's.va
03c0	6c 75 65 2e 5c 6e 5c 6e 28 66 6e 20 42 49 4e 44 49 4e 47 53 20 54 48 45 4e 20 26 72 65 73 74 20	lue.\n\n(fn.BINDINGS.THEN.&rest.
03e0	45 4c 53 45 29 22 5d 20 66 75 6e 63 74 69 6f 6e 2d 70 75 74 20 6c 69 73 70 2d 69 6e 64 65 6e 74	ELSE)"].function-put.lisp-indent
0400	2d 66 75 6e 63 74 69 6f 6e 20 32 20 70 75 74 20 65 64 65 62 75 67 2d 66 6f 72 6d 2d 73 70 65 63	-function.2.put.edebug-form-spec
0420	20 28 5b 26 6f 72 20 28 26 72 65 73 74 20 28 73 79 6d 62 6f 6c 70 20 66 6f 72 6d 29 29 20 28 73	.([&or.(&rest.(symbolp.form)).(s
0440	79 6d 62 6f 6c 70 20 66 6f 72 6d 29 5d 20 66 6f 72 6d 20 62 6f 64 79 29 20 77 68 65 6e 2d 6c 65	ymbolp.form)].form.body).when-le
0460	74 2a 20 23 5b 33 38 35 20 22 5c 33 30 30 02 5c 33 30 31 03 21 45 5c 32 30 37 22 20 5b 69 66 2d	t*.#[385."\300.\301.!E\207".[if-
0480	6c 65 74 2a 20 6d 61 63 72 6f 65 78 70 2d 70 72 6f 67 6e 5d 20 36 20 22 50 72 6f 63 65 73 73 20	let*.macroexp-progn].6."Process.
04a0	42 49 4e 44 49 4e 47 53 20 61 6e 64 20 69 66 20 61 6c 6c 20 76 61 6c 75 65 73 20 61 72 65 20 6e	BINDINGS.and.if.all.values.are.n
04c0	6f 6e 2d 6e 69 6c 20 65 76 61 6c 20 42 4f 44 59 2e 5c 6e 41 72 67 75 6d 65 6e 74 20 42 49 4e 44	on-nil.eval.BODY.\nArgument.BIND
04e0	49 4e 47 53 20 69 73 20 61 20 6c 69 73 74 20 6f 66 20 74 75 70 6c 65 73 20 77 68 6f 73 65 20 63	INGS.is.a.list.of.tuples.whose.c
0500	61 72 20 69 73 20 61 20 73 79 6d 62 6f 6c 20 74 6f 20 62 65 5c 6e 62 6f 75 6e 64 20 61 6e 64 20	ar.is.a.symbol.to.be\nbound.and.
0520	28 6f 70 74 69 6f 6e 61 6c 6c 79 29 20 75 73 65 64 20 69 6e 20 42 4f 44 59 2c 20 61 6e 64 20 69	(optionally).used.in.BODY,.and.i
0540	74 73 20 63 61 64 72 20 69 73 20 61 20 73 65 78 70 20 74 6f 20 62 65 5c 6e 65 76 61 6c 6c 65 64	ts.cadr.is.a.sexp.to.be\nevalled
0560	20 74 6f 20 73 65 74 20 73 79 6d 62 6f 6c 27 73 20 76 61 6c 75 65 2e 5c 6e 5c 6e 28 66 6e 20 42	.to.set.symbol's.value.\n\n(fn.B
0580	49 4e 44 49 4e 47 53 20 26 72 65 73 74 20 42 4f 44 59 29 22 5d 20 31 20 70 72 6f 76 69 64 65 20	INDINGS.&rest.BODY)"].1.provide.
05a0	63 69 64 65 72 2d 63 6f 6d 70 61 74 5d 20 34 29 0a	cider-compat].4).