blob: a3d823d21cae73cd4b6c4378147e59c6c174fd16 (plain)

ofs	hex dump	ascii
0000	3b 45 4c 43 1c 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 38 2e 31 0a 3b 3b 3b 20 77 69 74 68 20 61 6c 6c 20 6f 70 74	cs.version.28.1.;;;.with.all.opt
0040	69 6d 69 7a 61 74 69 6f 6e 73 2e 0a 0a 0a 0a 23 40 33 37 20 49 67 6e 6f 72 65 20 61 6c 6c 20 61	imizations.....#@37.Ignore.all.a
0060	72 67 75 6d 65 6e 74 73 2e 0a 0a 28 66 6e 20 26 72 65 73 74 20 5f 29 1f 0a 28 64 65 66 61 6c 69	rguments...(fn.&rest._)..(defali
0080	61 73 20 27 63 6f 6d 70 61 74 2d 2d 69 67 6e 6f 72 65 20 27 28 6d 61 63 72 6f 20 2e 20 23 5b 31	as.'compat--ignore.'(macro...#[1
00a0	32 38 20 22 5c 33 30 30 5c 32 30 37 22 20 5b 6e 69 6c 5d 20 32 20 28 23 24 20 2e 20 38 34 29 5d	28."\300\207".[nil].2.(#$...84)]
00c0	29 29 0a 23 40 31 36 38 35 20 46 75 6e 63 74 69 6f 6e 20 75 73 65 64 20 74 6f 20 67 65 6e 65 72	)).#@1685.Function.used.to.gener
00e0	61 74 65 20 63 6f 6d 70 61 74 69 62 69 6c 69 74 79 20 63 6f 64 65 2e 0a 54 68 65 20 66 75 6e 63	ate.compatibility.code..The.func
0100	74 69 6f 6e 20 6d 75 73 74 20 74 61 6b 65 20 73 69 78 20 61 72 67 75 6d 65 6e 74 73 3a 20 4e 41	tion.must.take.six.arguments:.NA
0120	4d 45 2c 20 44 45 46 2d 46 4e 2c 20 49 4e 53 54 41 4c 4c 2d 46 4e 2c 0a 43 48 45 43 4b 2d 46 4e	ME,.DEF-FN,.INSTALL-FN,.CHECK-FN
0140	2c 20 41 54 54 52 20 61 6e 64 20 54 59 50 45 2e 20 20 54 68 65 20 72 65 73 75 6c 74 69 6e 67 20	,.ATTR.and.TYPE...The.resulting.
0160	62 6f 64 79 20 69 73 20 63 6f 6e 73 74 72 75 63 74 65 64 20 62 79 0a 69 6e 76 6f 6b 69 6e 67 20	body.is.constructed.by.invoking.
0180	74 68 65 20 66 75 6e 63 74 69 6f 6e 73 20 44 45 46 2d 46 4e 20 28 70 61 73 73 65 64 20 74 68 65	the.functions.DEF-FN.(passed.the
01a0	20 22 72 65 61 6c 6e 61 6d 65 22 20 61 6e 64 20 74 68 65 0a 76 65 72 73 69 6f 6e 20 6e 75 6d 62	."realname".and.the.version.numb
01c0	65 72 2c 20 72 65 74 75 72 6e 69 6e 67 20 74 68 65 20 63 6f 6d 70 61 74 69 62 69 6c 69 74 79 20	er,.returning.the.compatibility.
01e0	64 65 66 69 6e 69 74 69 6f 6e 29 2c 20 74 68 65 0a 49 4e 53 54 41 4c 4c 2d 46 4e 20 28 70 61 73	definition),.the.INSTALL-FN.(pas
0200	73 65 64 20 74 68 65 20 22 72 65 61 6c 6e 61 6d 65 22 20 61 6e 64 20 72 65 74 75 72 6e 69 6e 67	sed.the."realname".and.returning
0220	20 74 68 65 0a 69 6e 73 74 61 6c 6c 61 74 69 6f 6e 20 63 6f 64 65 29 2c 20 43 48 45 43 4b 2d 46	.the.installation.code),.CHECK-F
0240	4e 20 28 70 61 73 73 65 64 20 74 68 65 20 22 72 65 61 6c 6e 61 6d 65 22 20 61 6e 64 0a 72 65 74	N.(passed.the."realname".and.ret
0260	75 72 6e 69 6e 67 20 61 20 63 68 65 63 6b 20 74 6f 20 73 65 65 20 69 66 20 74 68 65 20 63 6f 6d	urning.a.check.to.see.if.the.com
0280	70 61 74 69 62 69 6c 69 74 79 20 64 65 66 69 6e 69 74 69 6f 6e 20 73 68 6f 75 6c 64 0a 62 65 20	patibility.definition.should.be.
02a0	69 6e 73 74 61 6c 6c 65 64 29 2e 20 20 41 54 54 52 20 69 73 20 61 20 70 6c 69 73 74 20 75 73 65	installed)...ATTR.is.a.plist.use
02c0	64 20 74 6f 20 6d 6f 64 69 66 79 20 74 68 65 20 67 65 6e 65 72 61 74 65 64 0a 63 6f 64 65 2e 20	d.to.modify.the.generated.code..
02e0	20 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 61 74 74 72 69 62 75 74 65 73 20 61 72 65 20 68 61	.The.following.attributes.are.ha
0300	6e 64 6c 65 64 2c 20 61 6c 6c 20 6f 74 68 65 72 73 20 61 72 65 0a 69 67 6e 6f 72 65 64 3a 0a 0a	ndled,.all.others.are.ignored:..
0320	2d 20 3a 6d 69 6e 2d 76 65 72 73 69 6f 6e 20 3a 3a 20 50 72 65 76 65 6e 74 20 74 68 65 20 63 6f	-.:min-version.::.Prevent.the.co
0340	6d 70 61 74 69 62 69 6c 69 74 79 20 64 65 66 69 6e 69 74 69 6f 6e 20 66 72 6f 6d 20 62 65 67 69	mpatibility.definition.from.begi
0360	6e 0a 20 20 69 6e 73 74 61 6c 6c 65 64 20 69 6e 20 76 65 72 73 69 6f 6e 73 20 6f 6c 64 65 72 20	n...installed.in.versions.older.
0380	74 68 61 6e 20 69 6e 64 69 63 61 74 65 64 20 28 73 74 72 69 6e 67 29 2e 0a 0a 2d 20 3a 6d 61 78	than.indicated.(string)...-.:max
03a0	2d 76 65 72 73 69 6f 6e 20 3a 3a 20 50 72 65 76 65 6e 74 20 74 68 65 20 63 6f 6d 70 61 74 69 62	-version.::.Prevent.the.compatib
03c0	69 6c 69 74 79 20 64 65 66 69 6e 69 74 69 6f 6e 20 66 72 6f 6d 20 62 65 67 69 6e 0a 20 20 69 6e	ility.definition.from.begin...in
03e0	73 74 61 6c 6c 65 64 20 69 6e 20 76 65 72 73 69 6f 6e 73 20 6e 65 77 65 72 20 74 68 61 6e 20 69	stalled.in.versions.newer.than.i
0400	6e 64 69 63 61 74 65 64 20 28 73 74 72 69 6e 67 29 2e 0a 0a 2d 20 3a 66 65 61 74 75 72 65 20 3a	ndicated.(string)...-.:feature.:
0420	3a 20 54 68 65 20 6c 69 62 72 61 72 79 20 74 68 65 20 63 6f 64 65 20 69 73 20 73 75 70 70 6f 73	:.The.library.the.code.is.suppos
0440	65 64 20 74 6f 20 62 65 20 6c 6f 61 64 65 64 0a 20 20 77 69 74 68 20 28 76 69 61 20 60 65 76 61	ed.to.be.loaded...with.(via.`eva
0460	6c 2d 61 66 74 65 72 2d 6c 6f 61 64 27 29 2e 0a 0a 2d 20 3a 63 6f 6e 64 20 3a 3a 20 4f 6e 6c 79	l-after-load')...-.:cond.::.Only
0480	20 69 6e 73 74 61 6c 6c 20 74 68 65 20 63 6f 6d 70 61 74 69 62 69 6c 69 74 79 20 63 6f 64 65 2c	.install.the.compatibility.code,
04a0	20 69 66 66 20 74 68 65 20 76 61 6c 75 65 0a 20 20 65 76 61 6c 75 61 74 65 73 20 74 6f 20 6e 6f	.iff.the.value...evaluates.to.no
04c0	6e 2d 6e 69 6c 2e 0a 0a 20 20 46 6f 72 20 70 72 65 66 69 78 65 64 20 66 75 6e 63 74 69 6f 6e 73	n-nil.....For.prefixed.functions
04e0	2c 20 74 68 69 73 20 63 61 6e 20 62 65 20 69 6e 74 65 72 70 72 65 74 65 64 20 61 73 20 61 20 74	,.this.can.be.interpreted.as.a.t
0500	65 73 74 20 74 6f 0a 20 20 60 64 65 66 61 6c 69 61 73 27 20 61 6e 20 65 78 69 73 74 69 6e 67 20	est.to...`defalias'.an.existing.
0520	64 65 66 69 6e 69 74 69 6f 6e 20 6f 72 20 6e 6f 74 2e 0a 0a 2d 20 3a 6e 6f 2d 68 69 67 68 6c 69	definition.or.not...-.:no-highli
0540	67 68 74 20 3a 3a 20 44 6f 20 6e 6f 74 20 68 69 67 68 6c 69 67 68 74 20 74 68 69 73 20 64 65 66	ght.::.Do.not.highlight.this.def
0560	69 6e 69 74 69 6f 6e 20 61 73 0a 20 20 63 6f 6d 70 61 74 69 62 69 6c 69 74 79 20 66 75 6e 63 74	inition.as...compatibility.funct
0580	69 6f 6e 2e 0a 0a 2d 20 3a 76 65 72 73 69 6f 6e 20 3a 3a 20 4d 61 6e 75 61 6c 20 73 70 65 63 69	ion...-.:version.::.Manual.speci
05a0	66 69 63 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 76 65 72 73 69 6f 6e 20 74 68 65 20 63 6f 6d 70	fication.of.the.version.the.comp
05c0	61 74 65 65 0a 20 20 63 6f 64 65 20 77 61 73 20 64 65 66 69 6e 65 64 20 69 6e 20 28 73 74 72 69	atee...code.was.defined.in.(stri
05e0	6e 67 29 2e 0a 0a 2d 20 3a 72 65 61 6c 6e 61 6d 65 20 3a 3a 20 4d 61 6e 75 61 6c 20 73 70 65 63	ng)...-.:realname.::.Manual.spec
0600	69 66 69 63 61 74 69 6f 6e 20 6f 66 20 61 20 22 72 65 61 6c 6e 61 6d 65 22 20 74 6f 20 75 73 65	ification.of.a."realname".to.use
0620	20 66 6f 72 0a 20 20 74 68 65 20 63 6f 6d 70 61 74 69 62 69 6c 69 74 79 20 64 65 66 69 6e 69 74	.for...the.compatibility.definit
0640	69 6f 6e 20 28 73 79 6d 62 6f 6c 29 2e 0a 0a 2d 20 3a 6e 6f 74 65 73 20 3a 3a 20 41 64 64 69 74	ion.(symbol)...-.:notes.::.Addit
0660	69 6f 6e 61 6c 20 6e 6f 74 65 73 20 74 68 61 74 20 61 20 64 65 76 65 6c 6f 70 65 72 20 75 73 69	ional.notes.that.a.developer.usi
0680	6e 67 20 74 68 69 73 0a 20 20 63 6f 6d 70 61 74 69 62 69 6c 69 74 79 20 66 75 6e 63 74 69 6f 6e	ng.this...compatibility.function
06a0	20 73 68 6f 75 6c 64 20 6b 65 65 70 20 69 6e 20 6d 69 6e 64 2e 0a 0a 2d 20 3a 70 72 65 66 69 78	.should.keep.in.mind...-.:prefix
06c0	20 3a 3a 20 41 64 64 20 61 20 60 63 6f 6d 70 61 74 2d 27 20 70 72 65 66 69 78 20 74 6f 20 74 68	.::.Add.a.`compat-'.prefix.to.th
06e0	65 20 6e 61 6d 65 2c 20 61 6e 64 20 64 65 66 69 6e 65 20 74 68 65 0a 20 20 63 6f 6d 70 61 74 69	e.name,.and.define.the...compati
0700	62 69 6c 69 74 79 20 63 6f 64 65 20 75 6e 63 6f 6e 64 69 74 69 6f 6e 61 6c 6c 79 2e 0a 0a 54 59	bility.code.unconditionally...TY
0720	50 45 20 69 73 20 75 73 65 64 20 74 6f 20 73 65 74 20 74 68 65 20 73 79 6d 62 6f 6c 20 70 72 6f	PE.is.used.to.set.the.symbol.pro
0740	70 65 72 74 79 20 60 63 6f 6d 70 61 74 2d 74 79 70 65 27 20 66 6f 72 20 4e 41 4d 45 2e 1f 0a 28	perty.`compat-type'.for.NAME...(
0760	64 65 66 76 61 72 20 63 6f 6d 70 61 74 2d 2d 67 65 6e 65 72 61 74 65 2d 66 75 6e 63 74 69 6f 6e	defvar.compat--generate-function
0780	20 27 63 6f 6d 70 61 74 2d 2d 67 65 6e 65 72 61 74 65 2d 6d 69 6e 69 6d 61 6c 20 28 23 24 20 2e	.'compat--generate-minimal.(#$..
07a0	20 32 30 32 29 29 0a 23 40 32 30 34 20 47 65 6e 65 72 61 74 65 20 61 20 6c 65 61 6e 65 72 20 63	.202)).#@204.Generate.a.leaner.c
07c0	6f 6d 70 61 74 69 62 69 6c 69 74 79 20 64 65 66 69 6e 69 74 69 6f 6e 2e 0a 53 65 65 20 60 63 6f	ompatibility.definition..See.`co
07e0	6d 70 61 74 2d 67 65 6e 65 72 61 74 65 2d 66 75 6e 63 74 69 6f 6e 27 20 66 6f 72 20 64 65 74 61	mpat-generate-function'.for.deta
0800	69 6c 73 20 6f 6e 20 74 68 65 20 61 72 67 75 6d 65 6e 74 73 20 4e 41 4d 45 2c 0a 44 45 46 2d 46	ils.on.the.arguments.NAME,.DEF-F
0820	4e 2c 20 49 4e 53 54 41 4c 4c 2d 46 4e 2c 20 43 48 45 43 4b 2d 46 4e 2c 20 41 54 54 52 20 61 6e	N,.INSTALL-FN,.CHECK-FN,.ATTR.an
0840	64 20 54 59 50 45 2e 0a 0a 28 66 6e 20 4e 41 4d 45 20 44 45 46 2d 46 4e 20 49 4e 53 54 41 4c 4c	d.TYPE...(fn.NAME.DEF-FN.INSTALL
0860	2d 46 4e 20 43 48 45 43 4b 2d 46 4e 20 41 54 54 52 20 54 59 50 45 29 1f 0a 28 64 65 66 61 6c 69	-FN.CHECK-FN.ATTR.TYPE)..(defali
0880	61 73 20 27 63 6f 6d 70 61 74 2d 2d 67 65 6e 65 72 61 74 65 2d 6d 69 6e 69 6d 61 6c 20 23 5b 31	as.'compat--generate-minimal.#[1
08a0	35 34 32 20 22 5c 33 30 33 02 5c 33 30 34 5c 22 5c 33 30 33 03 5c 33 30 35 5c 22 5c 33 30 33 04	542."\303.\304\"\303.\305\"\303.
08c0	5c 33 30 36 5c 22 5c 33 30 33 05 5c 33 30 37 5c 22 5c 33 30 33 06 06 5c 33 31 30 5c 22 5c 32 30	\306\"\303.\307\"\303..\310\"\20
08e0	36 43 00 5c 33 31 31 5c 33 30 30 21 5c 32 30 33 5c 22 00 08 5c 32 30 36 28 00 09 5c 32 30 36 28	6C.\311\300!\203\"..\206(..\206(
0900	00 5c 33 31 32 20 5c 32 31 31 5c 32 30 34 30 00 5c 6e 5c 32 30 32 41 00 5c 33 31 33 5c 33 31 34	.\312.\211\2040.\n\202A.\313\314
0920	02 5c 22 5c 32 30 33 3e 00 5c 33 31 35 5c 33 31 36 02 5c 22 5c 32 30 32 41 00 5c 33 31 37 5c 33	.\"\203>.\315\316.\"\202A.\317\3
0940	32 30 21 5c 32 36 32 01 5c 33 30 33 06 07 5c 33 32 31 5c 22 5c 32 30 36 52 00 5c 33 32 32 5c 33	20!\262.\303..\321\"\206R.\322\3
0960	32 33 5c 33 32 34 06 0d 5c 22 21 05 5c 32 30 33 5e 00 5c 33 32 35 5c 6e 06 07 5c 22 5c 32 30 34	23\324..\"!.\203^.\325\n..\"\204
0980	69 00 04 5c 32 30 33 6d 00 5c 33 32 35 05 5c 6e 5c 22 5c 32 30 33 6d 00 5c 33 32 36 5c 32 30 32	i..\203m.\325.\n\"\203m.\326\202
09a0	5c 32 33 34 00 5c 33 30 33 06 08 5c 33 32 37 5c 22 5c 32 30 33 79 00 5c 33 33 30 5c 32 30 32 5c	\234.\303..\327\"\203y.\330\202\
09c0	32 33 34 00 01 5c 32 30 33 5c 32 31 34 00 5c 33 33 31 02 5c 6e 5c 22 5c 32 30 33 5c 32 31 34 00	234..\203\214.\331.\n\"\203\214.
09e0	02 5c 32 30 34 5c 32 31 34 00 5c 33 33 32 5c 32 30 32 5c 32 33 34 00 5c 33 33 33 5c 33 33 34 04	.\204\214.\332\202\234.\333\334.
0a00	5c 32 30 33 5c 32 32 36 00 04 5c 32 30 32 5c 32 32 37 00 5c 33 33 35 06 0b 20 45 44 5c 33 30 33	\203\226..\202\227.\335...ED\303
0a20	06 09 5c 33 32 37 5c 22 5c 32 30 33 5c 33 36 35 00 06 07 5c 33 33 36 3e 5c 32 30 33 5c 33 36 35	..\327\"\203\365...\336>\203\365
0a40	00 5c 33 31 33 5c 33 33 37 5c 33 34 30 06 0f 21 5c 22 5c 32 30 33 5c 33 36 35 00 5c 33 32 32 5c	.\313\337\340..!\"\203\365.\322\
0a60	33 31 35 5c 33 31 36 5c 33 34 30 06 10 21 5c 22 21 06 0b 01 05 5c 22 5c 33 33 31 05 5c 6e 5c 22	315\316\340..!\"!....\"\331.\n\"
0a80	5c 32 30 35 5c 33 36 30 00 5c 33 34 31 02 21 5c 32 30 35 5c 33 36 30 00 5c 33 34 32 03 06 08 5c	\205\360.\341.!\205\360.\342...\
0aa0	32 30 33 5c 33 35 35 00 5c 33 34 33 06 09 5c 33 34 34 5c 33 34 35 5c 33 34 36 5c 33 34 37 5c 33	203\355.\343..\344\345\346\347\3
0ac0	35 30 5c 33 35 31 06 5c 6e 45 43 42 44 44 43 42 45 5c 32 30 32 5c 33 35 36 00 02 43 5c 22 5c 32	50\351.\nECBDDCBE\202\356..C\"\2
0ae0	36 36 5c 32 30 32 5c 32 30 36 70 01 5c 33 30 33 06 09 5c 33 32 31 5c 22 5c 32 30 33 2e 01 5c 33	66\202\206p.\303..\321\"\203..\3
0b00	35 32 06 5c 66 03 05 5c 22 5c 33 34 32 03 06 0e 06 06 06 08 5c 22 06 09 5c 32 30 33 27 01 5c 33	52.\f..\"\342.......\"..\203'.\3
0b20	34 33 06 5c 6e 5c 33 34 34 5c 33 34 35 5c 33 34 36 5c 33 34 37 5c 33 35 30 5c 33 35 31 06 08 45	43.\n\344\345\346\347\350\351..E
0b40	43 42 44 44 43 42 45 5c 32 30 32 28 01 5c 32 31 31 5c 32 36 32 01 43 5c 22 45 5c 32 30 37 06 07	CBDDCBE\202(.\211\262.C\"E\207..
0b60	5c 33 35 33 3d 5c 32 30 33 48 01 5c 33 34 32 01 06 0d 04 06 06 5c 22 06 0d 05 06 07 5c 22 44 5c	\353=\203H.\342......\".....\"D\
0b80	22 5c 32 30 32 53 01 5c 33 34 32 01 06 0d 06 0f 06 06 5c 22 43 5c 22 05 5c 32 30 33 6d 01 5c 33	"\202S.\342.......\"C\".\203m.\3
0ba0	34 33 06 06 5c 33 34 34 5c 33 34 35 5c 33 34 36 5c 33 34 37 5c 33 35 30 5c 33 35 31 06 08 45 43	43..\344\345\346\347\350\351..EC
0bc0	42 44 44 43 42 45 5c 32 30 32 6e 01 5c 32 31 31 5c 32 36 32 01 5c 32 30 37 22 20 5b 62 79 74 65	BDDCBE\202n.\211\262.\207".[byte
0be0	2d 63 6f 6d 70 69 6c 65 2d 63 75 72 72 65 6e 74 2d 66 69 6c 65 20 6c 6f 61 64 2d 66 69 6c 65 2d	-compile-current-file.load-file-
0c00	6e 61 6d 65 20 65 6d 61 63 73 2d 76 65 72 73 69 6f 6e 20 70 6c 69 73 74 2d 67 65 74 20 3a 6d 69	name.emacs-version.plist-get.:mi
0c20	6e 2d 76 65 72 73 69 6f 6e 20 3a 6d 61 78 2d 76 65 72 73 69 6f 6e 20 3a 66 65 61 74 75 72 65 20	n-version.:max-version.:feature.
0c40	3a 63 6f 6e 64 20 3a 76 65 72 73 69 6f 6e 20 62 6f 75 6e 64 70 20 62 75 66 66 65 72 2d 66 69 6c	:cond.:version.boundp.buffer-fil
0c60	65 2d 6e 61 6d 65 20 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 63 6f 6d 70 61 74 2d 5c 5c 28 5b	e-name.string-match."compat-\\([
0c80	5b 3a 64 69 67 69 74 3a 5d 5d 2b 5c 5c 29 5c 5c 2e 5c 5c 28 3f 3a 65 6c 63 3f 5c 5c 29 5c 5c 27	[:digit:]]+\\)\\.\\(?:elc?\\)\\'
0ca0	22 20 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 31 20 65 72 72 6f 72 20 22 4e 6f 20 76 65 72 73 69	".match-string.1.error."No.versi
0cc0	6f 6e 20 6e 75 6d 62 65 72 20 63 6f 75 6c 64 20 62 65 20 65 78 74 72 61 63 74 65 64 22 20 3a 72	on.number.could.be.extracted".:r
0ce0	65 61 6c 6e 61 6d 65 20 69 6e 74 65 72 6e 20 66 6f 72 6d 61 74 20 22 63 6f 6d 70 61 74 2d 2d 25	ealname.intern.format."compat--%
0d00	53 22 20 76 65 72 73 69 6f 6e 3c 20 28 63 6f 6d 70 61 74 2d 2d 69 67 6e 6f 72 65 29 20 3a 70 72	S".version<.(compat--ignore).:pr
0d20	65 66 69 78 20 28 70 72 6f 67 6e 29 20 76 65 72 73 69 6f 6e 3c 3d 20 28 63 6f 6d 70 61 74 2d 2d	efix.(progn).version<=.(compat--
0d40	69 67 6e 6f 72 65 29 20 77 68 65 6e 20 61 6e 64 20 74 20 28 66 75 6e 63 20 6d 61 63 72 6f 29 20	ignore).when.and.t.(func.macro).
0d60	22 5c 5c 60 63 6f 6d 70 61 74 2d 5c 5c 28 2e 2b 5c 5c 29 5c 5c 27 22 20 73 79 6d 62 6f 6c 2d 6e	"\\`compat-\\(.+\\)\\'".symbol-n
0d80	61 6d 65 20 66 62 6f 75 6e 64 70 20 61 70 70 65 6e 64 20 65 76 61 6c 2d 61 66 74 65 72 2d 6c 6f	ame.fboundp.append.eval-after-lo
0da0	61 64 20 5c 60 20 66 75 6e 63 61 6c 6c 20 71 75 6f 74 65 20 5c 2c 20 6c 61 6d 62 64 61 20 6e 69	ad.\`.funcall.quote.\,.lambda.ni
0dc0	6c 20 70 72 6f 67 6e 20 61 64 76 69 63 65 5d 20 32 37 20 28 23 24 20 2e 20 31 39 36 35 29 5d 29	l.progn.advice].27.(#$...1965)])
0de0	0a 23 40 32 30 34 20 47 65 6e 65 72 61 74 65 20 61 20 6c 65 61 6e 65 72 20 63 6f 6d 70 61 74 69	.#@204.Generate.a.leaner.compati
0e00	62 69 6c 69 74 79 20 64 65 66 69 6e 69 74 69 6f 6e 2e 0a 53 65 65 20 60 63 6f 6d 70 61 74 2d 67	bility.definition..See.`compat-g
0e20	65 6e 65 72 61 74 65 2d 66 75 6e 63 74 69 6f 6e 27 20 66 6f 72 20 64 65 74 61 69 6c 73 20 6f 6e	enerate-function'.for.details.on
0e40	20 74 68 65 20 61 72 67 75 6d 65 6e 74 73 20 4e 41 4d 45 2c 0a 44 45 46 2d 46 4e 2c 20 49 4e 53	.the.arguments.NAME,.DEF-FN,.INS
0e60	54 41 4c 4c 2d 46 4e 2c 20 43 48 45 43 4b 2d 46 4e 2c 20 41 54 54 52 20 61 6e 64 20 54 59 50 45	TALL-FN,.CHECK-FN,.ATTR.and.TYPE
0e80	2e 0a 0a 28 66 6e 20 4e 41 4d 45 20 44 45 46 2d 46 4e 20 49 4e 53 54 41 4c 4c 2d 46 4e 20 43 48	...(fn.NAME.DEF-FN.INSTALL-FN.CH
0ea0	45 43 4b 2d 46 4e 20 41 54 54 52 20 54 59 50 45 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6f	ECK-FN.ATTR.TYPE)..(defalias.'co
0ec0	6d 70 61 74 2d 2d 67 65 6e 65 72 61 74 65 2d 6d 69 6e 69 6d 61 6c 2d 6e 6f 2d 70 72 65 66 69 78	mpat--generate-minimal-no-prefix
0ee0	20 23 5b 31 35 34 32 20 22 5c 33 30 30 02 5c 33 30 31 5c 22 3f 5c 32 30 35 17 00 5c 33 30 32 06	.#[1542."\300.\301\"?\205..\302.
0f00	06 06 06 06 06 06 06 06 06 06 06 26 06 5c 32 30 37 22 20 5b 70 6c 69 73 74 2d 67 65 74 20 3a 70	...........&.\207".[plist-get.:p
0f20	72 65 66 69 78 20 63 6f 6d 70 61 74 2d 2d 67 65 6e 65 72 61 74 65 2d 6d 69 6e 69 6d 61 6c 5d 20	refix.compat--generate-minimal].
0f40	31 33 20 28 23 24 20 2e 20 33 35 35 39 29 5d 29 0a 23 40 32 32 37 20 47 65 6e 65 72 61 74 65 20	13.(#$...3559)]).#@227.Generate.
0f60	61 20 6d 6f 72 65 20 76 65 72 62 6f 73 65 20 63 6f 6d 70 61 74 69 62 69 6c 69 74 79 20 64 65 66	a.more.verbose.compatibility.def
0f80	69 6e 69 74 69 6f 6e 2c 20 66 69 74 20 66 6f 72 20 74 65 73 74 69 6e 67 2e 0a 53 65 65 20 60 63	inition,.fit.for.testing..See.`c
0fa0	6f 6d 70 61 74 2d 67 65 6e 65 72 61 74 65 2d 66 75 6e 63 74 69 6f 6e 27 20 66 6f 72 20 64 65 74	ompat-generate-function'.for.det
0fc0	61 69 6c 73 20 6f 6e 20 74 68 65 20 61 72 67 75 6d 65 6e 74 73 20 4e 41 4d 45 2c 0a 44 45 46 2d	ails.on.the.arguments.NAME,.DEF-
0fe0	46 4e 2c 20 49 4e 53 54 41 4c 4c 2d 46 4e 2c 20 43 48 45 43 4b 2d 46 4e 2c 20 41 54 54 52 20 61	FN,.INSTALL-FN,.CHECK-FN,.ATTR.a
1000	6e 64 20 54 59 50 45 2e 0a 0a 28 66 6e 20 4e 41 4d 45 20 44 45 46 2d 46 4e 20 49 4e 53 54 41 4c	nd.TYPE...(fn.NAME.DEF-FN.INSTAL
1020	4c 2d 46 4e 20 43 48 45 43 4b 2d 46 4e 20 41 54 54 52 20 54 59 50 45 29 1f 0a 28 64 65 66 61 6c	L-FN.CHECK-FN.ATTR.TYPE)..(defal
1040	69 61 73 20 27 63 6f 6d 70 61 74 2d 2d 67 65 6e 65 72 61 74 65 2d 76 65 72 62 6f 73 65 20 23 5b	ias.'compat--generate-verbose.#[
1060	31 35 34 32 20 22 5c 33 30 33 02 5c 33 30 34 5c 22 5c 33 30 33 03 5c 33 30 35 5c 22 5c 33 30 33	1542."\303.\304\"\303.\305\"\303
1080	04 5c 33 30 36 5c 22 5c 33 30 33 05 5c 33 30 37 5c 22 5c 33 30 33 06 06 5c 33 31 30 5c 22 5c 32	.\306\"\303.\307\"\303..\310\"\2
10a0	30 36 43 00 5c 33 31 31 5c 33 30 30 21 5c 32 30 33 5c 22 00 08 5c 32 30 36 28 00 09 5c 32 30 36	06C.\311\300!\203\"..\206(..\206
10c0	28 00 5c 33 31 32 20 5c 32 31 31 5c 32 30 34 30 00 5c 6e 5c 32 30 32 41 00 5c 33 31 33 5c 33 31	(.\312.\211\2040.\n\202A.\313\31
10e0	34 02 5c 22 5c 32 30 33 3e 00 5c 33 31 35 5c 33 31 36 02 5c 22 5c 32 30 32 41 00 5c 33 31 37 5c	4.\"\203>.\315\316.\"\202A.\317\
1100	33 32 30 21 5c 32 36 32 01 5c 33 30 33 06 07 5c 33 32 31 5c 22 5c 32 30 36 52 00 5c 33 32 32 5c	320!\262.\303..\321\"\206R.\322\
1120	33 32 33 5c 33 32 34 06 0d 5c 22 21 5c 33 32 35 5c 33 32 36 5c 33 32 37 5c 33 33 30 5c 33 33 31	323\324..\"!\325\326\327\330\331
1140	5c 33 33 32 06 11 44 5c 33 33 33 42 42 44 5c 33 33 34 5c 33 33 31 5c 33 33 32 06 12 44 5c 33 33	\332..D\333BBD\334\331\332..D\33
1160	35 42 42 5c 33 33 32 06 07 44 45 45 5c 33 31 37 5c 33 33 36 5c 33 33 32 06 11 44 5c 33 33 31 5c	5BB\332..DEE\317\336\332..D\331\
1180	33 33 32 06 13 44 5c 33 33 37 42 42 5c 33 33 32 06 08 44 5c 32 35 37 05 45 5c 33 34 30 5c 33 33	332..D\337BB\332..D\257.E\340\33
11a0	32 06 0f 44 5c 33 34 31 5c 33 33 32 06 06 44 46 06 5c 66 04 06 06 5c 22 46 5c 33 32 35 5c 33 34	2..D\341\332..DF.\f...\"F\325\34
11c0	30 5c 33 33 32 04 44 5c 33 34 32 5c 33 33 32 06 5c 66 44 46 5c 33 34 30 5c 33 33 32 05 44 5c 33	0\332.D\342\332.\fDF\340\332.D\3
11e0	34 33 06 07 46 5c 33 34 30 5c 33 33 32 06 06 44 5c 33 34 34 06 5c 66 46 5c 33 34 30 5c 33 33 32	43..F\340\332..D\344.\fF\340\332
1200	06 07 44 5c 33 34 35 06 5c 66 46 5c 33 34 30 5c 33 33 32 06 08 44 5c 33 34 36 5c 33 30 33 06 11	..D\345.\fF\340\332..D\346\303..
1220	5c 33 34 37 5c 22 46 06 11 06 08 06 5c 6e 5c 22 5c 33 35 30 06 0e 5c 32 30 33 5c 33 33 33 00 5c	\347\"F.....\n\"\350..\203\333.\
1240	33 35 31 5c 6e 06 10 5c 22 5c 32 30 34 5c 33 35 30 00 06 0d 5c 32 30 33 5c 33 35 34 00 5c 33 35	351\n..\"\204\350...\203\354.\35
1260	31 06 0e 5c 6e 5c 22 5c 32 30 33 5c 33 35 34 00 5c 33 35 32 5c 32 30 32 20 01 5c 33 30 33 06 11	1..\n\"\203\354.\352\202..\303..
1280	5c 33 35 33 5c 22 5c 32 30 33 5c 33 37 30 00 5c 33 35 34 5c 32 30 32 20 01 06 5c 6e 5c 32 30 33	\353\"\203\370.\354\202...\n\203
12a0	0e 01 5c 33 35 35 06 0b 5c 6e 5c 22 5c 32 30 33 0e 01 06 0b 5c 32 30 34 0e 01 5c 33 35 36 5c 32	..\355..\n\"\203....\204..\356\2
12c0	30 32 20 01 5c 33 35 37 5c 33 36 30 06 0d 5c 32 30 33 1a 01 06 0d 5c 32 30 32 1b 01 5c 33 36 31	02..\357\360..\203....\202..\361
12e0	06 14 20 45 44 06 0d 5c 32 30 33 3b 01 5c 33 36 32 06 0e 5c 33 36 33 5c 33 36 34 5c 33 33 32 5c	...ED..\203;.\362..\363\364\332\
1300	33 36 35 5c 33 36 36 5c 33 36 37 06 11 45 43 42 44 44 43 42 45 5c 32 30 32 3d 01 06 09 43 5c 22	365\366\367..ECBDDCBE\202=...C\"
1320	5c 32 35 37 08 5c 32 30 37 22 20 5b 62 79 74 65 2d 63 6f 6d 70 69 6c 65 2d 63 75 72 72 65 6e 74	\257.\207".[byte-compile-current
1340	2d 66 69 6c 65 20 6c 6f 61 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 65 6d 61 63 73 2d 76 65 72 73 69	-file.load-file-name.emacs-versi
1360	6f 6e 20 70 6c 69 73 74 2d 67 65 74 20 3a 6d 69 6e 2d 76 65 72 73 69 6f 6e 20 3a 6d 61 78 2d 76	on.plist-get.:min-version.:max-v
1380	65 72 73 69 6f 6e 20 3a 66 65 61 74 75 72 65 20 3a 63 6f 6e 64 20 3a 76 65 72 73 69 6f 6e 20 62	ersion.:feature.:cond.:version.b
13a0	6f 75 6e 64 70 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 20 73 74 72 69 6e 67 2d 6d 61	oundp.buffer-file-name.string-ma
13c0	74 63 68 20 22 63 6f 6d 70 61 74 2d 5c 5c 28 5b 5b 3a 64 69 67 69 74 3a 5d 5d 2b 5c 5c 29 5c 5c	tch."compat-\\([[:digit:]]+\\)\\
13e0	2e 5c 5c 28 3f 3a 65 6c 63 3f 5c 5c 29 5c 5c 27 22 20 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 31	.\\(?:elc?\\)\\'".match-string.1
1400	20 65 72 72 6f 72 20 22 4e 6f 20 76 65 72 73 69 6f 6e 20 6e 75 6d 62 65 72 20 63 6f 75 6c 64 20	.error."No.version.number.could.
1420	62 65 20 65 78 74 72 61 63 74 65 64 22 20 3a 72 65 61 6c 6e 61 6d 65 20 69 6e 74 65 72 6e 20 66	be.extracted".:realname.intern.f
1440	6f 72 6d 61 74 20 22 63 6f 6d 70 61 74 2d 2d 25 53 22 20 70 72 6f 67 6e 20 75 6e 6c 65 73 73 20	ormat."compat--%S".progn.unless.
1460	6f 72 20 6e 75 6c 6c 20 67 65 74 20 71 75 6f 74 65 20 28 27 63 6f 6d 70 61 74 2d 64 65 66 29 20	or.null.get.quote.('compat-def).
1480	65 71 20 28 27 63 6f 6d 70 61 74 2d 64 65 66 29 20 22 44 75 70 6c 69 63 61 74 65 20 63 6f 6d 70	eq.('compat-def)."Duplicate.comp
14a0	61 74 69 62 69 6c 69 74 79 20 64 65 66 69 6e 69 74 69 6f 6e 3a 20 25 73 20 28 77 61 73 20 25 73	atibility.definition:.%s.(was.%s
14c0	2c 20 6e 6f 77 20 25 73 29 22 20 28 27 63 6f 6d 70 61 74 2d 64 65 66 29 20 70 75 74 20 27 63 6f	,.now.%s)".('compat-def).put.'co
14e0	6d 70 61 74 2d 64 65 66 20 27 63 6f 6d 70 61 74 2d 74 79 70 65 20 27 63 6f 6d 70 61 74 2d 76 65	mpat-def.'compat-type.'compat-ve
1500	72 73 69 6f 6e 20 27 63 6f 6d 70 61 74 2d 6d 69 6e 2d 76 65 72 73 69 6f 6e 20 27 63 6f 6d 70 61	rsion.'compat-min-version.'compa
1520	74 2d 6d 61 78 2d 76 65 72 73 69 6f 6e 20 27 63 6f 6d 70 61 74 2d 64 6f 63 20 3a 6e 6f 74 65 20	t-max-version.'compat-doc.:note.
1540	61 70 70 65 6e 64 20 76 65 72 73 69 6f 6e 3c 20 28 63 6f 6d 70 61 74 2d 2d 69 67 6e 6f 72 65 29	append.version<.(compat--ignore)
1560	20 3a 70 72 65 66 69 78 20 28 70 72 6f 67 6e 29 20 76 65 72 73 69 6f 6e 3c 3d 20 28 63 6f 6d 70	.:prefix.(progn).version<=.(comp
1580	61 74 2d 2d 69 67 6e 6f 72 65 29 20 77 68 65 6e 20 61 6e 64 20 74 20 65 76 61 6c 2d 61 66 74 65	at--ignore).when.and.t.eval-afte
15a0	72 2d 6c 6f 61 64 20 5c 60 20 66 75 6e 63 61 6c 6c 20 5c 2c 20 6c 61 6d 62 64 61 20 6e 69 6c 5d	r-load.\`.funcall.\,.lambda.nil]
15c0	20 33 31 20 28 23 24 20 2e 20 33 39 32 37 29 5d 29 0a 23 40 32 31 34 20 43 6f 6d 6d 6f 6e 20 63	.31.(#$...3927)]).#@214.Common.c
15e0	6f 64 65 20 66 6f 72 20 67 65 6e 65 72 61 74 69 6e 67 20 63 6f 6d 70 61 74 69 62 69 6c 69 74 79	ode.for.generating.compatibility
1600	20 64 65 66 69 6e 69 74 69 6f 6e 73 2e 0a 53 65 65 20 60 63 6f 6d 70 61 74 2d 67 65 6e 65 72 61	.definitions..See.`compat-genera
1620	74 65 2d 66 75 6e 63 74 69 6f 6e 27 20 66 6f 72 20 64 65 74 61 69 6c 73 20 6f 6e 20 74 68 65 20	te-function'.for.details.on.the.
1640	61 72 67 75 6d 65 6e 74 73 20 4e 41 4d 45 2c 0a 44 45 46 2d 46 4e 2c 20 49 4e 53 54 41 4c 4c 2d	arguments.NAME,.DEF-FN,.INSTALL-
1660	46 4e 2c 20 43 48 45 43 4b 2d 46 4e 2c 20 41 54 54 52 20 61 6e 64 20 54 59 50 45 2e 0a 0a 28 66	FN,.CHECK-FN,.ATTR.and.TYPE...(f
1680	6e 20 4e 41 4d 45 20 44 45 46 2d 46 4e 20 49 4e 53 54 41 4c 4c 2d 46 4e 20 43 48 45 43 4b 2d 46	n.NAME.DEF-FN.INSTALL-FN.CHECK-F
16a0	4e 20 41 54 54 52 20 54 59 50 45 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6f 6d 70 61 74 2d	N.ATTR.TYPE)..(defalias.'compat-
16c0	67 65 6e 65 72 61 74 65 2d 63 6f 6d 6d 6f 6e 20 23 5b 31 35 34 32 20 22 5c 33 30 31 02 5c 33 30	generate-common.#[1542."\301.\30
16e0	32 5c 22 5c 32 30 33 14 00 5c 33 30 31 02 5c 33 30 33 5c 22 5c 32 30 33 14 00 5c 33 30 34 5c 33	2\"\203..\301.\303\"\203..\304\3
1700	30 35 06 07 5c 22 5c 32 31 30 08 06 06 06 06 06 06 06 06 06 06 06 06 26 06 5c 32 30 37 22 20 5b	05..\"\210.............&.\207".[
1720	63 6f 6d 70 61 74 2d 2d 67 65 6e 65 72 61 74 65 2d 66 75 6e 63 74 69 6f 6e 20 70 6c 69 73 74 2d	compat--generate-function.plist-
1740	67 65 74 20 3a 63 6f 6e 64 20 3a 70 72 65 66 69 78 20 65 72 72 6f 72 20 22 41 20 70 72 65 66 69	get.:cond.:prefix.error."A.prefi
1760	78 65 64 20 66 75 6e 63 74 69 6f 6e 20 25 73 20 63 61 6e 6e 6f 74 20 68 61 76 65 20 61 20 63 6f	xed.function.%s.cannot.have.a.co
1780	6e 64 69 74 69 6f 6e 22 5d 20 31 33 20 28 23 24 20 2e 20 35 35 39 32 29 5d 29 0a 23 40 33 38 39	ndition"].13.(#$...5592)]).#@389
17a0	20 47 65 6e 65 72 61 74 65 20 63 6f 6d 70 61 74 69 62 69 6c 69 74 79 20 63 6f 64 65 20 66 6f 72	.Generate.compatibility.code.for
17c0	20 61 20 66 75 6e 63 74 69 6f 6e 20 4e 41 4d 45 2e 0a 54 59 50 45 20 69 73 20 6f 6e 65 20 6f 66	.a.function.NAME..TYPE.is.one.of
17e0	20 60 66 75 6e 63 27 2c 20 66 6f 72 20 66 75 6e 63 74 69 6f 6e 73 20 61 6e 64 20 60 6d 61 63 72	.`func',.for.functions.and.`macr
1800	6f 27 20 66 6f 72 20 6d 61 63 72 6f 73 2c 20 61 6e 64 0a 60 61 64 76 69 63 65 27 20 41 52 47 4c	o'.for.macros,.and.`advice'.ARGL
1820	49 53 54 20 69 73 20 70 61 73 73 65 64 20 6f 6e 20 64 69 72 65 63 74 6c 79 20 74 6f 20 74 68 65	IST.is.passed.on.directly.to.the
1840	20 64 65 66 69 6e 69 74 69 6f 6e 2c 20 61 6e 64 0a 44 4f 43 53 54 52 49 4e 47 20 69 73 20 70 72	.definition,.and.DOCSTRING.is.pr
1860	65 70 65 6e 64 65 64 20 77 69 74 68 20 61 20 63 6f 6d 70 61 74 69 62 69 6c 69 74 79 20 6e 6f 74	epended.with.a.compatibility.not
1880	65 2e 20 20 52 45 53 54 20 63 6f 6e 74 61 69 6e 73 0a 74 68 65 20 72 65 6d 61 69 6e 69 6e 67 20	e...REST.contains.the.remaining.
18a0	64 65 66 69 6e 69 74 69 6f 6e 2c 20 74 68 61 74 20 6d 61 79 20 62 65 67 69 6e 20 77 69 74 68 20	definition,.that.may.begin.with.
18c0	61 20 70 72 6f 70 65 72 74 79 20 6c 69 73 74 20 6f 66 0a 61 74 74 72 69 62 75 74 65 73 20 28 73	a.property.list.of.attributes.(s
18e0	65 65 20 60 63 6f 6d 70 61 74 2d 67 65 6e 65 72 61 74 65 2d 63 6f 6d 6d 6f 6e 27 29 2e 0a 0a 28	ee.`compat-generate-common')...(
1900	66 6e 20 54 59 50 45 20 4e 41 4d 45 20 41 52 47 4c 49 53 54 20 44 4f 43 53 54 52 49 4e 47 20 52	fn.TYPE.NAME.ARGLIST.DOCSTRING.R
1920	45 53 54 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6f 6d 70 61 74 2d 63 6f 6d 6d 6f 6e 2d 66	EST)..(defalias.'compat-common-f
1940	64 65 66 69 6e 65 20 23 5b 31 32 38 35 20 22 03 43 5c 32 31 31 5c 32 34 32 02 43 5c 33 30 31 01	define.#[1285.".C\211\242.C\301.
1960	5c 32 34 32 40 21 5c 32 30 33 18 00 5c 32 31 31 01 5c 32 34 32 41 41 5c 32 34 30 5c 32 31 30 5c	\242@!\203..\211.\242AA\240\210\
1980	32 30 32 06 00 5c 32 31 31 5c 32 34 32 5c 32 34 32 3c 5c 32 30 33 45 00 5c 32 31 31 5c 32 34 32	202..\211\242\242<\203E.\211\242
19a0	40 40 5c 33 30 32 3d 5c 32 30 33 45 00 5c 33 30 33 08 5c 33 30 34 5c 22 5c 32 30 33 45 00 5c 33	@@\302=\203E.\303.\304\"\203E.\3
19c0	30 35 5c 33 30 36 02 5c 32 34 32 40 5c 32 33 36 02 5c 32 34 32 40 5c 22 5c 32 31 30 5c 33 30 35	05\306.\242@\236.\242@\"\210\305
19e0	5c 33 30 37 02 5c 32 34 32 40 5c 32 33 36 02 5c 32 34 32 40 5c 22 5c 32 31 30 5c 33 31 30 04 5c	\307.\242@\236.\242@\"\210\310.\
1a00	33 31 31 5c 22 5c 32 30 33 57 00 02 5c 33 31 32 5c 33 31 33 5c 33 31 34 06 06 5c 32 34 32 5c 22	311\"\203W..\312\313\314..\242\"
1a20	21 5c 32 34 30 5c 32 31 30 5c 33 31 35 03 5c 32 34 32 5c 33 31 36 5c 33 31 37 06 0b 06 5c 6e 06	!\240\210\315.\242\316\317...\n.
1a40	5c 6e 06 08 06 08 26 06 5c 33 31 36 5c 33 32 30 06 5c 66 06 08 23 5c 33 31 36 5c 33 32 31 06 0d	\n....&.\316\320.\f..#\316\321..
1a60	06 09 23 06 08 06 0d 26 06 5c 32 30 37 22 20 5b 65 6d 61 63 73 2d 76 65 72 73 69 6f 6e 20 6b 65	..#....&.\207".[emacs-version.ke
1a80	79 77 6f 72 64 70 20 64 65 63 6c 61 72 65 20 76 65 72 73 69 6f 6e 3c 3d 20 22 32 35 22 20 64 65	ywordp.declare.version<=."25".de
1aa0	6c 71 20 73 69 64 65 2d 65 66 66 65 63 74 2d 66 72 65 65 20 70 75 72 65 20 70 6c 69 73 74 2d 67	lq.side-effect-free.pure.plist-g
1ac0	65 74 20 3a 70 72 65 66 69 78 20 69 6e 74 65 72 6e 20 66 6f 72 6d 61 74 20 22 63 6f 6d 70 61 74	et.:prefix.intern.format."compat
1ae0	2d 25 73 22 20 63 6f 6d 70 61 74 2d 67 65 6e 65 72 61 74 65 2d 63 6f 6d 6d 6f 6e 20 6d 61 6b 65	-%s".compat-generate-common.make
1b00	2d 63 6c 6f 73 75 72 65 20 23 5b 35 31 34 20 22 5c 33 30 30 5c 33 30 35 3e 5c 32 30 33 5c 6e 00	-closure.#[514."\300\305>\203\n.
1b20	5c 33 30 36 5c 32 30 32 17 00 5c 33 30 30 5c 33 30 37 3d 5c 32 30 33 14 00 5c 33 31 30 5c 32 30	\306\202..\300\307=\203..\310\20
1b40	32 17 00 5c 33 31 31 5c 33 31 32 21 02 5c 33 30 31 5c 33 30 30 5c 33 31 33 3d 5c 32 30 33 23 00	2..\311\312!.\301\300\313=\203#.
1b60	5c 33 31 34 5c 32 30 32 3a 00 5c 33 30 30 5c 33 30 37 3d 5c 32 30 33 2d 00 5c 33 31 35 5c 32 30	\314\202:.\300\307=\203-.\315\20
1b80	32 3a 00 5c 33 30 30 5c 33 31 36 3d 5c 32 30 33 37 00 5c 33 31 37 5c 32 30 32 3a 00 5c 33 31 31	2:.\300\316=\2037.\317\202:.\311
1ba0	5c 33 31 32 21 04 5c 32 30 33 49 00 5c 33 32 30 5c 33 32 31 02 5c 33 30 33 06 08 5c 33 30 32 25	\312!.\203I.\320\321.\303..\302%
1bc0	5c 32 30 32 4f 00 5c 33 32 30 5c 33 32 32 02 5c 33 30 33 5c 33 30 32 24 5c 32 36 32 01 5c 33 30	\202O.\320\322.\303\302$\262.\30
1be0	30 5c 33 31 36 3d 5c 32 30 33 5e 00 5c 33 32 33 5c 33 30 34 5c 32 34 32 42 5c 32 30 32 60 00 5c	0\316=\203^.\323\304\242B\202`.\
1c00	33 30 34 5c 32 34 32 42 42 42 42 5c 32 30 37 22 20 5b 56 30 20 56 31 20 56 32 20 56 33 20 56 34	304\242BBBB\207".[V0.V1.V2.V3.V4
1c20	20 28 66 75 6e 63 20 61 64 76 69 63 65 29 20 64 65 66 75 6e 20 6d 61 63 72 6f 20 64 65 66 6d 61	.(func.advice).defun.macro.defma
1c40	63 72 6f 20 65 72 72 6f 72 20 22 55 6e 6b 6e 6f 77 6e 20 74 79 70 65 22 20 66 75 6e 63 20 22 66	cro.error."Unknown.type".func."f
1c60	75 6e 63 74 69 6f 6e 22 20 22 6d 61 63 72 6f 22 20 61 64 76 69 63 65 20 22 61 64 76 69 63 65 22	unction"."macro".advice."advice"
1c80	20 66 6f 72 6d 61 74 20 22 5b 43 6f 6d 70 61 74 69 62 69 6c 69 74 79 20 25 73 20 66 6f 72 20 60	.format."[Compatibility.%s.for.`
1ca0	25 53 27 2c 20 64 65 66 69 6e 65 64 20 69 6e 20 45 6d 61 63 73 20 25 73 5d 5c 6e 5c 6e 25 73 22	%S',.defined.in.Emacs.%s]\n\n%s"
1cc0	20 22 5b 43 6f 6d 70 61 74 69 62 69 6c 69 74 79 20 25 73 20 66 6f 72 20 60 25 53 27 5d 5c 6e 5c	."[Compatibility.%s.for.`%S']\n\
1ce0	6e 25 73 22 20 28 69 67 6e 6f 72 65 20 6f 6c 64 66 75 6e 29 5d 20 31 32 20 22 5c 6e 5c 6e 28 66	n%s".(ignore.oldfun)].12."\n\n(f
1d00	6e 20 52 45 41 4c 4e 41 4d 45 20 56 45 52 53 49 4f 4e 29 22 5d 20 23 5b 35 31 34 20 22 5c 33 30	n.REALNAME.VERSION)"].#[514."\30
1d20	30 5c 33 30 32 3e 5c 32 30 33 10 00 5c 33 30 33 5c 33 30 34 5c 33 30 31 5c 32 34 32 44 5c 33 30	0\302>\203..\303\304\301\242D\30
1d40	35 04 44 45 5c 32 30 37 5c 33 30 30 5c 33 30 36 3d 5c 32 30 35 20 00 5c 33 30 37 5c 33 30 34 5c	5.DE\207\300\306=\205..\307\304\
1d60	33 30 31 5c 32 34 32 44 5c 33 31 30 5c 33 30 35 05 44 46 5c 32 30 37 22 20 5b 56 30 20 56 31 20	301\242D\310\305.DF\207".[V0.V1.
1d80	28 66 75 6e 63 20 6d 61 63 72 6f 29 20 64 65 66 61 6c 69 61 73 20 71 75 6f 74 65 20 66 75 6e 63	(func.macro).defalias.quote.func
1da0	74 69 6f 6e 20 61 64 76 69 63 65 20 61 64 76 69 63 65 2d 61 64 64 20 3a 61 72 6f 75 6e 64 5d 20	tion.advice.advice-add.:around].
1dc0	37 20 22 5c 6e 5c 6e 28 66 6e 20 52 45 41 4c 4e 41 4d 45 20 56 45 52 53 49 4f 4e 29 22 5d 20 23	7."\n\n(fn.REALNAME.VERSION)"].#
1de0	5b 30 20 22 5c 33 30 30 5c 33 30 32 3e 5c 32 30 33 0f 00 5c 33 30 33 5c 33 30 34 5c 33 30 35 5c	[0."\300\302>\203..\303\304\305\
1e00	33 30 31 5c 32 34 32 44 44 44 5c 32 30 37 5c 33 30 30 5c 33 30 36 3d 5c 32 30 35 16 00 5c 33 30	301\242DDD\207\300\306=\205..\30
1e20	37 5c 32 30 37 22 20 5b 56 30 20 56 31 20 28 66 75 6e 63 20 6d 61 63 72 6f 29 20 6e 6f 74 20 66	7\207".[V0.V1.(func.macro).not.f
1e40	62 6f 75 6e 64 70 20 71 75 6f 74 65 20 61 64 76 69 63 65 20 74 5d 20 34 5d 5d 20 31 37 20 28 23	boundp.quote.advice.t].4]].17.(#
1e60	24 20 2e 20 36 30 34 39 29 5d 29 0a 23 40 34 38 35 20 44 65 66 69 6e 65 20 4e 41 4d 45 20 77 69	$...6049)]).#@485.Define.NAME.wi
1e80	74 68 20 61 72 67 75 6d 65 6e 74 73 20 41 52 47 4c 49 53 54 20 61 73 20 61 20 63 6f 6d 70 61 74	th.arguments.ARGLIST.as.a.compat
1ea0	69 62 69 6c 69 74 79 20 66 75 6e 63 74 69 6f 6e 2e 0a 54 68 65 20 66 75 6e 63 74 69 6f 6e 20 6d	ibility.function..The.function.m
1ec0	75 73 74 20 62 65 20 64 6f 63 75 6d 65 6e 74 65 64 20 69 6e 20 44 4f 43 53 54 52 49 4e 47 2e 20	ust.be.documented.in.DOCSTRING..
1ee0	20 52 45 53 54 20 6d 61 79 20 62 65 67 69 6e 0a 77 69 74 68 20 61 20 70 6c 69 73 74 2c 20 74 68	.REST.may.begin.with.a.plist,.th
1f00	61 74 20 69 73 20 69 6e 74 65 72 70 72 65 74 65 64 20 62 79 20 74 68 65 20 6d 61 63 72 6f 20 62	at.is.interpreted.by.the.macro.b
1f20	75 74 20 6e 6f 74 20 70 61 73 73 65 64 20 6f 6e 0a 74 6f 20 74 68 65 20 61 63 74 75 61 6c 20 66	ut.not.passed.on.to.the.actual.f
1f40	75 6e 63 74 69 6f 6e 2e 20 20 53 65 65 20 60 63 6f 6d 70 61 74 2d 67 65 6e 65 72 61 74 65 2d 63	unction...See.`compat-generate-c
1f60	6f 6d 6d 6f 6e 27 20 66 6f 72 20 61 0a 6c 69 73 74 69 6e 67 20 6f 66 20 61 74 74 72 69 62 75 74	ommon'.for.a.listing.of.attribut
1f80	65 73 2e 0a 0a 54 68 65 20 64 65 66 69 6e 69 74 69 6f 6e 20 77 69 6c 6c 20 6f 6e 6c 79 20 62 65	es...The.definition.will.only.be
1fa0	20 69 6e 73 74 61 6c 6c 65 64 2c 20 69 66 20 74 68 65 20 76 65 72 73 69 6f 6e 20 74 68 69 73 0a	.installed,.if.the.version.this.
1fc0	66 75 6e 63 74 69 6f 6e 20 77 61 73 20 64 65 66 69 6e 65 64 20 69 6e 2c 20 61 73 20 69 6e 64 69	function.was.defined.in,.as.indi
1fe0	63 61 74 65 64 20 62 79 20 74 68 65 20 60 3a 76 65 72 73 69 6f 6e 27 0a 61 74 74 72 69 62 75 74	cated.by.the.`:version'.attribut
2000	65 2c 20 69 73 20 67 72 65 61 74 65 72 20 74 68 61 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 45	e,.is.greater.than.the.current.E
2020	6d 61 63 73 20 76 65 72 73 69 6f 6e 2e 0a 0a 28 66 6e 20 4e 41 4d 45 20 41 52 47 4c 49 53 54 20	macs.version...(fn.NAME.ARGLIST.
2040	44 4f 43 53 54 52 49 4e 47 20 26 72 65 73 74 20 52 45 53 54 29 1f 0a 28 64 65 66 61 6c 69 61 73	DOCSTRING.&rest.REST)..(defalias
2060	20 27 63 6f 6d 70 61 74 2d 64 65 66 75 6e 20 27 28 6d 61 63 72 6f 20 2e 20 23 5b 38 39 39 20 22	.'compat-defun.'(macro...#[899."
2080	5c 33 30 30 5c 33 30 31 05 05 05 05 25 5c 32 30 37 22 20 5b 63 6f 6d 70 61 74 2d 63 6f 6d 6d 6f	\300\301....%\207".[compat-commo
20a0	6e 2d 66 64 65 66 69 6e 65 20 66 75 6e 63 5d 20 31 30 20 28 23 24 20 2e 20 37 37 39 34 29 5d 29	n-fdefine.func].10.(#$...7794)])
20c0	29 0a 28 62 79 74 65 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	).(byte-code."\300\301\302\303#\
20e0	32 31 30 5c 33 30 34 5c 33 30 31 5c 33 30 35 5c 33 30 36 23 5c 33 30 34 5c 33 30 31 5c 33 30 37	210\304\301\305\306#\304\301\307
2100	5c 33 31 30 23 5c 33 30 30 5c 32 30 37 22 20 5b 70 75 74 20 63 6f 6d 70 61 74 2d 64 65 66 75 6e	\310#\300\207".[put.compat-defun
2120	20 65 64 65 62 75 67 2d 66 6f 72 6d 2d 73 70 65 63 20 28 26 64 65 66 69 6e 65 20 6e 61 6d 65 20	.edebug-form-spec.(&define.name.
2140	28 26 72 65 73 74 20 73 79 6d 62 6f 6c 70 29 20 73 74 72 69 6e 67 70 20 5b 26 72 65 73 74 20 6b	(&rest.symbolp).stringp.[&rest.k
2160	65 79 77 6f 72 64 70 20 73 65 78 70 5d 20 64 65 66 2d 62 6f 64 79 29 20 66 75 6e 63 74 69 6f 6e	eywordp.sexp].def-body).function
2180	2d 70 75 74 20 64 6f 63 2d 73 74 72 69 6e 67 2d 65 6c 74 20 33 20 6c 69 73 70 2d 69 6e 64 65 6e	-put.doc-string-elt.3.lisp-inden
21a0	74 2d 66 75 6e 63 74 69 6f 6e 20 32 5d 20 35 29 0a 23 40 34 37 37 20 44 65 66 69 6e 65 20 4e 41	t-function.2].5).#@477.Define.NA
21c0	4d 45 20 77 69 74 68 20 61 72 67 75 6d 65 6e 74 73 20 41 52 47 4c 49 53 54 20 61 73 20 61 20 63	ME.with.arguments.ARGLIST.as.a.c
21e0	6f 6d 70 61 74 69 62 69 6c 69 74 79 20 6d 61 63 72 6f 2e 0a 54 68 65 20 6d 61 63 72 6f 20 6d 75	ompatibility.macro..The.macro.mu
2200	73 74 20 62 65 20 64 6f 63 75 6d 65 6e 74 65 64 20 69 6e 20 44 4f 43 53 54 52 49 4e 47 2e 20 20	st.be.documented.in.DOCSTRING...
2220	52 45 53 54 20 6d 61 79 20 62 65 67 69 6e 0a 77 69 74 68 20 61 20 70 6c 69 73 74 2c 20 74 68 61	REST.may.begin.with.a.plist,.tha
2240	74 20 69 73 20 69 6e 74 65 72 70 72 65 74 65 64 20 62 79 20 74 68 69 73 20 6d 61 63 72 6f 20 62	t.is.interpreted.by.this.macro.b
2260	75 74 20 6e 6f 74 20 70 61 73 73 65 64 20 6f 6e 0a 74 6f 20 74 68 65 20 61 63 74 75 61 6c 20 6d	ut.not.passed.on.to.the.actual.m
2280	61 63 72 6f 2e 20 20 53 65 65 20 60 63 6f 6d 70 61 74 2d 67 65 6e 65 72 61 74 65 2d 63 6f 6d 6d	acro...See.`compat-generate-comm
22a0	6f 6e 27 20 66 6f 72 20 61 0a 6c 69 73 74 69 6e 67 20 6f 66 20 61 74 74 72 69 62 75 74 65 73 2e	on'.for.a.listing.of.attributes.
22c0	0a 0a 54 68 65 20 64 65 66 69 6e 69 74 69 6f 6e 20 77 69 6c 6c 20 6f 6e 6c 79 20 62 65 20 69 6e	..The.definition.will.only.be.in
22e0	73 74 61 6c 6c 65 64 2c 20 69 66 20 74 68 65 20 76 65 72 73 69 6f 6e 20 74 68 69 73 0a 66 75 6e	stalled,.if.the.version.this.fun
2300	63 74 69 6f 6e 20 77 61 73 20 64 65 66 69 6e 65 64 20 69 6e 2c 20 61 73 20 69 6e 64 69 63 61 74	ction.was.defined.in,.as.indicat
2320	65 64 20 62 79 20 74 68 65 20 60 3a 76 65 72 73 69 6f 6e 27 0a 61 74 74 72 69 62 75 74 65 2c 20	ed.by.the.`:version'.attribute,.
2340	69 73 20 67 72 65 61 74 65 72 20 74 68 61 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 45 6d 61 63	is.greater.than.the.current.Emac
2360	73 20 76 65 72 73 69 6f 6e 2e 0a 0a 28 66 6e 20 4e 41 4d 45 20 41 52 47 4c 49 53 54 20 44 4f 43	s.version...(fn.NAME.ARGLIST.DOC
2380	53 54 52 49 4e 47 20 26 72 65 73 74 20 52 45 53 54 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63	STRING.&rest.REST)..(defalias.'c
23a0	6f 6d 70 61 74 2d 64 65 66 6d 61 63 72 6f 20 27 28 6d 61 63 72 6f 20 2e 20 23 5b 38 39 39 20 22	ompat-defmacro.'(macro...#[899."
23c0	5c 33 30 30 5c 33 30 31 05 05 05 05 25 5c 32 30 37 22 20 5b 63 6f 6d 70 61 74 2d 63 6f 6d 6d 6f	\300\301....%\207".[compat-commo
23e0	6e 2d 66 64 65 66 69 6e 65 20 6d 61 63 72 6f 5d 20 31 30 20 28 23 24 20 2e 20 38 36 33 31 29 5d	n-fdefine.macro].10.(#$...8631)]
2400	29 29 0a 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 30 5c 33 30 31 5c 33 30 32 5c 33 30 33 23	)).(byte-code."\300\301\302\303#
2420	5c 32 31 30 5c 33 30 34 5c 33 30 31 5c 33 30 35 5c 33 30 36 23 5c 33 30 34 5c 33 30 31 5c 33 30	\210\304\301\305\306#\304\301\30
2440	37 5c 33 31 30 23 5c 33 30 30 5c 32 30 37 22 20 5b 70 75 74 20 63 6f 6d 70 61 74 2d 64 65 66 6d	7\310#\300\207".[put.compat-defm
2460	61 63 72 6f 20 65 64 65 62 75 67 2d 66 6f 72 6d 2d 73 70 65 63 20 63 6f 6d 70 61 74 2d 64 65 66	acro.edebug-form-spec.compat-def
2480	75 6e 20 66 75 6e 63 74 69 6f 6e 2d 70 75 74 20 64 6f 63 2d 73 74 72 69 6e 67 2d 65 6c 74 20 33	un.function-put.doc-string-elt.3
24a0	20 6c 69 73 70 2d 69 6e 64 65 6e 74 2d 66 75 6e 63 74 69 6f 6e 20 32 5d 20 35 29 0a 23 40 35 38	.lisp-indent-function.2].5).#@58
24c0	32 20 44 65 66 69 6e 65 20 4e 41 4d 45 20 77 69 74 68 20 61 72 67 75 6d 65 6e 74 73 20 41 52 47	2.Define.NAME.with.arguments.ARG
24e0	4c 49 53 54 20 61 73 20 61 20 63 6f 6d 70 61 74 69 62 69 6c 69 74 79 20 61 64 76 69 63 65 2e 0a	LIST.as.a.compatibility.advice..
2500	54 68 65 20 61 64 76 69 63 65 20 66 75 6e 63 74 69 6f 6e 20 6d 75 73 74 20 62 65 20 64 6f 63 75	The.advice.function.must.be.docu
2520	6d 65 6e 74 65 64 20 69 6e 20 44 4f 43 53 54 52 49 4e 47 2e 20 20 52 45 53 54 20 6d 61 79 0a 62	mented.in.DOCSTRING...REST.may.b
2540	65 67 69 6e 20 77 69 74 68 20 61 20 70 6c 69 73 74 2c 20 74 68 61 74 20 69 73 20 69 6e 74 65 72	egin.with.a.plist,.that.is.inter
2560	70 72 65 74 65 64 20 62 79 20 74 68 69 73 20 6d 61 63 72 6f 20 62 75 74 20 6e 6f 74 0a 70 61 73	preted.by.this.macro.but.not.pas
2580	73 65 64 20 6f 6e 20 74 6f 20 74 68 65 20 61 63 74 75 61 6c 20 61 64 76 69 63 65 20 66 75 6e 63	sed.on.to.the.actual.advice.func
25a0	74 69 6f 6e 2e 20 20 53 65 65 0a 60 63 6f 6d 70 61 74 2d 67 65 6e 65 72 61 74 65 2d 63 6f 6d 6d	tion...See.`compat-generate-comm
25c0	6f 6e 27 20 66 6f 72 20 61 20 6c 69 73 74 69 6e 67 20 6f 66 20 61 74 74 72 69 62 75 74 65 73 2e	on'.for.a.listing.of.attributes.
25e0	20 20 54 68 65 20 61 64 76 69 63 65 0a 77 72 61 70 73 20 74 68 65 20 6f 6c 64 20 64 65 66 69 6e	..The.advice.wraps.the.old.defin
2600	69 74 69 6f 6e 2c 20 74 68 61 74 20 69 73 20 61 63 63 65 73 73 69 62 6c 65 20 76 69 61 20 75 73	ition,.that.is.accessible.via.us
2620	69 6e 67 20 74 68 65 20 73 79 6d 62 6f 6c 0a 60 6f 6c 64 66 75 6e 27 2e 0a 0a 54 68 65 20 61 64	ing.the.symbol.`oldfun'...The.ad
2640	76 69 63 65 20 77 69 6c 6c 20 6f 6e 6c 79 20 62 65 20 69 6e 73 74 61 6c 6c 65 64 2c 20 69 66 20	vice.will.only.be.installed,.if.
2660	74 68 65 20 76 65 72 73 69 6f 6e 20 74 68 69 73 20 66 75 6e 63 74 69 6f 6e 0a 77 61 73 20 64 65	the.version.this.function.was.de
2680	66 69 6e 65 64 20 69 6e 2c 20 61 73 20 69 6e 64 69 63 61 74 65 64 20 62 79 20 74 68 65 20 60 3a	fined.in,.as.indicated.by.the.`:
26a0	76 65 72 73 69 6f 6e 27 20 61 74 74 72 69 62 75 74 65 2c 20 69 73 0a 67 72 65 61 74 65 72 20 74	version'.attribute,.is.greater.t
26c0	68 61 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 45 6d 61 63 73 20 76 65 72 73 69 6f 6e 2e 0a 0a	han.the.current.Emacs.version...
26e0	28 66 6e 20 4e 41 4d 45 20 41 52 47 4c 49 53 54 20 44 4f 43 53 54 52 49 4e 47 20 26 72 65 73 74	(fn.NAME.ARGLIST.DOCSTRING.&rest
2700	20 52 45 53 54 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6f 6d 70 61 74 2d 61 64 76 69 73 65	.REST)..(defalias.'compat-advise
2720	20 27 28 6d 61 63 72 6f 20 2e 20 23 5b 38 39 39 20 22 5c 33 30 30 5c 33 30 31 05 5c 33 30 32 06	.'(macro...#[899."\300\301.\302.
2740	06 42 05 05 25 5c 32 30 37 22 20 5b 63 6f 6d 70 61 74 2d 63 6f 6d 6d 6f 6e 2d 66 64 65 66 69 6e	.B..%\207".[compat-common-fdefin
2760	65 20 61 64 76 69 63 65 20 6f 6c 64 66 75 6e 5d 20 31 30 20 28 23 24 20 2e 20 39 34 31 30 29 5d	e.advice.oldfun].10.(#$...9410)]
2780	29 29 0a 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 30 5c 33 30 31 5c 33 30 32 5c 33 30 33 23	)).(byte-code."\300\301\302\303#
27a0	5c 32 31 30 5c 33 30 34 5c 33 30 31 5c 33 30 35 5c 33 30 36 23 5c 33 30 34 5c 33 30 31 5c 33 30	\210\304\301\305\306#\304\301\30
27c0	37 5c 33 31 30 23 5c 33 30 30 5c 32 30 37 22 20 5b 70 75 74 20 63 6f 6d 70 61 74 2d 61 64 76 69	7\310#\300\207".[put.compat-advi
27e0	73 65 20 65 64 65 62 75 67 2d 66 6f 72 6d 2d 73 70 65 63 20 63 6f 6d 70 61 74 2d 64 65 66 75 6e	se.edebug-form-spec.compat-defun
2800	20 66 75 6e 63 74 69 6f 6e 2d 70 75 74 20 64 6f 63 2d 73 74 72 69 6e 67 2d 65 6c 74 20 33 20 6c	.function-put.doc-string-elt.3.l
2820	69 73 70 2d 69 6e 64 65 6e 74 2d 66 75 6e 63 74 69 6f 6e 20 32 5d 20 35 29 0a 23 40 34 39 34 20	isp-indent-function.2].5).#@494.
2840	44 65 63 6c 61 72 65 20 63 6f 6d 70 61 74 69 62 69 6c 69 74 79 20 76 61 72 69 61 62 6c 65 20 4e	Declare.compatibility.variable.N
2860	41 4d 45 20 77 69 74 68 20 69 6e 69 74 69 61 6c 20 76 61 6c 75 65 20 49 4e 49 54 56 41 4c 2e 0a	AME.with.initial.value.INITVAL..
2880	54 68 65 20 6f 62 6c 69 67 61 74 6f 72 79 20 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 73 74 72	The.obligatory.documentation.str
28a0	69 6e 67 20 44 4f 43 53 54 52 49 4e 47 20 6d 75 73 74 20 62 65 20 67 69 76 65 6e 2e 0a 0a 54 68	ing.DOCSTRING.must.be.given...Th
28c0	65 20 72 65 6d 61 69 6e 69 6e 67 20 61 72 67 75 6d 65 6e 74 73 20 41 54 54 52 20 66 6f 72 6d 20	e.remaining.arguments.ATTR.form.
28e0	61 20 70 6c 69 73 74 2c 20 6d 6f 64 69 66 79 69 6e 67 20 74 68 65 0a 62 65 68 61 76 69 6f 75 72	a.plist,.modifying.the.behaviour
2900	20 6f 66 20 74 68 69 73 20 6d 61 63 72 6f 2e 20 20 53 65 65 20 60 63 6f 6d 70 61 74 2d 67 65 6e	.of.this.macro...See.`compat-gen
2920	65 72 61 74 65 2d 63 6f 6d 6d 6f 6e 27 20 66 6f 72 20 61 0a 6c 69 73 74 69 6e 67 20 6f 66 20 61	erate-common'.for.a.listing.of.a
2940	74 74 72 69 62 75 74 65 73 2e 20 20 46 75 72 74 68 65 72 6d 6f 72 65 2c 20 60 63 6f 6d 70 61 74	ttributes...Furthermore,.`compat
2960	2d 64 65 66 76 61 72 27 20 61 6c 73 6f 20 68 61 6e 64 6c 65 73 0a 74 68 65 20 61 74 74 72 69 62	-defvar'.also.handles.the.attrib
2980	75 74 65 20 60 3a 6c 6f 63 61 6c 27 20 74 68 61 74 20 65 69 74 68 65 72 20 6d 61 6b 65 73 20 74	ute.`:local'.that.either.makes.t
29a0	68 65 20 76 61 72 69 61 62 6c 65 20 70 65 72 6d 61 6e 65 6e 74 0a 6c 6f 63 61 6c 20 77 69 74 68	he.variable.permanent.local.with
29c0	20 61 20 76 61 6c 75 65 20 6f 66 20 60 70 65 72 6d 61 6e 65 6e 74 27 20 6f 72 20 6a 75 73 74 20	.a.value.of.`permanent'.or.just.
29e0	62 75 66 66 65 72 20 6c 6f 63 61 6c 20 77 69 74 68 20 61 6e 79 0a 6e 6f 6e 2d 6e 69 6c 20 76 61	buffer.local.with.any.non-nil.va
2a00	6c 75 65 2e 0a 0a 28 66 6e 20 4e 41 4d 45 20 49 4e 49 54 56 41 4c 20 44 4f 43 53 54 52 49 4e 47	lue...(fn.NAME.INITVAL.DOCSTRING
2a20	20 26 72 65 73 74 20 41 54 54 52 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6f 6d 70 61 74 2d	.&rest.ATTR)..(defalias.'compat-
2a40	64 65 66 76 61 72 20 27 28 6d 61 63 72 6f 20 2e 20 23 5b 38 39 39 20 22 03 43 5c 32 31 31 5c 32	defvar.'(macro...#[899.".C\211\2
2a60	34 32 5c 33 30 30 03 5c 33 30 31 5c 22 5c 32 30 33 15 00 01 5c 33 30 32 5c 33 30 33 5c 33 30 34	42\300.\301\"\203...\302\303\304
2a80	05 5c 32 34 32 5c 22 21 5c 32 34 30 5c 32 31 30 5c 33 30 35 02 5c 32 34 32 5c 33 30 36 5c 33 30	.\242\"!\240\210\305.\242\306\30
2aa0	37 06 08 06 08 06 08 06 07 25 5c 33 30 36 5c 33 31 30 06 06 5c 22 5c 33 30 36 5c 33 31 31 06 07	7........%\306\310..\"\306\311..
2ac0	5c 22 06 07 5c 33 31 32 26 06 5c 32 30 37 22 20 5b 70 6c 69 73 74 2d 67 65 74 20 3a 70 72 65 66	\"..\312&.\207".[plist-get.:pref
2ae0	69 78 20 69 6e 74 65 72 6e 20 66 6f 72 6d 61 74 20 22 63 6f 6d 70 61 74 2d 25 73 22 20 63 6f 6d	ix.intern.format."compat-%s".com
2b00	70 61 74 2d 67 65 6e 65 72 61 74 65 2d 63 6f 6d 6d 6f 6e 20 6d 61 6b 65 2d 63 6c 6f 73 75 72 65	pat-generate-common.make-closure
2b20	20 23 5b 35 31 34 20 22 5c 33 30 34 5c 33 30 32 5c 33 30 35 5c 22 5c 33 30 36 5c 33 30 34 5c 33	.#[514."\304\302\305\"\306\304\3
2b40	30 32 5c 33 30 37 5c 22 5c 32 30 33 10 00 5c 33 31 30 5c 32 30 32 11 00 5c 33 31 31 04 5c 33 30	02\307\"\203..\310\202..\311.\30
2b60	30 05 5c 32 30 33 21 00 5c 33 31 32 5c 33 31 33 5c 33 30 33 06 08 5c 33 30 31 24 5c 32 30 32 26	0.\203!.\312\313\303..\301$\202&
2b80	00 5c 33 31 32 5c 33 31 34 5c 33 30 33 5c 33 30 31 23 46 02 5c 33 31 35 3d 5c 32 30 33 38 00 5c	.\312\314\303\301#F.\315=\2038.\
2ba0	33 31 36 5c 33 31 37 06 06 44 5c 33 32 30 42 42 5c 32 30 32 42 00 02 5c 32 30 35 42 00 5c 33 32	316\317..D\320BB\202B..\205B.\32
2bc0	31 5c 33 31 37 06 06 44 44 45 5c 32 30 37 22 20 5b 56 30 20 56 31 20 56 32 20 56 33 20 70 6c 69	1\317..DDE\207".[V0.V1.V2.V3.pli
2be0	73 74 2d 67 65 74 20 3a 6c 6f 63 61 6c 20 70 72 6f 67 6e 20 3a 63 6f 6e 73 74 61 6e 74 20 64 65	st-get.:local.progn.:constant.de
2c00	66 63 6f 6e 73 74 20 64 65 66 76 61 72 20 66 6f 72 6d 61 74 20 22 5b 43 6f 6d 70 61 74 69 62 69	fconst.defvar.format."[Compatibi
2c20	6c 69 74 79 20 76 61 72 69 61 62 6c 65 20 66 6f 72 20 60 25 53 27 2c 20 64 65 66 69 6e 65 64 20	lity.variable.for.`%S',.defined.
2c40	69 6e 20 45 6d 61 63 73 20 25 73 5d 5c 6e 5c 6e 25 73 22 20 22 5b 43 6f 6d 70 61 74 69 62 69 6c	in.Emacs.%s]\n\n%s"."[Compatibil
2c60	69 74 79 20 76 61 72 69 61 62 6c 65 20 66 6f 72 20 60 25 53 27 5d 5c 6e 5c 6e 25 73 22 20 70 65	ity.variable.for.`%S']\n\n%s".pe
2c80	72 6d 61 6e 65 6e 74 20 70 75 74 20 71 75 6f 74 65 20 28 27 70 65 72 6d 61 6e 65 6e 74 2d 6c 6f	rmanent.put.quote.('permanent-lo
2ca0	63 61 6c 20 74 29 20 6d 61 6b 65 2d 76 61 72 69 61 62 6c 65 2d 62 75 66 66 65 72 2d 6c 6f 63 61	cal.t).make-variable-buffer-loca
2cc0	6c 5d 20 31 32 20 22 5c 6e 5c 6e 28 66 6e 20 52 45 41 4c 4e 41 4d 45 20 56 45 52 53 49 4f 4e 29	l].12."\n\n(fn.REALNAME.VERSION)
2ce0	22 5d 20 23 5b 35 31 34 20 22 5c 33 30 31 5c 33 30 32 5c 33 30 30 5c 32 34 32 44 5c 33 30 32 04	"].#[514."\301\302\300\242D\302.
2d00	44 45 5c 32 30 37 22 20 5b 56 30 20 64 65 66 76 61 72 61 6c 69 61 73 20 71 75 6f 74 65 5d 20 36	DE\207".[V0.defvaralias.quote].6
2d20	20 22 5c 6e 5c 6e 28 66 6e 20 52 45 41 4c 4e 41 4d 45 20 56 45 52 53 49 4f 4e 29 22 5d 20 23 5b	."\n\n(fn.REALNAME.VERSION)"].#[
2d40	30 20 22 5c 33 30 31 5c 33 30 32 5c 33 30 33 5c 33 30 30 5c 32 34 32 44 44 44 5c 32 30 37 22 20	0."\301\302\303\300\242DDD\207".
2d60	5b 56 30 20 6e 6f 74 20 62 6f 75 6e 64 70 20 71 75 6f 74 65 5d 20 34 5d 20 76 61 72 69 61 62 6c	[V0.not.boundp.quote].4].variabl
2d80	65 5d 20 31 34 20 28 23 24 20 2e 20 31 30 33 30 34 29 5d 29 29 0a 28 62 79 74 65 2d 63 6f 64 65	e].14.(#$...10304)])).(byte-code
2da0	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 5c 33 30 31 5c	."\300\301\302\303#\210\304\301\
2dc0	33 30 35 5c 33 30 36 23 5c 33 30 34 5c 33 30 31 5c 33 30 37 5c 33 31 30 23 5c 33 31 31 5c 33 31	305\306#\304\301\307\310#\311\31
2de0	32 21 5c 32 30 37 22 20 5b 70 75 74 20 63 6f 6d 70 61 74 2d 64 65 66 76 61 72 20 65 64 65 62 75	2!\207".[put.compat-defvar.edebu
2e00	67 2d 66 6f 72 6d 2d 73 70 65 63 20 28 6e 61 6d 65 20 66 6f 72 6d 20 73 74 72 69 6e 67 70 20 5b	g-form-spec.(name.form.stringp.[
2e20	26 72 65 73 74 20 6b 65 79 77 6f 72 64 70 20 73 65 78 70 5d 29 20 66 75 6e 63 74 69 6f 6e 2d 70	&rest.keywordp.sexp]).function-p
2e40	75 74 20 64 6f 63 2d 73 74 72 69 6e 67 2d 65 6c 74 20 33 20 6c 69 73 70 2d 69 6e 64 65 6e 74 2d	ut.doc-string-elt.3.lisp-indent-
2e60	66 75 6e 63 74 69 6f 6e 20 32 20 70 72 6f 76 69 64 65 20 63 6f 6d 70 61 74 2d 6d 61 63 73 5d 20	function.2.provide.compat-macs].
2e80	35 29 0a	5).