blob: 2d6b9b82867cb624614c6a6ab3279ce948d196be (plain)

ofs	hex dump	ascii
0000	3b 45 4c 43 17 00 00 00 0a 3b 3b 3b 20 43 6f 6d 70 69 6c 65 64 0a 3b 3b 3b 20 69 6e 20 45 6d 61	;ELC.....;;;.Compiled.;;;.in.Ema
0020	63 73 20 76 65 72 73 69 6f 6e 20 32 35 2e 33 2e 31 0a 3b 3b 3b 20 77 69 74 68 20 61 6c 6c 20 6f	cs.version.25.3.1.;;;.with.all.o
0040	70 74 69 6d 69 7a 61 74 69 6f 6e 73 2e 0a 0a 3b 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 75 73 65	ptimizations...;;;.This.file.use
0060	73 20 64 79 6e 61 6d 69 63 20 64 6f 63 73 74 72 69 6e 67 73 2c 20 66 69 72 73 74 20 61 64 64 65	s.dynamic.docstrings,.first.adde
0080	64 20 69 6e 20 45 6d 61 63 73 20 31 39 2e 32 39 2e 0a 0a 3b 3b 3b 20 54 68 69 73 20 66 69 6c 65	d.in.Emacs.19.29...;;;.This.file
00a0	20 64 6f 65 73 20 6e 6f 74 20 63 6f 6e 74 61 69 6e 20 75 74 66 2d 38 20 6e 6f 6e 2d 41 53 43 49	.does.not.contain.utf-8.non-ASCI
00c0	49 20 63 68 61 72 61 63 74 65 72 73 2c 0a 3b 3b 3b 20 61 6e 64 20 73 6f 20 63 61 6e 20 62 65 20	I.characters,.;;;.and.so.can.be.
00e0	6c 6f 61 64 65 64 20 69 6e 20 45 6d 61 63 73 20 76 65 72 73 69 6f 6e 73 20 65 61 72 6c 69 65 72	loaded.in.Emacs.versions.earlier
0100	20 74 68 61 6e 20 32 33 2e 0a 0a 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b	.than.23...;;;;;;;;;;;;;;;;;;;;;
0120	3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
0140	3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 0a 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b	;;;;;;;;;;;;;;.;;;;;;;;;;;;;;;;;
0160	3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
0180	3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 0a 0a 0a 28 72 65 71 75 69 72 65 20 27 68	;;;;;;;;;;;;;;;;;;...(require.'h
01a0	69 64 65 73 68 6f 77 29 0a 23 40 34 38 20 54 6f 67 67 6c 65 20 76 69 73 69 62 69 6c 69 74 79 20	ideshow).#@48.Toggle.visibility.
01c0	6f 66 20 65 78 69 73 74 69 6e 67 20 66 6f 72 6d 73 20 61 74 20 70 6f 69 6e 74 2e 20 1f 0a 28 64	of.existing.forms.at.point....(d
01e0	65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 68 69 64 65 2d 74 6f 67 67 6c 65 20 23 5b 30	efalias.'haskell-hide-toggle.#[0
0200	20 22 5c 33 30 31 5c 33 30 32 21 5c 32 31 30 5c 32 31 32 5c 33 30 33 20 5c 33 30 34 18 5c 33 30	."\301\302!\210\212\303.\304.\30
0220	35 20 5c 32 31 31 40 01 41 01 5c 32 30 33 2c 00 5c 32 31 31 5c 32 30 33 2c 00 5c 33 30 36 02 02	5.\211@.A.\203,.\211\203,.\306..
0240	5c 22 5c 32 30 33 26 00 5c 33 30 37 02 02 5c 22 5c 32 31 30 5c 32 30 32 2c 00 5c 33 31 30 02 02	\"\203&.\307..\"\210\202,.\310..
0260	5c 33 31 31 23 5c 32 31 30 5c 33 31 32 04 21 29 5c 32 36 36 5c 32 30 34 29 5c 32 30 37 22 20 5b	\311#\210\312.!)\266\204)\207".[
0280	69 6e 68 69 62 69 74 2d 72 65 61 64 2d 6f 6e 6c 79 20 68 73 2d 6d 69 6e 6f 72 2d 6d 6f 64 65 20	inhibit-read-only.hs-minor-mode.
02a0	31 20 62 75 66 66 65 72 2d 6d 6f 64 69 66 69 65 64 2d 70 20 74 20 68 61 73 6b 65 6c 6c 2d 69 6e	1.buffer-modified-p.t.haskell-in
02c0	64 65 6e 74 65 64 2d 62 6c 6f 63 6b 20 6f 76 65 72 6c 61 79 73 2d 69 6e 20 68 73 2d 64 69 73 63	dented-block.overlays-in.hs-disc
02e0	61 72 64 2d 6f 76 65 72 6c 61 79 73 20 68 73 2d 6d 61 6b 65 2d 6f 76 65 72 6c 61 79 20 63 6f 64	ard-overlays.hs-make-overlay.cod
0300	65 20 73 65 74 2d 62 75 66 66 65 72 2d 6d 6f 64 69 66 69 65 64 2d 70 5d 20 38 20 28 23 24 20 2e	e.set-buffer-modified-p].8.(#$..
0320	20 34 33 30 29 20 6e 69 6c 5d 29 0a 23 40 36 32 20 52 65 74 75 72 6e 73 20 60 74 27 20 69 66 20	.430).nil]).#@62.Returns.`t'.if.
0340	6c 69 6e 65 20 69 73 20 65 6d 70 74 79 20 6f 72 20 63 6f 6d 70 6f 73 65 64 20 6f 6e 6c 79 20 6f	line.is.empty.or.composed.only.o
0360	66 20 77 68 69 74 65 73 70 61 63 65 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c	f.whitespace...(defalias.'haskel
0380	6c 2d 62 6c 61 6e 6b 2d 6c 69 6e 65 2d 70 20 23 5b 30 20 22 5c 32 31 32 5c 33 30 30 20 5c 32 31	l-blank-line-p.#[0."\212\300.\21
03a0	30 5c 33 30 31 20 5c 33 30 32 5c 33 30 33 77 5c 32 31 30 60 55 29 5c 32 30 37 22 20 5b 62 65 67	0\301.\302\303w\210`U)\207".[beg
03c0	69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 20 70 6f 69 6e 74 2d 61 74 2d 65 6f 6c 20 22 5b 3a 62	inning-of-line.point-at-eol."[:b
03e0	6c 61 6e 6b 3a 5d 22 20 6e 69 6c 5d 20 33 20 28 23 24 20 2e 20 38 31 37 29 5d 29 0a 23 40 35 32	lank:]".nil].3.(#$...817)]).#@52
0400	20 72 65 74 75 72 6e 20 28 73 74 61 72 74 2d 6f 66 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 2e 20	.return.(start-of-indentation...
0420	65 6e 64 2d 6f 66 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27	end-of-indentation)..(defalias.'
0440	68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 65 64 2d 62 6c 6f 63 6b 20 23 5b 30 20 22 5c 33 30 30	haskell-indented-block.#[0."\300
0460	20 5c 33 30 31 5c 33 30 32 21 5c 33 30 31 5c 33 30 33 21 5c 32 31 32 5c 33 30 34 7f 5c 32 31 30	.\301\302!\301\303!\212\304.\210
0480	60 29 03 5c 33 30 35 55 5c 32 30 33 1e 00 02 5c 33 30 35 55 5c 32 30 33 1e 00 5c 33 30 34 5c 32	`).\305U\203...\305U\203..\304\2
04a0	30 32 4f 00 5c 33 30 36 20 5c 32 30 33 27 00 5c 33 30 34 5c 32 30 32 4f 00 02 04 56 5c 32 30 33	02O.\306.\203'.\304\202O...V\203
04c0	36 00 5c 32 31 31 5c 33 30 37 5c 33 31 30 5c 33 30 32 5c 22 42 5c 32 30 32 4f 00 02 04 55 5c 32	6.\211\307\310\302\"B\202O...U\2
04e0	30 34 42 00 01 04 58 5c 32 30 33 4e 00 5c 33 30 37 5c 33 31 31 5c 33 30 33 5c 22 5c 33 30 37 5c	04B...X\203N.\307\311\303\"\307\
0500	33 31 31 5c 33 30 32 5c 22 42 5c 32 30 32 4f 00 5c 33 30 34 5c 32 30 37 22 20 5b 63 75 72 72 65	311\302\"B\202O.\304\207".[curre
0520	6e 74 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 68 61 73 6b 65 6c 6c 2d 6e 65 78 74 2d 6c 69 6e 65	nt-indentation.haskell-next-line
0540	2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 31 20 2d 31 20 6e 69 6c 20 30 20 68 61 73 6b 65 6c 6c 2d	-indentation.1.-1.nil.0.haskell-
0560	62 6c 61 6e 6b 2d 6c 69 6e 65 2d 70 20 68 61 73 6b 65 6c 6c 2d 66 69 6e 64 2d 6c 69 6e 65 2d 77	blank-line-p.haskell-find-line-w
0580	69 74 68 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 3e 20 3e 3d 5d 20 38 20 28 23 24 20 2e 20 31 30	ith-indentation.>.>=].8.(#$...10
05a0	32 35 29 5d 29 0a 23 40 39 39 20 72 65 74 75 72 6e 73 20 28 69 6e 74 65 67 65 72 29 20 69 6e 64	25)]).#@99.returns.(integer).ind
05c0	65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 6e 65 78 74 20 69 66 20 64 69 72 3d 31 2c 20 70	entation.of.the.next.if.dir=1,.p
05e0	72 65 76 69 6f 75 73 20 6c 69 6e 65 0a 69 6e 64 65 6e 74 61 74 69 6f 6e 20 69 66 20 64 69 72 3d	revious.line.indentation.if.dir=
0600	2d 31 0a 0a 28 66 6e 20 44 49 52 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c	-1..(fn.DIR)..(defalias.'haskell
0620	2d 6e 65 78 74 2d 6c 69 6e 65 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 23 5b 32 35 37 20 22 5c 32	-next-line-indentation.#[257."\2
0640	31 32 5c 32 31 31 79 5c 33 30 30 55 5c 32 30 33 0d 00 5c 33 30 31 20 5c 32 30 34 01 00 5c 33 30	12\211y\300U\203..\301.\204..\30
0660	32 20 29 5c 32 30 37 22 20 5b 30 20 68 61 73 6b 65 6c 6c 2d 62 6c 61 6e 6b 2d 6c 69 6e 65 2d 70	2.)\207".[0.haskell-blank-line-p
0680	20 63 75 72 72 65 6e 74 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 5d 20 33 20 28 23 24 20 2e 20 31 34	.current-indentation].3.(#$...14
06a0	35 31 29 5d 29 0a 23 40 31 30 32 20 63 6f 6d 70 61 72 69 73 6f 6e 20 69 73 20 3e 3d 20 6f 72 20	51)]).#@102.comparison.is.>=.or.
06c0	3e 2c 20 64 69 72 65 63 74 69 6f 6e 20 69 66 20 31 20 66 69 6e 64 73 20 66 6f 72 77 61 72 64 2c	>,.direction.if.1.finds.forward,
06e0	20 69 66 20 2d 31 20 66 69 6e 64 73 20 62 61 63 6b 77 61 72 64 0a 0a 28 66 6e 20 43 4f 4d 50 41	.if.-1.finds.backward..(fn.COMPA
0700	52 49 53 4f 4e 20 44 49 52 45 43 54 49 4f 4e 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73	RISON.DIRECTION)..(defalias.'has
0720	6b 65 6c 6c 2d 66 69 6e 64 2d 6c 69 6e 65 2d 77 69 74 68 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20	kell-find-line-with-indentation.
0740	23 5b 35 31 34 20 22 5c 32 31 32 5c 33 30 30 20 01 79 5c 33 30 31 55 5c 32 30 33 17 00 5c 33 30	#[514."\212\300..y\301U\203..\30
0760	32 20 5c 32 30 34 03 00 02 5c 33 30 30 20 02 5c 22 5c 32 30 34 03 00 01 5c 33 30 33 55 5c 32 30	2.\204...\300..\"\204...\303U\20
0780	33 20 00 5c 33 30 34 79 5c 32 31 30 5c 33 30 35 7f 5c 32 31 30 60 5c 32 36 32 01 29 5c 32 30 37	3..\304y\210\305.\210`\262.)\207
07a0	22 20 5b 63 75 72 72 65 6e 74 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 30 20 68 61 73 6b 65 6c 6c	".[current-indentation.0.haskell
07c0	2d 62 6c 61 6e 6b 2d 6c 69 6e 65 2d 70 20 31 20 2d 31 20 6e 69 6c 5d 20 36 20 28 23 24 20 2e 20	-blank-line-p.1.-1.nil].6.(#$...
07e0	31 37 30 38 29 5d 29 0a 23 40 33 31 20 68 69 64 65 73 20 61 6c 6c 20 74 6f 70 20 6c 65 76 65 6c	1708)]).#@31.hides.all.top.level
0800	20 66 75 6e 63 74 69 6f 6e 73 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 68	.functions..(defalias.'haskell-h
0820	69 64 65 2d 74 6f 67 67 6c 65 2d 61 6c 6c 20 23 5b 30 20 22 5c 32 31 32 64 62 5c 32 31 30 5c 33	ide-toggle-all.#[0."\212db\210\3
0840	30 30 79 5c 33 30 31 55 5c 32 30 35 1c 00 5c 33 30 32 20 62 5c 32 31 30 5c 33 30 33 20 5c 33 30	00y\301U\205..\302.b\210\303.\30
0860	31 55 5c 32 30 33 04 00 5c 33 30 34 20 5c 32 31 30 5c 32 30 32 04 00 29 5c 32 30 37 22 20 5b 2d	1U\203..\304.\210\202..)\207".[-
0880	31 20 30 20 70 6f 69 6e 74 2d 61 74 2d 62 6f 6c 20 63 75 72 72 65 6e 74 2d 69 6e 64 65 6e 74 61	1.0.point-at-bol.current-indenta
08a0	74 69 6f 6e 20 68 61 73 6b 65 6c 6c 2d 68 69 64 65 2d 74 6f 67 67 6c 65 5d 20 32 20 28 23 24 20	tion.haskell-hide-toggle].2.(#$.
08c0	2e 20 32 30 32 39 29 20 6e 69 6c 5d 29 0a 23 40 34 33 20 4b 65 79 6d 61 70 20 66 6f 72 20 75 73	..2029).nil]).#@43.Keymap.for.us
08e0	69 6e 67 20 60 68 61 73 6b 65 6c 6c 2d 63 6f 6c 6c 61 70 73 65 2d 6d 6f 64 65 27 2e 1f 0a 28 64	ing.`haskell-collapse-mode'...(d
0900	65 66 76 61 72 20 68 61 73 6b 65 6c 6c 2d 63 6f 6c 6c 61 70 73 65 2d 6d 6f 64 65 2d 6d 61 70 20	efvar.haskell-collapse-mode-map.
0920	28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 30 20 5c 33 30 31 01 5c 33 30 32 5c 33 30 33 23 5c	(byte-code."\300.\301.\302\303#\
0940	32 31 30 5c 33 30 31 01 5c 33 30 34 5c 33 30 35 23 5c 32 31 30 5c 33 30 31 01 5c 33 30 36 5c 33	210\301.\304\305#\210\301.\306\3
0960	30 35 23 5c 32 31 30 5c 33 30 31 01 5c 33 30 37 5c 33 30 35 23 5c 32 31 30 5c 32 31 31 5c 32 30	05#\210\301.\307\305#\210\211\20
0980	37 22 20 5b 6d 61 6b 65 2d 73 70 61 72 73 65 2d 6b 65 79 6d 61 70 20 64 65 66 69 6e 65 2d 6b 65	7".[make-sparse-keymap.define-ke
09a0	79 20 22 03 40 03 22 20 68 61 73 6b 65 6c 6c 2d 68 69 64 65 2d 74 6f 67 67 6c 65 20 5b 33 20 36	y.".@.".haskell-hide-toggle.[3.6
09c0	34 20 31 33 34 32 31 37 37 33 31 5d 20 68 61 73 6b 65 6c 6c 2d 68 69 64 65 2d 74 6f 67 67 6c 65	4.134217731].haskell-hide-toggle
09e0	2d 61 6c 6c 20 5b 33 20 36 34 20 31 33 34 32 31 37 37 34 37 5d 20 5b 33 20 36 34 20 31 33 34 32	-all.[3.64.134217747].[3.64.1342
0a00	31 37 37 33 36 5d 5d 20 35 29 20 28 23 24 20 2e 20 32 32 35 39 29 29 0a 23 40 31 31 31 20 4e 6f	17736]].5).(#$...2259)).#@111.No
0a20	6e 2d 6e 69 6c 20 69 66 20 48 61 73 6b 65 6c 6c 2d 43 6f 6c 6c 61 70 73 65 20 6d 6f 64 65 20 69	n-nil.if.Haskell-Collapse.mode.i
0a40	73 20 65 6e 61 62 6c 65 64 2e 0a 55 73 65 20 74 68 65 20 63 6f 6d 6d 61 6e 64 20 60 68 61 73 6b	s.enabled..Use.the.command.`hask
0a60	65 6c 6c 2d 63 6f 6c 6c 61 70 73 65 2d 6d 6f 64 65 27 20 74 6f 20 63 68 61 6e 67 65 20 74 68 69	ell-collapse-mode'.to.change.thi
0a80	73 20 76 61 72 69 61 62 6c 65 2e 1f 0a 28 64 65 66 76 61 72 20 68 61 73 6b 65 6c 6c 2d 63 6f 6c	s.variable...(defvar.haskell-col
0aa0	6c 61 70 73 65 2d 6d 6f 64 65 20 6e 69 6c 20 28 23 24 20 2e 20 32 35 39 30 29 29 0a 28 6d 61 6b	lapse-mode.nil.(#$...2590)).(mak
0ac0	65 2d 76 61 72 69 61 62 6c 65 2d 62 75 66 66 65 72 2d 6c 6f 63 61 6c 20 27 68 61 73 6b 65 6c 6c	e-variable-buffer-local.'haskell
0ae0	2d 63 6f 6c 6c 61 70 73 65 2d 6d 6f 64 65 29 0a 23 40 37 35 20 4d 69 6e 6f 72 20 6d 6f 64 65 20	-collapse-mode).#@75.Minor.mode.
0b00	74 6f 20 63 6f 6c 6c 61 70 73 65 20 61 6e 64 20 65 78 70 61 6e 64 20 68 61 73 6b 65 6c 6c 20 65	to.collapse.and.expand.haskell.e
0b20	78 70 72 65 73 73 69 6f 6e 73 0a 0a 28 66 6e 20 26 6f 70 74 69 6f 6e 61 6c 20 41 52 47 29 1f 0a	xpressions..(fn.&optional.ARG)..
0b40	28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 63 6f 6c 6c 61 70 73 65 2d 6d 6f 64 65	(defalias.'haskell-collapse-mode
0b60	20 23 5b 32 35 36 20 22 5c 33 30 31 20 01 5c 33 30 32 3d 5c 32 30 33 0d 00 08 3f 5c 32 30 32 12	.#[256."\301..\302=\203...?\202.
0b80	00 5c 33 30 33 02 21 5c 33 30 34 56 10 5c 33 30 35 5c 33 30 36 08 5c 32 30 33 1d 00 5c 33 30 37	.\303.!\304V.\305\306.\203..\307
0ba0	5c 32 30 32 1e 00 5c 33 31 30 5c 22 5c 32 31 30 5c 33 31 31 5c 33 31 32 21 5c 32 30 33 42 00 5c	\202..\310\"\210\311\312!\203B.\
0bc0	33 30 31 20 5c 32 30 33 32 00 5c 32 31 31 5c 33 30 31 20 5c 32 33 32 5c 32 30 33 42 00 5c 33 31	301.\2032.\211\301.\232\203B.\31
0be0	33 5c 33 31 34 5c 33 31 35 08 5c 32 30 33 3d 00 5c 33 31 36 5c 32 30 32 3e 00 5c 33 31 37 03 23	3\314\315.\203=.\316\202>.\317.#
0c00	5c 32 36 36 02 5c 32 31 30 5c 33 32 30 20 5c 32 31 30 08 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c	\266.\210\320.\210.\207".[haskel
0c20	6c 2d 63 6f 6c 6c 61 70 73 65 2d 6d 6f 64 65 20 63 75 72 72 65 6e 74 2d 6d 65 73 73 61 67 65 20	l-collapse-mode.current-message.
0c40	74 6f 67 67 6c 65 20 70 72 65 66 69 78 2d 6e 75 6d 65 72 69 63 2d 76 61 6c 75 65 20 30 20 72 75	toggle.prefix-numeric-value.0.ru
0c60	6e 2d 68 6f 6f 6b 73 20 68 61 73 6b 65 6c 6c 2d 63 6f 6c 6c 61 70 73 65 2d 6d 6f 64 65 2d 68 6f	n-hooks.haskell-collapse-mode-ho
0c80	6f 6b 20 68 61 73 6b 65 6c 6c 2d 63 6f 6c 6c 61 70 73 65 2d 6d 6f 64 65 2d 6f 6e 2d 68 6f 6f 6b	ok.haskell-collapse-mode-on-hook
0ca0	20 68 61 73 6b 65 6c 6c 2d 63 6f 6c 6c 61 70 73 65 2d 6d 6f 64 65 2d 6f 66 66 2d 68 6f 6f 6b 20	.haskell-collapse-mode-off-hook.
0cc0	63 61 6c 6c 65 64 2d 69 6e 74 65 72 61 63 74 69 76 65 6c 79 2d 70 20 61 6e 79 20 22 20 69 6e 20	called-interactively-p.any.".in.
0ce0	63 75 72 72 65 6e 74 20 62 75 66 66 65 72 22 20 6d 65 73 73 61 67 65 20 22 48 61 73 6b 65 6c 6c	current.buffer".message."Haskell
0d00	2d 43 6f 6c 6c 61 70 73 65 20 6d 6f 64 65 20 25 73 61 62 6c 65 64 25 73 22 20 22 65 6e 22 20 22	-Collapse.mode.%sabled%s"."en"."
0d20	64 69 73 22 20 66 6f 72 63 65 2d 6d 6f 64 65 2d 6c 69 6e 65 2d 75 70 64 61 74 65 5d 20 37 20 28	dis".force-mode-line-update].7.(
0d40	23 24 20 2e 20 32 38 30 35 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 08 5c 32 30 36 05 00 5c 33	#$...2805).(byte-code.".\206..\3
0d60	30 31 43 5c 32 30 37 22 20 5b 63 75 72 72 65 6e 74 2d 70 72 65 66 69 78 2d 61 72 67 20 74 6f 67	01C\207".[current-prefix-arg.tog
0d80	67 6c 65 5d 20 31 29 5d 29 0a 23 40 31 38 36 20 48 6f 6f 6b 20 72 75 6e 20 61 66 74 65 72 20 65	gle].1)]).#@186.Hook.run.after.e
0da0	6e 74 65 72 69 6e 67 20 6f 72 20 6c 65 61 76 69 6e 67 20 60 68 61 73 6b 65 6c 6c 2d 63 6f 6c 6c	ntering.or.leaving.`haskell-coll
0dc0	61 70 73 65 2d 6d 6f 64 65 27 2e 0a 4e 6f 20 70 72 6f 62 6c 65 6d 73 20 72 65 73 75 6c 74 20 69	apse-mode'..No.problems.result.i
0de0	66 20 74 68 69 73 20 76 61 72 69 61 62 6c 65 20 69 73 20 6e 6f 74 20 62 6f 75 6e 64 2e 0a 60 61	f.this.variable.is.not.bound..`a
0e00	64 64 2d 68 6f 6f 6b 27 20 61 75 74 6f 6d 61 74 69 63 61 6c 6c 79 20 62 69 6e 64 73 20 69 74 2e	dd-hook'.automatically.binds.it.
0e20	20 20 28 54 68 69 73 20 69 73 20 74 72 75 65 20 66 6f 72 20 61 6c 6c 20 68 6f 6f 6b 20 76 61 72	..(This.is.true.for.all.hook.var
0e40	69 61 62 6c 65 73 2e 29 1f 0a 28 64 65 66 76 61 72 20 68 61 73 6b 65 6c 6c 2d 63 6f 6c 6c 61 70	iables.)..(defvar.haskell-collap
0e60	73 65 2d 6d 6f 64 65 2d 68 6f 6f 6b 20 6e 69 6c 20 28 23 24 20 2e 20 33 34 37 32 29 29 0a 28 62	se-mode-hook.nil.(#$...3472)).(b
0e80	79 74 65 2d 63 6f 64 65 20 22 5c 33 30 31 5c 33 30 32 5c 33 30 33 08 5c 33 30 34 5c 32 31 31 25	yte-code."\301\302\303.\304\211%
0ea0	5c 32 31 30 5c 33 30 35 5c 33 30 36 21 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 63 6f 6c 6c	\210\305\306!\207".[haskell-coll
0ec0	61 70 73 65 2d 6d 6f 64 65 2d 6d 61 70 20 61 64 64 2d 6d 69 6e 6f 72 2d 6d 6f 64 65 20 68 61 73	apse-mode-map.add-minor-mode.has
0ee0	6b 65 6c 6c 2d 63 6f 6c 6c 61 70 73 65 2d 6d 6f 64 65 20 22 20 48 61 73 6b 65 6c 6c 2d 43 6f 6c	kell-collapse-mode.".Haskell-Col
0f00	6c 61 70 73 65 22 20 6e 69 6c 20 70 72 6f 76 69 64 65 20 68 61 73 6b 65 6c 6c 2d 63 6f 6c 6c 61	lapse".nil.provide.haskell-colla
0f20	70 73 65 5d 20 36 29 0a	pse].6).