blob: 06dcbbfff9427432d7a0d7334615d59837a35f7a (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 72 65 71 75 69 72 65 20 27 63	;;;;;;;;;;;;;;;;;;...(require.'c
01a0	6c 2d 6c 69 62 29 0a 23 40 32 37 30 20 54 68 65 20 61 6d 6f 75 6e 74 20 6f 66 20 74 69 6d 65 20	l-lib).#@270.The.amount.of.time.
01c0	61 66 74 65 72 20 77 68 69 63 68 20 74 6f 20 72 65 6d 6f 76 65 20 61 20 6d 65 6d 6f 69 7a 61 74	after.which.to.remove.a.memoizat
01e0	69 6f 6e 2e 0a 54 68 69 73 20 72 65 70 72 65 73 65 6e 74 73 20 74 68 65 20 74 69 6d 65 20 61 66	ion..This.represents.the.time.af
0200	74 65 72 20 6c 61 73 74 20 75 73 65 20 6f 66 20 74 68 65 20 6d 65 6d 6f 69 7a 61 74 69 6f 6e 20	ter.last.use.of.the.memoization.
0220	61 66 74 65 72 0a 77 68 69 63 68 20 74 68 65 20 76 61 6c 75 65 20 69 73 20 65 78 70 69 72 65 64	after.which.the.value.is.expired
0240	2e 20 53 65 74 74 69 6e 67 20 74 68 69 73 20 74 6f 20 6e 69 6c 20 6d 65 61 6e 73 20 74 6f 20 6e	..Setting.this.to.nil.means.to.n
0260	65 76 65 72 0a 65 78 70 69 72 65 2c 20 77 68 69 63 68 20 77 69 6c 6c 20 63 61 75 73 65 20 61 20	ever.expire,.which.will.cause.a.
0280	6d 65 6d 6f 72 79 20 6c 65 61 6b 2c 20 62 75 74 20 6d 61 79 20 62 65 20 61 63 63 65 70 74 61 62	memory.leak,.but.may.be.acceptab
02a0	6c 65 20 66 6f 72 0a 76 65 72 79 20 63 61 72 65 66 75 6c 20 75 73 65 73 2e 1f 0a 28 64 65 66 76	le.for.very.careful.uses...(defv
02c0	61 72 20 6d 65 6d 6f 69 7a 65 2d 64 65 66 61 75 6c 74 2d 74 69 6d 65 6f 75 74 20 22 32 20 68 6f	ar.memoize-default-timeout."2.ho
02e0	75 72 73 22 20 28 23 24 20 2e 20 34 32 39 29 29 0a 23 40 33 33 32 20 4d 65 6d 6f 69 7a 65 20 46	urs".(#$...429)).#@332.Memoize.F
0300	55 4e 43 3a 20 61 20 63 6c 6f 73 75 72 65 2c 20 6c 61 6d 62 64 61 2c 20 6f 72 20 73 79 6d 62 6f	UNC:.a.closure,.lambda,.or.symbo
0320	6c 2e 0a 0a 49 66 20 61 72 67 75 6d 65 6e 74 20 69 73 20 61 20 73 79 6d 62 6f 6c 20 74 68 65 6e	l...If.argument.is.a.symbol.then
0340	20 69 6e 73 74 61 6c 6c 20 74 68 65 20 6d 65 6d 6f 69 7a 65 64 20 66 75 6e 63 74 69 6f 6e 20 6f	.install.the.memoized.function.o
0360	76 65 72 0a 74 68 65 20 6f 72 69 67 69 6e 61 6c 20 66 75 6e 63 74 69 6f 6e 2e 20 54 68 65 20 54	ver.the.original.function..The.T
0380	49 4d 45 4f 55 54 20 76 61 6c 75 65 2c 20 61 20 74 69 6d 65 6f 75 74 20 73 74 72 69 6e 67 20 61	IMEOUT.value,.a.timeout.string.a
03a0	73 0a 75 73 65 64 20 62 79 20 60 72 75 6e 2d 61 74 2d 74 69 6d 65 27 20 77 69 6c 6c 20 64 65 74	s.used.by.`run-at-time'.will.det
03c0	65 72 6d 69 6e 65 20 77 68 65 6e 20 74 68 65 20 76 61 6c 75 65 20 65 78 70 69 72 65 73 2c 20 61	ermine.when.the.value.expires,.a
03e0	6e 64 0a 77 69 6c 6c 20 61 70 70 6c 79 20 61 66 74 65 72 20 74 68 65 20 6c 61 73 74 20 61 63 63	nd.will.apply.after.the.last.acc
0400	65 73 73 20 28 75 6e 6c 65 73 73 20 61 6e 6f 74 68 65 72 20 61 63 63 65 73 73 0a 68 61 70 70 65	ess.(unless.another.access.happe
0420	6e 73 29 2e 0a 0a 28 66 6e 20 46 55 4e 43 20 26 6f 70 74 69 6f 6e 61 6c 20 54 49 4d 45 4f 55 54	ns)...(fn.FUNC.&optional.TIMEOUT
0440	29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 6d 65 6d 6f 69 7a 65 20 23 5b 35 31 33 20 22 01 39 5c	)..(defalias.'memoize.#[513.".9\
0460	32 30 33 33 00 01 5c 33 30 30 4e 5c 32 30 33 10 00 5c 33 30 31 5c 33 30 32 03 5c 22 5c 32 31 30	2033..\300N\203..\301\302.\"\210
0480	5c 33 30 33 02 5c 33 30 34 5c 33 30 35 05 21 23 5c 32 31 30 5c 33 30 33 02 5c 33 30 36 5c 33 30	\303.\304\305.!#\210\303.\306\30
04a0	35 05 21 5c 33 30 37 50 23 5c 32 31 30 5c 33 30 33 02 5c 33 30 30 04 4b 23 5c 32 31 30 01 5c 33	5.!\307P#\210\303.\300.K#\210.\3
04c0	31 30 03 4b 03 5c 22 4d 5c 32 31 30 01 5c 32 30 37 5c 33 31 31 02 21 5c 32 30 35 3d 00 5c 33 31	10.K.\"M\210.\207\311.!\205=.\31
04e0	30 02 02 5c 22 5c 32 30 37 22 20 5b 3a 6d 65 6d 6f 69 7a 65 2d 6f 72 69 67 69 6e 61 6c 2d 66 75	0..\"\207".[:memoize-original-fu
0500	6e 63 74 69 6f 6e 20 75 73 65 72 2d 65 72 72 6f 72 20 22 25 73 20 69 73 20 61 6c 72 65 61 64 79	nction.user-error."%s.is.already
0520	20 6d 65 6d 6f 69 7a 65 64 22 20 70 75 74 20 3a 6d 65 6d 6f 69 7a 65 2d 6f 72 69 67 69 6e 61 6c	.memoized".put.:memoize-original
0540	2d 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 66 75 6e	-documentation.documentation.fun
0560	63 74 69 6f 6e 2d 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 22 20 28 6d 65 6d 6f 69 7a 65 64 29	ction-documentation.".(memoized)
0580	22 20 6d 65 6d 6f 69 7a 65 2d 2d 77 72 61 70 20 66 75 6e 63 74 69 6f 6e 70 5d 20 37 20 28 23 24	".memoize--wrap.functionp].7.(#$
05a0	20 2e 20 37 35 39 29 5d 29 0a 23 40 31 33 31 20 52 65 73 74 6f 72 65 20 74 68 65 20 6f 72 69 67	...759)]).#@131.Restore.the.orig
05c0	69 6e 61 6c 2c 20 6e 6f 6e 2d 6d 65 6d 6f 69 7a 65 64 20 64 65 66 69 6e 69 74 69 6f 6e 20 6f 66	inal,.non-memoized.definition.of
05e0	20 46 55 4e 43 2e 0a 46 55 4e 43 20 73 68 6f 75 6c 64 20 62 65 20 61 20 73 79 6d 62 6f 6c 20 77	.FUNC..FUNC.should.be.a.symbol.w
0600	68 69 63 68 20 68 61 73 20 62 65 65 6e 20 6d 65 6d 6f 69 7a 65 64 20 77 69 74 68 20 60 6d 65 6d	hich.has.been.memoized.with.`mem
0620	6f 69 7a 65 27 2e 0a 0a 28 66 6e 20 46 55 4e 43 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 6d 65	oize'...(fn.FUNC)..(defalias.'me
0640	6d 6f 69 7a 65 2d 72 65 73 74 6f 72 65 20 23 5b 32 35 37 20 22 5c 32 31 31 5c 33 30 30 4e 5c 32	moize-restore.#[257."\211\300N\2
0660	30 34 0b 00 5c 33 30 31 5c 33 30 32 02 5c 22 5c 32 31 30 5c 32 31 31 01 5c 33 30 30 4e 4d 5c 32	04..\301\302.\"\210\211.\300NM\2
0680	31 30 5c 33 30 33 01 5c 33 30 30 5c 33 30 34 23 5c 32 31 30 5c 33 30 33 01 5c 33 30 35 03 5c 33	10\303.\300\304#\210\303.\305.\3
06a0	30 36 4e 23 5c 32 31 30 5c 33 30 33 01 5c 33 30 36 5c 33 30 34 23 5c 32 30 37 22 20 5b 3a 6d 65	06N#\210\303.\306\304#\207".[:me
06c0	6d 6f 69 7a 65 2d 6f 72 69 67 69 6e 61 6c 2d 66 75 6e 63 74 69 6f 6e 20 75 73 65 72 2d 65 72 72	moize-original-function.user-err
06e0	6f 72 20 22 25 73 20 69 73 20 6e 6f 74 20 6d 65 6d 6f 69 7a 65 64 22 20 70 75 74 20 6e 69 6c 20	or."%s.is.not.memoized".put.nil.
0700	66 75 6e 63 74 69 6f 6e 2d 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 3a 6d 65 6d 6f 69 7a 65 2d	function-documentation.:memoize-
0720	6f 72 69 67 69 6e 61 6c 2d 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 5d 20 36 20 28 23 24 20 2e 20	original-documentation].6.(#$...
0740	31 34 35 36 29 5d 29 0a 23 40 32 35 33 20 52 65 74 75 72 6e 20 74 68 65 20 6d 65 6d 6f 69 7a 65	1456)]).#@253.Return.the.memoize
0760	64 20 76 65 72 73 69 6f 6e 20 6f 66 20 46 55 4e 43 2e 0a 54 49 4d 45 4f 55 54 20 73 70 65 63 69	d.version.of.FUNC..TIMEOUT.speci
0780	66 69 65 73 20 68 6f 77 20 6c 6f 6e 67 20 74 68 65 20 76 61 6c 75 65 73 20 6c 61 73 74 20 66 72	fies.how.long.the.values.last.fr
07a0	6f 6d 20 6c 61 73 74 20 61 63 63 65 73 73 2e 20 41 0a 6e 69 6c 20 74 69 6d 65 6f 75 74 20 77 69	om.last.access..A.nil.timeout.wi
07c0	6c 6c 20 63 61 75 73 65 20 74 68 65 20 76 61 6c 75 65 73 20 74 6f 20 6e 65 76 65 72 20 65 78 70	ll.cause.the.values.to.never.exp
07e0	69 72 65 2c 20 77 68 69 63 68 20 77 69 6c 6c 0a 63 61 75 73 65 20 61 20 6d 65 6d 6f 72 79 20 6c	ire,.which.will.cause.a.memory.l
0800	65 61 6b 20 61 73 20 6d 65 6d 6f 69 7a 65 20 69 73 20 75 73 65 2c 20 73 6f 20 75 73 65 20 74 68	eak.as.memoize.is.use,.so.use.th
0820	65 20 6e 69 6c 20 76 61 6c 75 65 20 77 69 74 68 0a 63 61 72 65 2e 0a 0a 28 66 6e 20 46 55 4e 43	e.nil.value.with.care...(fn.FUNC
0840	20 54 49 4d 45 4f 55 54 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 6d 65 6d 6f 69 7a 65 2d 2d 77	.TIMEOUT)..(defalias.'memoize--w
0860	72 61 70 20 23 5b 35 31 34 20 22 5c 33 30 30 5c 33 30 31 5c 33 30 32 5c 22 5c 33 30 30 5c 33 30	rap.#[514."\300\301\302\"\300\30
0880	31 5c 33 30 32 5c 22 5c 33 30 33 5c 33 30 34 5c 33 30 35 5c 33 30 36 5c 33 30 37 06 08 06 08 06	1\302\"\303\304\305\306\307.....
08a0	08 06 08 24 5c 33 31 30 5c 22 5c 33 31 31 5c 33 31 32 25 5c 32 30 37 22 20 5b 6d 61 6b 65 2d 68	...$\310\"\311\312%\207".[make-h
08c0	61 73 68 2d 74 61 62 6c 65 20 3a 74 65 73 74 20 65 71 75 61 6c 20 6d 61 6b 65 2d 62 79 74 65 2d	ash-table.:test.equal.make-byte-
08e0	63 6f 64 65 20 31 32 38 20 22 5c 33 30 34 01 5c 33 30 32 5c 22 5c 33 30 35 5c 33 30 36 5c 33 30	code.128."\304.\302\"\305\306\30
0900	37 5c 33 31 30 5c 33 31 31 5c 33 30 31 5c 33 30 32 5c 33 30 33 06 09 24 5c 33 31 32 5c 22 5c 33	7\310\311\301\302\303..$\312\"\3
0920	31 33 24 5c 32 31 36 5c 32 31 31 5c 32 30 36 20 00 5c 33 31 34 02 5c 33 31 35 5c 33 30 30 05 5c	13$\216\211\206..\314.\315\300.\
0940	22 5c 33 30 32 23 29 5c 32 30 37 22 20 76 63 6f 6e 63 61 74 20 76 65 63 74 6f 72 20 5b 67 65 74	"\302#)\207".vconcat.vector.[get
0960	68 61 73 68 20 6d 61 6b 65 2d 62 79 74 65 2d 63 6f 64 65 20 30 20 22 5c 33 30 35 5c 33 30 33 5c	hash.make-byte-code.0."\305\303\
0980	33 30 32 5c 22 5c 33 30 30 5c 32 30 36 09 00 5c 66 01 5c 32 30 33 11 00 5c 33 30 36 02 21 5c 32	302\"\300\206..\f.\203..\306.!\2
09a0	31 30 5c 32 31 31 5c 32 30 35 29 00 5c 33 30 37 5c 33 30 33 5c 33 31 30 03 5c 33 31 31 5c 33 31	10\211\205).\307\303\310.\311\31
09c0	32 5c 33 31 33 5c 33 31 34 5c 33 31 35 5c 33 31 36 5c 33 30 31 5c 33 30 33 5c 22 5c 33 31 37 5c	2\313\314\315\316\301\303\"\317\
09e0	22 5c 33 32 30 24 23 5c 33 30 32 23 5c 32 30 37 22 20 76 63 6f 6e 63 61 74 20 76 65 63 74 6f 72	"\320$#\302#\207".vconcat.vector
0a00	20 5b 6d 65 6d 6f 69 7a 65 2d 64 65 66 61 75 6c 74 2d 74 69 6d 65 6f 75 74 20 67 65 74 68 61 73	.[memoize-default-timeout.gethas
0a20	68 20 63 61 6e 63 65 6c 2d 74 69 6d 65 72 20 70 75 74 68 61 73 68 20 72 75 6e 2d 61 74 2d 74 69	h.cancel-timer.puthash.run-at-ti
0a40	6d 65 20 6e 69 6c 20 6d 61 6b 65 2d 62 79 74 65 2d 63 6f 64 65 20 30 20 22 5c 33 30 32 5c 33 30	me.nil.make-byte-code.0."\302\30
0a60	31 5c 33 30 30 5c 22 5c 32 30 37 22 20 76 63 6f 6e 63 61 74 20 76 65 63 74 6f 72 20 5b 72 65 6d	1\300\"\207".vconcat.vector.[rem
0a80	68 61 73 68 5d 20 33 5d 20 31 34 20 70 75 74 68 61 73 68 20 61 70 70 6c 79 5d 20 31 31 20 22 5c	hash].3].14.puthash.apply].11."\
0aa0	6e 5c 6e 28 66 6e 20 26 72 65 73 74 20 41 52 47 53 29 22 5d 20 31 33 20 28 23 24 20 2e 20 31 38	n\n(fn.&rest.ARGS)"].13.(#$...18
0ac0	37 30 29 5d 29 0a 23 40 31 33 31 20 43 72 65 61 74 65 20 61 20 6d 65 6d 6f 69 7a 65 27 64 20 66	70)]).#@131.Create.a.memoize'd.f
0ae0	75 6e 63 74 69 6f 6e 2e 20 4e 41 4d 45 2c 20 41 52 47 4c 49 53 54 2c 20 44 4f 43 53 54 52 49 4e	unction..NAME,.ARGLIST,.DOCSTRIN
0b00	47 20 61 6e 64 20 42 4f 44 59 0a 68 61 76 65 20 74 68 65 20 73 61 6d 65 20 6d 65 61 6e 69 6e 67	G.and.BODY.have.the.same.meaning
0b20	20 61 73 20 69 6e 20 60 64 65 66 75 6e 27 2e 0a 0a 28 66 6e 20 4e 41 4d 45 20 41 52 47 4c 49 53	.as.in.`defun'...(fn.NAME.ARGLIS
0b40	54 20 26 72 65 73 74 20 42 4f 44 59 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 64 65 66 6d 65 6d	T.&rest.BODY)..(defalias.'defmem
0b60	6f 69 7a 65 20 27 28 6d 61 63 72 6f 20 2e 20 23 5b 36 34 32 20 22 5c 33 30 30 5c 33 30 31 04 04	oize.'(macro...#[642."\300\301..
0b80	04 42 42 42 5c 33 30 32 5c 33 30 33 06 06 44 44 45 5c 32 30 37 22 20 5b 70 72 6f 67 6e 20 64 65	.BBB\302\303..DDE\207".[progn.de
0ba0	66 75 6e 20 6d 65 6d 6f 69 7a 65 20 71 75 6f 74 65 5d 20 38 20 28 23 24 20 2e 20 32 37 36 34 29	fun.memoize.quote].8.(#$...2764)
0bc0	5d 29 29 0a 28 66 75 6e 63 74 69 6f 6e 2d 70 75 74 20 27 64 65 66 6d 65 6d 6f 69 7a 65 20 27 6c	])).(function-put.'defmemoize.'l
0be0	69 73 70 2d 69 6e 64 65 6e 74 2d 66 75 6e 63 74 69 6f 6e 20 27 64 65 66 75 6e 29 0a 23 40 31 34	isp-indent-function.'defun).#@14
0c00	36 20 4d 65 6d 6f 69 7a 65 20 74 68 65 20 67 69 76 65 6e 20 66 75 6e 63 74 69 6f 6e 20 62 79 20	6.Memoize.the.given.function.by.
0c20	62 75 66 66 65 72 20 63 6f 6e 74 65 6e 74 73 2e 0a 49 66 20 61 72 67 75 6d 65 6e 74 20 69 73 20	buffer.contents..If.argument.is.
0c40	61 20 73 79 6d 62 6f 6c 20 74 68 65 6e 20 69 6e 73 74 61 6c 6c 20 74 68 65 20 6d 65 6d 6f 69 7a	a.symbol.then.install.the.memoiz
0c60	65 64 20 66 75 6e 63 74 69 6f 6e 20 6f 76 65 72 0a 74 68 65 20 6f 72 69 67 69 6e 61 6c 20 66 75	ed.function.over.the.original.fu
0c80	6e 63 74 69 6f 6e 2e 0a 0a 28 66 6e 20 46 55 4e 43 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 6d	nction...(fn.FUNC)..(defalias.'m
0ca0	65 6d 6f 69 7a 65 2d 62 79 2d 62 75 66 66 65 72 2d 63 6f 6e 74 65 6e 74 73 20 23 5b 32 35 37 20	emoize-by-buffer-contents.#[257.
0cc0	22 5c 32 31 31 39 5c 32 30 33 17 00 5c 33 30 30 01 5c 33 30 31 5c 33 30 32 04 21 5c 33 30 33 50	"\2119\203..\300.\301\302.!\303P
0ce0	23 5c 32 31 30 5c 32 31 31 5c 33 30 34 02 4b 21 4d 5c 32 31 30 5c 32 30 37 5c 33 30 35 01 21 5c	#\210\211\304.K!M\210\207\305.!\
0d00	32 30 35 20 00 5c 33 30 34 01 21 5c 32 30 37 22 20 5b 70 75 74 20 66 75 6e 63 74 69 6f 6e 2d 64	205..\304.!\207".[put.function-d
0d20	6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 22 20 28 6d 65	ocumentation.documentation.".(me
0d40	6d 6f 69 7a 65 64 20 62 79 20 62 75 66 66 65 72 20 63 6f 6e 74 65 6e 74 73 29 22 20 6d 65 6d 6f	moized.by.buffer.contents)".memo
0d60	69 7a 65 2d 62 79 2d 62 75 66 66 65 72 2d 63 6f 6e 74 65 6e 74 73 2d 2d 77 72 61 70 20 66 75 6e	ize-by-buffer-contents--wrap.fun
0d80	63 74 69 6f 6e 70 5d 20 36 20 28 23 24 20 2e 20 33 30 37 34 29 5d 29 0a 23 40 32 38 36 20 52 65	ctionp].6.(#$...3074)]).#@286.Re
0da0	74 75 72 6e 20 74 68 65 20 6d 65 6d 6f 69 7a 61 74 69 6f 6e 20 62 61 73 65 64 20 6f 6e 20 74 68	turn.the.memoization.based.on.th
0dc0	65 20 62 75 66 66 65 72 20 63 6f 6e 74 65 6e 74 73 20 6f 66 20 46 55 4e 43 2e 0a 0a 54 68 69 73	e.buffer.contents.of.FUNC...This
0de0	20 66 6f 72 6d 20 6f 66 20 6d 65 6d 6f 69 7a 61 74 69 6f 6e 20 77 69 6c 6c 20 62 65 20 62 61 73	.form.of.memoization.will.be.bas
0e00	65 64 20 6f 66 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 0a 63 6f 6e 74 65 6e	ed.off.the.current.buffer.conten
0e20	74 73 2e 20 41 20 64 69 66 66 65 72 65 6e 74 20 6d 65 6d 6f 69 7a 61 74 69 6f 6e 20 69 73 20 73	ts..A.different.memoization.is.s
0e40	74 6f 72 65 64 20 66 6f 72 20 61 6c 6c 20 62 75 66 66 65 72 0a 63 6f 6e 74 65 6e 74 73 2c 20 61	tored.for.all.buffer.contents,.a
0e60	6c 74 68 6f 75 67 68 20 6f 6c 64 20 63 6f 6e 74 65 6e 74 73 20 61 6e 64 20 6e 6f 2d 6c 6f 6e 67	lthough.old.contents.and.no-long
0e80	65 72 2d 65 78 69 73 74 61 6e 74 20 62 75 66 66 65 72 73 0a 77 69 6c 6c 20 67 65 74 20 67 61 72	er-existant.buffers.will.get.gar
0ea0	62 61 67 65 20 63 6f 6c 6c 65 63 74 65 64 2e 0a 0a 28 66 6e 20 46 55 4e 43 29 1f 0a 28 64 65 66	bage.collected...(fn.FUNC)..(def
0ec0	61 6c 69 61 73 20 27 6d 65 6d 6f 69 7a 65 2d 62 79 2d 62 75 66 66 65 72 2d 63 6f 6e 74 65 6e 74	alias.'memoize-by-buffer-content
0ee0	73 2d 2d 77 72 61 70 20 23 5b 32 35 37 20 22 5c 33 30 30 5c 33 30 31 5c 33 30 32 5c 33 30 33 5c	s--wrap.#[257."\300\301\302\303\
0f00	33 30 34 24 5c 33 30 30 5c 33 30 33 5c 33 30 34 5c 22 5c 33 30 30 5c 33 30 33 5c 33 30 34 5c 22	304$\300\303\304\"\300\303\304\"
0f20	5c 33 30 35 5c 33 30 36 5c 33 30 37 5c 33 31 30 5c 33 31 31 06 08 06 08 06 08 06 08 24 5c 33 31	\305\306\307\310\311........$\31
0f40	32 5c 22 5c 33 31 33 5c 33 31 34 25 5c 32 30 37 22 20 5b 6d 61 6b 65 2d 68 61 73 68 2d 74 61 62	2\"\313\314%\207".[make-hash-tab
0f60	6c 65 20 3a 74 65 73 74 20 65 71 75 61 6c 20 3a 77 65 61 6b 6e 65 73 73 20 6b 65 79 20 6d 61 6b	le.:test.equal.:weakness.key.mak
0f80	65 2d 62 79 74 65 2d 63 6f 64 65 20 31 32 38 20 22 5c 33 30 34 5c 33 30 35 5c 33 30 36 20 5c 22	e-byte-code.128."\304\305\306.\"
0fa0	5c 32 31 31 02 42 5c 33 30 37 01 5c 33 30 31 5c 22 5c 32 31 31 5c 32 30 36 25 00 5c 33 31 30 70	\211.B\307.\301\"\211\206%.\310p
0fc0	04 5c 33 30 32 23 5c 32 31 30 5c 33 31 30 03 03 5c 33 30 33 23 5c 32 31 30 5c 33 31 30 02 5c 33	.\302#\210\310..\303#\210\310.\3
0fe0	31 31 5c 33 30 30 06 07 5c 22 5c 33 30 31 23 5c 32 30 37 22 20 76 63 6f 6e 63 61 74 20 76 65 63	11\300..\"\301#\207".vconcat.vec
1000	74 6f 72 20 5b 73 65 63 75 72 65 2d 68 61 73 68 20 6d 64 35 20 62 75 66 66 65 72 2d 73 74 72 69	tor.[secure-hash.md5.buffer-stri
1020	6e 67 20 67 65 74 68 61 73 68 20 70 75 74 68 61 73 68 20 61 70 70 6c 79 5d 20 39 20 22 5c 6e 5c	ng.gethash.puthash.apply].9."\n\
1040	6e 28 66 6e 20 26 72 65 73 74 20 41 52 47 53 29 22 5d 20 31 33 20 28 23 24 20 2e 20 33 34 38 36	n(fn.&rest.ARGS)"].13.(#$...3486
1060	29 5d 29 0a 23 40 31 35 30 20 43 72 65 61 74 65 20 61 20 6d 65 6d 6f 69 7a 65 27 64 2d 62 79 2d	)]).#@150.Create.a.memoize'd-by-
1080	62 75 66 66 65 72 2d 63 6f 6e 74 65 6e 74 73 20 66 75 6e 63 74 69 6f 6e 2e 20 4e 41 4d 45 2c 20	buffer-contents.function..NAME,.
10a0	41 52 47 4c 49 53 54 2c 0a 44 4f 43 53 54 52 49 4e 47 20 61 6e 64 20 42 4f 44 59 20 68 61 76 65	ARGLIST,.DOCSTRING.and.BODY.have
10c0	20 74 68 65 20 73 61 6d 65 20 6d 65 61 6e 69 6e 67 20 61 73 20 69 6e 20 60 64 65 66 75 6e 27 2e	.the.same.meaning.as.in.`defun'.
10e0	0a 0a 28 66 6e 20 4e 41 4d 45 20 41 52 47 4c 49 53 54 20 26 72 65 73 74 20 42 4f 44 59 29 1f 0a	..(fn.NAME.ARGLIST.&rest.BODY)..
1100	28 64 65 66 61 6c 69 61 73 20 27 64 65 66 6d 65 6d 6f 69 7a 65 2d 62 79 2d 62 75 66 66 65 72 2d	(defalias.'defmemoize-by-buffer-
1120	63 6f 6e 74 65 6e 74 73 20 27 28 6d 61 63 72 6f 20 2e 20 23 5b 36 34 32 20 22 5c 33 30 30 5c 33	contents.'(macro...#[642."\300\3
1140	30 31 04 04 04 42 42 42 5c 33 30 32 5c 33 30 33 06 06 44 44 45 5c 32 30 37 22 20 5b 70 72 6f 67	01...BBB\302\303..DDE\207".[prog
1160	6e 20 64 65 66 75 6e 20 6d 65 6d 6f 69 7a 65 2d 62 79 2d 62 75 66 66 65 72 2d 63 6f 6e 74 65 6e	n.defun.memoize-by-buffer-conten
1180	74 73 20 71 75 6f 74 65 5d 20 38 20 28 23 24 20 2e 20 34 32 30 32 29 5d 29 29 0a 28 62 79 74 65	ts.quote].8.(#$...4202)])).(byte
11a0	2d 63 6f 64 65 20 22 5c 33 30 30 5c 33 30 31 5c 33 30 32 5c 33 30 33 23 5c 32 31 30 5c 33 30 34	-code."\300\301\302\303#\210\304
11c0	5c 33 30 35 21 5c 32 30 37 22 20 5b 66 75 6e 63 74 69 6f 6e 2d 70 75 74 20 64 65 66 6d 65 6d 6f	\305!\207".[function-put.defmemo
11e0	69 7a 65 2d 62 79 2d 62 75 66 66 65 72 2d 63 6f 6e 74 65 6e 74 73 20 6c 69 73 70 2d 69 6e 64 65	ize-by-buffer-contents.lisp-inde
1200	6e 74 2d 66 75 6e 63 74 69 6f 6e 20 64 65 66 75 6e 20 70 72 6f 76 69 64 65 20 6d 65 6d 6f 69 7a	nt-function.defun.provide.memoiz
1220	65 5d 20 34 29 0a	e].4).