blob: 247a6bffed2e31f9afabcc88787ed01ce515e7c3 (plain)

ofs	hex dump	ascii
0000	0a 28 64 65 66 76 61 72 20 68 69 64 65 2d 69 66 64 65 66 2d 6d 6f 64 65 2d 6d 61 70 20 6e 69 6c	.(defvar.hide-ifdef-mode-map.nil
0020	20 22 5c 0a 4b 65 79 6d 61 70 20 75 73 65 64 20 77 69 74 68 20 68 69 64 65 2d 69 66 64 65 66 20	."\.Keymap.used.with.hide-ifdef.
0040	6d 6f 64 65 22 29 0a 0a 28 64 65 66 63 6f 6e 73 74 20 68 69 64 65 2d 69 66 64 65 66 2d 6d 6f 64	mode")..(defconst.hide-ifdef-mod
0060	65 2d 70 72 65 66 69 78 2d 6b 65 79 20 22 03 22 20 22 5c 0a 50 72 65 66 69 78 20 6b 65 79 20 66	e-prefix-key."."."\.Prefix.key.f
0080	6f 72 20 61 6c 6c 20 68 69 64 65 2d 69 66 64 65 66 2d 6d 6f 64 65 20 63 6f 6d 6d 61 6e 64 73 2e	or.all.hide-ifdef-mode.commands.
00a0	22 29 0a 0a 28 64 65 66 76 61 72 20 68 69 64 65 2d 69 66 64 65 66 2d 6d 6f 64 65 2d 6d 61 70 2d	")..(defvar.hide-ifdef-mode-map-
00c0	62 65 66 6f 72 65 20 6e 69 6c 20 22 5c 0a 42 75 66 66 65 72 2d 6c 6f 63 61 6c 20 76 61 72 69 61	before.nil."\.Buffer-local.varia
00e0	62 6c 65 20 74 6f 20 73 74 6f 72 65 20 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 6c 6f 63 61 6c	ble.to.store.a.copy.of.the.local
0100	20 6b 65 79 6d 61 70 0a 09 62 65 66 6f 72 65 20 68 69 64 65 2d 69 66 64 65 66 2d 6d 6f 64 65 20	.keymap..before.hide-ifdef-mode.
0120	6d 6f 64 69 66 69 65 73 20 69 74 2e 22 29 0a 0a 28 64 65 66 75 6e 20 64 65 66 69 6e 65 2d 68 69	modifies.it.")..(defun.define-hi
0140	64 65 2d 69 66 64 65 66 2d 6d 6f 64 65 2d 6d 61 70 20 6e 69 6c 20 28 62 79 74 65 2d 63 6f 64 65	de-ifdef-mode-map.nil.(byte-code
0160	20 22 08 83 08 00 c1 82 70 00 c3 20 89 10 88 c4 08 c5 c6 23 88 c4 08 c7 c8 23 88 c4 08 c9 ca 23	."......p..........#.....#.....#
0180	88 c4 08 cb cc 23 88 c4 08 cd ce 23 88 c4 08 cf d0 23 88 c4 08 d1 d2 23 88 c4 08 d3 d4 23 88 c4	.....#.....#.....#.....#.....#..
01a0	08 d5 d6 23 88 c4 08 d7 d8 23 88 c4 08 d9 da 23 88 c4 08 db dc 23 88 c4 08 dd de 23 88 c4 08 df	...#.....#.....#.....#.....#....
01c0	e0 23 88 c4 08 e1 e2 23 88 c4 08 e3 e4 c1 c2 23 e5 23 88 c0 08 4d 87 22 20 5b 68 69 64 65 2d 69	.#.....#.......#.#...M.".[hide-i
01e0	66 64 65 66 2d 6d 6f 64 65 2d 6d 61 70 20 6e 69 6c 20 74 20 6d 61 6b 65 2d 73 70 61 72 73 65 2d	fdef-mode-map.nil.t.make-sparse-
0200	6b 65 79 6d 61 70 20 64 65 66 69 6e 65 2d 6b 65 79 20 22 64 22 20 68 69 64 65 2d 69 66 64 65 66	keymap.define-key."d".hide-ifdef
0220	2d 64 65 66 69 6e 65 20 22 75 22 20 68 69 64 65 2d 69 66 64 65 66 2d 75 6e 64 65 66 20 22 44 22	-define."u".hide-ifdef-undef."D"
0240	20 68 69 64 65 2d 69 66 64 65 66 2d 73 65 74 2d 64 65 66 69 6e 65 2d 61 6c 69 73 74 20 22 55 22	.hide-ifdef-set-define-alist."U"
0260	20 68 69 64 65 2d 69 66 64 65 66 2d 75 73 65 2d 64 65 66 69 6e 65 2d 61 6c 69 73 74 20 22 68 22	.hide-ifdef-use-define-alist."h"
0280	20 68 69 64 65 2d 69 66 64 65 66 73 20 22 73 22 20 73 68 6f 77 2d 69 66 64 65 66 73 20 22 08 22	.hide-ifdefs."s".show-ifdefs."."
02a0	20 68 69 64 65 2d 69 66 64 65 66 2d 62 6c 6f 63 6b 20 22 13 22 20 73 68 6f 77 2d 69 66 64 65 66	.hide-ifdef-block.".".show-ifdef
02c0	2d 62 6c 6f 63 6b 20 22 06 22 20 66 6f 72 77 61 72 64 2d 69 66 64 65 66 20 22 02 22 20 62 61 63	-block.".".forward-ifdef.".".bac
02e0	6b 77 61 72 64 2d 69 66 64 65 66 20 22 04 22 20 64 6f 77 6e 2d 69 66 64 65 66 20 22 15 22 20 75	kward-ifdef.".".down-ifdef.".".u
0300	70 2d 69 66 64 65 66 20 22 0e 22 20 6e 65 78 74 2d 69 66 64 65 66 20 22 10 22 20 70 72 65 76 69	p-ifdef.".".next-ifdef.".".previ
0320	6f 75 73 2d 69 66 64 65 66 20 22 11 22 20 68 69 64 65 2d 69 66 64 65 66 2d 74 6f 67 67 6c 65 2d	ous-ifdef.".".hide-ifdef-toggle-
0340	72 65 61 64 2d 6f 6e 6c 79 20 77 68 65 72 65 2d 69 73 2d 69 6e 74 65 72 6e 61 6c 20 74 6f 67 67	read-only.where-is-internal.togg
0360	6c 65 2d 72 65 61 64 2d 6f 6e 6c 79 20 68 69 64 65 2d 69 66 64 65 66 2d 74 6f 67 67 6c 65 2d 6f	le-read-only.hide-ifdef-toggle-o
0380	75 74 73 69 64 65 2d 72 65 61 64 2d 6f 6e 6c 79 5d 20 32 32 29 29 0a 0a 28 64 65 66 75 6e 20 68	utside-read-only].22))..(defun.h
03a0	69 66 2d 75 70 64 61 74 65 2d 6d 6f 64 65 2d 6c 69 6e 65 20 6e 69 6c 20 22 5c 0a 55 70 64 61 74	if-update-mode-line.nil."\.Updat
03c0	65 20 6d 6f 64 65 2d 6c 69 6e 65 20 62 79 20 73 65 74 74 69 6e 67 20 62 75 66 66 65 72 2d 6d 6f	e.mode-line.by.setting.buffer-mo
03e0	64 69 66 69 65 64 20 74 6f 20 69 74 73 65 6c 66 2e 22 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c0	dified.to.itself.".(byte-code.".
0400	c1 20 21 87 22 20 5b 73 65 74 2d 62 75 66 66 65 72 2d 6d 6f 64 69 66 69 65 64 2d 70 20 62 75 66	..!.".[set-buffer-modified-p.buf
0420	66 65 72 2d 6d 6f 64 69 66 69 65 64 2d 70 5d 20 33 29 29 0a 0a 28 64 65 66 76 61 72 20 68 69 64	fer-modified-p].3))..(defvar.hid
0440	65 2d 69 66 64 65 66 2d 6d 6f 64 65 20 6e 69 6c 20 22 5c 0a 6e 6f 6e 2d 6e 69 6c 20 77 68 65 6e	e-ifdef-mode.nil."\.non-nil.when
0460	20 68 69 64 65 2d 69 66 64 65 66 2d 6d 6f 64 65 20 69 73 20 61 63 74 69 76 61 74 65 64 2e 22 29	.hide-ifdef-mode.is.activated.")
0480	0a 0a 28 64 65 66 76 61 72 20 68 69 64 65 2d 69 66 64 65 66 2d 68 69 64 69 6e 67 20 6e 69 6c 20	..(defvar.hide-ifdef-hiding.nil.
04a0	22 5c 0a 6e 6f 6e 2d 6e 69 6c 20 77 68 65 6e 20 74 65 78 74 20 6d 61 79 20 62 65 20 68 69 64 64	"\.non-nil.when.text.may.be.hidd
04c0	65 6e 2e 22 29 0a 0a 28 6f 72 20 28 61 73 73 71 20 28 71 75 6f 74 65 20 68 69 64 65 2d 69 66 64	en.")..(or.(assq.(quote.hide-ifd
04e0	65 66 2d 68 69 64 69 6e 67 29 20 6d 69 6e 6f 72 2d 6d 6f 64 65 2d 61 6c 69 73 74 29 20 28 73 65	ef-hiding).minor-mode-alist).(se
0500	74 71 20 6d 69 6e 6f 72 2d 6d 6f 64 65 2d 61 6c 69 73 74 20 28 63 6f 6e 73 20 28 71 75 6f 74 65	tq.minor-mode-alist.(cons.(quote
0520	20 28 68 69 64 65 2d 69 66 64 65 66 2d 68 69 64 69 6e 67 20 22 20 48 69 64 69 6e 67 22 29 29 20	.(hide-ifdef-hiding.".Hiding")).
0540	6d 69 6e 6f 72 2d 6d 6f 64 65 2d 61 6c 69 73 74 29 29 29 0a 0a 28 6f 72 20 28 61 73 73 71 20 28	minor-mode-alist)))..(or.(assq.(
0560	71 75 6f 74 65 20 68 69 64 65 2d 69 66 64 65 66 2d 6d 6f 64 65 29 20 6d 69 6e 6f 72 2d 6d 6f 64	quote.hide-ifdef-mode).minor-mod
0580	65 2d 61 6c 69 73 74 29 20 28 73 65 74 71 20 6d 69 6e 6f 72 2d 6d 6f 64 65 2d 61 6c 69 73 74 20	e-alist).(setq.minor-mode-alist.
05a0	28 63 6f 6e 73 20 28 71 75 6f 74 65 20 28 68 69 64 65 2d 69 66 64 65 66 2d 6d 6f 64 65 20 22 20	(cons.(quote.(hide-ifdef-mode.".
05c0	49 66 64 65 66 22 29 29 20 6d 69 6e 6f 72 2d 6d 6f 64 65 2d 61 6c 69 73 74 29 29 29 0a 0a 28 64	Ifdef")).minor-mode-alist)))..(d
05e0	65 66 75 6e 20 68 69 64 65 2d 69 66 64 65 66 2d 6d 6f 64 65 20 28 61 72 67 29 20 22 5c 0a 54 6f	efun.hide-ifdef-mode.(arg)."\.To
0600	67 67 6c 65 20 68 69 64 65 2d 69 66 64 65 66 2d 6d 6f 64 65 2e 20 20 54 68 75 73 20 74 68 69 73	ggle.hide-ifdef-mode...Thus.this
0620	20 69 73 20 61 20 6d 69 6e 6f 72 20 6d 6f 64 65 2c 20 61 6c 62 65 69 74 20 61 20 6c 61 72 67 65	.is.a.minor.mode,.albeit.a.large
0640	20 6f 6e 65 2e 0a 57 69 74 68 20 61 72 67 2c 20 74 75 72 6e 20 68 69 64 65 2d 69 66 64 65 66 2d	.one..With.arg,.turn.hide-ifdef-
0660	6d 6f 64 65 20 6f 6e 20 69 66 66 20 61 72 67 20 69 73 20 70 6f 73 69 74 69 76 65 2e 0a 49 6e 20	mode.on.iff.arg.is.positive..In.
0680	68 69 64 65 2d 69 66 64 65 66 2d 6d 6f 64 65 2c 20 63 6f 64 65 20 77 69 74 68 69 6e 20 23 69 66	hide-ifdef-mode,.code.within.#if
06a0	64 65 66 20 63 6f 6e 73 74 72 75 63 74 73 20 74 68 61 74 20 74 68 65 20 43 20 70 72 65 70 72 6f	def.constructs.that.the.C.prepro
06c0	63 65 73 73 6f 72 0a 77 6f 75 6c 64 20 65 6c 69 6d 69 6e 61 74 65 20 6d 61 79 20 62 65 20 68 69	cessor.would.eliminate.may.be.hi
06e0	64 64 65 6e 20 66 72 6f 6d 20 76 69 65 77 2e 20 20 53 65 76 65 72 61 6c 20 76 61 72 69 61 62 6c	dden.from.view...Several.variabl
0700	65 73 20 61 66 66 65 63 74 0a 68 6f 77 20 74 68 65 20 68 69 64 69 6e 67 20 69 73 20 64 6f 6e 65	es.affect.how.the.hiding.is.done
0720	3a 0a 0a 68 69 64 65 2d 69 66 64 65 66 2d 65 6e 76 0a 09 41 6e 20 61 73 73 6f 63 69 61 74 69 6f	:..hide-ifdef-env..An.associatio
0740	6e 20 6c 69 73 74 20 6f 66 20 64 65 66 69 6e 65 64 20 61 6e 64 20 75 6e 64 65 66 69 6e 65 64 20	n.list.of.defined.and.undefined.
0760	73 79 6d 62 6f 6c 73 20 66 6f 72 20 74 68 65 0a 09 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 2e	symbols.for.the..current.buffer.
0780	20 20 49 6e 69 74 69 61 6c 6c 79 2c 20 74 68 65 20 67 6c 6f 62 61 6c 20 76 61 6c 75 65 20 6f 66	..Initially,.the.global.value.of
07a0	20 68 69 64 65 2d 69 66 64 65 66 2d 65 6e 76 20 69 73 20 75 73 65 64 2e 0a 0a 68 69 64 65 2d 69	.hide-ifdef-env.is.used...hide-i
07c0	66 64 65 66 2d 64 65 66 69 6e 65 2d 61 6c 69 73 74 0a 09 41 6e 20 61 73 73 6f 63 69 61 74 69 6f	fdef-define-alist..An.associatio
07e0	6e 20 6c 69 73 74 20 6f 66 20 64 65 66 69 6e 65 64 20 73 79 6d 62 6f 6c 20 6c 69 73 74 73 2e 20	n.list.of.defined.symbol.lists..
0800	20 0a 20 20 20 20 20 20 20 20 55 73 65 20 68 69 64 65 2d 69 66 64 65 66 2d 73 65 74 2d 64 65 66	..........Use.hide-ifdef-set-def
0820	69 6e 65 2d 61 6c 69 73 74 20 74 6f 20 73 61 76 65 20 74 68 65 20 63 75 72 72 65 6e 74 20 68 69	ine-alist.to.save.the.current.hi
0840	64 65 2d 69 66 64 65 66 2d 65 6e 76 0a 20 20 20 20 20 20 20 20 61 6e 64 20 68 69 64 65 2d 69 66	de-ifdef-env.........and.hide-if
0860	64 65 66 2d 75 73 65 2d 64 65 66 69 6e 65 2d 61 6c 69 73 74 20 74 6f 20 73 65 74 20 74 68 65 20	def-use-define-alist.to.set.the.
0880	63 75 72 72 65 6e 74 20 68 69 64 65 2d 69 66 64 65 66 2d 65 6e 76 0a 20 20 20 20 20 20 20 20 66	current.hide-ifdef-env.........f
08a0	72 6f 6d 20 6f 6e 65 20 6f 66 20 74 68 65 20 6c 69 73 74 73 20 69 6e 20 68 69 64 65 2d 69 66 64	rom.one.of.the.lists.in.hide-ifd
08c0	65 66 2d 64 65 66 69 6e 65 2d 61 6c 69 73 74 2e 0a 0a 68 69 64 65 2d 69 66 64 65 66 2d 6c 69 6e	ef-define-alist...hide-ifdef-lin
08e0	65 73 0a 09 53 65 74 20 74 6f 20 6e 6f 6e 2d 6e 69 6c 20 74 6f 20 6e 6f 74 20 73 68 6f 77 20 23	es..Set.to.non-nil.to.not.show.#
0900	69 66 2c 20 23 69 66 64 65 66 2c 20 23 69 66 6e 64 65 66 2c 20 23 65 6c 73 65 2c 20 61 6e 64 0a	if,.#ifdef,.#ifndef,.#else,.and.
0920	09 23 65 6e 64 69 66 20 6c 69 6e 65 73 20 77 68 65 6e 20 68 69 64 69 6e 67 2e 0a 0a 68 69 64 65	.#endif.lines.when.hiding...hide
0940	2d 69 66 64 65 66 2d 69 6e 69 74 69 61 6c 6c 79 0a 09 49 6e 64 69 63 61 74 65 73 20 77 68 65 74	-ifdef-initially..Indicates.whet
0960	68 65 72 20 68 69 64 65 2d 69 66 64 65 66 73 20 73 68 6f 75 6c 64 20 62 65 20 63 61 6c 6c 65 64	her.hide-ifdefs.should.be.called
0980	20 77 68 65 6e 20 68 69 64 65 2d 69 66 64 65 66 2d 6d 6f 64 65 0a 09 69 73 20 61 63 74 69 76 61	.when.hide-ifdef-mode..is.activa
09a0	74 65 64 2e 0a 0a 68 69 64 65 2d 69 66 64 65 66 2d 72 65 61 64 2d 6f 6e 6c 79 0a 09 53 65 74 20	ted...hide-ifdef-read-only..Set.
09c0	74 6f 20 6e 6f 6e 2d 6e 69 6c 20 69 66 20 79 6f 75 20 77 61 6e 74 20 74 6f 20 6d 61 6b 65 20 62	to.non-nil.if.you.want.to.make.b
09e0	75 66 66 65 72 73 20 72 65 61 64 20 6f 6e 6c 79 20 77 68 69 6c 65 20 68 69 64 69 6e 67 2e 0a 09	uffers.read.only.while.hiding...
0a00	41 66 74 65 72 20 73 68 6f 77 2d 69 66 64 65 66 73 2c 20 72 65 61 64 2d 6f 6e 6c 79 20 73 74 61	After.show-ifdefs,.read-only.sta
0a20	74 75 73 20 69 73 20 72 65 73 74 6f 72 65 64 20 74 6f 20 70 72 65 76 69 6f 75 73 20 76 61 6c 75	tus.is.restored.to.previous.valu
0a40	65 2e 0a 0a 5c 5c 7b 68 69 64 65 2d 69 66 64 65 66 2d 6d 6f 64 65 2d 6d 61 70 7d 22 20 28 69 6e	e...\\{hide-ifdef-mode-map}".(in
0a60	74 65 72 61 63 74 69 76 65 20 22 50 22 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c9 88 ca c0 21	teractive."P").(byte-code."....!
0a80	88 09 3f 83 10 00 08 3f 82 15 00 cb 09 21 cc 56 89 10 88 cd 20 88 08 83 80 00 ce cf d0 5c 22 88	..?....?.....!.V.............\".
0aa0	ce d1 d2 5c 22 88 ce d3 d2 5c 22 88 ca c2 21 88 d4 c2 21 89 12 88 ca c3 21 88 d4 c3 21 89 13 88	...\"....\"...!...!.....!...!...
0ac0	ca c4 21 88 0d 89 14 88 ca d5 21 88 d6 20 89 16 06 88 d7 d8 d6 20 21 21 88 d9 0e 07 21 88 da 0e	..!.......!...........!!....!...
0ae0	07 db 5c 22 88 dc 20 88 dd de 21 88 0e 08 83 77 00 df 20 82 79 00 e0 20 88 e1 e2 21 82 8f 00 0b	..\"......!....w....y......!....
0b00	85 86 00 e0 20 88 d7 0e 06 21 88 e1 e3 21 87 22 20 5b 68 69 64 65 2d 69 66 64 65 66 2d 6d 6f 64	.........!...!.".[hide-ifdef-mod
0b20	65 20 61 72 67 20 68 69 64 65 2d 69 66 64 65 66 2d 65 6e 76 20 68 69 64 65 2d 69 66 64 65 66 2d	e.arg.hide-ifdef-env.hide-ifdef-
0b40	68 69 64 69 6e 67 20 68 69 66 2d 6f 75 74 73 69 64 65 2d 72 65 61 64 2d 6f 6e 6c 79 20 62 75 66	hiding.hif-outside-read-only.buf
0b60	66 65 72 2d 72 65 61 64 2d 6f 6e 6c 79 20 68 69 64 65 2d 69 66 64 65 66 2d 6d 6f 64 65 2d 6d 61	fer-read-only.hide-ifdef-mode-ma
0b80	70 2d 62 65 66 6f 72 65 20 68 69 64 65 2d 69 66 64 65 66 2d 6d 6f 64 65 2d 70 72 65 66 69 78 2d	p-before.hide-ifdef-mode-prefix-
0ba0	6b 65 79 20 68 69 64 65 2d 69 66 64 65 66 2d 69 6e 69 74 69 61 6c 6c 79 20 6e 69 6c 20 6d 61 6b	key.hide-ifdef-initially.nil.mak
0bc0	65 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 20 70 72 65 66 69 78 2d 6e 75 6d 65 72 69 63 2d	e-local-variable.prefix-numeric-
0be0	76 61 6c 75 65 20 30 20 68 69 66 2d 75 70 64 61 74 65 2d 6d 6f 64 65 2d 6c 69 6e 65 20 6d 6f 64	value.0.hif-update-mode-line.mod
0c00	69 66 79 2d 73 79 6e 74 61 78 2d 65 6e 74 72 79 20 39 35 20 22 77 22 20 33 38 20 22 2e 22 20 31	ify-syntax-entry.95."w".38.".".1
0c20	32 34 20 64 65 66 61 75 6c 74 2d 76 61 6c 75 65 20 69 64 65 2d 69 66 64 65 66 2d 6d 6f 64 65 2d	24.default-value.ide-ifdef-mode-
0c40	6d 61 70 2d 62 65 66 6f 72 65 20 63 75 72 72 65 6e 74 2d 6c 6f 63 61 6c 2d 6d 61 70 20 75 73 65	map-before.current-local-map.use
0c60	2d 6c 6f 63 61 6c 2d 6d 61 70 20 63 6f 70 79 2d 6b 65 79 6d 61 70 20 6c 6f 63 61 6c 2d 75 6e 73	-local-map.copy-keymap.local-uns
0c80	65 74 2d 6b 65 79 20 6c 6f 63 61 6c 2d 73 65 74 2d 6b 65 79 20 68 69 64 65 2d 69 66 64 65 66 2d	et-key.local-set-key.hide-ifdef-
0ca0	6d 6f 64 65 2d 6d 61 70 20 64 65 66 69 6e 65 2d 68 69 64 65 2d 69 66 64 65 66 2d 6d 6f 64 65 2d	mode-map.define-hide-ifdef-mode-
0cc0	6d 61 70 20 72 75 6e 2d 68 6f 6f 6b 73 20 68 69 64 65 2d 69 66 64 65 66 2d 6d 6f 64 65 2d 68 6f	map.run-hooks.hide-ifdef-mode-ho
0ce0	6f 6b 20 68 69 64 65 2d 69 66 64 65 66 73 20 73 68 6f 77 2d 69 66 64 65 66 73 20 6d 65 73 73 61	ok.hide-ifdefs.show-ifdefs.messa
0d00	67 65 20 22 45 6e 74 65 72 20 68 69 64 65 2d 69 66 64 65 66 2d 6d 6f 64 65 2e 22 20 22 45 78 69	ge."Enter.hide-ifdef-mode."."Exi
0d20	74 20 68 69 64 65 2d 69 66 64 65 66 2d 6d 6f 64 65 2e 22 5d 20 32 37 29 29 0a 0a 28 64 65 66 75	t.hide-ifdef-mode."].27))..(defu
0d40	6e 20 68 69 66 2d 6f 75 74 6c 69 6e 65 2d 66 6c 61 67 2d 72 65 67 69 6f 6e 20 28 66 72 6f 6d 20	n.hif-outline-flag-region.(from.
0d60	74 6f 20 66 6c 61 67 29 20 22 5c 0a 48 69 64 65 73 20 6f 72 20 73 68 6f 77 73 20 6c 69 6e 65 73	to.flag)."\.Hides.or.shows.lines
0d80	20 66 72 6f 6d 20 46 52 4f 4d 20 74 6f 20 54 4f 2c 20 61 63 63 6f 72 64 69 6e 67 20 74 6f 20 46	.from.FROM.to.TO,.according.to.F
0da0	4c 41 47 2e 20 20 49 66 20 46 4c 41 47 0a 69 73 20 5c 5c 6e 20 28 6e 65 77 6c 69 6e 65 20 63 68	LAG...If.FLAG.is.\\n.(newline.ch
0dc0	61 72 61 63 74 65 72 29 20 74 68 65 6e 20 74 65 78 74 20 69 73 20 73 68 6f 77 6e 2c 20 77 68 69	aracter).then.text.is.shown,.whi
0de0	6c 65 20 69 66 20 46 4c 41 47 20 69 73 20 5c 5c 5e 4d 0a 28 63 6f 6e 74 72 6f 6c 2d 4d 29 20 74	le.if.FLAG.is.\\^M.(control-M).t
0e00	68 65 20 74 65 78 74 20 69 73 20 68 69 64 64 65 6e 2e 22 20 28 62 79 74 65 2d 63 6f 64 65 20 22	he.text.is.hidden.".(byte-code."
0e20	c5 20 18 c6 8e c7 09 0a 0b c8 55 83 12 00 c9 82 13 00 c8 0b c4 25 29 29 87 22 20 5b 6d 6f 64 70	..........U..........%)).".[modp
0e40	20 66 72 6f 6d 20 74 6f 20 66 6c 61 67 20 74 20 62 75 66 66 65 72 2d 6d 6f 64 69 66 69 65 64 2d	.from.to.flag.t.buffer-modified-
0e60	70 20 28 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 08 21 87 22 20 5b 6d 6f 64 70 20 73 65 74 2d 62	p.((byte-code."..!.".[modp.set-b
0e80	75 66 66 65 72 2d 6d 6f 64 69 66 69 65 64 2d 70 5d 20 32 29 29 20 73 75 62 73 74 2d 63 68 61 72	uffer-modified-p].2)).subst-char
0ea0	2d 69 6e 2d 72 65 67 69 6f 6e 20 31 30 20 31 33 5d 20 37 29 29 0a 0a 28 64 65 66 75 6e 20 68 69	-in-region.10.13].7))..(defun.hi
0ec0	66 2d 73 68 6f 77 2d 61 6c 6c 20 6e 69 6c 20 22 5c 0a 53 68 6f 77 20 61 6c 6c 20 6f 66 20 74 68	f-show-all.nil."\.Show.all.of.th
0ee0	65 20 74 65 78 74 20 69 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 2e 22 20 28	e.text.in.the.current.buffer.".(
0f00	69 6e 74 65 72 61 63 74 69 76 65 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c0 88 c1 65 64 c2 23	interactive).(byte-code."...ed.#
0f20	87 22 20 5b 6e 69 6c 20 68 69 66 2d 6f 75 74 6c 69 6e 65 2d 66 6c 61 67 2d 72 65 67 69 6f 6e 20	.".[nil.hif-outline-flag-region.
0f40	31 30 5d 20 34 29 29 0a 0a 28 64 65 66 75 6e 20 68 69 64 65 2d 69 66 64 65 66 2d 72 65 67 69 6f	10].4))..(defun.hide-ifdef-regio
0f60	6e 20 28 73 74 61 72 74 20 65 6e 64 29 20 22 5c 0a 53 54 41 52 54 20 69 73 20 74 68 65 20 73 74	n.(start.end)."\.START.is.the.st
0f80	61 72 74 20 6f 66 20 61 20 23 69 66 20 6f 72 20 23 65 6c 73 65 20 66 6f 72 6d 2e 20 20 45 4e 44	art.of.a.#if.or.#else.form...END
0fa0	20 69 73 20 74 68 65 20 65 6e 64 69 6e 67 20 70 61 72 74 2e 0a 45 76 65 72 79 74 68 69 6e 67 20	.is.the.ending.part..Everything.
0fc0	69 6e 63 6c 75 64 69 6e 67 20 74 68 65 73 65 20 6c 69 6e 65 73 20 69 73 20 6d 61 64 65 20 69 6e	including.these.lines.is.made.in
0fe0	76 69 73 69 62 6c 65 2e 22 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c2 08 09 c3 23 87 22 20 5b 73	visible.".(byte-code."....#.".[s
1000	74 61 72 74 20 65 6e 64 20 68 69 66 2d 6f 75 74 6c 69 6e 65 2d 66 6c 61 67 2d 72 65 67 69 6f 6e	tart.end.hif-outline-flag-region
1020	20 31 33 5d 20 34 29 29 0a 0a 28 64 65 66 75 6e 20 68 69 66 2d 73 68 6f 77 2d 69 66 64 65 66 2d	.13].4))..(defun.hif-show-ifdef-
1040	72 65 67 69 6f 6e 20 28 73 74 61 72 74 20 65 6e 64 29 20 22 5c 0a 45 76 65 72 79 74 68 69 6e 67	region.(start.end)."\.Everything
1060	20 62 65 74 77 65 65 6e 20 53 54 41 52 54 20 61 6e 64 20 45 4e 44 20 69 73 20 6d 61 64 65 20 76	.between.START.and.END.is.made.v
1080	69 73 69 62 6c 65 2e 22 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c2 08 09 c3 23 87 22 20 5b 73 74	isible.".(byte-code."....#.".[st
10a0	61 72 74 20 65 6e 64 20 68 69 66 2d 6f 75 74 6c 69 6e 65 2d 66 6c 61 67 2d 72 65 67 69 6f 6e 20	art.end.hif-outline-flag-region.
10c0	31 30 5d 20 34 29 29 0a 0a 28 64 65 66 76 61 72 20 68 69 64 65 2d 69 66 64 65 66 2d 65 76 61 6c	10].4))..(defvar.hide-ifdef-eval
10e0	75 61 74 6f 72 20 28 71 75 6f 74 65 20 65 76 61 6c 29 20 22 5c 0a 54 68 65 20 65 76 61 6c 75 61	uator.(quote.eval)."\.The.evalua
1100	74 6f 72 20 69 73 20 67 69 76 65 6e 20 61 20 63 61 6e 6f 6e 69 63 61 6c 20 66 6f 72 6d 20 61 6e	tor.is.given.a.canonical.form.an
1120	64 20 72 65 74 75 72 6e 73 20 54 20 69 66 20 74 65 78 74 20 75 6e 64 65 72 0a 74 68 61 74 20 66	d.returns.T.if.text.under.that.f
1140	6f 72 6d 20 73 68 6f 75 6c 64 20 62 65 20 64 69 73 70 6c 61 79 65 64 2e 22 29 0a 0a 28 64 65 66	orm.should.be.displayed.")..(def
1160	76 61 72 20 68 69 66 2d 75 6e 64 65 66 69 6e 65 64 2d 73 79 6d 62 6f 6c 20 6e 69 6c 20 22 5c 0a	var.hif-undefined-symbol.nil."\.
1180	2e 2e 2e 69 73 20 62 79 20 64 65 66 61 75 6c 74 20 63 6f 6e 73 69 64 65 72 65 64 20 74 6f 20 62	...is.by.default.considered.to.b
11a0	65 20 66 61 6c 73 65 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 68 69 64 65 2d 69 66 64 65 66 2d 65	e.false.")..(defvar.hide-ifdef-e
11c0	6e 76 20 6e 69 6c 20 22 5c 0a 41 6e 20 61 6c 69 73 74 20 6f 66 20 64 65 66 69 6e 65 64 20 73 79	nv.nil."\.An.alist.of.defined.sy
11e0	6d 62 6f 6c 73 20 61 6e 64 20 74 68 65 69 72 20 76 61 6c 75 65 73 2e 22 29 0a 0a 28 64 65 66 75	mbols.and.their.values.")..(defu
1200	6e 20 68 69 66 2d 73 65 74 2d 76 61 72 20 28 76 61 72 20 76 61 6c 75 65 29 20 22 5c 0a 50 72 65	n.hif-set-var.(var.value)."\.Pre
1220	70 65 6e 64 20 28 76 61 72 20 76 61 6c 75 65 29 20 70 61 69 72 20 74 6f 20 68 69 64 65 2d 69 66	pend.(var.value).pair.to.hide-if
1240	64 65 66 2d 65 6e 76 2e 22 20 28 62 79 74 65 2d 63 6f 64 65 20 22 09 0a 42 08 42 89 10 87 22 20	def-env.".(byte-code."..B.B...".
1260	5b 68 69 64 65 2d 69 66 64 65 66 2d 65 6e 76 20 76 61 72 20 76 61 6c 75 65 5d 20 32 29 29 0a 0a	[hide-ifdef-env.var.value].2))..
1280	28 64 65 66 75 6e 20 68 69 66 2d 6c 6f 6f 6b 75 70 20 28 76 61 72 29 20 28 62 79 74 65 2d 63 6f	(defun.hif-lookup.(var).(byte-co
12a0	64 65 20 22 c4 09 0a 5c 22 18 08 83 0e 00 08 41 82 0f 00 0b 29 87 22 20 5b 76 61 6c 20 76 61 72	de."...\"......A....).".[val.var
12c0	20 68 69 64 65 2d 69 66 64 65 66 2d 65 6e 76 20 68 69 66 2d 75 6e 64 65 66 69 6e 65 64 2d 73 79	.hide-ifdef-env.hif-undefined-sy
12e0	6d 62 6f 6c 20 61 73 73 6f 63 5d 20 33 29 29 0a 0a 28 64 65 66 75 6e 20 68 69 66 2d 64 65 66 69	mbol.assoc].3))..(defun.hif-defi
1300	6e 65 64 20 28 76 61 72 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 08 21 87 22 20 5b 76 61 72	ned.(var).(byte-code."..!.".[var
1320	20 68 69 66 2d 6c 6f 6f 6b 75 70 5d 20 32 29 29 0a 0a 28 64 65 66 63 6f 6e 73 74 20 68 69 66 2d	.hif-lookup].2))..(defconst.hif-
1340	63 70 70 2d 70 72 65 66 69 78 20 22 5c 5c 28 5e 5c 5c 7c 0d 5c 5c 29 5b 20 09 5d 2a 23 5b 20 09	cpp-prefix."\\(^\\|.\\)[..]*#[..
1360	5d 2a 22 29 0a 0a 28 64 65 66 63 6f 6e 73 74 20 68 69 66 2d 69 66 6e 64 65 66 2d 72 65 67 65 78	]*")..(defconst.hif-ifndef-regex
1380	70 20 28 63 6f 6e 63 61 74 20 68 69 66 2d 63 70 70 2d 70 72 65 66 69 78 20 22 69 66 6e 64 65 66	p.(concat.hif-cpp-prefix."ifndef
13a0	22 29 29 0a 0a 28 64 65 66 63 6f 6e 73 74 20 68 69 66 2d 69 66 78 2d 72 65 67 65 78 70 20 28 63	"))..(defconst.hif-ifx-regexp.(c
13c0	6f 6e 63 61 74 20 68 69 66 2d 63 70 70 2d 70 72 65 66 69 78 20 22 69 66 5c 5c 28 6e 3f 64 65 66	oncat.hif-cpp-prefix."if\\(n?def
13e0	5c 5c 29 3f 5b 20 09 5d 2b 22 29 29 0a 0a 28 64 65 66 63 6f 6e 73 74 20 68 69 66 2d 65 6c 73 65	\\)?[..]+"))..(defconst.hif-else
1400	2d 72 65 67 65 78 70 20 28 63 6f 6e 63 61 74 20 68 69 66 2d 63 70 70 2d 70 72 65 66 69 78 20 22	-regexp.(concat.hif-cpp-prefix."
1420	65 6c 73 65 22 29 29 0a 0a 28 64 65 66 63 6f 6e 73 74 20 68 69 66 2d 65 6e 64 69 66 2d 72 65 67	else"))..(defconst.hif-endif-reg
1440	65 78 70 20 28 63 6f 6e 63 61 74 20 68 69 66 2d 63 70 70 2d 70 72 65 66 69 78 20 22 65 6e 64 69	exp.(concat.hif-cpp-prefix."endi
1460	66 22 29 29 0a 0a 28 64 65 66 63 6f 6e 73 74 20 68 69 66 2d 69 66 78 2d 65 6c 73 65 2d 65 6e 64	f"))..(defconst.hif-ifx-else-end
1480	69 66 2d 72 65 67 65 78 70 20 28 63 6f 6e 63 61 74 20 68 69 66 2d 69 66 78 2d 72 65 67 65 78 70	if-regexp.(concat.hif-ifx-regexp
14a0	20 22 5c 5c 7c 22 20 68 69 66 2d 65 6c 73 65 2d 72 65 67 65 78 70 20 22 5c 5c 7c 22 20 68 69 66	."\\|".hif-else-regexp."\\|".hif
14c0	2d 65 6e 64 69 66 2d 72 65 67 65 78 70 29 29 0a 0a 28 64 65 66 75 6e 20 68 69 66 2d 69 6e 66 69	-endif-regexp))..(defun.hif-infi
14e0	78 2d 74 6f 2d 70 72 65 66 69 78 20 28 74 6f 6b 65 6e 2d 6c 69 73 74 29 20 22 5c 0a 43 6f 6e 76	x-to-prefix.(token-list)."\.Conv
1500	65 72 74 20 6c 69 73 74 20 6f 66 20 74 6f 6b 65 6e 73 20 69 6e 20 69 6e 66 69 78 20 69 6e 74 6f	ert.list.of.tokens.in.infix.into
1520	20 70 72 65 66 69 78 20 6c 69 73 74 22 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 08 47 55 83 10	.prefix.list".(byte-code."..GU..
1540	00 c2 c3 08 40 44 44 82 13 00 c4 08 21 87 22 20 5b 74 6f 6b 65 6e 2d 6c 69 73 74 20 31 20 68 69	....@DD.....!.".[token-list.1.hi
1560	66 2d 6c 6f 6f 6b 75 70 20 71 75 6f 74 65 20 68 69 66 2d 70 61 72 73 65 2d 69 66 2d 65 78 70 5d	f-lookup.quote.hif-parse-if-exp]
1580	20 33 29 29 0a 0a 28 64 65 66 63 6f 6e 73 74 20 68 69 66 2d 74 6f 6b 65 6e 2d 72 65 67 65 78 70	.3))..(defconst.hif-token-regexp
15a0	20 22 5e 5c 5c 28 21 5c 5c 7c 26 26 5c 5c 7c 7c 7c 5c 5c 7c 5b 28 29 5d 5c 5c 7c 5c 5c 77 2b 5c	."^\\(!\\|&&\\|||\\|[()]\\|\\w+\
15c0	5c 29 22 29 0a 0a 28 64 65 66 63 6f 6e 73 74 20 68 69 66 2d 65 6e 64 2d 6f 66 2d 63 6f 6d 6d 65	\)")..(defconst.hif-end-of-comme
15e0	6e 74 20 22 5c 5c 2a 2f 22 29 0a 0a 28 64 65 66 75 6e 20 68 69 66 2d 74 6f 6b 65 6e 69 7a 65 20	nt."\\*/")..(defun.hif-tokenize.
1600	28 65 78 70 72 2d 73 74 72 69 6e 67 29 20 22 5c 0a 53 65 70 61 72 61 74 65 20 73 74 72 69 6e 67	(expr-string)."\.Separate.string
1620	20 69 6e 74 6f 20 61 20 6c 69 73 74 20 6f 66 20 74 6f 6b 65 6e 73 22 20 28 62 79 74 65 2d 63 6f	.into.a.list.of.tokens".(byte-co
1640	64 65 20 22 c1 c9 0c 47 1b 1a 18 0a 0b 57 85 cc 00 ca cb 0c 0a 23 83 23 00 cc c9 21 89 12 88 0c	de."...G.....W.......#.#...!....
1660	0a 53 cd 49 82 c8 00 ca ce 0c 0a 23 83 53 00 cc c9 21 89 12 88 0c 0a 53 cd 49 88 ca 0d 0c 0a 23	.S.I.......#.S...!.....S.I.....#
1680	86 44 00 ca cf 0c 0a 23 88 cc c9 21 89 12 88 0c 0a 53 cd 49 82 c8 00 ca 0e 06 0c 0a 23 83 c4 00	.D.....#...!.....S.I........#...
16a0	0c 0a cc c9 21 4f 1e 07 cc c9 21 89 12 88 0c 0a 53 cd 49 88 d0 0e 07 d1 5c 22 83 7c 00 d2 82 bc	....!O....!.....S.I.....\".|....
16c0	00 d0 0e 07 d3 5c 22 83 88 00 d4 82 bc 00 d0 0e 07 d5 5c 22 83 94 00 d6 82 bc 00 d0 0e 07 d7 5c	.....\"...........\"...........\
16e0	22 83 a0 00 d8 82 bc 00 d0 0e 07 d9 5c 22 83 ac 00 da 82 bc 00 d0 0e 07 db 5c 22 83 b8 00 dc 82	"...........\"...........\".....
1700	bc 00 dd 0e 07 21 08 42 89 10 29 82 c8 00 de df 0c 5c 22 88 82 07 00 88 e0 08 21 2b 87 22 20 5b	.....!.B..)......\".......!+.".[
1720	74 6f 6b 65 6e 2d 6c 69 73 74 20 6e 69 6c 20 65 78 70 72 2d 73 74 61 72 74 20 65 78 70 72 2d 6c	token-list.nil.expr-start.expr-l
1740	65 6e 67 74 68 20 65 78 70 72 2d 73 74 72 69 6e 67 20 68 69 66 2d 65 6e 64 2d 6f 66 2d 63 6f 6d	ength.expr-string.hif-end-of-com
1760	6d 65 6e 74 20 68 69 66 2d 74 6f 6b 65 6e 2d 72 65 67 65 78 70 20 74 6f 6b 65 6e 20 74 20 30 20	ment.hif-token-regexp.token.t.0.
1780	73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 5e 5b 20 09 5d 2b 22 20 6d 61 74 63 68 2d 65 6e 64 20	string-match."^[..]+".match-end.
17a0	31 30 20 22 5e 2f 5c 5c 2a 22 20 22 24 22 20 73 74 72 69 6e 67 2d 65 71 75 61 6c 20 22 7c 7c 22	10."^/\\*"."$".string-equal."||"
17c0	20 6f 72 20 22 26 26 22 20 61 6e 64 20 22 21 22 20 6e 6f 74 20 22 64 65 66 69 6e 65 64 22 20 68	.or."&&".and."!".not."defined".h
17e0	69 66 2d 64 65 66 69 6e 65 64 20 22 28 22 20 6c 70 61 72 65 6e 20 22 29 22 20 72 70 61 72 65 6e	if-defined."(".lparen.")".rparen
1800	20 69 6e 74 65 72 6e 20 65 72 72 6f 72 20 22 42 61 64 20 23 69 66 20 65 78 70 72 65 73 73 69 6f	.intern.error."Bad.#if.expressio
1820	6e 3a 20 25 73 22 20 6e 72 65 76 65 72 73 65 5d 20 32 31 29 29 0a 0a 28 64 65 66 75 6e 20 68 69	n:.%s".nreverse].21))..(defun.hi
1840	66 2d 70 61 72 73 65 2d 69 66 2d 65 78 70 20 28 74 6f 6b 65 6e 2d 6c 69 73 74 29 20 22 5c 0a 50	f-parse-if-exp.(token-list)."\.P
1860	61 72 73 65 20 74 68 65 20 54 4f 4b 45 4e 2d 4c 49 53 54 2e 20 20 52 65 74 75 72 6e 20 74 72 61	arse.the.TOKEN-LIST...Return.tra
1880	6e 73 6c 61 74 65 64 20 6c 69 73 74 20 69 6e 20 70 72 65 66 69 78 20 66 6f 72 6d 2e 22 20 28 62	nslated.list.in.prefix.form.".(b
18a0	79 74 65 2d 63 6f 64 65 20 22 c1 20 88 c2 20 08 85 0d 00 c3 c4 08 5c 22 88 87 22 20 5b 74 6f 6b	yte-code."............\"..".[tok
18c0	65 6e 20 68 69 66 2d 6e 65 78 74 74 6f 6b 65 6e 20 68 69 66 2d 65 78 70 72 20 65 72 72 6f 72 20	en.hif-nexttoken.hif-expr.error.
18e0	22 45 72 72 6f 72 3a 20 75 6e 65 78 70 65 63 74 65 64 20 74 6f 6b 65 6e 3a 20 25 73 22 5d 20 36	"Error:.unexpected.token:.%s"].6
1900	29 29 0a 0a 28 64 65 66 75 6e 20 68 69 66 2d 6e 65 78 74 74 6f 6b 65 6e 20 6e 69 6c 20 22 5c 0a	))..(defun.hif-nexttoken.nil."\.
1920	50 6f 70 20 74 68 65 20 6e 65 78 74 20 74 6f 6b 65 6e 20 66 72 6f 6d 20 74 6f 6b 65 6e 2d 6c 69	Pop.the.next.token.from.token-li
1940	73 74 20 69 6e 74 6f 20 74 68 65 20 6c 65 74 20 76 61 72 69 61 62 6c 65 20 5c 22 74 6f 6b 65 6e	st.into.the.let.variable.\"token
1960	5c 22 2e 22 20 28 62 79 74 65 2d 63 6f 64 65 20 22 09 40 89 10 88 09 41 89 11 88 08 87 22 20 5b	\".".(byte-code.".@....A.....".[
1980	74 6f 6b 65 6e 20 74 6f 6b 65 6e 2d 6c 69 73 74 5d 20 32 29 29 0a 0a 28 64 65 66 75 6e 20 68 69	token.token-list].2))..(defun.hi
19a0	66 2d 65 78 70 72 20 6e 69 6c 20 22 5c 0a 50 61 72 73 65 20 61 6e 64 20 65 78 70 72 65 73 73 69	f-expr.nil."\.Parse.and.expressi
19c0	6f 6e 20 6f 66 20 74 68 65 20 66 6f 72 6d 0a 20 20 20 20 20 20 20 65 78 70 72 20 3a 20 74 65 72	on.of.the.form........expr.:.ter
19e0	6d 20 7c 20 65 78 70 72 20 27 7c 7c 27 20 74 65 72 6d 2e 22 20 28 62 79 74 65 2d 63 6f 64 65 20	m.|.expr.'||'.term.".(byte-code.
1a00	22 c2 20 18 09 c3 3d 85 17 00 c4 20 88 c3 08 c2 20 45 89 10 88 82 03 00 88 08 29 87 22 20 5b 72	".....=..........E........).".[r
1a20	65 73 75 6c 74 20 74 6f 6b 65 6e 20 68 69 66 2d 74 65 72 6d 20 6f 72 20 68 69 66 2d 6e 65 78 74	esult.token.hif-term.or.hif-next
1a40	74 6f 6b 65 6e 5d 20 37 29 29 0a 0a 28 64 65 66 75 6e 20 68 69 66 2d 74 65 72 6d 20 6e 69 6c 20	token].7))..(defun.hif-term.nil.
1a60	22 5c 0a 50 61 72 73 65 20 61 20 74 65 72 6d 20 6f 66 20 74 68 65 20 66 6f 72 6d 0a 20 20 20 20	"\.Parse.a.term.of.the.form.....
1a80	20 20 20 74 65 72 6d 20 3a 20 66 61 63 74 6f 72 20 7c 20 74 65 72 6d 20 27 26 26 27 20 66 61 63	...term.:.factor.|.term.'&&'.fac
1aa0	74 6f 72 2e 22 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c2 20 18 09 c3 3d 85 17 00 c4 20 88 c3 08	tor.".(byte-code.".....=........
1ac0	c2 20 45 89 10 88 82 03 00 88 08 29 87 22 20 5b 72 65 73 75 6c 74 20 74 6f 6b 65 6e 20 68 69 66	..E........).".[result.token.hif
1ae0	2d 66 61 63 74 6f 72 20 61 6e 64 20 68 69 66 2d 6e 65 78 74 74 6f 6b 65 6e 5d 20 37 29 29 0a 0a	-factor.and.hif-nexttoken].7))..
1b00	28 64 65 66 75 6e 20 68 69 66 2d 66 61 63 74 6f 72 20 6e 69 6c 20 22 5c 0a 50 61 72 73 65 20 61	(defun.hif-factor.nil."\.Parse.a
1b20	20 66 61 63 74 6f 72 20 6f 66 20 74 68 65 20 66 6f 72 6d 0a 20 20 20 20 20 20 20 66 61 63 74 6f	.factor.of.the.form........facto
1b40	72 20 3a 20 27 21 27 20 66 61 63 74 6f 72 20 7c 20 27 28 27 20 65 78 70 72 20 27 29 27 20 7c 20	r.:.'!'.factor.|.'('.expr.')'.|.
1b60	27 64 65 66 69 6e 65 64 28 27 20 69 64 20 27 29 27 20 7c 20 69 64 2e 22 20 28 62 79 74 65 2d 63	'defined('.id.')'.|.id.".(byte-c
1b80	6f 64 65 20 22 08 c4 3d 83 10 00 c5 20 88 c4 c6 20 44 82 85 00 08 c7 3d 83 32 00 c5 20 88 c8 20	ode."..=.........D.....=.2......
1ba0	19 08 c9 3d 3f 83 2a 00 ca cb 08 5c 22 82 2e 00 c5 20 88 09 29 82 85 00 08 cc 3d 83 70 00 c5 20	...=?.*....\".......).....=.p...
1bc0	88 08 c7 3d 3f 85 45 00 ca cd 21 88 c5 20 88 08 1a 08 ce 3e 85 55 00 ca cf 08 5c 22 88 c5 20 88	...=?.E...!........>.U....\"....
1be0	08 c9 3d 3f 85 63 00 ca d0 21 88 c5 20 88 cc d1 0a 44 44 29 82 85 00 08 1a 0a d2 3e 85 7b 00 ca	..=?.c...!.......DD).......>.{..
1c00	d3 21 88 c5 20 88 d4 d1 0a 44 44 29 87 22 20 5b 74 6f 6b 65 6e 20 72 65 73 75 6c 74 20 69 64 65	.!.......DD).".[token.result.ide
1c20	6e 74 20 74 20 6e 6f 74 20 68 69 66 2d 6e 65 78 74 74 6f 6b 65 6e 20 68 69 66 2d 66 61 63 74 6f	nt.t.not.hif-nexttoken.hif-facto
1c40	72 20 6c 70 61 72 65 6e 20 68 69 66 2d 65 78 70 72 20 72 70 61 72 65 6e 20 65 72 72 6f 72 20 22	r.lparen.hif-expr.rparen.error."
1c60	42 61 64 20 74 6f 6b 65 6e 20 69 6e 20 70 61 72 65 6e 74 68 65 73 69 7a 65 64 20 65 78 70 72 65	Bad.token.in.parenthesized.expre
1c80	73 73 69 6f 6e 3a 20 25 73 22 20 68 69 66 2d 64 65 66 69 6e 65 64 20 22 45 72 72 6f 72 3a 20 65	ssion:.%s".hif-defined."Error:.e
1ca0	78 70 65 63 74 65 64 20 5c 22 28 5c 22 20 61 66 74 65 72 20 5c 22 64 65 66 69 6e 65 5c 22 22 20	xpected.\"(\".after.\"define\"".
1cc0	28 6f 72 20 61 6e 64 20 6e 6f 74 20 68 69 66 2d 64 65 66 69 6e 65 64 20 6c 70 61 72 65 6e 20 72	(or.and.not.hif-defined.lparen.r
1ce0	70 61 72 65 6e 29 20 22 45 72 72 6f 72 3a 20 75 6e 65 78 70 65 63 74 65 64 20 74 6f 6b 65 6e 3a	paren)."Error:.unexpected.token:
1d00	20 25 73 22 20 22 45 72 72 6f 72 3a 20 65 78 70 65 63 74 65 64 20 5c 22 29 5c 22 20 61 66 74 65	.%s"."Error:.expected.\")\".afte
1d20	72 20 69 64 65 6e 74 69 66 69 65 72 22 20 71 75 6f 74 65 20 28 6f 72 20 61 6e 64 29 20 22 45 72	r.identifier".quote.(or.and)."Er
1d40	72 6f 72 3a 20 6d 69 73 73 69 6e 67 20 69 64 65 6e 74 69 66 69 65 72 22 20 68 69 66 2d 6c 6f 6f	ror:.missing.identifier".hif-loo
1d60	6b 75 70 5d 20 31 38 29 29 0a 0a 28 64 65 66 75 6e 20 68 69 66 2d 63 61 6e 6f 6e 69 63 61 6c 69	kup].18))..(defun.hif-canonicali
1d80	7a 65 20 6e 69 6c 20 22 5c 0a 57 68 65 6e 20 61 74 20 62 65 67 69 6e 6e 69 6e 67 20 6f 66 20 23	ze.nil."\.When.at.beginning.of.#
1da0	69 66 58 2c 20 72 65 74 75 72 6e 73 20 61 20 63 61 6e 6f 6e 69 63 61 6c 20 28 65 76 61 6c 75 61	ifX,.returns.a.canonical.(evalua
1dc0	74 61 62 6c 65 29 0a 20 20 20 20 20 20 20 66 6f 72 6d 20 66 6f 72 20 74 68 65 20 65 78 70 72 65	table)........form.for.the.expre
1de0	73 73 69 6f 6e 2e 22 20 28 62 79 74 65 2d 63 6f 64 65 20 22 8a c5 09 21 18 c6 0a 21 88 c7 60 c8	ssion.".(byte-code."...!...!..`.
1e00	c9 21 88 60 5c 22 1b ca cb 0b 21 21 1c 08 83 5c 22 00 cc 0c 44 82 23 00 0c 2a 29 29 87 22 20 5b	.!.`\"....!!...\"...D.#..*)).".[
1e20	6e 65 67 61 74 65 20 68 69 66 2d 69 66 6e 64 65 66 2d 72 65 67 65 78 70 20 68 69 66 2d 69 66 78	negate.hif-ifndef-regexp.hif-ifx
1e40	2d 72 65 67 65 78 70 20 65 78 70 72 2d 73 74 72 69 6e 67 20 65 78 70 72 20 6c 6f 6f 6b 69 6e 67	-regexp.expr-string.expr.looking
1e60	2d 61 74 20 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 62 75 66 66 65 72 2d 73 75 62	-at.re-search-forward.buffer-sub
1e80	73 74 72 69 6e 67 20 73 6b 69 70 2d 63 68 61 72 73 2d 66 6f 72 77 61 72 64 20 22 5e 0a 0d 22 20	string.skip-chars-forward."^..".
1ea0	68 69 66 2d 69 6e 66 69 78 2d 74 6f 2d 70 72 65 66 69 78 20 68 69 66 2d 74 6f 6b 65 6e 69 7a 65	hif-infix-to-prefix.hif-tokenize
1ec0	20 6e 6f 74 5d 20 38 29 29 0a 0a 28 64 65 66 75 6e 20 68 69 66 2d 66 69 6e 64 2d 61 6e 79 2d 69	.not].8))..(defun.hif-find-any-i
1ee0	66 58 20 6e 69 6c 20 22 5c 0a 50 6f 73 69 74 69 6f 6e 20 61 74 20 62 65 67 69 6e 6e 69 6e 67 20	fX.nil."\.Position.at.beginning.
1f00	6f 66 20 6e 65 78 74 20 23 69 66 2c 20 23 69 66 64 65 66 2c 20 6f 72 20 23 69 66 6e 64 65 66 2c	of.next.#if,.#ifdef,.or.#ifndef,
1f20	20 69 6e 63 6c 75 64 69 6e 67 20 6f 6e 65 20 6f 6e 0a 74 68 69 73 20 6c 69 6e 65 2e 22 20 28 62	.including.one.on.this.line.".(b
1f40	79 74 65 2d 63 6f 64 65 20 22 c2 08 64 c1 23 c3 20 88 87 22 20 5b 68 69 66 2d 69 66 78 2d 72 65	yte-code."..d.#....".[hif-ifx-re
1f60	67 65 78 70 20 74 20 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 62 65 67 69 6e 6e 69	gexp.t.re-search-forward.beginni
1f80	6e 67 2d 6f 66 2d 6c 69 6e 65 5d 20 34 29 29 0a 0a 28 64 65 66 75 6e 20 68 69 66 2d 66 69 6e 64	ng-of-line].4))..(defun.hif-find
1fa0	2d 6e 65 78 74 2d 72 65 6c 65 76 61 6e 74 20 6e 69 6c 20 22 5c 0a 50 6f 73 69 74 69 6f 6e 20 61	-next-relevant.nil."\.Position.a
1fc0	74 20 62 65 67 69 6e 6e 69 6e 67 20 6f 66 20 6e 65 78 74 20 23 69 66 64 65 66 2c 20 23 69 66 6e	t.beginning.of.next.#ifdef,.#ifn
1fe0	64 65 66 2c 20 23 65 6c 73 65 2c 20 23 65 6e 64 69 66 2c 0a 4e 4f 54 20 69 6e 63 6c 75 64 69 6e	def,.#else,.#endif,.NOT.includin
2000	67 20 6f 6e 65 20 6f 6e 20 74 68 69 73 20 6c 69 6e 65 2e 22 20 28 62 79 74 65 2d 63 6f 64 65 20	g.one.on.this.line.".(byte-code.
2020	22 c2 20 88 c3 08 64 c1 23 85 0d 00 c4 20 87 22 20 5b 68 69 66 2d 69 66 78 2d 65 6c 73 65 2d 65	".....d.#......".[hif-ifx-else-e
2040	6e 64 69 66 2d 72 65 67 65 78 70 20 74 20 65 6e 64 2d 6f 66 2d 6c 69 6e 65 20 72 65 2d 73 65 61	ndif-regexp.t.end-of-line.re-sea
2060	72 63 68 2d 66 6f 72 77 61 72 64 20 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 5d 20 35	rch-forward.beginning-of-line].5
2080	29 29 0a 0a 28 64 65 66 75 6e 20 68 69 66 2d 66 69 6e 64 2d 70 72 65 76 69 6f 75 73 2d 72 65 6c	))..(defun.hif-find-previous-rel
20a0	65 76 61 6e 74 20 6e 69 6c 20 22 5c 0a 50 6f 73 69 74 69 6f 6e 20 61 74 20 62 65 67 69 6e 6e 69	evant.nil."\.Position.at.beginni
20c0	6e 67 20 6f 66 20 70 72 65 76 69 6f 75 73 20 23 69 66 64 65 66 2c 20 23 69 66 6e 64 65 66 2c 20	ng.of.previous.#ifdef,.#ifndef,.
20e0	23 65 6c 73 65 2c 20 23 65 6e 64 69 66 2c 0a 4e 4f 54 20 69 6e 63 6c 75 64 69 6e 67 20 6f 6e 65	#else,.#endif,.NOT.including.one
2100	20 6f 6e 20 74 68 69 73 20 6c 69 6e 65 2e 22 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c2 20 88 c3	.on.this.line.".(byte-code."....
2120	08 65 c1 23 85 0d 00 c2 20 87 22 20 5b 68 69 66 2d 69 66 78 2d 65 6c 73 65 2d 65 6e 64 69 66 2d	.e.#......".[hif-ifx-else-endif-
2140	72 65 67 65 78 70 20 74 20 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 20 72 65 2d 73 65	regexp.t.beginning-of-line.re-se
2160	61 72 63 68 2d 62 61 63 6b 77 61 72 64 5d 20 35 29 29 0a 0a 28 64 65 66 75 6e 20 68 69 66 2d 6c	arch-backward].5))..(defun.hif-l
2180	6f 6f 6b 69 6e 67 2d 61 74 2d 69 66 58 20 6e 69 6c 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 08	ooking-at-ifX.nil.(byte-code."..
21a0	21 87 22 20 5b 68 69 66 2d 69 66 78 2d 72 65 67 65 78 70 20 6c 6f 6f 6b 69 6e 67 2d 61 74 5d 20	!.".[hif-ifx-regexp.looking-at].
21c0	32 29 29 0a 0a 28 64 65 66 75 6e 20 68 69 66 2d 6c 6f 6f 6b 69 6e 67 2d 61 74 2d 65 6e 64 69 66	2))..(defun.hif-looking-at-endif
21e0	20 6e 69 6c 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 08 21 87 22 20 5b 68 69 66 2d 65 6e 64 69	.nil.(byte-code."..!.".[hif-endi
2200	66 2d 72 65 67 65 78 70 20 6c 6f 6f 6b 69 6e 67 2d 61 74 5d 20 32 29 29 0a 0a 28 64 65 66 75 6e	f-regexp.looking-at].2))..(defun
2220	20 68 69 66 2d 6c 6f 6f 6b 69 6e 67 2d 61 74 2d 65 6c 73 65 20 6e 69 6c 20 28 62 79 74 65 2d 63	.hif-looking-at-else.nil.(byte-c
2240	6f 64 65 20 22 c1 08 21 87 22 20 5b 68 69 66 2d 65 6c 73 65 2d 72 65 67 65 78 70 20 6c 6f 6f 6b	ode."..!.".[hif-else-regexp.look
2260	69 6e 67 2d 61 74 5d 20 32 29 29 0a 0a 28 64 65 66 75 6e 20 68 69 66 2d 69 66 64 65 66 2d 74 6f	ing-at].2))..(defun.hif-ifdef-to
2280	2d 65 6e 64 69 66 20 6e 69 6c 20 22 5c 0a 49 66 20 70 6f 73 69 74 69 6f 6e 65 64 20 61 74 20 23	-endif.nil."\.If.positioned.at.#
22a0	69 66 58 20 6f 72 20 23 65 6c 73 65 20 66 6f 72 6d 2c 20 73 6b 69 70 20 74 6f 20 63 6f 72 72 65	ifX.or.#else.form,.skip.to.corre
22c0	73 70 6f 6e 64 69 6e 67 20 23 65 6e 64 69 66 2e 22 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 20	sponding.#endif.".(byte-code."..
22e0	88 c2 20 83 10 00 c3 20 88 c3 20 82 26 00 c4 20 83 1a 00 c3 20 82 26 00 c5 20 83 23 00 c6 82 26	............&.........&....#...&
2300	00 c7 c8 21 87 22 20 5b 74 20 68 69 66 2d 66 69 6e 64 2d 6e 65 78 74 2d 72 65 6c 65 76 61 6e 74	...!.".[t.hif-find-next-relevant
2320	20 68 69 66 2d 6c 6f 6f 6b 69 6e 67 2d 61 74 2d 69 66 58 20 68 69 66 2d 69 66 64 65 66 2d 74 6f	.hif-looking-at-ifX.hif-ifdef-to
2340	2d 65 6e 64 69 66 20 68 69 66 2d 6c 6f 6f 6b 69 6e 67 2d 61 74 2d 65 6c 73 65 20 68 69 66 2d 6c	-endif.hif-looking-at-else.hif-l
2360	6f 6f 6b 69 6e 67 2d 61 74 2d 65 6e 64 69 66 20 64 6f 6e 65 20 65 72 72 6f 72 20 22 4d 69 73 73	ooking-at-endif.done.error."Miss
2380	6d 61 74 63 68 65 64 20 23 69 66 64 65 66 20 23 65 6e 64 69 66 20 70 61 69 72 22 5d 20 39 29 29	matched.#ifdef.#endif.pair"].9))
23a0	0a 0a 28 64 65 66 75 6e 20 68 69 66 2d 65 6e 64 69 66 2d 74 6f 2d 69 66 64 65 66 20 6e 69 6c 20	..(defun.hif-endif-to-ifdef.nil.
23c0	22 5c 0a 49 66 20 70 6f 73 69 74 69 6f 6e 65 64 20 61 74 20 23 65 6e 64 69 66 20 66 6f 72 6d 2c	"\.If.positioned.at.#endif.form,
23e0	20 73 6b 69 70 20 62 61 63 6b 77 61 72 64 20 74 6f 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20	.skip.backward.to.corresponding.
2400	23 69 66 58 2e 22 20 28 62 79 74 65 2d 63 6f 64 65 20 22 60 18 c2 20 88 08 60 55 85 0e 00 c3 c4	#ifX.".(byte-code."`.....`U.....
2420	21 29 88 c5 20 83 1d 00 c6 20 88 c6 20 82 31 00 c7 20 83 27 00 c6 20 82 31 00 c8 20 83 30 00 c9	!)............1....'....1....0..
2440	82 31 00 ca 87 22 20 5b 73 74 61 72 74 20 74 20 68 69 66 2d 66 69 6e 64 2d 70 72 65 76 69 6f 75	.1...".[start.t.hif-find-previou
2460	73 2d 72 65 6c 65 76 61 6e 74 20 65 72 72 6f 72 20 22 4d 69 73 73 6d 61 74 63 68 65 64 20 23 69	s-relevant.error."Missmatched.#i
2480	66 64 65 66 20 23 65 6e 64 69 66 20 70 61 69 72 22 20 68 69 66 2d 6c 6f 6f 6b 69 6e 67 2d 61 74	fdef.#endif.pair".hif-looking-at
24a0	2d 65 6e 64 69 66 20 68 69 66 2d 65 6e 64 69 66 2d 74 6f 2d 69 66 64 65 66 20 68 69 66 2d 6c 6f	-endif.hif-endif-to-ifdef.hif-lo
24c0	6f 6b 69 6e 67 2d 61 74 2d 65 6c 73 65 20 68 69 66 2d 6c 6f 6f 6b 69 6e 67 2d 61 74 2d 69 66 58	oking-at-else.hif-looking-at-ifX
24e0	20 64 6f 6e 65 20 6e 69 6c 5d 20 39 29 29 0a 0a 28 64 65 66 75 6e 20 66 6f 72 77 61 72 64 2d 69	.done.nil].9))..(defun.forward-i
2500	66 64 65 66 20 28 26 6f 70 74 69 6f 6e 61 6c 20 61 72 67 29 20 22 5c 0a 4d 6f 76 65 20 70 6f 69	fdef.(&optional.arg)."\.Move.poi
2520	6e 74 20 74 6f 20 62 65 67 69 6e 6e 69 6e 67 20 6f 66 20 6c 69 6e 65 20 6f 66 20 74 68 65 20 6e	nt.to.beginning.of.line.of.the.n
2540	65 78 74 20 69 66 64 65 66 2d 65 6e 64 69 66 2e 0a 20 20 20 20 20 20 20 57 69 74 68 20 61 72 67	ext.ifdef-endif.........With.arg
2560	75 6d 65 6e 74 2c 20 64 6f 20 74 68 69 73 20 74 68 61 74 20 6d 61 6e 79 20 74 69 6d 65 73 2e 22	ument,.do.this.that.many.times."
2580	20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 70 22 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c2	.(interactive."p").(byte-code.".
25a0	88 08 86 09 00 c3 89 10 88 08 c4 57 85 14 00 c5 08 5b 21 88 c4 08 57 85 40 00 08 5b 89 10 88 60	...........W.....[!...W.@..[...`
25c0	19 c6 20 3f 85 2a 00 c7 20 88 c6 20 83 35 00 c8 20 82 3b 00 09 62 88 c9 ca 21 29 88 82 15 00 87	...?.*.......5....;..b...!).....
25e0	22 20 5b 61 72 67 20 73 74 61 72 74 20 6e 69 6c 20 31 20 30 20 62 61 63 6b 77 61 72 64 2d 69 66	".[arg.start.nil.1.0.backward-if
2600	64 65 66 20 68 69 66 2d 6c 6f 6f 6b 69 6e 67 2d 61 74 2d 69 66 58 20 68 69 66 2d 66 69 6e 64 2d	def.hif-looking-at-ifX.hif-find-
2620	6e 65 78 74 2d 72 65 6c 65 76 61 6e 74 20 68 69 66 2d 69 66 64 65 66 2d 74 6f 2d 65 6e 64 69 66	next-relevant.hif-ifdef-to-endif
2640	20 65 72 72 6f 72 20 22 4e 6f 20 66 6f 6c 6c 6f 77 69 6e 67 20 23 69 66 64 65 66 22 5d 20 38 29	.error."No.following.#ifdef"].8)
2660	29 0a 0a 28 64 65 66 75 6e 20 62 61 63 6b 77 61 72 64 2d 69 66 64 65 66 20 28 26 6f 70 74 69 6f	)..(defun.backward-ifdef.(&optio
2680	6e 61 6c 20 61 72 67 29 20 22 5c 0a 4d 6f 76 65 20 70 6f 69 6e 74 20 74 6f 20 62 65 67 69 6e 6e	nal.arg)."\.Move.point.to.beginn
26a0	69 6e 67 20 6f 66 20 74 68 65 20 70 72 65 76 69 6f 75 73 20 69 66 64 65 66 2d 65 6e 64 69 66 2e	ing.of.the.previous.ifdef-endif.
26c0	0a 20 20 20 20 20 20 20 57 69 74 68 20 61 72 67 75 6d 65 6e 74 2c 20 64 6f 20 74 68 69 73 20 74	........With.argument,.do.this.t
26e0	68 61 74 20 6d 61 6e 79 20 74 69 6d 65 73 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 70	hat.many.times.".(interactive."p
2700	22 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c2 88 08 86 09 00 c3 89 10 88 08 c4 57 85 14 00 c5	").(byte-code."............W....
2720	08 5b 21 88 c4 08 57 85 43 00 08 53 89 10 88 c6 20 88 60 19 c7 20 3f 85 2d 00 c8 20 88 c7 20 83	.[!...W.C..S......`...?.-.......
2740	38 00 c9 20 82 3e 00 09 62 88 ca cb 21 29 88 82 15 00 87 22 20 5b 61 72 67 20 73 74 61 72 74 20	8....>..b...!).....".[arg.start.
2760	6e 69 6c 20 31 20 30 20 66 6f 72 77 61 72 64 2d 69 66 64 65 66 20 62 65 67 69 6e 6e 69 6e 67 2d	nil.1.0.forward-ifdef.beginning-
2780	6f 66 2d 6c 69 6e 65 20 68 69 66 2d 6c 6f 6f 6b 69 6e 67 2d 61 74 2d 65 6e 64 69 66 20 68 69 66	of-line.hif-looking-at-endif.hif
27a0	2d 66 69 6e 64 2d 70 72 65 76 69 6f 75 73 2d 72 65 6c 65 76 61 6e 74 20 68 69 66 2d 65 6e 64 69	-find-previous-relevant.hif-endi
27c0	66 2d 74 6f 2d 69 66 64 65 66 20 65 72 72 6f 72 20 22 4e 6f 20 70 72 65 76 69 6f 75 73 20 23 69	f-to-ifdef.error."No.previous.#i
27e0	66 64 65 66 22 5d 20 39 29 29 0a 0a 28 64 65 66 75 6e 20 64 6f 77 6e 2d 69 66 64 65 66 20 6e 69	fdef"].9))..(defun.down-ifdef.ni
2800	6c 20 22 5c 0a 4d 6f 76 65 20 70 6f 69 6e 74 20 74 6f 20 62 65 67 69 6e 6e 69 6e 67 20 6f 66 20	l."\.Move.point.to.beginning.of.
2820	6e 65 73 74 65 64 20 69 66 64 65 66 20 6f 72 20 65 6c 73 65 2d 70 61 72 74 2e 22 20 28 69 6e 74	nested.ifdef.or.else-part.".(int
2840	65 72 61 63 74 69 76 65 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 88 60 18 c2 20 88 c3 20 86	eractive).(byte-code."..`.......
2860	0e 00 c4 20 83 15 00 c1 82 1b 00 08 62 88 c5 c6 21 29 87 22 20 5b 73 74 61 72 74 20 6e 69 6c 20	............b...!).".[start.nil.
2880	68 69 66 2d 66 69 6e 64 2d 6e 65 78 74 2d 72 65 6c 65 76 61 6e 74 20 68 69 66 2d 6c 6f 6f 6b 69	hif-find-next-relevant.hif-looki
28a0	6e 67 2d 61 74 2d 69 66 58 20 68 69 66 2d 6c 6f 6f 6b 69 6e 67 2d 61 74 2d 65 6c 73 65 20 65 72	ng-at-ifX.hif-looking-at-else.er
28c0	72 6f 72 20 22 4e 6f 20 66 6f 6c 6c 6f 77 69 6e 67 20 23 69 66 64 65 66 22 5d 20 35 29 29 0a 0a	ror."No.following.#ifdef"].5))..
28e0	28 64 65 66 75 6e 20 75 70 2d 69 66 64 65 66 20 6e 69 6c 20 22 5c 0a 4d 6f 76 65 20 70 6f 69 6e	(defun.up-ifdef.nil."\.Move.poin
2900	74 20 74 6f 20 62 65 67 69 6e 6e 69 6e 67 20 6f 66 20 65 6e 63 6c 6f 73 69 6e 67 20 69 66 64 65	t.to.beginning.of.enclosing.ifde
2920	66 20 6f 72 20 65 6c 73 65 2d 70 61 72 74 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 20 28	f.or.else-part.".(interactive).(
2940	62 79 74 65 2d 63 6f 64 65 20 22 c1 88 c2 20 88 60 18 c3 20 3f 85 0f 00 c4 20 88 c3 20 85 17 00	byte-code.".....`...?...........
2960	c5 20 88 08 60 55 85 21 00 c6 c7 21 29 87 22 20 5b 73 74 61 72 74 20 6e 69 6c 20 62 65 67 69 6e	....`U.!...!).".[start.nil.begin
2980	6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 20 68 69 66 2d 6c 6f 6f 6b 69 6e 67 2d 61 74 2d 65 6e 64 69	ning-of-line.hif-looking-at-endi
29a0	66 20 68 69 66 2d 66 69 6e 64 2d 70 72 65 76 69 6f 75 73 2d 72 65 6c 65 76 61 6e 74 20 68 69 66	f.hif-find-previous-relevant.hif
29c0	2d 65 6e 64 69 66 2d 74 6f 2d 69 66 64 65 66 20 65 72 72 6f 72 20 22 4e 6f 20 70 72 65 76 69 6f	-endif-to-ifdef.error."No.previo
29e0	75 73 20 23 69 66 64 65 66 22 5d 20 37 29 29 0a 0a 28 64 65 66 75 6e 20 6e 65 78 74 2d 69 66 64	us.#ifdef"].7))..(defun.next-ifd
2a00	65 66 20 28 26 6f 70 74 69 6f 6e 61 6c 20 61 72 67 29 20 22 5c 0a 4d 6f 76 65 20 74 6f 20 74 68	ef.(&optional.arg)."\.Move.to.th
2a20	65 20 62 65 67 69 6e 6e 69 6e 67 20 6f 66 20 74 68 65 20 6e 65 78 74 20 23 69 66 58 2c 20 23 65	e.beginning.of.the.next.#ifX,.#e
2a40	6c 73 65 2c 20 6f 72 20 23 65 6e 64 69 66 2e 0a 20 20 20 20 20 20 20 57 69 74 68 20 61 72 67 75	lse,.or.#endif.........With.argu
2a60	6d 65 6e 74 2c 20 64 6f 20 74 68 69 73 20 74 68 61 74 20 6d 61 6e 79 20 74 69 6d 65 73 2e 22 20	ment,.do.this.that.many.times.".
2a80	28 69 6e 74 65 72 61 63 74 69 76 65 20 22 70 22 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 88	(interactive."p").(byte-code."..
2aa0	08 86 09 00 c2 89 10 88 08 c3 57 85 14 00 c4 08 5b 21 88 c3 08 57 85 31 00 08 53 89 10 88 c5 20	..........W.....[!...W.1..S.....
2ac0	88 6c 85 2d 00 c6 20 88 c7 c8 21 88 82 15 00 87 22 20 5b 61 72 67 20 6e 69 6c 20 31 20 30 20 70	.l.-......!.....".[arg.nil.1.0.p
2ae0	72 65 76 69 6f 75 73 2d 69 66 64 65 66 20 68 69 66 2d 66 69 6e 64 2d 6e 65 78 74 2d 72 65 6c 65	revious-ifdef.hif-find-next-rele
2b00	76 61 6e 74 20 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 20 65 72 72 6f 72 20 22 4e 6f	vant.beginning-of-line.error."No
2b20	20 66 6f 6c 6c 6f 77 69 6e 67 20 23 69 66 64 65 66 73 2c 20 23 65 6c 73 65 73 2c 20 6f 72 20 23	.following.#ifdefs,.#elses,.or.#
2b40	65 6e 64 69 66 73 22 5d 20 36 29 29 0a 0a 28 64 65 66 75 6e 20 70 72 65 76 69 6f 75 73 2d 69 66	endifs"].6))..(defun.previous-if
2b60	64 65 66 20 28 26 6f 70 74 69 6f 6e 61 6c 20 61 72 67 29 20 22 5c 0a 4d 6f 76 65 20 74 6f 20 74	def.(&optional.arg)."\.Move.to.t
2b80	68 65 20 62 65 67 69 6e 6e 69 6e 67 20 6f 66 20 74 68 65 20 70 72 65 76 69 6f 75 73 20 23 69 66	he.beginning.of.the.previous.#if
2ba0	58 2c 20 23 65 6c 73 65 2c 20 6f 72 20 23 65 6e 64 69 66 2e 0a 20 20 20 20 20 20 20 57 69 74 68	X,.#else,.or.#endif.........With
2bc0	20 61 72 67 75 6d 65 6e 74 2c 20 64 6f 20 74 68 69 73 20 74 68 61 74 20 6d 61 6e 79 20 74 69 6d	.argument,.do.this.that.many.tim
2be0	65 73 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 70 22 29 20 28 62 79 74 65 2d 63 6f 64	es.".(interactive."p").(byte-cod
2c00	65 20 22 c2 88 08 86 09 00 c3 89 10 88 08 c4 57 85 14 00 c5 08 5b 21 88 c4 08 57 85 33 00 08 53	e."............W.....[!...W.3..S
2c20	89 10 88 60 19 c6 20 88 09 60 55 85 2e 00 c7 c8 21 29 88 82 15 00 87 22 20 5b 61 72 67 20 73 74	...`.....`U.....!).....".[arg.st
2c40	61 72 74 20 6e 69 6c 20 31 20 30 20 6e 65 78 74 2d 69 66 64 65 66 20 68 69 66 2d 66 69 6e 64 2d	art.nil.1.0.next-ifdef.hif-find-
2c60	70 72 65 76 69 6f 75 73 2d 72 65 6c 65 76 61 6e 74 20 65 72 72 6f 72 20 22 4e 6f 20 70 72 65 76	previous-relevant.error."No.prev
2c80	69 6f 75 73 20 23 69 66 64 65 66 73 2c 20 23 65 6c 73 65 73 2c 20 6f 72 20 23 65 6e 64 69 66 73	ious.#ifdefs,.#elses,.or.#endifs
2ca0	22 5d 20 35 29 29 0a 0a 28 64 65 66 75 6e 20 68 69 66 2d 6d 61 6b 65 2d 72 61 6e 67 65 20 28 65	"].5))..(defun.hif-make-range.(e
2cc0	6c 73 65 2d 70 20 73 74 61 72 74 20 65 6e 64 20 26 6f 70 74 69 6f 6e 61 6c 20 65 6c 73 65 29 20	lse-p.start.end.&optional.else).
2ce0	28 62 79 74 65 2d 63 6f 64 65 20 22 08 09 0a 0b 46 87 22 20 5b 65 6c 73 65 2d 70 20 73 74 61 72	(byte-code."....F.".[else-p.star
2d00	74 20 65 6c 73 65 20 65 6e 64 5d 20 34 29 29 0a 0a 28 64 65 66 75 6e 20 68 69 66 2d 72 61 6e 67	t.else.end].4))..(defun.hif-rang
2d20	65 2d 65 6c 73 65 2d 70 20 28 72 61 6e 67 65 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 08 c2	e-else-p.(range).(byte-code."...
2d40	5c 22 87 22 20 5b 72 61 6e 67 65 20 65 6c 74 20 30 5d 20 33 29 29 0a 0a 28 64 65 66 75 6e 20 68	\".".[range.elt.0].3))..(defun.h
2d60	69 66 2d 72 61 6e 67 65 2d 73 74 61 72 74 20 28 72 61 6e 67 65 29 20 28 62 79 74 65 2d 63 6f 64	if-range-start.(range).(byte-cod
2d80	65 20 22 c1 08 c2 5c 22 87 22 20 5b 72 61 6e 67 65 20 65 6c 74 20 31 5d 20 33 29 29 0a 0a 28 64	e."...\".".[range.elt.1].3))..(d
2da0	65 66 75 6e 20 68 69 66 2d 72 61 6e 67 65 2d 65 6c 73 65 20 28 72 61 6e 67 65 29 20 28 62 79 74	efun.hif-range-else.(range).(byt
2dc0	65 2d 63 6f 64 65 20 22 c1 08 c2 5c 22 87 22 20 5b 72 61 6e 67 65 20 65 6c 74 20 32 5d 20 33 29	e-code."...\".".[range.elt.2].3)
2de0	29 0a 0a 28 64 65 66 75 6e 20 68 69 66 2d 72 61 6e 67 65 2d 65 6e 64 20 28 72 61 6e 67 65 29 20	)..(defun.hif-range-end.(range).
2e00	28 62 79 74 65 2d 63 6f 64 65 20 22 c1 08 c2 5c 22 87 22 20 5b 72 61 6e 67 65 20 65 6c 74 20 33	(byte-code."...\".".[range.elt.3
2e20	5d 20 33 29 29 0a 0a 28 64 65 66 75 6e 20 68 69 66 2d 66 69 6e 64 2d 72 61 6e 67 65 20 6e 69 6c	].3))..(defun.hif-find-range.nil
2e40	20 22 5c 0a 52 65 74 75 72 6e 73 20 61 20 52 61 6e 67 65 20 73 74 72 75 63 74 75 72 65 20 64 65	."\.Returns.a.Range.structure.de
2e60	73 63 72 69 62 69 6e 67 20 74 68 65 20 63 75 72 72 65 6e 74 20 23 69 66 20 72 65 67 69 6f 6e 2e	scribing.the.current.#if.region.
2e80	0a 50 6f 69 6e 74 20 69 73 20 6c 65 66 74 20 75 6e 63 68 61 6e 67 65 64 2e 22 20 28 62 79 74 65	.Point.is.left.unchanged.".(byte
2ea0	2d 63 6f 64 65 20 22 8a c6 20 88 60 c2 c2 c2 1c 1b 19 18 c7 20 88 c8 20 85 1d 00 c9 20 88 c7 20	-code."....`....................
2ec0	88 82 0f 00 88 ca 20 83 2d 00 c5 89 11 88 60 89 13 82 30 00 60 89 14 88 09 85 53 00 c7 20 88 c8	........-.....`...0.`.....S.....
2ee0	20 85 46 00 c9 20 88 c7 20 88 82 38 00 88 ca 20 85 4f 00 cb cc 21 88 60 89 14 88 cd 09 08 0c 0b	..F........8.....O...!.`........
2f00	24 2c 29 87 22 20 5b 73 74 61 72 74 20 65 6c 73 65 2d 70 20 6e 69 6c 20 65 6c 73 65 20 65 6e 64	$,).".[start.else-p.nil.else.end
2f20	20 74 20 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 20 68 69 66 2d 66 69 6e 64 2d 6e 65	.t.beginning-of-line.hif-find-ne
2f40	78 74 2d 72 65 6c 65 76 61 6e 74 20 68 69 66 2d 6c 6f 6f 6b 69 6e 67 2d 61 74 2d 69 66 58 20 68	xt-relevant.hif-looking-at-ifX.h
2f60	69 66 2d 69 66 64 65 66 2d 74 6f 2d 65 6e 64 69 66 20 68 69 66 2d 6c 6f 6f 6b 69 6e 67 2d 61 74	if-ifdef-to-endif.hif-looking-at
2f80	2d 65 6c 73 65 20 65 72 72 6f 72 20 22 46 6f 75 6e 64 20 74 77 6f 20 65 6c 73 65 73 20 69 6e 20	-else.error."Found.two.elses.in.
2fa0	61 20 72 6f 77 3f 20 20 42 72 6f 6b 65 6e 21 22 20 68 69 66 2d 6d 61 6b 65 2d 72 61 6e 67 65 5d	a.row?..Broken!".hif-make-range]
2fc0	20 31 37 29 29 0a 0a 28 64 65 66 75 6e 20 68 69 66 2d 68 69 64 65 2d 6c 69 6e 65 20 28 70 6f 69	.17))..(defun.hif-hide-line.(poi
2fe0	6e 74 29 20 22 5c 0a 48 69 64 65 20 74 68 65 20 6c 69 6e 65 20 63 6f 6e 74 61 69 6e 69 6e 67 20	nt)."\.Hide.the.line.containing.
3000	70 6f 69 6e 74 2e 20 20 44 6f 65 73 20 6e 6f 74 68 69 6e 67 20 69 66 0a 68 69 64 65 2d 69 66 64	point...Does.nothing.if.hide-ifd
3020	65 66 2d 6c 69 6e 65 73 20 69 73 20 6e 69 6c 2e 22 20 28 62 79 74 65 2d 63 6f 64 65 20 22 08 85	ef-lines.is.nil.".(byte-code."..
3040	1f 00 8a 09 62 88 c3 20 1a c4 8e c5 20 88 60 c6 55 3f 85 1c 00 c7 60 53 60 5c 22 29 29 29 87 22	....b.........`.U?....`S`\")))."
3060	20 5b 68 69 64 65 2d 69 66 64 65 66 2d 6c 69 6e 65 73 20 70 6f 69 6e 74 20 6d 6f 64 70 20 62 75	.[hide-ifdef-lines.point.modp.bu
3080	66 66 65 72 2d 6d 6f 64 69 66 69 65 64 2d 70 20 28 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 08 21	ffer-modified-p.((byte-code."..!
30a0	87 22 20 5b 6d 6f 64 70 20 73 65 74 2d 62 75 66 66 65 72 2d 6d 6f 64 69 66 69 65 64 2d 70 5d 20	.".[modp.set-buffer-modified-p].
30c0	32 29 29 20 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 20 31 20 68 69 64 65 2d 69 66 64	2)).beginning-of-line.1.hide-ifd
30e0	65 66 2d 72 65 67 69 6f 6e 5d 20 35 29 29 0a 0a 28 64 65 66 75 6e 20 68 69 66 2d 72 65 63 75 72	ef-region].5))..(defun.hif-recur
3100	73 65 2d 6f 6e 20 28 73 74 61 72 74 20 65 6e 64 29 20 22 5c 0a 43 61 6c 6c 20 68 69 64 65 2d 69	se-on.(start.end)."\.Call.hide-i
3120	66 64 65 66 2d 67 75 74 73 20 61 66 74 65 72 20 6e 61 72 72 6f 77 69 6e 67 20 74 6f 20 65 6e 64	fdef-guts.after.narrowing.to.end
3140	20 6f 66 20 53 54 41 52 54 20 6c 69 6e 65 20 61 6e 64 20 45 4e 44 0a 6c 69 6e 65 2e 22 20 28 62	.of.START.line.and.END.line.".(b
3160	79 74 65 2d 63 6f 64 65 20 22 8a 8c 08 62 88 c2 20 88 c3 60 09 5c 22 88 c4 20 29 29 87 22 20 5b	yte-code."...b.....`.\"...)).".[
3180	73 74 61 72 74 20 65 6e 64 20 65 6e 64 2d 6f 66 2d 6c 69 6e 65 20 6e 61 72 72 6f 77 2d 74 6f 2d	start.end.end-of-line.narrow-to-
31a0	72 65 67 69 6f 6e 20 68 69 64 65 2d 69 66 64 65 66 2d 67 75 74 73 5d 20 34 29 29 0a 0a 28 64 65	region.hide-ifdef-guts].4))..(de
31c0	66 75 6e 20 68 69 66 2d 70 6f 73 73 69 62 6c 79 2d 68 69 64 65 20 6e 69 6c 20 22 5c 0a 43 61 6c	fun.hif-possibly-hide.nil."\.Cal
31e0	6c 65 64 20 61 74 20 23 69 66 58 20 65 78 70 72 65 73 73 69 6f 6e 2c 20 74 68 69 73 20 68 69 64	led.at.#ifX.expression,.this.hid
3200	65 73 20 74 68 6f 73 65 20 70 61 72 74 73 20 74 68 61 74 20 73 68 6f 75 6c 64 20 62 65 0a 68 69	es.those.parts.that.should.be.hi
3220	64 64 65 6e 2c 20 61 63 63 6f 72 64 69 6e 67 20 74 6f 20 6a 75 64 67 65 6d 65 6e 74 20 6f 66 20	dden,.according.to.judgement.of.
3240	68 69 64 65 2d 69 66 64 65 66 2d 65 76 61 6c 75 61 74 6f 72 2e 22 20 28 62 79 74 65 2d 63 6f 64	hide-ifdef-evaluator.".(byte-cod
3260	65 20 22 c4 20 c5 20 19 18 c6 c7 09 21 21 88 c8 0a 08 5c 22 83 3f 00 c9 09 21 83 34 00 c6 ca 09	e.".........!!....\".?...!.4....
3280	21 21 88 cb ca 09 21 c7 09 21 53 5c 22 88 cc cd 09 21 ca 09 21 5c 22 82 3c 00 cc cd 09 21 c7 09	!!....!..!S\"....!..!\".<....!..
32a0	21 5c 22 82 67 00 c9 09 21 83 60 00 c6 ca 09 21 21 88 cb cd 09 21 ca 09 21 53 5c 22 88 cc ca 09	!\".g...!.`....!!....!..!S\"....
32c0	21 c7 09 21 5c 22 82 67 00 cb 60 c7 09 21 53 5c 22 88 c6 cd 09 21 21 88 c7 09 21 62 88 ce 20 2a	!..!\".g..`..!S\"....!!...!b...*
32e0	87 22 20 5b 74 65 73 74 20 72 61 6e 67 65 20 68 69 64 65 2d 69 66 64 65 66 2d 65 76 61 6c 75 61	.".[test.range.hide-ifdef-evalua
3300	74 6f 72 20 74 20 68 69 66 2d 63 61 6e 6f 6e 69 63 61 6c 69 7a 65 20 68 69 66 2d 66 69 6e 64 2d	tor.t.hif-canonicalize.hif-find-
3320	72 61 6e 67 65 20 68 69 66 2d 68 69 64 65 2d 6c 69 6e 65 20 68 69 66 2d 72 61 6e 67 65 2d 65 6e	range.hif-hide-line.hif-range-en
3340	64 20 66 75 6e 63 61 6c 6c 20 68 69 66 2d 72 61 6e 67 65 2d 65 6c 73 65 2d 70 20 68 69 66 2d 72	d.funcall.hif-range-else-p.hif-r
3360	61 6e 67 65 2d 65 6c 73 65 20 68 69 64 65 2d 69 66 64 65 66 2d 72 65 67 69 6f 6e 20 68 69 66 2d	ange-else.hide-ifdef-region.hif-
3380	72 65 63 75 72 73 65 2d 6f 6e 20 68 69 66 2d 72 61 6e 67 65 2d 73 74 61 72 74 20 65 6e 64 2d 6f	recurse-on.hif-range-start.end-o
33a0	66 2d 6c 69 6e 65 5d 20 33 33 29 29 0a 0a 28 64 65 66 75 6e 20 68 69 64 65 2d 69 66 64 65 66 2d	f-line].33))..(defun.hide-ifdef-
33c0	67 75 74 73 20 6e 69 6c 20 22 5c 0a 44 6f 65 73 20 74 68 65 20 77 6f 72 6b 20 6f 66 20 68 69 64	guts.nil."\.Does.the.work.of.hid
33e0	65 2d 69 66 64 65 66 73 2c 20 65 78 63 65 70 74 20 66 6f 72 20 74 68 65 20 77 6f 72 6b 20 74 68	e-ifdefs,.except.for.the.work.th
3400	61 74 27 73 20 70 6f 69 6e 74 6c 65 73 73 0a 74 6f 20 72 65 64 6f 20 6f 6e 20 61 20 72 65 63 75	at's.pointless.to.redo.on.a.recu
3420	72 73 69 76 65 20 65 6e 74 72 79 2e 22 20 28 62 79 74 65 2d 63 6f 64 65 20 22 8a 65 62 88 c0 20	rsive.entry.".(byte-code.".eb...
3440	85 0f 00 c1 20 88 82 04 00 29 87 22 20 5b 68 69 66 2d 66 69 6e 64 2d 61 6e 79 2d 69 66 58 20 68	.........).".[hif-find-any-ifX.h
3460	69 66 2d 70 6f 73 73 69 62 6c 79 2d 68 69 64 65 5d 20 34 29 29 0a 0a 28 64 65 66 76 61 72 20 68	if-possibly-hide].4))..(defvar.h
3480	69 64 65 2d 69 66 64 65 66 2d 69 6e 69 74 69 61 6c 6c 79 20 6e 69 6c 20 22 5c 0a 2a 4e 6f 6e 2d	ide-ifdef-initially.nil."\.*Non-
34a0	6e 69 6c 20 69 66 20 68 69 64 65 2d 69 66 64 65 66 73 20 73 68 6f 75 6c 64 20 62 65 20 63 61 6c	nil.if.hide-ifdefs.should.be.cal
34c0	6c 65 64 20 77 68 65 6e 20 68 69 64 65 2d 69 66 64 65 66 2d 6d 6f 64 65 0a 09 69 73 20 66 69 72	led.when.hide-ifdef-mode..is.fir
34e0	73 74 20 61 63 74 69 76 61 74 65 64 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 68 69 64 65 2d 69 66	st.activated.")..(defvar.hide-if
3500	64 65 66 2d 68 69 64 69 6e 67 20 6e 69 6c 20 22 5c 0a 4e 6f 6e 2d 6e 69 6c 20 69 66 20 74 65 78	def-hiding.nil."\.Non-nil.if.tex
3520	74 20 6d 69 67 68 74 20 62 65 20 68 69 64 64 65 6e 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 68 69	t.might.be.hidden.")..(defvar.hi
3540	64 65 2d 69 66 64 65 66 2d 72 65 61 64 2d 6f 6e 6c 79 20 6e 69 6c 20 22 5c 0a 2a 53 65 74 20 74	de-ifdef-read-only.nil."\.*Set.t
3560	6f 20 6e 6f 6e 2d 6e 69 6c 20 69 66 20 79 6f 75 20 77 61 6e 74 20 62 75 66 66 65 72 20 74 6f 20	o.non-nil.if.you.want.buffer.to.
3580	62 65 20 72 65 61 64 2d 6f 6e 6c 79 20 77 68 69 6c 65 20 68 69 64 69 6e 67 20 74 65 78 74 2e 22	be.read-only.while.hiding.text."
35a0	29 0a 0a 28 64 65 66 76 61 72 20 68 69 66 2d 6f 75 74 73 69 64 65 2d 72 65 61 64 2d 6f 6e 6c 79	)..(defvar.hif-outside-read-only
35c0	20 6e 69 6c 20 22 5c 0a 49 6e 74 65 72 6e 61 6c 20 76 61 72 69 61 62 6c 65 2e 20 20 53 61 76 65	.nil."\.Internal.variable...Save
35e0	73 20 74 68 65 20 76 61 6c 75 65 20 6f 66 20 62 75 66 66 65 72 2d 72 65 61 64 2d 6f 6e 6c 79 20	s.the.value.of.buffer-read-only.
3600	77 68 69 6c 65 20 68 69 64 69 6e 67 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 68 69 64 65 2d 69 66	while.hiding.")..(defvar.hide-if
3620	64 65 66 2d 6c 69 6e 65 73 20 6e 69 6c 20 22 5c 0a 2a 53 65 74 20 74 6f 20 74 20 69 66 20 79 6f	def-lines.nil."\.*Set.to.t.if.yo
3640	75 20 64 6f 6e 27 74 20 77 61 6e 74 20 74 6f 20 73 65 65 20 74 68 65 20 23 69 66 58 2c 20 23 65	u.don't.want.to.see.the.#ifX,.#e
3660	6c 73 65 2c 20 61 6e 64 20 23 65 6e 64 69 66 20 6c 69 6e 65 73 2e 22 29 0a 0a 28 64 65 66 75 6e	lse,.and.#endif.lines.")..(defun
3680	20 68 69 64 65 2d 69 66 64 65 66 2d 74 6f 67 67 6c 65 2d 72 65 61 64 2d 6f 6e 6c 79 20 6e 69 6c	.hide-ifdef-toggle-read-only.nil
36a0	20 22 5c 0a 54 6f 67 67 6c 65 20 68 69 64 65 2d 69 66 64 65 66 2d 72 65 61 64 2d 6f 6e 6c 79 2e	."\.Toggle.hide-ifdef-read-only.
36c0	22 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c4 88 08 3f	".(interactive).(byte-code."...?
36e0	89 10 88 c5 c6 08 83 11 00 c7 82 12 00 c8 5c 22 88 09 85 1f 00 08 86 1d 00 0b 89 12 88 c9 20 87	..............\"................
3700	22 20 5b 68 69 64 65 2d 69 66 64 65 66 2d 72 65 61 64 2d 6f 6e 6c 79 20 68 69 64 65 2d 69 66 64	".[hide-ifdef-read-only.hide-ifd
3720	65 66 2d 68 69 64 69 6e 67 20 62 75 66 66 65 72 2d 72 65 61 64 2d 6f 6e 6c 79 20 68 69 66 2d 6f	ef-hiding.buffer-read-only.hif-o
3740	75 74 73 69 64 65 2d 72 65 61 64 2d 6f 6e 6c 79 20 6e 69 6c 20 6d 65 73 73 61 67 65 20 22 48 69	utside-read-only.nil.message."Hi
3760	64 65 2d 52 65 61 64 2d 4f 6e 6c 79 20 25 73 22 20 22 4f 4e 22 20 22 4f 46 46 22 20 68 69 66 2d	de-Read-Only.%s"."ON"."OFF".hif-
3780	75 70 64 61 74 65 2d 6d 6f 64 65 2d 6c 69 6e 65 5d 20 33 29 29 0a 0a 28 64 65 66 75 6e 20 68 69	update-mode-line].3))..(defun.hi
37a0	64 65 2d 69 66 64 65 66 2d 74 6f 67 67 6c 65 2d 6f 75 74 73 69 64 65 2d 72 65 61 64 2d 6f 6e 6c	de-ifdef-toggle-outside-read-onl
37c0	79 20 6e 69 6c 20 22 5c 0a 52 65 70 6c 61 63 65 6d 65 6e 74 20 66 6f 72 20 74 6f 67 67 6c 65 2d	y.nil."\.Replacement.for.toggle-
37e0	72 65 61 64 2d 6f 6e 6c 79 20 77 69 74 68 69 6e 20 68 69 64 65 2d 69 66 64 65 66 2d 6d 6f 64 65	read-only.within.hide-ifdef-mode
3800	2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c4 88 08	.".(interactive).(byte-code."...
3820	3f 89 10 88 c5 c6 08 83 11 00 c7 82 12 00 c8 5c 22 88 0a 85 19 00 0b 86 1d 00 08 89 11 88 c9 20	?..............\"...............
3840	87 22 20 5b 68 69 66 2d 6f 75 74 73 69 64 65 2d 72 65 61 64 2d 6f 6e 6c 79 20 62 75 66 66 65 72	.".[hif-outside-read-only.buffer
3860	2d 72 65 61 64 2d 6f 6e 6c 79 20 68 69 64 65 2d 69 66 64 65 66 2d 68 69 64 69 6e 67 20 68 69 64	-read-only.hide-ifdef-hiding.hid
3880	65 2d 69 66 64 65 66 2d 72 65 61 64 2d 6f 6e 6c 79 20 6e 69 6c 20 6d 65 73 73 61 67 65 20 22 52	e-ifdef-read-only.nil.message."R
38a0	65 61 64 20 6f 6e 6c 79 20 25 73 22 20 22 4f 4e 22 20 22 4f 46 46 22 20 68 69 66 2d 75 70 64 61	ead.only.%s"."ON"."OFF".hif-upda
38c0	74 65 2d 6d 6f 64 65 2d 6c 69 6e 65 5d 20 33 29 29 0a 0a 28 64 65 66 75 6e 20 68 69 64 65 2d 69	te-mode-line].3))..(defun.hide-i
38e0	66 64 65 66 2d 64 65 66 69 6e 65 20 28 76 61 72 29 20 22 5c 0a 44 65 66 69 6e 65 20 61 20 56 41	fdef-define.(var)."\.Define.a.VA
3900	52 20 73 6f 20 74 68 61 74 20 23 69 66 64 65 66 20 56 41 52 20 77 6f 75 6c 64 20 62 65 20 69 6e	R.so.that.#ifdef.VAR.would.be.in
3920	63 6c 75 64 65 64 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 53 44 65 66 69 6e 65 20 77	cluded.".(interactive."SDefine.w
3940	68 61 74 3f 20 22 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c3 88 c4 08 c1 5c 22 88 0a 85 0d 00	hat?.").(byte-code.".....\".....
3960	c5 20 87 22 20 5b 76 61 72 20 74 20 68 69 64 65 2d 69 66 64 65 66 2d 68 69 64 69 6e 67 20 6e 69	...".[var.t.hide-ifdef-hiding.ni
3980	6c 20 68 69 66 2d 73 65 74 2d 76 61 72 20 68 69 64 65 2d 69 66 64 65 66 73 5d 20 33 29 29 0a 0a	l.hif-set-var.hide-ifdefs].3))..
39a0	28 64 65 66 75 6e 20 68 69 64 65 2d 69 66 64 65 66 2d 75 6e 64 65 66 20 28 76 61 72 29 20 22 5c	(defun.hide-ifdef-undef.(var)."\
39c0	0a 55 6e 64 65 66 69 6e 65 20 61 20 56 41 52 20 73 6f 20 74 68 61 74 20 23 69 66 64 65 66 20 56	.Undefine.a.VAR.so.that.#ifdef.V
39e0	41 52 20 77 6f 75 6c 64 20 6e 6f 74 20 62 65 20 69 6e 63 6c 75 64 65 64 2e 22 20 28 69 6e 74 65	AR.would.not.be.included.".(inte
3a00	72 61 63 74 69 76 65 20 22 53 55 6e 64 65 66 69 6e 65 20 77 68 61 74 3f 20 22 29 20 28 62 79 74	ractive."SUndefine.what?.").(byt
3a20	65 2d 63 6f 64 65 20 22 c1 88 c3 08 c1 5c 22 88 0a 85 0d 00 c4 20 87 22 20 5b 76 61 72 20 6e 69	e-code.".....\"........".[var.ni
3a40	6c 20 68 69 64 65 2d 69 66 64 65 66 2d 68 69 64 69 6e 67 20 68 69 66 2d 73 65 74 2d 76 61 72 20	l.hide-ifdef-hiding.hif-set-var.
3a60	68 69 64 65 2d 69 66 64 65 66 73 5d 20 33 29 29 0a 0a 28 64 65 66 75 6e 20 68 69 64 65 2d 69 66	hide-ifdefs].3))..(defun.hide-if
3a80	64 65 66 73 20 6e 69 6c 20 22 5c 0a 48 69 64 65 20 74 68 65 20 63 6f 6e 74 65 6e 74 73 20 6f 66	defs.nil."\.Hide.the.contents.of
3aa0	20 73 6f 6d 65 20 23 69 66 64 65 66 73 2e 20 20 41 73 73 75 6d 65 20 74 68 61 74 20 64 65 66 69	.some.#ifdefs...Assume.that.defi
3ac0	6e 65 64 20 73 79 6d 62 6f 6c 73 20 68 61 76 65 0a 62 65 65 6e 20 61 64 64 65 64 20 74 6f 20 68	ned.symbols.have.been.added.to.h
3ae0	69 64 65 2d 69 66 64 65 66 2d 65 6e 76 2e 20 20 54 68 65 20 74 65 78 74 20 68 69 64 64 65 6e 20	ide-ifdef-env...The.text.hidden.
3b00	69 73 20 74 68 65 20 74 65 78 74 20 74 68 61 74 20 77 6f 75 6c 64 20 6e 6f 74 0a 62 65 20 69 6e	is.the.text.that.would.not.be.in
3b20	63 6c 75 64 65 64 20 62 79 20 74 68 65 20 43 20 70 72 65 70 72 6f 63 65 73 73 6f 72 20 69 66 20	cluded.by.the.C.preprocessor.if.
3b40	69 74 20 77 65 72 65 20 67 69 76 65 6e 20 74 68 65 20 66 69 6c 65 20 77 69 74 68 20 74 68 6f 73	it.were.given.the.file.with.thos
3b60	65 0a 73 79 6d 62 6f 6c 73 20 64 65 66 69 6e 65 64 2e 0a 0a 54 75 72 6e 20 6f 66 66 20 68 69 64	e.symbols.defined...Turn.off.hid
3b80	69 6e 67 20 62 79 20 63 61 6c 6c 69 6e 67 20 73 68 6f 77 2d 69 66 64 65 66 2e 22 20 28 69 6e 74	ing.by.calling.show-ifdef.".(int
3ba0	65 72 61 63 74 69 76 65 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c7 88 c8 c9 21 88 08 3f 85 0e	eractive).(byte-code."....!..?..
3bc0	00 c0 ca 21 88 09 85 15 00 cb 20 88 0a 85 1c 00 cc 20 88 c4 89 13 88 c4 89 11 88 cd 20 88 0d 86	...!............................
3be0	2e 00 0e 06 85 33 00 cc 20 88 c8 ce 21 87 22 20 5b 68 69 64 65 2d 69 66 64 65 66 2d 6d 6f 64 65	.....3......!.".[hide-ifdef-mode
3c00	20 68 69 64 65 2d 69 66 64 65 66 2d 68 69 64 69 6e 67 20 62 75 66 66 65 72 2d 72 65 61 64 2d 6f	.hide-ifdef-hiding.buffer-read-o
3c20	6e 6c 79 20 73 65 6c 65 63 74 69 76 65 2d 64 69 73 70 6c 61 79 20 74 20 68 69 64 65 2d 69 66 64	nly.selective-display.t.hide-ifd
3c40	65 66 2d 72 65 61 64 2d 6f 6e 6c 79 20 68 69 66 2d 6f 75 74 73 69 64 65 2d 72 65 61 64 2d 6f 6e	ef-read-only.hif-outside-read-on
3c60	6c 79 20 6e 69 6c 20 6d 65 73 73 61 67 65 20 22 48 69 64 69 6e 67 2e 2e 2e 22 20 31 20 73 68 6f	ly.nil.message."Hiding...".1.sho
3c80	77 2d 69 66 64 65 66 73 20 74 6f 67 67 6c 65 2d 72 65 61 64 2d 6f 6e 6c 79 20 68 69 64 65 2d 69	w-ifdefs.toggle-read-only.hide-i
3ca0	66 64 65 66 2d 67 75 74 73 20 22 48 69 64 69 6e 67 20 64 6f 6e 65 22 5d 20 38 29 29 0a 0a 28 64	fdef-guts."Hiding.done"].8))..(d
3cc0	65 66 75 6e 20 73 68 6f 77 2d 69 66 64 65 66 73 20 6e 69 6c 20 22 5c 0a 43 61 6e 63 65 6c 20 74	efun.show-ifdefs.nil."\.Cancel.t
3ce0	68 65 20 65 66 66 65 63 74 73 20 6f 66 20 68 69 64 65 2d 69 66 64 65 66 2e 20 20 54 68 65 20 63	he.effects.of.hide-ifdef...The.c
3d00	6f 6e 74 65 6e 74 73 20 6f 66 20 61 6c 6c 20 23 69 66 64 65 66 73 20 69 73 20 73 68 6f 77 6e 2e	ontents.of.all.#ifdefs.is.shown.
3d20	22 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c2 88 08 85	".(interactive).(byte-code."....
3d40	08 00 c5 20 88 c2 89 11 88 c6 20 88 0b 85 16 00 c5 20 88 c2 89 14 87 22 20 5b 62 75 66 66 65 72	.......................".[buffer
3d60	2d 72 65 61 64 2d 6f 6e 6c 79 20 73 65 6c 65 63 74 69 76 65 2d 64 69 73 70 6c 61 79 20 6e 69 6c	-read-only.selective-display.nil
3d80	20 68 69 66 2d 6f 75 74 73 69 64 65 2d 72 65 61 64 2d 6f 6e 6c 79 20 68 69 64 65 2d 69 66 64 65	.hif-outside-read-only.hide-ifde
3da0	66 2d 68 69 64 69 6e 67 20 74 6f 67 67 6c 65 2d 72 65 61 64 2d 6f 6e 6c 79 20 68 69 66 2d 73 68	f-hiding.toggle-read-only.hif-sh
3dc0	6f 77 2d 61 6c 6c 5d 20 35 29 29 0a 0a 28 64 65 66 75 6e 20 68 69 66 2d 66 69 6e 64 2d 69 66 64	ow-all].5))..(defun.hif-find-ifd
3de0	65 66 2d 62 6c 6f 63 6b 20 6e 69 6c 20 22 5c 0a 55 74 69 6c 69 74 69 79 20 66 6f 72 20 68 69 64	ef-block.nil."\.Utilitiy.for.hid
3e00	65 20 61 6e 64 20 73 68 6f 77 20 69 66 64 65 66 2d 62 6c 6f 63 6b 2e 20 20 53 65 74 20 74 6f 70	e.and.show.ifdef-block...Set.top
3e20	20 61 6e 64 20 62 6f 74 74 6f 6d 20 6f 66 20 69 66 64 65 66 20 62 6c 6f 63 6b 2e 22 20 28 62 79	.and.bottom.of.ifdef.block.".(by
3e40	74 65 2d 63 6f 64 65 20 22 c3 18 8a c4 20 88 c5 20 86 0d 00 c6 20 3f 85 13 00 c7 20 88 60 89 11	te-code.".............?......`..
3e60	88 c8 20 88 60 53 89 10 29 88 8a c4 20 88 c9 20 3f 85 2d 00 ca 20 88 c6 20 85 3c 00 c8 20 88 ca	....`S..).......?.-.......<.....
3e80	20 88 82 2e 00 88 08 60 53 5e 89 12 29 29 87 22 20 5b 6d 61 78 2d 62 6f 74 74 6f 6d 20 74 6f 70	.......`S^..)).".[max-bottom.top
3ea0	20 62 6f 74 74 6f 6d 20 6e 69 6c 20 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 20 68 69	.bottom.nil.beginning-of-line.hi
3ec0	66 2d 6c 6f 6f 6b 69 6e 67 2d 61 74 2d 65 6c 73 65 20 68 69 66 2d 6c 6f 6f 6b 69 6e 67 2d 61 74	f-looking-at-else.hif-looking-at
3ee0	2d 69 66 58 20 75 70 2d 69 66 64 65 66 20 68 69 66 2d 69 66 64 65 66 2d 74 6f 2d 65 6e 64 69 66	-ifX.up-ifdef.hif-ifdef-to-endif
3f00	20 68 69 66 2d 6c 6f 6f 6b 69 6e 67 2d 61 74 2d 65 6e 64 69 66 20 68 69 66 2d 66 69 6e 64 2d 6e	.hif-looking-at-endif.hif-find-n
3f20	65 78 74 2d 72 65 6c 65 76 61 6e 74 5d 20 31 33 29 29 0a 0a 28 64 65 66 75 6e 20 68 69 64 65 2d	ext-relevant].13))..(defun.hide-
3f40	69 66 64 65 66 2d 62 6c 6f 63 6b 20 6e 69 6c 20 22 5c 0a 48 69 64 65 20 74 68 65 20 69 66 64 65	ifdef-block.nil."\.Hide.the.ifde
3f60	66 20 62 6c 6f 63 6b 20 28 74 72 75 65 20 6f 72 20 66 61 6c 73 65 20 70 61 72 74 29 20 65 6e 63	f.block.(true.or.false.part).enc
3f80	6c 6f 73 69 6e 67 20 6f 72 20 62 65 66 6f 72 65 20 74 68 65 20 63 75 72 73 6f 72 2e 22 20 28 69	losing.or.before.the.cursor.".(i
3fa0	6e 74 65 72 61 63 74 69 76 65 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 ca 88 08 3f 85 0a 00 c0	nteractive).(byte-code."...?....
3fc0	cb 21 88 09 85 11 00 cc 20 88 c3 89 12 88 ca ca 1d 1c cd 20 88 ce 0c 0d 5c 22 88 0e 06 85 2f 00	.!......................\"..../.
3fe0	cf 0c 21 88 cf 0d 54 21 88 c3 89 16 07 2a 88 0e 08 86 3d 00 0e 09 85 42 00 cc 20 87 22 20 5b 68	..!...T!.....*....=....B....".[h
4000	69 64 65 2d 69 66 64 65 66 2d 6d 6f 64 65 20 62 75 66 66 65 72 2d 72 65 61 64 2d 6f 6e 6c 79 20	ide-ifdef-mode.buffer-read-only.
4020	73 65 6c 65 63 74 69 76 65 2d 64 69 73 70 6c 61 79 20 74 20 74 6f 70 20 62 6f 74 74 6f 6d 20 68	selective-display.t.top.bottom.h
4040	69 64 65 2d 69 66 64 65 66 2d 6c 69 6e 65 73 20 68 69 64 65 2d 69 66 64 65 66 2d 68 69 64 69 6e	ide-ifdef-lines.hide-ifdef-hidin
4060	67 20 68 69 64 65 2d 69 66 64 65 66 2d 72 65 61 64 2d 6f 6e 6c 79 20 68 69 66 2d 6f 75 74 73 69	g.hide-ifdef-read-only.hif-outsi
4080	64 65 2d 72 65 61 64 2d 6f 6e 6c 79 20 6e 69 6c 20 31 20 74 6f 67 67 6c 65 2d 72 65 61 64 2d 6f	de-read-only.nil.1.toggle-read-o
40a0	6e 6c 79 20 68 69 66 2d 66 69 6e 64 2d 69 66 64 65 66 2d 62 6c 6f 63 6b 20 68 69 64 65 2d 69 66	nly.hif-find-ifdef-block.hide-if
40c0	64 65 66 2d 72 65 67 69 6f 6e 20 68 69 66 2d 68 69 64 65 2d 6c 69 6e 65 5d 20 38 29 29 0a 0a 28	def-region.hif-hide-line].8))..(
40e0	64 65 66 75 6e 20 73 68 6f 77 2d 69 66 64 65 66 2d 62 6c 6f 63 6b 20 6e 69 6c 20 22 5c 0a 53 68	defun.show-ifdef-block.nil."\.Sh
4100	6f 77 20 74 68 65 20 69 66 64 65 66 20 62 6c 6f 63 6b 20 28 74 72 75 65 20 6f 72 20 66 61 6c 73	ow.the.ifdef.block.(true.or.fals
4120	65 20 70 61 72 74 29 20 65 6e 63 6c 6f 73 69 6e 67 20 6f 72 20 62 65 66 6f 72 65 20 74 68 65 20	e.part).enclosing.or.before.the.
4140	63 75 72 73 6f 72 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 20 28 62 79 74 65 2d 63 6f 64	cursor.".(interactive).(byte-cod
4160	65 20 22 c5 88 09 18 08 85 0a 00 c6 20 88 0a 83 1f 00 8a c7 20 88 c8 60 53 c9 20 88 60 5c 22 29	e."....................`S...`\")
4180	82 2c 00 c5 c5 1c 1b ca 20 88 c8 0b 53 0c 5c 22 2a 88 08 85 33 00 c6 20 29 87 22 20 5b 6f 6c 64	.,..........S.\"*...3...).".[old
41a0	2d 72 65 61 64 2d 6f 6e 6c 79 20 62 75 66 66 65 72 2d 72 65 61 64 2d 6f 6e 6c 79 20 68 69 64 65	-read-only.buffer-read-only.hide
41c0	2d 69 66 64 65 66 2d 6c 69 6e 65 73 20 74 6f 70 20 62 6f 74 74 6f 6d 20 6e 69 6c 20 74 6f 67 67	-ifdef-lines.top.bottom.nil.togg
41e0	6c 65 2d 72 65 61 64 2d 6f 6e 6c 79 20 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 20 68	le-read-only.beginning-of-line.h
4200	69 66 2d 73 68 6f 77 2d 69 66 64 65 66 2d 72 65 67 69 6f 6e 20 65 6e 64 2d 6f 66 2d 6c 69 6e 65	if-show-ifdef-region.end-of-line
4220	20 68 69 66 2d 66 69 6e 64 2d 69 66 64 65 66 2d 62 6c 6f 63 6b 5d 20 38 29 29 0a 0a 28 64 65 66	.hif-find-ifdef-block].8))..(def
4240	76 61 72 20 68 69 64 65 2d 69 66 64 65 66 2d 64 65 66 69 6e 65 2d 61 6c 69 73 74 20 6e 69 6c 20	var.hide-ifdef-define-alist.nil.
4260	22 5c 0a 41 20 67 6c 6f 62 61 6c 20 61 73 73 6f 63 20 6c 69 73 74 20 6f 66 20 70 72 65 2d 64 65	"\.A.global.assoc.list.of.pre-de
4280	66 69 6e 65 64 20 73 79 6d 62 6f 6c 20 6c 69 73 74 73 22 29 0a 0a 28 64 65 66 75 6e 20 68 69 66	fined.symbol.lists")..(defun.hif
42a0	2d 63 6f 6d 70 72 65 73 73 2d 64 65 66 69 6e 65 2d 6c 69 73 74 20 28 65 6e 76 29 20 22 5c 0a 43	-compress-define-list.(env)."\.C
42c0	6f 6d 70 72 65 73 73 20 74 68 65 20 64 65 66 69 6e 65 20 6c 69 73 74 20 45 4e 56 20 69 6e 74 6f	ompress.the.define.list.ENV.into
42e0	20 61 20 6c 69 73 74 20 6f 66 20 64 65 66 69 6e 65 64 20 73 79 6d 62 6f 6c 73 20 6f 6e 6c 79 2e	.a.list.of.defined.symbols.only.
4300	22 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c4 c5 09 5c 22 c3 1a 18 08 85 1f 00 08 40 85 16 00 08	".(byte-code."...\"........@....
4320	40 0a 42 89 12 88 08 41 89 10 88 82 07 00 88 0a 2a 87 22 20 5b 64 65 66 73 20 65 6e 76 20 6e 65	@.B....A........*.".[defs.env.ne
4340	77 2d 64 65 66 73 20 6e 69 6c 20 6d 61 70 63 61 72 20 28 6c 61 6d 62 64 61 20 28 61 72 67 29 20	w-defs.nil.mapcar.(lambda.(arg).
4360	28 69 66 20 28 68 69 66 2d 6c 6f 6f 6b 75 70 20 28 63 61 72 20 61 72 67 29 29 20 28 63 61 72 20	(if.(hif-lookup.(car.arg)).(car.
4380	61 72 67 29 29 29 5d 20 34 29 29 0a 0a 28 64 65 66 75 6e 20 68 69 64 65 2d 69 66 64 65 66 2d 73	arg)))].4))..(defun.hide-ifdef-s
43a0	65 74 2d 64 65 66 69 6e 65 2d 61 6c 69 73 74 20 28 6e 61 6d 65 29 20 22 5c 0a 53 65 74 20 74 68	et-define-alist.(name)."\.Set.th
43c0	65 20 61 73 73 6f 63 69 61 74 69 6f 6e 20 66 6f 72 20 4e 41 4d 45 20 74 6f 20 68 69 64 65 2d 69	e.association.for.NAME.to.hide-i
43e0	66 64 65 66 2d 65 6e 76 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 53 53 65 74 20 64 65	fdef-env.".(interactive."SSet.de
4400	66 69 6e 65 20 6c 69 73 74 3a 20 22 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c3 88 09 c4 0a 21	fine.list:.").(byte-code.".....!
4420	42 08 42 89 10 87 22 20 5b 68 69 64 65 2d 69 66 64 65 66 2d 64 65 66 69 6e 65 2d 61 6c 69 73 74	B.B...".[hide-ifdef-define-alist
4440	20 6e 61 6d 65 20 68 69 64 65 2d 69 66 64 65 66 2d 65 6e 76 20 6e 69 6c 20 68 69 66 2d 63 6f 6d	.name.hide-ifdef-env.nil.hif-com
4460	70 72 65 73 73 2d 64 65 66 69 6e 65 2d 6c 69 73 74 5d 20 33 29 29 0a 0a 28 64 65 66 75 6e 20 68	press-define-list].3))..(defun.h
4480	69 64 65 2d 69 66 64 65 66 2d 75 73 65 2d 64 65 66 69 6e 65 2d 61 6c 69 73 74 20 28 6e 61 6d 65	ide-ifdef-use-define-alist.(name
44a0	29 20 22 5c 0a 53 65 74 20 68 69 64 65 2d 69 66 64 65 66 2d 65 6e 76 20 74 6f 20 74 68 65 20 64	)."\.Set.hide-ifdef-env.to.the.d
44c0	65 66 69 6e 65 20 6c 69 73 74 20 73 70 65 63 69 66 69 65 64 20 62 79 20 4e 41 4d 45 2e 22 20 28	efine.list.specified.by.NAME.".(
44e0	69 6e 74 65 72 61 63 74 69 76 65 20 22 53 55 73 65 20 64 65 66 69 6e 65 20 6c 69 73 74 3a 20 22	interactive."SUse.define.list:."
4500	29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c5 88 c6 09 0a 5c 22 18 08 83 15 00 c7 c8 08 41 5c 22	).(byte-code.".....\"........A\"
4520	89 13 82 19 00 c9 ca 09 5c 22 88 0c 85 20 00 cb 20 29 87 22 20 5b 64 65 66 69 6e 65 2d 6c 69 73	........\".......).".[define-lis
4540	74 20 6e 61 6d 65 20 68 69 64 65 2d 69 66 64 65 66 2d 64 65 66 69 6e 65 2d 61 6c 69 73 74 20 68	t.name.hide-ifdef-define-alist.h
4560	69 64 65 2d 69 66 64 65 66 2d 65 6e 76 20 68 69 64 65 2d 69 66 64 65 66 2d 68 69 64 69 6e 67 20	ide-ifdef-env.hide-ifdef-hiding.
4580	6e 69 6c 20 61 73 73 6f 63 20 6d 61 70 63 61 72 20 28 6c 61 6d 62 64 61 20 28 61 72 67 29 20 28	nil.assoc.mapcar.(lambda.(arg).(
45a0	63 6f 6e 73 20 61 72 67 20 74 29 29 20 65 72 72 6f 72 20 22 4e 6f 20 64 65 66 69 6e 65 20 6c 69	cons.arg.t)).error."No.define.li
45c0	73 74 20 66 6f 72 20 25 73 22 20 68 69 64 65 2d 69 66 64 65 66 73 5d 20 35 29 29 0a	st.for.%s".hide-ifdefs].5)).