blob: 44947d28803ac81007367e4b5a7ed513ea453ad4 (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 63 6f 6e	ptimizations...;;;.This.file.con
0060	74 61 69 6e 73 20 75 74 66 2d 38 20 6e 6f 6e 2d 41 53 43 49 49 20 63 68 61 72 61 63 74 65 72 73	tains.utf-8.non-ASCII.characters
0080	2c 0a 3b 3b 3b 20 61 6e 64 20 73 6f 20 63 61 6e 6e 6f 74 20 62 65 20 6c 6f 61 64 65 64 20 69 6e	,.;;;.and.so.cannot.be.loaded.in
00a0	74 6f 20 45 6d 61 63 73 20 32 32 20 6f 72 20 65 61 72 6c 69 65 72 2e 0a 28 61 6e 64 20 28 62 6f	to.Emacs.22.or.earlier..(and.(bo
00c0	75 6e 64 70 20 27 65 6d 61 63 73 2d 76 65 72 73 69 6f 6e 29 0a 20 20 20 20 20 28 3c 20 28 61 72	undp.'emacs-version)......(<.(ar
00e0	65 66 20 65 6d 61 63 73 2d 76 65 72 73 69 6f 6e 20 28 31 2d 20 28 6c 65 6e 67 74 68 20 65 6d 61	ef.emacs-version.(1-.(length.ema
0100	63 73 2d 76 65 72 73 69 6f 6e 29 29 29 20 3f 41 29 0a 20 20 20 20 20 28 73 74 72 69 6e 67 2d 6c	cs-version))).?A)......(string-l
0120	65 73 73 70 20 65 6d 61 63 73 2d 76 65 72 73 69 6f 6e 20 22 32 33 22 29 0a 20 20 20 20 20 28 65	essp.emacs-version."23")......(e
0140	72 72 6f 72 20 22 60 25 73 27 20 77 61 73 20 63 6f 6d 70 69 6c 65 64 20 66 6f 72 20 45 6d 61 63	rror."`%s'.was.compiled.for.Emac
0160	73 20 32 33 20 6f 72 20 6c 61 74 65 72 22 20 23 24 29 29 0a 0a 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b	s.23.or.later".#$))..;;;;;;;;;;;
0180	3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 0a 0a 0a 28 72 65 71 75 69 72 65 20 27 63	;;;;;;;;;;;;;;;;;;...(require.'c
01a0	6c 2d 6c 69 62 29 0a 23 40 35 30 20 52 65 67 65 78 20 75 73 65 64 20 66 6f 72 20 6d 61 74 63 68	l-lib).#@50.Regex.used.for.match
01c0	69 6e 67 20 63 6f 6d 70 6f 6e 65 6e 74 73 20 6f 66 20 61 6e 20 69 6d 70 6f 72 74 2e 1f 0a 28 64	ing.components.of.an.import...(d
01e0	65 66 76 61 72 20 68 61 73 6b 65 6c 6c 2d 61 6c 69 67 6e 2d 69 6d 70 6f 72 74 73 2d 72 65 67 65	efvar.haskell-align-imports-rege
0200	78 70 20 22 5e 5c 5c 28 69 6d 70 6f 72 74 5b 20 5d 2b 5c 5c 29 5c 5c 28 71 75 61 6c 69 66 69 65	xp."^\\(import[.]+\\)\\(qualifie
0220	64 20 5c 5c 29 3f 5b 20 5d 2a 5c 5c 28 5c 22 5b 5e 5c 22 5d 2a 5c 22 20 5c 5c 29 3f 5b 20 5d 2a	d.\\)?[.]*\\(\"[^\"]*\".\\)?[.]*
0240	5c 5c 28 5b 41 2d 5a 61 2d 7a 30 2d 39 5f 2e 27 5d 2b 5c 5c 29 5b 20 5d 2a 5c 5c 28 5b 20 5d 2a	\\([A-Za-z0-9_.']+\\)[.]*\\([.]*
0260	61 73 20 5b 41 2d 5a 5d 5b 5e 20 5d 2a 5c 5c 29 3f 5b 20 5d 2a 5c 5c 28 28 2e 2a 29 5c 5c 29 3f	as.[A-Z][^.]*\\)?[.]*\\((.*)\\)?
0280	5c 5c 28 5b 20 5d 2a 68 69 64 69 6e 67 20 28 2e 2a 29 5c 5c 29 3f 5c 5c 28 20 2d 2d 20 2e 2a 5c	\\([.]*hiding.(.*)\\)?\\(.--..*\
02a0	5c 29 3f 5b 20 5d 2a 24 22 20 28 23 24 20 2e 20 34 32 38 29 29 0a 28 62 79 74 65 2d 63 6f 64 65	\)?[.]*$".(#$...428)).(byte-code
02c0	20 22 5c 33 30 30 5c 33 30 31 5c 33 30 32 5c 33 30 33 5c 33 30 34 44 44 5c 33 30 35 5c 33 30 36	."\300\301\302\303\304DD\305\306
02e0	5c 33 30 37 5c 33 31 30 5c 33 31 31 26 07 5c 32 30 37 22 20 5b 63 75 73 74 6f 6d 2d 64 65 63 6c	\307\310\311&.\207".[custom-decl
0300	61 72 65 2d 76 61 72 69 61 62 6c 65 20 68 61 73 6b 65 6c 6c 2d 61 6c 69 67 6e 2d 69 6d 70 6f 72	are-variable.haskell-align-impor
0320	74 73 2d 70 61 64 2d 61 66 74 65 72 2d 6e 61 6d 65 20 66 75 6e 63 61 6c 6c 20 66 75 6e 63 74 69	ts-pad-after-name.funcall.functi
0340	6f 6e 20 23 5b 30 20 22 5c 33 30 30 5c 32 30 37 22 20 5b 6e 69 6c 5d 20 31 5d 20 22 50 61 64 20	on.#[0."\300\207".[nil].1]."Pad.
0360	6c 61 79 6f 75 74 20 61 66 74 65 72 20 74 68 65 20 6d 6f 64 75 6c 65 20 6e 61 6d 65 20 61 6c 73	layout.after.the.module.name.als
0380	6f 2e 22 20 3a 74 79 70 65 20 62 6f 6f 6c 65 61 6e 20 3a 67 72 6f 75 70 20 68 61 73 6b 65 6c 6c	o.".:type.boolean.:group.haskell
03a0	2d 69 6e 74 65 72 61 63 74 69 76 65 5d 20 38 29 0a 23 40 33 38 20 41 6c 69 67 6e 20 61 6c 6c 20	-interactive].8).#@38.Align.all.
03c0	74 68 65 20 69 6d 70 6f 72 74 73 20 69 6e 20 74 68 65 20 62 75 66 66 65 72 2e 1f 0a 28 64 65 66	the.imports.in.the.buffer...(def
03e0	61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 61 6c 69 67 6e 2d 69 6d 70 6f 72 74 73 20 23 5b 30	alias.'haskell-align-imports.#[0
0400	20 22 5c 33 30 30 20 5c 32 30 33 21 00 5c 32 31 32 65 62 5c 32 31 30 5c 33 30 31 20 5c 33 30 32	."\300.\203!.\212eb\210\301.\302
0420	01 21 5c 33 30 33 5c 33 30 34 5c 33 30 35 5c 33 30 36 5c 33 30 37 5c 33 31 30 06 06 21 5c 33 31	.!\303\304\305\306\307\310..!\31
0440	31 5c 22 5c 33 31 32 5c 33 31 33 25 03 5c 22 5c 32 36 36 03 29 5c 33 31 34 5c 32 30 37 22 20 5b	1\"\312\313%.\"\266.)\314\207".[
0460	68 61 73 6b 65 6c 6c 2d 61 6c 69 67 6e 2d 69 6d 70 6f 72 74 73 2d 6c 69 6e 65 2d 6d 61 74 63 68	haskell-align-imports-line-match
0480	20 68 61 73 6b 65 6c 6c 2d 61 6c 69 67 6e 2d 69 6d 70 6f 72 74 73 2d 63 6f 6c 6c 65 63 74 20 68	.haskell-align-imports-collect.h
04a0	61 73 6b 65 6c 6c 2d 61 6c 69 67 6e 2d 69 6d 70 6f 72 74 73 2d 70 61 64 64 69 6e 67 20 6d 61 70	askell-align-imports-padding.map
04c0	63 20 6d 61 6b 65 2d 62 79 74 65 2d 63 6f 64 65 20 32 35 37 20 22 5c 32 31 31 41 62 5c 32 31 30	c.make-byte-code.257."\211Ab\210
04e0	60 5c 33 30 31 20 7c 5c 32 31 30 5c 33 30 32 5c 33 30 33 5c 33 30 30 03 40 5c 22 21 63 5c 32 30	`\301.|\210\302\303\300.@\"!c\20
0500	37 22 20 76 63 6f 6e 63 61 74 20 76 65 63 74 6f 72 20 5b 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69	7".vconcat.vector.[line-end-posi
0520	74 69 6f 6e 20 68 61 73 6b 65 6c 6c 2d 61 6c 69 67 6e 2d 69 6d 70 6f 72 74 73 2d 63 68 6f 6d 70	tion.haskell-align-imports-chomp
0540	20 68 61 73 6b 65 6c 6c 2d 61 6c 69 67 6e 2d 69 6d 70 6f 72 74 73 2d 66 69 6c 6c 5d 20 35 20 22	.haskell-align-imports-fill].5."
0560	5c 6e 5c 6e 28 66 6e 20 58 29 22 20 6e 69 6c 5d 20 39 20 28 23 24 20 2e 20 39 35 30 29 20 6e 69	\n\n(fn.X)".nil].9.(#$...950).ni
0580	6c 5d 29 0a 23 40 34 34 20 54 72 79 20 74 6f 20 6d 61 74 63 68 20 74 68 65 20 63 75 72 72 65 6e	l]).#@44.Try.to.match.the.curren
05a0	74 20 6c 69 6e 65 20 61 73 20 61 20 72 65 67 65 78 70 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27	t.line.as.a.regexp...(defalias.'
05c0	68 61 73 6b 65 6c 6c 2d 61 6c 69 67 6e 2d 69 6d 70 6f 72 74 73 2d 6c 69 6e 65 2d 6d 61 74 63 68	haskell-align-imports-line-match
05e0	20 23 5b 30 20 22 5c 33 30 30 5c 33 30 31 20 5c 33 30 32 20 5c 22 5c 33 30 33 5c 33 30 34 02 5c	.#[0."\300\301.\302.\"\303\304.\
0600	22 5c 32 30 35 0e 00 5c 32 31 31 5c 32 30 37 22 20 5b 62 75 66 66 65 72 2d 73 75 62 73 74 72 69	"\205..\211\207".[buffer-substri
0620	6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 6c 69 6e 65 2d 62 65 67 69 6e 6e 69 6e 67 2d	ng-no-properties.line-beginning-
0640	70 6f 73 69 74 69 6f 6e 20 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e 20 73 74 72 69 6e	position.line-end-position.strin
0660	67 2d 6d 61 74 63 68 20 22 5e 69 6d 70 6f 72 74 20 22 5d 20 34 20 28 23 24 20 2e 20 31 34 31 37	g-match."^import."].4.(#$...1417
0680	29 5d 29 0a 23 40 35 30 20 43 6f 6c 6c 65 63 74 20 61 20 6c 69 73 74 20 6f 66 20 6d 61 72 6b 20	)]).#@50.Collect.a.list.of.mark.
06a0	2f 20 69 6d 70 6f 72 74 20 73 74 61 74 65 6d 65 6e 74 20 70 61 69 72 73 2e 1f 0a 28 64 65 66 61	/.import.statement.pairs...(defa
06c0	6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 61 6c 69 67 6e 2d 69 6d 70 6f 72 74 73 2d 63 6f 6c 6c	lias.'haskell-align-imports-coll
06e0	65 63 74 20 23 5b 30 20 22 5c 33 30 30 60 64 5c 32 33 32 5c 32 30 34 42 00 5c 33 30 31 20 5c 32	ect.#[0."\300`d\232\204B.\301.\2
0700	30 34 42 00 5c 33 30 32 20 5c 32 31 31 5c 32 30 33 3b 00 5c 33 30 33 5c 33 30 34 5c 33 30 30 01	04B.\302.\211\203;.\303\304\300.
0720	5c 33 30 35 58 5c 32 30 33 2d 00 5c 33 30 36 5c 33 30 37 03 06 06 5c 22 21 01 42 5c 32 36 32 01	\305X\203-.\306\307...\"!.B\262.
0740	01 54 5c 32 36 32 02 5c 32 30 32 15 00 5c 32 31 31 5c 32 33 37 5c 32 36 36 5c 32 30 32 21 5c 32	.T\262.\202..\211\237\266\202!\2
0760	31 31 5c 33 31 30 20 42 03 42 5c 32 36 32 03 5c 32 31 30 5c 32 31 30 5c 33 30 30 79 5c 32 31 30	11\310.B.B\262.\210\210\300y\210
0780	5c 32 30 32 01 00 5c 32 31 31 5c 32 30 37 22 20 5b 6e 69 6c 20 68 61 73 6b 65 6c 6c 2d 61 6c 69	\202..\211\207".[nil.haskell-ali
07a0	67 6e 2d 69 6d 70 6f 72 74 73 2d 61 66 74 65 72 2d 69 6d 70 6f 72 74 73 2d 70 20 68 61 73 6b 65	gn-imports-after-imports-p.haske
07c0	6c 6c 2d 61 6c 69 67 6e 2d 69 6d 70 6f 72 74 73 2d 6c 69 6e 65 2d 6d 61 74 63 68 2d 69 74 20 68	ll-align-imports-line-match-it.h
07e0	61 73 6b 65 6c 6c 2d 61 6c 69 67 6e 2d 69 6d 70 6f 72 74 73 2d 6d 65 72 67 65 2d 70 61 72 74 73	askell-align-imports-merge-parts
0800	20 31 20 38 20 68 61 73 6b 65 6c 6c 2d 61 6c 69 67 6e 2d 69 6d 70 6f 72 74 73 2d 63 68 6f 6d 70	.1.8.haskell-align-imports-chomp
0820	20 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 6c 69 6e 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 70 6f 73	.match-string.line-beginning-pos
0840	69 74 69 6f 6e 5d 20 39 20 28 23 24 20 2e 20 31 36 37 33 29 5d 29 0a 23 40 38 32 20 4d 65 72 67	ition].9.(#$...1673)]).#@82.Merg
0860	65 20 74 6f 67 65 74 68 65 72 20 70 61 72 74 73 20 6f 66 20 61 6e 20 69 6d 70 6f 72 74 20 73 74	e.together.parts.of.an.import.st
0880	61 74 65 6d 65 6e 74 20 74 68 61 74 20 73 68 6f 75 6c 64 6e 27 74 20 62 65 20 73 65 70 61 72 61	atement.that.shouldn't.be.separa
08a0	74 65 64 2e 0a 0a 28 66 6e 20 4c 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c	ted...(fn.L)..(defalias.'haskell
08c0	2d 61 6c 69 67 6e 2d 69 6d 70 6f 72 74 73 2d 6d 65 72 67 65 2d 70 61 72 74 73 20 23 5b 32 35 37	-align-imports-merge-parts.#[257
08e0	20 22 5c 33 30 31 5c 33 30 32 02 5c 22 5c 33 30 33 08 5c 32 30 33 2c 00 5c 32 31 31 02 5c 33 30	."\301\302.\"\303.\203,.\211.\30
0900	34 48 03 5c 33 30 35 48 04 5c 33 30 36 48 45 21 02 5c 33 30 37 48 02 04 5c 33 31 30 48 05 5c 33	4H.\305H.\306HE!.\307H..\310H.\3
0920	31 31 48 06 06 5c 33 31 32 48 45 21 04 5c 33 31 33 48 46 5c 32 30 32 4e 00 5c 32 31 31 02 5c 33	11H..\312HE!.\313HF\202N.\211.\3
0940	30 34 48 03 5c 33 30 35 48 04 5c 33 30 36 48 45 21 01 03 5c 33 30 37 48 04 5c 33 31 30 48 05 5c	04H.\305H.\306HE!..\307H.\310H.\
0960	33 31 31 48 06 06 5c 33 31 32 48 06 07 5c 33 31 33 48 5c 32 35 37 05 21 44 5c 32 30 37 22 20 5b	311H..\312H..\313H\257.!D\207".[
0980	68 61 73 6b 65 6c 6c 2d 61 6c 69 67 6e 2d 69 6d 70 6f 72 74 73 2d 70 61 64 2d 61 66 74 65 72 2d	haskell-align-imports-pad-after-
09a0	6e 61 6d 65 20 61 70 70 6c 79 20 76 65 63 74 6f 72 20 23 5b 32 35 37 20 22 5c 33 30 30 5c 33 30	name.apply.vector.#[257."\300\30
09c0	31 02 5c 22 5c 32 30 37 22 20 5b 63 6c 2d 72 65 64 75 63 65 20 23 5b 35 31 34 20 22 01 5c 32 31	1.\"\207".[cl-reduce.#[514.".\21
09e0	31 47 5c 33 30 30 56 5c 32 30 33 13 00 01 47 5c 33 30 30 56 5c 32 30 33 13 00 5c 33 30 31 5c 32	1G\300V\203...G\300V\203..\301\2
0a00	30 32 14 00 5c 33 30 32 02 51 5c 32 30 37 22 20 5b 30 20 22 20 22 20 22 22 5d 20 35 20 22 5c 6e	02..\302.Q\207".[0.".".""].5."\n
0a20	5c 6e 28 66 6e 20 41 20 42 29 22 5d 5d 20 34 20 22 5c 6e 5c 6e 28 66 6e 20 4c 53 29 22 5d 20 30	\n(fn.A.B)"]].4."\n\n(fn.LS)"].0
0a40	20 31 20 32 20 33 20 34 20 35 20 36 20 37 5d 20 31 31 20 28 23 24 20 2e 20 32 31 34 30 29 5d 29	.1.2.3.4.5.6.7].11.(#$...2140)])
0a60	0a 23 40 35 38 20 43 68 6f 6d 70 20 6c 65 61 64 69 6e 67 20 61 6e 64 20 74 61 69 6c 69 6e 67 20	.#@58.Chomp.leading.and.tailing.
0a80	77 68 69 74 65 73 70 61 63 65 20 66 72 6f 6d 20 53 54 52 2e 0a 0a 28 66 6e 20 53 54 52 29 1f 0a	whitespace.from.STR...(fn.STR)..
0aa0	28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 61 6c 69 67 6e 2d 69 6d 70 6f 72 74 73	(defalias.'haskell-align-imports
0ac0	2d 63 68 6f 6d 70 20 23 5b 32 35 37 20 22 5c 32 31 31 5c 32 30 33 5c 6e 00 5c 33 30 30 5c 33 30	-chomp.#[257."\211\203\n.\300\30
0ae0	31 5c 33 30 32 03 23 5c 32 30 37 5c 33 30 32 5c 32 30 37 22 20 5b 72 65 70 6c 61 63 65 2d 72 65	1\302.#\207\302\207".[replace-re
0b00	67 65 78 70 2d 69 6e 2d 73 74 72 69 6e 67 20 22 5c 5c 28 5e 5b 5b 3a 73 70 61 63 65 3a 5d 5c 6e	gexp-in-string."\\(^[[:space:]\n
0b20	5d 2a 5c 5c 7c 5b 5b 3a 73 70 61 63 65 3a 5d 5c 6e 5d 2a 24 5c 5c 29 22 20 22 22 5d 20 35 20 28	]*\\|[[:space:]\n]*$\\)".""].5.(
0b40	23 24 20 2e 20 32 36 36 32 29 5d 29 0a 23 40 37 32 20 46 69 6e 64 20 74 68 65 20 70 61 64 64 69	#$...2662)]).#@72.Find.the.paddi
0b60	6e 67 20 66 6f 72 20 65 61 63 68 20 70 61 72 74 20 6f 66 20 74 68 65 20 69 6d 70 6f 72 74 20 73	ng.for.each.part.of.the.import.s
0b80	74 61 74 65 6d 65 6e 74 73 2e 0a 0a 28 66 6e 20 49 4d 50 4f 52 54 53 29 1f 0a 28 64 65 66 61 6c	tatements...(fn.IMPORTS)..(defal
0ba0	69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 61 6c 69 67 6e 2d 69 6d 70 6f 72 74 73 2d 70 61 64 64 69	ias.'haskell-align-imports-paddi
0bc0	6e 67 20 23 5b 32 35 37 20 22 5c 32 31 31 5c 32 30 34 05 00 5c 32 30 37 5c 33 30 30 5c 33 30 31	ng.#[257."\211\204..\207\300\301
0be0	5c 33 30 32 5c 33 30 33 04 5c 22 5c 22 5c 32 30 37 22 20 5b 63 6c 2d 72 65 64 75 63 65 20 23 5b	\302\303.\"\"\207".[cl-reduce.#[
0c00	35 31 34 20 22 5c 33 30 30 5c 33 30 31 03 03 23 5c 32 30 37 22 20 5b 63 6c 2d 6d 61 70 63 61 72	514."\300\301..#\207".[cl-mapcar
0c20	20 6d 61 78 5d 20 36 20 22 5c 6e 5c 6e 28 66 6e 20 41 20 42 29 22 5d 20 6d 61 70 63 61 72 20 23	.max].6."\n\n(fn.A.B)"].mapcar.#
0c40	5b 32 35 37 20 22 5c 33 30 30 5c 33 30 31 02 40 5c 22 5c 32 30 37 22 20 5b 6d 61 70 63 61 72 20	[257."\300\301.@\"\207".[mapcar.
0c60	6c 65 6e 67 74 68 5d 20 34 20 22 5c 6e 5c 6e 28 66 6e 20 58 29 22 5d 5d 20 36 20 28 23 24 20 2e	length].4."\n\n(fn.X)"]].6.(#$..
0c80	20 32 38 39 38 29 5d 29 0a 23 40 39 30 20 46 69 6c 6c 20 61 6e 20 69 6d 70 6f 72 74 20 6c 69 6e	.2898)]).#@90.Fill.an.import.lin
0ca0	65 20 75 73 69 6e 67 20 74 68 65 20 70 61 64 64 69 6e 67 20 77 6f 72 6b 65 64 20 6f 75 74 20 66	e.using.the.padding.worked.out.f
0cc0	72 6f 6d 20 61 6c 6c 20 73 74 61 74 65 6d 65 6e 74 73 2e 0a 0a 28 66 6e 20 50 41 44 44 49 4e 47	rom.all.statements...(fn.PADDING
0ce0	20 4c 49 4e 45 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 61 6c 69 67 6e	.LINE)..(defalias.'haskell-align
0d00	2d 69 6d 70 6f 72 74 73 2d 66 69 6c 6c 20 23 5b 35 31 34 20 22 5c 33 30 30 5c 33 30 31 5c 33 30	-imports-fill.#[514."\300\301\30
0d20	32 5c 33 30 33 05 05 23 5c 33 30 34 23 5c 32 30 37 22 20 5b 6d 61 70 63 6f 6e 63 61 74 20 69 64	2\303..#\304#\207".[mapconcat.id
0d40	65 6e 74 69 74 79 20 63 6c 2d 6d 61 70 63 61 72 20 23 5b 35 31 34 20 22 5c 32 31 31 47 5c 33 30	entity.cl-mapcar.#[514."\211G\30
0d60	30 56 5c 32 30 33 11 00 5c 32 31 31 5c 33 30 31 03 03 47 5a 5c 33 30 32 5c 22 50 5c 32 30 37 5c	0V\203..\211\301..GZ\302\"P\207\
0d80	33 30 31 02 5c 33 30 32 5c 22 5c 32 30 37 22 20 5b 30 20 6d 61 6b 65 2d 73 74 72 69 6e 67 20 33	301.\302\"\207".[0.make-string.3
0da0	32 5d 20 36 20 22 5c 6e 5c 6e 28 66 6e 20 50 41 44 20 50 41 52 54 29 22 5d 20 22 20 22 5d 20 38	2].6."\n\n(fn.PAD.PART)"]."."].8
0dc0	20 28 23 24 20 2e 20 33 32 31 34 29 5d 29 0a 23 40 34 34 20 54 72 79 20 74 6f 20 6d 61 74 63 68	.(#$...3214)]).#@44.Try.to.match
0de0	20 74 68 65 20 63 75 72 72 65 6e 74 20 6c 69 6e 65 20 61 73 20 61 20 72 65 67 65 78 70 2e 1f 0a	.the.current.line.as.a.regexp...
0e00	28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 61 6c 69 67 6e 2d 69 6d 70 6f 72 74 73	(defalias.'haskell-align-imports
0e20	2d 6c 69 6e 65 2d 6d 61 74 63 68 2d 69 74 20 23 5b 30 20 22 5c 33 30 31 5c 33 30 32 20 5c 33 30	-line-match-it.#[0."\301\302.\30
0e40	33 20 5c 22 5c 33 30 34 08 02 5c 22 5c 32 30 35 0e 00 5c 32 31 31 5c 32 30 37 22 20 5b 68 61 73	3.\"\304..\"\205..\211\207".[has
0e60	6b 65 6c 6c 2d 61 6c 69 67 6e 2d 69 6d 70 6f 72 74 73 2d 72 65 67 65 78 70 20 62 75 66 66 65 72	kell-align-imports-regexp.buffer
0e80	2d 73 75 62 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 6c 69 6e 65 2d 62 65	-substring-no-properties.line-be
0ea0	67 69 6e 6e 69 6e 67 2d 70 6f 73 69 74 69 6f 6e 20 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69	ginning-position.line-end-positi
0ec0	6f 6e 20 73 74 72 69 6e 67 2d 6d 61 74 63 68 5d 20 34 20 28 23 24 20 2e 20 33 35 34 30 29 5d 29	on.string-match].4.(#$...3540)])
0ee0	0a 23 40 33 32 20 41 72 65 20 77 65 20 61 66 74 65 72 20 74 68 65 20 69 6d 70 6f 72 74 73 20 6c	.#@32.Are.we.after.the.imports.l
0f00	69 73 74 3f 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 61 6c 69 67 6e 2d 69	ist?..(defalias.'haskell-align-i
0f20	6d 70 6f 72 74 73 2d 61 66 74 65 72 2d 69 6d 70 6f 72 74 73 2d 70 20 23 5b 30 20 22 5c 32 31 32	mports-after-imports-p.#[0."\212
0f40	5c 33 30 31 20 62 5c 32 31 30 5c 33 30 32 18 5c 33 30 33 5c 33 30 34 5c 33 30 35 20 5c 33 30 36	\301.b\210\302.\303\304\305.\306
0f60	5c 33 30 37 24 2a 3f 3f 5c 32 30 37 22 20 5b 63 61 73 65 2d 66 6f 6c 64 2d 73 65 61 72 63 68 20	\307$*??\207".[case-fold-search.
0f80	6c 69 6e 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 70 6f 73 69 74 69 6f 6e 20 6e 69 6c 20 73 65 61 72	line-beginning-position.nil.sear
0fa0	63 68 2d 66 6f 72 77 61 72 64 2d 72 65 67 65 78 70 20 22 5c 5c 28 20 3d 20 5c 5c 7c 5c 5c 3c 69	ch-forward-regexp."\\(.=.\\|\\<i
0fc0	6e 73 74 61 6e 63 65 5c 5c 3e 5c 5c 7c 20 3a 3a 20 5c 5c 7c 20 e2 88 b7 20 5c 5c 29 22 20 6c 69	nstance\\>\\|.::.\\|.....\\)".li
0fe0	6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e 20 74 20 31 5d 20 35 20 28 23 24 20 2e 20 33 38 31	ne-end-position.t.1].5.(#$...381
1000	34 29 5d 29 0a 28 70 72 6f 76 69 64 65 20 27 68 61 73 6b 65 6c 6c 2d 61 6c 69 67 6e 2d 69 6d 70	4)]).(provide.'haskell-align-imp
1020	6f 72 74 73 29 0a	orts).