blob: 1ea9b604e92e6d64d64b8389980990c7f9049217 (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 62 79 74 65 2d 63 6f 64 65 20	;;;;;;;;;;;;;;;;;;...(byte-code.
01a0	22 5c 33 30 31 5c 33 30 32 21 5c 32 31 30 5c 33 30 33 5c 33 30 34 21 5c 32 30 34 2e 00 5c 33 30	"\301\302!\210\303\304!\204..\30
01c0	35 5c 33 30 34 5c 33 30 36 5c 22 5c 32 31 30 5c 33 30 37 5c 33 31 30 08 5c 22 5c 32 31 30 5c 33	5\304\306\"\210\307\310.\"\210\3
01e0	31 31 5c 33 31 32 01 5c 33 31 33 5c 22 5c 32 36 32 01 5c 32 31 31 5c 32 30 33 2d 00 5c 32 31 31	11\312.\313\"\262.\211\203-.\211
0200	40 5c 33 31 34 01 5c 33 30 34 5c 22 5c 32 31 30 01 41 5c 32 36 36 5c 32 30 32 5c 32 30 32 1b 00	@\314.\304\"\210.A\266\202\202..
0220	5c 32 31 30 5c 33 31 33 5c 32 30 37 22 20 5b 75 6e 69 63 6f 64 65 2d 63 61 74 65 67 6f 72 79 2d	\210\313\207".[unicode-category-
0240	74 61 62 6c 65 20 72 65 71 75 69 72 65 20 72 78 20 63 61 74 65 67 6f 72 79 2d 64 6f 63 73 74 72	table.require.rx.category-docstr
0260	69 6e 67 20 38 30 20 64 65 66 69 6e 65 2d 63 61 74 65 67 6f 72 79 20 22 48 61 73 6b 65 6c 6c 20	ing.80.define-category."Haskell.
0280	73 79 6d 62 6f 6c 20 63 6f 6e 73 74 69 74 75 65 6e 74 20 63 68 61 72 61 63 74 65 72 73 22 20 6d	symbol.constituent.characters".m
02a0	61 70 2d 63 68 61 72 2d 74 61 62 6c 65 20 23 5b 35 31 34 20 22 01 3a 5c 32 30 33 5c 66 00 01 40	ap-char-table.#[514.".:\203\f..@
02c0	5c 33 30 30 56 5c 32 30 34 17 00 01 5c 32 34 37 5c 32 30 35 21 00 01 5c 33 30 30 56 5c 32 30 35	\300V\204...\247\205!..\300V\205
02e0	21 00 5c 32 31 31 5c 33 30 31 5c 32 33 35 5c 32 30 35 21 00 5c 33 30 32 02 5c 33 30 33 5c 22 5c	!.\211\301\235\205!.\302.\303\"\
0300	32 30 37 22 20 5b 31 32 38 20 28 50 63 20 50 64 20 50 6f 20 53 6d 20 53 63 20 53 6b 20 53 6f 29	207".[128.(Pc.Pd.Po.Sm.Sc.Sk.So)
0320	20 6d 6f 64 69 66 79 2d 63 61 74 65 67 6f 72 79 2d 65 6e 74 72 79 20 38 30 5d 20 35 20 22 5c 6e	.modify-category-entry.80].5."\n
0340	5c 6e 28 66 6e 20 4b 45 59 20 56 41 4c 29 22 5d 20 22 21 23 24 25 26 2a 2b 2e 2f 3c 3d 3e 3f 40	\n(fn.KEY.VAL)"]."!#$%&*+./<=>?@
0360	5e 7c 7e 5c 5c 2d 3a 22 20 61 70 70 65 6e 64 20 6e 69 6c 20 6d 6f 64 69 66 79 2d 63 61 74 65 67	^|~\\-:".append.nil.modify-categ
0380	6f 72 79 2d 65 6e 74 72 79 5d 20 35 29 0a 23 40 33 30 39 20 52 65 67 65 78 70 20 6d 61 74 63 68	ory-entry].5).#@309.Regexp.match
03a0	69 6e 67 20 61 20 76 61 6c 69 64 20 48 61 73 6b 65 6c 6c 20 6d 6f 64 75 6c 65 20 69 64 65 6e 74	ing.a.valid.Haskell.module.ident
03c0	69 66 69 65 72 2e 0a 0a 4e 6f 74 65 20 74 68 61 74 20 47 48 43 20 61 63 63 65 70 74 73 20 55 6e	ifier...Note.that.GHC.accepts.Un
03e0	69 63 6f 64 65 20 63 61 74 65 67 6f 72 79 20 55 70 70 65 72 63 61 73 65 4c 65 74 74 65 72 20 61	icode.category.UppercaseLetter.a
0400	73 20 61 20 66 69 72 73 74 0a 63 68 61 72 61 63 74 65 72 2e 20 46 6f 6c 6c 6f 77 69 6e 67 20 6c	s.a.first.character..Following.l
0420	65 74 74 65 72 73 20 61 72 65 20 66 72 6f 6d 20 55 6e 69 63 6f 64 65 20 63 61 74 65 67 6f 72 69	etters.are.from.Unicode.categori
0440	65 73 0a 55 70 70 65 72 63 61 73 65 4c 65 74 74 65 72 2c 20 4c 6f 77 65 72 63 61 73 65 4c 65 74	es.UppercaseLetter,.LowercaseLet
0460	74 65 72 2c 20 4f 74 68 65 72 4c 65 74 74 65 72 2c 20 54 69 74 6c 65 63 61 73 65 4c 65 74 74 65	ter,.OtherLetter,.TitlecaseLette
0480	72 2c 0a 4d 6f 64 69 66 69 65 72 4c 65 74 74 65 72 2c 20 44 65 63 69 6d 61 6c 4e 75 6d 62 65 72	r,.ModifierLetter,.DecimalNumber
04a0	2c 20 4f 74 68 65 72 4e 75 6d 62 65 72 2c 20 62 61 63 6b 73 6c 61 73 68 20 6f 72 0a 75 6e 64 65	,.OtherNumber,.backslash.or.unde
04c0	72 73 63 6f 72 65 2e 1f 0a 28 64 65 66 63 6f 6e 73 74 20 68 61 73 6b 65 6c 6c 2d 6c 65 78 65 6d	rscore...(defconst.haskell-lexem
04e0	65 2d 6d 6f 64 69 64 20 22 5b 5b 3a 75 70 70 65 72 3a 5d 5d 5b 5b 3a 61 6c 6e 75 6d 3a 5d 27 5f	e-modid."[[:upper:]][[:alnum:]'_
0500	5d 2a 22 20 28 23 24 20 2e 20 39 31 36 29 29 0a 23 40 31 38 38 20 52 65 67 65 78 70 20 6d 61 74	]*".(#$...916)).#@188.Regexp.mat
0520	63 68 69 6e 67 20 61 20 76 61 6c 69 64 20 48 61 73 6b 65 6c 6c 20 69 64 65 6e 74 69 66 69 65 72	ching.a.valid.Haskell.identifier
0540	2e 0a 0a 47 48 43 20 61 63 63 65 70 74 73 20 61 20 73 74 72 69 6e 67 20 73 74 61 72 74 69 6e 67	...GHC.accepts.a.string.starting
0560	20 77 69 74 68 20 61 6e 79 20 61 6c 70 68 61 62 65 74 69 63 20 63 68 61 72 61 63 74 65 72 20 6f	.with.any.alphabetic.character.o
0580	72 0a 75 6e 64 65 72 73 63 6f 72 65 20 66 6f 6c 6c 6f 77 65 64 20 62 79 20 61 6e 79 20 61 6c 70	r.underscore.followed.by.any.alp
05a0	68 61 6e 75 6d 65 72 69 63 20 63 68 61 72 61 63 74 65 72 20 6f 72 20 75 6e 64 65 72 73 63 6f 72	hanumeric.character.or.underscor
05c0	65 0a 6f 72 20 61 70 6f 73 74 72 6f 70 68 65 2e 1f 0a 28 64 65 66 63 6f 6e 73 74 20 68 61 73 6b	e.or.apostrophe...(defconst.hask
05e0	65 6c 6c 2d 6c 65 78 65 6d 65 2d 69 64 20 22 5b 5b 3a 61 6c 70 68 61 3a 5d 5f 5d 5b 5b 3a 61 6c	ell-lexeme-id."[[:alpha:]_][[:al
0600	6e 75 6d 3a 5d 27 5f 5d 2a 22 20 28 23 24 20 2e 20 31 33 30 32 29 29 0a 23 40 32 30 32 20 52 65	num:]'_]*".(#$...1302)).#@202.Re
0620	67 65 78 70 20 6d 61 74 63 68 69 6e 67 20 61 20 76 61 6c 69 64 20 48 61 73 6b 65 6c 6c 20 76 61	gexp.matching.a.valid.Haskell.va
0640	72 69 61 62 6c 65 20 6f 72 20 63 6f 6e 73 74 72 75 63 74 6f 72 20 73 79 6d 62 6f 6c 2e 0a 0a 47	riable.or.constructor.symbol...G
0660	48 43 20 61 63 63 65 70 74 73 20 61 20 73 74 72 69 6e 67 20 6f 66 20 63 68 61 72 73 20 66 72 6f	HC.accepts.a.string.of.chars.fro
0680	6d 20 74 68 65 20 73 65 74 0a 5b 3a 21 23 24 25 26 2a 2b 2e 2f 3c 3d 3e 3f 40 5e 7c 7e 5c 2d 5d	m.the.set.[:!#$%&*+./<=>?@^|~\-]
06a0	20 6f 72 20 55 6e 69 63 6f 64 65 20 63 61 74 65 67 6f 72 79 20 53 79 6d 62 6f 6c 20 66 6f 72 20	.or.Unicode.category.Symbol.for.
06c0	63 68 61 72 73 20 77 69 74 68 0a 63 6f 64 65 73 20 6c 61 72 67 65 72 20 74 68 61 6e 20 31 32 38	chars.with.codes.larger.than.128
06e0	20 6f 6e 6c 79 2e 1f 0a 28 64 65 66 63 6f 6e 73 74 20 68 61 73 6b 65 6c 6c 2d 6c 65 78 65 6d 65	.only...(defconst.haskell-lexeme
0700	2d 73 79 6d 20 22 5c 5c 63 50 2b 22 20 28 23 24 20 2e 20 31 35 36 36 29 29 0a 23 40 31 31 38 20	-sym."\\cP+".(#$...1566)).#@118.
0720	52 65 67 65 78 70 20 6d 61 74 63 68 69 6e 67 20 66 69 72 73 74 20 63 68 61 72 61 63 74 65 72 20	Regexp.matching.first.character.
0740	6f 66 20 61 20 71 75 61 6c 69 66 69 65 64 20 6f 72 20 75 6e 71 75 61 6c 69 66 69 65 64 0a 69 64	of.a.qualified.or.unqualified.id
0760	65 6e 74 69 66 69 65 72 20 6f 72 20 73 79 6d 62 6f 6c 2e 0a 0a 55 73 65 66 75 6c 20 66 6f 72 20	entifier.or.symbol...Useful.for.
0780	60 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 27 2e 1f 0a 28 64 65 66 63 6f 6e 73 74 20	`re-search-forward'...(defconst.
07a0	68 61 73 6b 65 6c 6c 2d 6c 65 78 65 6d 65 2d 69 64 73 79 6d 2d 66 69 72 73 74 2d 63 68 61 72 20	haskell-lexeme-idsym-first-char.
07c0	22 5c 5c 28 3f 3a 5b 5b 3a 61 6c 70 68 61 3a 5d 5f 5d 5c 5c 7c 5c 5c 63 50 5c 5c 29 22 20 28 23	"\\(?:[[:alpha:]_]\\|\\cP\\)".(#
07e0	24 20 2e 20 31 38 32 34 29 29 0a 23 40 31 38 37 20 52 65 67 65 78 70 20 6d 61 74 63 68 69 6e 67	$...1824)).#@187.Regexp.matching
0800	20 61 20 76 61 6c 69 64 20 48 61 73 6b 65 6c 6c 20 6d 6f 64 75 6c 65 20 70 72 65 66 69 78 2c 20	.a.valid.Haskell.module.prefix,.
0820	70 6f 74 65 6e 74 69 61 6c 6c 79 20 65 6d 70 74 79 2e 0a 0a 4d 6f 64 75 6c 65 20 70 61 74 68 20	potentially.empty...Module.path.
0840	70 72 65 66 69 78 20 69 73 20 73 65 70 61 72 61 74 65 64 20 62 79 20 64 6f 74 73 20 61 6e 64 20	prefix.is.separated.by.dots.and.
0860	66 69 6e 69 73 68 65 73 20 77 69 74 68 20 61 0a 64 6f 74 2e 20 46 6f 72 20 70 61 74 68 20 63 6f	finishes.with.a.dot..For.path.co
0880	6d 70 6f 6e 65 6e 74 20 73 79 6e 74 61 78 20 73 65 65 20 60 68 61 73 6b 65 6c 6c 2d 6c 65 78 65	mponent.syntax.see.`haskell-lexe
08a0	6d 65 2d 6d 6f 64 69 64 27 2e 1f 0a 28 64 65 66 63 6f 6e 73 74 20 68 61 73 6b 65 6c 6c 2d 6c 65	me-modid'...(defconst.haskell-le
08c0	78 65 6d 65 2d 6d 6f 64 69 64 2d 6f 70 74 2d 70 72 65 66 69 78 20 28 63 6f 6e 63 61 74 20 22 5c	xeme-modid-opt-prefix.(concat."\
08e0	5c 28 3f 3a 22 20 68 61 73 6b 65 6c 6c 2d 6c 65 78 65 6d 65 2d 6d 6f 64 69 64 20 22 5c 5c 2e 5c	\(?:".haskell-lexeme-modid."\\.\
0900	5c 29 2a 22 29 20 28 23 24 20 2e 20 32 30 33 33 29 29 0a 23 40 31 31 35 20 52 65 67 65 78 70 20	\)*").(#$...2033)).#@115.Regexp.
0920	6d 61 74 63 68 69 6e 67 20 61 20 76 61 6c 69 64 20 71 75 61 6c 69 66 69 65 64 20 69 64 65 6e 74	matching.a.valid.qualified.ident
0940	69 66 69 65 72 20 6f 72 20 73 79 6d 62 6f 6c 2e 0a 0a 4e 6f 74 65 20 74 68 61 74 20 28 6d 61 74	ifier.or.symbol...Note.that.(mat
0960	63 68 2d 73 74 72 69 6e 67 20 31 29 20 72 65 74 75 72 6e 73 20 74 68 65 20 75 6e 71 75 61 6c 69	ch-string.1).returns.the.unquali
0980	66 69 65 64 20 70 61 72 74 2e 1f 0a 28 64 65 66 63 6f 6e 73 74 20 68 61 73 6b 65 6c 6c 2d 6c 65	fied.part...(defconst.haskell-le
09a0	78 65 6d 65 2d 71 69 64 2d 6f 72 2d 71 73 79 6d 20 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30	xeme-qid-or-qsym.(byte-code."\30
09c0	33 5c 33 30 34 5c 33 30 35 08 44 5c 33 30 36 5c 33 30 37 5c 33 30 35 09 44 5c 33 30 35 5c 6e 44	3\304\305.D\306\307\305.D\305\nD
09e0	45 44 45 21 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 6c 65 78 65 6d 65 2d 6d 6f 64 69 64 2d	EDE!\207".[haskell-lexeme-modid-
0a00	6f 70 74 2d 70 72 65 66 69 78 20 68 61 73 6b 65 6c 6c 2d 6c 65 78 65 6d 65 2d 69 64 20 68 61 73	opt-prefix.haskell-lexeme-id.has
0a20	6b 65 6c 6c 2d 6c 65 78 65 6d 65 2d 73 79 6d 20 72 78 2d 74 6f 2d 73 74 72 69 6e 67 20 3a 20 72	kell-lexeme-sym.rx-to-string.:.r
0a40	65 67 65 78 70 20 67 72 6f 75 70 20 7c 5d 20 38 29 20 28 23 24 20 2e 20 32 33 32 39 29 29 0a 23	egexp.group.|].8).(#$...2329)).#
0a60	40 34 36 31 20 4e 6f 6e 2d 6e 69 6c 20 77 68 65 6e 20 70 6f 69 6e 74 20 69 73 20 6a 75 73 74 20	@461.Non-nil.when.point.is.just.
0a80	69 6e 20 66 72 6f 6e 74 20 6f 66 20 61 6e 20 6f 70 74 69 6f 6e 61 6c 6c 79 20 71 75 61 6c 69 66	in.front.of.an.optionally.qualif
0aa0	69 65 64 0a 69 64 65 6e 74 69 66 69 65 72 20 6f 72 20 73 79 6d 62 6f 6c 2e 0a 0a 55 73 69 6e 67	ied.identifier.or.symbol...Using
0ac0	20 74 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 6d 6f 72 65 20 65 66 66 69 63 69 65 6e 74	.this.function.is.more.efficient
0ae0	20 74 68 61 6e 20 6d 61 74 63 68 69 6e 67 20 61 67 61 69 6e 73 74 20 74 68 65 0a 72 65 67 65 78	.than.matching.against.the.regex
0b00	70 20 60 68 61 73 6b 65 6c 6c 2d 6c 65 78 65 6d 65 2d 71 69 64 2d 6f 72 2d 71 73 79 6d 27 2e 0a	p.`haskell-lexeme-qid-or-qsym'..
0b20	0a 52 65 74 75 72 6e 73 3a 0a 20 20 27 71 69 64 20 2d 20 69 66 20 6d 61 74 63 68 65 64 20 61 20	.Returns:...'qid.-.if.matched.a.
0b40	71 75 61 6c 69 66 69 65 64 20 69 64 3a 20 27 44 61 74 61 2e 4d 61 70 27 20 6f 72 20 27 4d 61 70	qualified.id:.'Data.Map'.or.'Map
0b60	27 0a 20 20 27 71 73 79 6d 20 2d 20 69 66 20 6d 61 74 63 68 65 64 20 61 20 71 75 61 6c 69 66 69	'...'qsym.-.if.matched.a.qualifi
0b80	65 64 20 69 64 3a 20 27 4d 6f 6e 61 64 2e 3e 3e 3d 27 20 6f 72 20 27 3e 3e 3d 27 0a 20 20 27 71	ed.id:.'Monad.>>='.or.'>>='...'q
0ba0	70 72 65 66 69 78 20 2d 20 69 66 20 6d 61 74 63 68 65 64 20 6f 6e 6c 79 20 6d 6f 64 69 64 20 70	prefix.-.if.matched.only.modid.p
0bc0	72 65 66 69 78 3a 20 27 44 61 74 61 2e 27 0a 0a 41 66 74 65 72 20 73 75 63 63 65 73 73 66 75 6c	refix:.'Data.'..After.successful
0be0	20 27 71 69 64 20 6f 72 20 27 71 73 79 6d 20 6d 61 74 63 68 20 28 6d 61 74 63 68 2d 73 74 72 69	.'qid.or.'qsym.match.(match-stri
0c00	6e 67 20 31 29 20 77 69 6c 6c 20 72 65 74 75 72 6e 0a 74 68 65 20 75 6e 71 75 61 6c 69 66 69 65	ng.1).will.return.the.unqualifie
0c20	64 20 70 61 72 74 20 28 69 66 20 61 6e 79 29 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73	d.part.(if.any)...(defalias.'has
0c40	6b 65 6c 6c 2d 6c 65 78 65 6d 65 2d 6c 6f 6f 6b 69 6e 67 2d 61 74 2d 71 69 64 73 79 6d 20 23 5b	kell-lexeme-looking-at-qidsym.#[
0c60	30 20 22 60 5c 33 30 33 20 5c 32 31 32 5c 33 30 34 08 5c 33 30 35 50 21 5c 32 30 33 13 00 5c 33	0."`\303.\212\304.\305P!\203..\3
0c80	30 36 5c 32 32 35 62 5c 32 31 30 5c 32 30 32 04 00 5c 33 30 34 09 21 5c 32 30 33 37 00 5c 33 30	06\225b\210\202..\304.!\2037.\30
0ca0	36 5c 32 32 34 5c 33 30 36 5c 32 32 35 5c 32 31 31 62 5c 32 31 30 5c 33 30 34 5c 33 30 37 21 5c	6\224\306\225\211b\210\304\307!\
0cc0	32 30 33 2a 00 5c 33 30 36 5c 32 32 35 5c 32 36 32 01 5c 33 31 30 04 02 04 04 46 21 5c 32 36 36	203*.\306\225\262.\310....F!\266
0ce0	03 5c 33 31 31 5c 32 30 32 63 00 5c 33 30 34 5c 6e 21 5c 32 30 33 4c 00 5c 33 31 30 02 5c 33 30	.\311\202c.\304\n!\203L.\310.\30
0d00	36 5c 32 32 35 5c 33 30 36 5c 32 32 34 5c 33 30 36 5c 32 32 35 46 21 5c 32 31 30 5c 33 31 32 5c	6\225\306\224\306\225F!\210\312\
0d20	32 30 32 63 00 01 60 5c 32 33 32 5c 32 30 33 5a 00 5c 33 31 30 01 21 5c 32 31 30 5c 33 31 33 5c	202c..`\232\203Z.\310.!\210\313\
0d40	32 30 32 63 00 5c 33 31 30 02 60 5c 33 31 33 5c 32 31 31 46 21 5c 32 31 30 5c 33 31 34 29 5c 32	202c.\310.`\313\211F!\210\314)\2
0d60	30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 6c 65 78 65 6d 65 2d 6d 6f 64 69 64 20 68 61 73 6b 65 6c	07".[haskell-lexeme-modid.haskel
0d80	6c 2d 6c 65 78 65 6d 65 2d 69 64 20 68 61 73 6b 65 6c 6c 2d 6c 65 78 65 6d 65 2d 73 79 6d 20 6d	l-lexeme-id.haskell-lexeme-sym.m
0da0	61 74 63 68 2d 64 61 74 61 20 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 5c 5c 2e 22 20 30 20 22 23 2b	atch-data.looking-at."\\.".0."#+
0dc0	22 20 73 65 74 2d 6d 61 74 63 68 2d 64 61 74 61 20 71 69 64 20 71 73 79 6d 20 6e 69 6c 20 71 70	".set-match-data.qid.qsym.nil.qp
0de0	72 65 66 69 78 5d 20 39 20 28 23 24 20 2e 20 32 36 36 31 29 5d 29 0a 23 40 32 39 37 20 4e 6f 6e	refix].9.(#$...2661)]).#@297.Non
0e00	2d 6e 69 6c 20 77 68 65 6e 20 70 6f 69 6e 74 20 69 73 20 6a 75 73 74 20 69 6e 20 66 72 6f 6e 74	-nil.when.point.is.just.in.front
0e20	20 6f 66 20 61 6e 20 69 64 65 6e 74 69 66 69 65 72 20 71 75 6f 74 65 64 20 77 69 74 68 20 62 61	.of.an.identifier.quoted.with.ba
0e40	63 6b 74 69 63 6b 73 2e 0a 0a 57 68 65 6e 20 6d 61 74 63 68 20 69 73 20 73 75 63 63 65 73 73 66	ckticks...When.match.is.successf
0e60	75 6c 2c 20 6d 61 74 63 68 2d 64 61 74 61 20 77 69 6c 6c 20 63 6f 6e 74 61 69 6e 3a 0a 20 20 28	ul,.match-data.will.contain:...(
0e80	6d 61 74 63 68 2d 74 65 78 74 20 31 29 20 2d 20 6f 70 65 6e 69 6e 67 20 62 61 63 6b 74 69 63 6b	match-text.1).-.opening.backtick
0ea0	0a 20 20 28 6d 61 74 63 68 2d 74 65 78 74 20 32 29 20 2d 20 77 68 6f 6c 65 20 71 75 61 6c 69 66	...(match-text.2).-.whole.qualif
0ec0	69 65 64 20 69 64 65 6e 74 69 66 69 65 72 0a 20 20 28 6d 61 74 63 68 2d 74 65 78 74 20 33 29 20	ied.identifier...(match-text.3).
0ee0	2d 20 75 6e 71 75 61 6c 69 66 69 65 64 20 70 61 72 74 20 6f 66 20 69 64 65 6e 74 69 66 69 65 72	-.unqualified.part.of.identifier
0f00	0a 20 20 28 6d 61 74 63 68 2d 74 65 78 74 20 34 29 20 2d 20 63 6c 6f 73 69 6e 67 20 62 61 63 6b	...(match-text.4).-.closing.back
0f20	74 69 63 6b 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 6c 65 78 65 6d 65 2d	tick..(defalias.'haskell-lexeme-
0f40	6c 6f 6f 6b 69 6e 67 2d 61 74 2d 62 61 63 6b 74 69 63 6b 20 23 5b 30 20 22 5c 33 30 30 20 5c 33	looking-at-backtick.#[0."\300.\3
0f60	30 31 5c 32 31 31 5c 32 31 31 5c 32 31 31 5c 32 31 31 5c 32 31 31 5c 32 31 32 5c 33 30 32 5c 33	01\211\211\211\211\211\212\302\3
0f80	30 33 21 5c 32 30 33 60 00 5c 33 30 34 5c 32 32 34 5c 32 36 32 06 5c 33 30 34 5c 32 32 35 62 5c	03!\203`.\304\224\262.\304\225b\
0fa0	32 31 30 5c 33 30 35 5c 33 30 36 20 21 5c 32 31 30 5c 33 30 37 20 5c 32 30 33 60 00 5c 33 30 34	210\305\306.!\210\307.\203`.\304
0fc0	5c 32 32 34 5c 32 36 32 04 5c 33 31 30 5c 32 32 34 5c 32 36 32 03 5c 33 31 30 5c 32 32 35 5c 32	\224\262.\310\224\262.\310\225\2
0fe0	36 32 02 5c 33 30 34 5c 32 32 35 62 5c 32 31 30 5c 33 30 35 5c 33 30 36 20 21 5c 32 31 30 5c 33	62.\304\225b\210\305\306.!\210\3
1000	30 32 5c 33 30 33 21 5c 32 30 33 60 00 5c 33 30 34 5c 32 32 34 5c 32 36 32 05 5c 33 31 31 5c 33	02\303!\203`.\304\224\262.\311\3
1020	31 32 5c 33 31 33 06 08 06 08 54 06 5c 6e 5c 32 31 31 54 06 5c 6e 06 09 06 0b 06 0b 06 0f 5c 32	12\313....T.\n\211T.\n........\2
1040	31 31 54 5c 32 35 37 5c 6e 5c 22 21 5c 32 31 30 5c 33 31 34 5c 32 36 32 01 29 5c 32 31 31 5c 32	11T\257\n\"!\210\314\262.)\211\2
1060	30 34 6a 00 5c 33 31 31 06 07 21 5c 32 31 30 5c 32 30 37 22 20 5b 6d 61 74 63 68 2d 64 61 74 61	04j.\311..!\210\207".[match-data
1080	20 6e 69 6c 20 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 60 22 20 30 20 66 6f 72 77 61 72 64 2d 63 6f	.nil.looking-at."`".0.forward-co
10a0	6d 6d 65 6e 74 20 62 75 66 66 65 72 2d 73 69 7a 65 20 68 61 73 6b 65 6c 6c 2d 6c 65 78 65 6d 65	mment.buffer-size.haskell-lexeme
10c0	2d 6c 6f 6f 6b 69 6e 67 2d 61 74 2d 71 69 64 73 79 6d 20 31 20 73 65 74 2d 6d 61 74 63 68 2d 64	-looking-at-qidsym.1.set-match-d
10e0	61 74 61 20 6d 61 70 63 61 72 20 23 5b 32 35 37 20 22 5c 33 30 30 20 01 5c 33 30 31 5c 32 32 33	ata.mapcar.#[257."\300..\301\223
1100	5c 32 30 37 22 20 5b 6d 61 6b 65 2d 6d 61 72 6b 65 72 20 6e 69 6c 5d 20 34 20 22 5c 6e 5c 6e 28	\207".[make-marker.nil].4."\n\n(
1120	66 6e 20 50 29 22 5d 20 74 5d 20 32 30 20 28 23 24 20 2e 20 33 35 38 31 29 5d 29 0a 23 40 31 30	fn.P)"].t].20.(#$...3581)]).#@10
1140	35 20 52 65 67 65 78 70 20 6d 61 74 63 68 69 6e 67 20 61 20 76 61 6c 69 64 20 71 75 61 6c 69 66	5.Regexp.matching.a.valid.qualif
1160	69 65 64 20 69 64 65 6e 74 69 66 69 65 72 2e 0a 0a 4e 6f 74 65 20 74 68 61 74 20 28 6d 61 74 63	ied.identifier...Note.that.(matc
1180	68 2d 73 74 72 69 6e 67 20 31 29 20 72 65 74 75 72 6e 73 20 74 68 65 20 75 6e 71 75 61 6c 69 66	h-string.1).returns.the.unqualif
11a0	69 65 64 20 70 61 72 74 2e 1f 0a 28 64 65 66 63 6f 6e 73 74 20 68 61 73 6b 65 6c 6c 2d 6c 65 78	ied.part...(defconst.haskell-lex
11c0	65 6d 65 2d 71 69 64 20 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 32 5c 33 30 33 5c 33 30 34	eme-qid.(byte-code."\302\303\304
11e0	5c 33 30 35 08 44 5c 33 30 36 5c 33 30 35 09 44 44 46 21 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c	\305.D\306\305.DDF!\207".[haskel
1200	6c 2d 6c 65 78 65 6d 65 2d 6d 6f 64 69 64 2d 6f 70 74 2d 70 72 65 66 69 78 20 68 61 73 6b 65 6c	l-lexeme-modid-opt-prefix.haskel
1220	6c 2d 6c 65 78 65 6d 65 2d 69 64 20 72 78 2d 74 6f 2d 73 74 72 69 6e 67 20 3a 20 28 72 65 67 65	l-lexeme-id.rx-to-string.:.(rege
1240	78 70 20 22 27 2a 22 29 20 72 65 67 65 78 70 20 67 72 6f 75 70 5d 20 37 29 20 28 23 24 20 2e 20	xp."'*").regexp.group].7).(#$...
1260	34 34 31 38 29 29 0a 23 40 31 30 31 20 52 65 67 65 78 70 20 6d 61 74 63 68 69 6e 67 20 61 20 76	4418)).#@101.Regexp.matching.a.v
1280	61 6c 69 64 20 71 75 61 6c 69 66 69 65 64 20 73 79 6d 62 6f 6c 2e 0a 0a 4e 6f 74 65 20 74 68 61	alid.qualified.symbol...Note.tha
12a0	74 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 31 29 20 72 65 74 75 72 6e 73 20 74 68 65 20 75	t.(match-string.1).returns.the.u
12c0	6e 71 75 61 6c 69 66 69 65 64 20 70 61 72 74 2e 1f 0a 28 64 65 66 63 6f 6e 73 74 20 68 61 73 6b	nqualified.part...(defconst.hask
12e0	65 6c 6c 2d 6c 65 78 65 6d 65 2d 71 73 79 6d 20 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 32	ell-lexeme-qsym.(byte-code."\302
1300	5c 33 30 33 5c 33 30 34 5c 33 30 35 08 44 5c 33 30 36 5c 33 30 35 09 44 44 46 21 5c 32 30 37 22	\303\304\305.D\306\305.DDF!\207"
1320	20 5b 68 61 73 6b 65 6c 6c 2d 6c 65 78 65 6d 65 2d 6d 6f 64 69 64 2d 6f 70 74 2d 70 72 65 66 69	.[haskell-lexeme-modid-opt-prefi
1340	78 20 68 61 73 6b 65 6c 6c 2d 6c 65 78 65 6d 65 2d 69 64 20 72 78 2d 74 6f 2d 73 74 72 69 6e 67	x.haskell-lexeme-id.rx-to-string
1360	20 3a 20 28 72 65 67 65 78 70 20 22 27 2a 22 29 20 72 65 67 65 78 70 20 67 72 6f 75 70 5d 20 37	.:.(regexp."'*").regexp.group].7
1380	29 20 28 23 24 20 2e 20 34 37 31 37 29 29 0a 23 40 31 32 38 20 52 65 67 65 78 70 20 6d 61 74 63	).(#$...4717)).#@128.Regexp.matc
13a0	68 69 6e 67 20 61 20 66 6c 6f 61 74 69 6e 67 20 70 6f 69 6e 74 2c 20 64 65 63 69 6d 61 6c 2c 20	hing.a.floating.point,.decimal,.
13c0	6f 63 74 61 6c 20 6f 72 20 68 65 78 61 64 65 63 69 6d 61 6c 20 6e 75 6d 62 65 72 2e 0a 0a 4e 6f	octal.or.hexadecimal.number...No
13e0	74 65 20 74 68 61 74 20 6e 65 67 61 74 69 76 65 20 73 69 67 6e 20 63 68 61 72 20 69 73 20 6e 6f	te.that.negative.sign.char.is.no
1400	74 20 70 61 72 74 20 6f 66 20 61 20 6e 75 6d 62 65 72 2e 1f 0a 28 64 65 66 63 6f 6e 73 74 20 68	t.part.of.a.number...(defconst.h
1420	61 73 6b 65 6c 6c 2d 6c 65 78 65 6d 65 2d 6e 75 6d 62 65 72 20 22 5c 5c 28 3f 3a 5b 30 2d 39 5d	askell-lexeme-number."\\(?:[0-9]
1440	2b 5c 5c 2e 5b 30 2d 39 5d 2b 5c 5c 29 5c 5c 28 3f 3a 5b 65 45 5d 5b 2d 2b 5d 3f 5b 30 2d 39 5d	+\\.[0-9]+\\)\\(?:[eE][-+]?[0-9]
1460	2b 5c 5c 29 3f 5c 5c 7c 5b 30 2d 39 5d 2b 5b 65 45 5d 5b 2d 2b 5d 3f 5b 30 2d 39 5d 2b 5c 5c 7c	+\\)?\\|[0-9]+[eE][-+]?[0-9]+\\|
1480	30 5b 78 58 5d 5b 30 2d 39 61 2d 66 41 2d 46 5d 2b 5c 5c 7c 30 5b 6f 4f 5d 5b 30 2d 37 5d 2b 5c	0[xX][0-9a-fA-F]+\\|0[oO][0-7]+\
14a0	5c 7c 5b 30 2d 39 5d 2b 22 20 28 23 24 20 2e 20 35 30 31 33 29 29 0a 23 40 31 36 35 20 52 65 67	\|[0-9]+".(#$...5013)).#@165.Reg
14c0	65 78 70 20 6d 61 74 63 68 69 6e 67 20 61 6e 20 69 6e 73 69 64 65 20 6f 66 20 61 20 63 68 61 72	exp.matching.an.inside.of.a.char
14e0	61 63 74 65 72 20 6c 69 74 65 72 61 6c 2e 0a 0a 4e 6f 74 65 20 74 68 61 74 20 60 68 61 73 6b 65	acter.literal...Note.that.`haske
1500	6c 6c 2d 6c 65 78 65 6d 65 2d 63 68 61 72 2d 6c 69 74 65 72 61 6c 2d 69 6e 73 69 64 65 27 20 6d	ll-lexeme-char-literal-inside'.m
1520	61 74 63 68 65 73 20 73 74 72 69 63 74 6c 79 0a 6f 6e 6c 79 20 65 73 63 61 70 65 20 73 65 71 75	atches.strictly.only.escape.sequ
1540	65 6e 63 65 73 20 64 65 66 69 6e 65 64 20 69 6e 20 48 61 73 6b 65 6c 6c 20 52 65 70 6f 72 74 2e	ences.defined.in.Haskell.Report.
1560	1f 0a 28 64 65 66 63 6f 6e 73 74 20 68 61 73 6b 65 6c 6c 2d 6c 65 78 65 6d 65 2d 63 68 61 72 2d	..(defconst.haskell-lexeme-char-
1580	6c 69 74 65 72 61 6c 2d 69 6e 73 69 64 65 20 22 5b 5e 5c 6e 27 5c 5c 5d 5c 5c 7c 5c 5c 5c 5c 5c	literal-inside."[^\n'\\]\\|\\\\\
15a0	5c 28 3f 3a 61 5c 5c 7c 62 5c 5c 7c 66 5c 5c 7c 6e 5c 5c 7c 72 5c 5c 7c 74 5c 5c 7c 76 5c 5c 7c	\(?:a\\|b\\|f\\|n\\|r\\|t\\|v\\|
15c0	5c 5c 5c 5c 5c 5c 7c 5c 22 5c 5c 7c 27 5c 5c 7c 4e 55 4c 5c 5c 7c 53 4f 48 5c 5c 7c 53 54 58 5c	\\\\\\|\"\\|'\\|NUL\\|SOH\\|STX\
15e0	5c 7c 45 54 58 5c 5c 7c 45 4f 54 5c 5c 7c 45 4e 51 5c 5c 7c 41 43 4b 5c 5c 7c 42 45 4c 5c 5c 7c	\|ETX\\|EOT\\|ENQ\\|ACK\\|BEL\\|
1600	42 53 5c 5c 7c 48 54 5c 5c 7c 4c 46 5c 5c 7c 56 54 5c 5c 7c 46 46 5c 5c 7c 43 52 5c 5c 7c 53 4f	BS\\|HT\\|LF\\|VT\\|FF\\|CR\\|SO
1620	5c 5c 7c 53 49 5c 5c 7c 44 4c 45 5c 5c 7c 44 43 31 5c 5c 7c 44 43 32 5c 5c 7c 44 43 33 5c 5c 7c	\\|SI\\|DLE\\|DC1\\|DC2\\|DC3\\|
1640	44 43 34 5c 5c 7c 4e 41 4b 5c 5c 7c 53 59 4e 5c 5c 7c 45 54 42 5c 5c 7c 43 41 4e 5c 5c 7c 45 4d	DC4\\|NAK\\|SYN\\|ETB\\|CAN\\|EM
1660	5c 5c 7c 53 55 42 5c 5c 7c 45 53 43 5c 5c 7c 46 53 5c 5c 7c 47 53 5c 5c 7c 52 53 5c 5c 7c 55 53	\\|SUB\\|ESC\\|FS\\|GS\\|RS\\|US
1680	5c 5c 7c 53 50 5c 5c 7c 44 45 4c 5c 5c 7c 5b 30 2d 39 5d 2b 5c 5c 7c 78 5b 30 2d 39 61 2d 66 41	\\|SP\\|DEL\\|[0-9]+\\|x[0-9a-fA
16a0	2d 46 5d 2b 5c 5c 7c 6f 5b 30 2d 37 5d 2b 5c 5c 7c 5c 5c 5e 5b 5d 41 2d 5a 40 5e 5f 5c 5c 5b 5d	-F]+\\|o[0-7]+\\|\\^[]A-Z@^_\\[]
16c0	5c 5c 29 22 20 28 23 24 20 2e 20 35 33 30 39 29 29 0a 23 40 35 30 36 20 52 65 67 65 78 70 20 6d	\\)".(#$...5309)).#@506.Regexp.m
16e0	61 74 63 68 69 6e 67 20 61 20 63 68 61 72 61 63 74 65 72 20 6c 69 74 65 72 61 6c 20 6c 6f 6f 6b	atching.a.character.literal.look
1700	61 6c 69 6b 65 2e 0a 0a 4e 6f 74 65 20 74 68 61 74 20 60 68 61 73 6b 65 6c 6c 2d 6c 65 78 65 6d	alike...Note.that.`haskell-lexem
1720	65 2d 2d 63 68 61 72 2d 6c 69 74 65 72 61 6c 2d 72 78 27 20 6d 61 74 63 68 65 73 20 6d 6f 72 65	e--char-literal-rx'.matches.more
1740	20 74 68 61 6e 0a 48 61 73 6b 65 6c 6c 20 52 65 70 6f 72 74 20 73 70 65 63 69 66 69 65 73 20 62	.than.Haskell.Report.specifies.b
1760	65 63 61 75 73 65 20 77 65 20 77 61 6e 74 20 74 6f 20 73 75 70 70 6f 72 74 20 61 6c 73 6f 20 63	ecause.we.want.to.support.also.c
1780	6f 64 65 0a 75 6e 64 65 72 20 65 64 69 74 2e 0a 0a 43 68 61 72 61 63 74 65 72 20 6c 69 74 65 72	ode.under.edit...Character.liter
17a0	61 6c 73 20 65 6e 64 20 77 69 74 68 20 61 20 71 75 6f 74 65 20 6f 72 20 61 20 6e 65 77 6c 69 6e	als.end.with.a.quote.or.a.newlin
17c0	65 20 6f 72 20 65 6e 64 20 6f 66 0a 62 75 66 66 65 72 2e 0a 0a 52 65 67 65 78 70 20 68 61 73 20	e.or.end.of.buffer...Regexp.has.
17e0	73 75 62 67 72 6f 75 70 20 65 78 70 72 65 73 73 69 6f 6e 73 3a 0a 20 28 6d 61 74 63 68 2d 74 65	subgroup.expressions:..(match-te
1800	78 74 20 31 29 20 6d 61 74 63 68 65 73 20 74 68 65 20 6f 70 65 6e 69 6e 67 20 71 75 6f 74 65 2e	xt.1).matches.the.opening.quote.
1820	0a 20 28 6d 61 74 63 68 2d 74 65 78 74 20 32 29 20 6d 61 74 63 68 65 73 20 74 68 65 20 69 6e 73	..(match-text.2).matches.the.ins
1840	69 64 65 20 6f 66 20 74 68 65 20 63 68 61 72 61 63 74 65 72 20 6c 69 74 65 72 61 6c 2e 0a 20 28	ide.of.the.character.literal...(
1860	6d 61 74 63 68 2d 74 65 78 74 20 33 29 20 6d 61 74 63 68 65 73 20 74 68 65 20 63 6c 6f 73 69 6e	match-text.3).matches.the.closin
1880	67 20 71 75 6f 74 65 20 6f 72 20 61 6e 20 65 6d 70 74 79 20 73 74 72 69 6e 67 0a 20 20 20 20 20	g.quote.or.an.empty.string......
18a0	20 20 20 20 20 20 20 20 20 20 20 61 74 20 74 68 65 20 65 6e 64 20 6f 66 20 6c 69 6e 65 20 6f 72	...........at.the.end.of.line.or
18c0	20 74 68 65 20 65 6e 64 20 62 75 66 66 65 72 2e 1f 0a 28 64 65 66 63 6f 6e 73 74 20 68 61 73 6b	.the.end.buffer...(defconst.hask
18e0	65 6c 6c 2d 6c 65 78 65 6d 65 2d 2d 63 68 61 72 2d 6c 69 74 65 72 61 6c 2d 72 78 20 28 72 78 2d	ell-lexeme--char-literal-rx.(rx-
1900	74 6f 2d 73 74 72 69 6e 67 20 27 28 3a 20 28 67 72 6f 75 70 20 22 27 22 29 20 28 7c 20 28 3a 20	to-string.'(:.(group."'").(|.(:.
1920	28 67 72 6f 75 70 20 28 72 65 67 65 78 70 20 22 5b 5b 3a 61 6c 70 68 61 3a 5d 5f 28 5b 5d 22 29	(group.(regexp."[[:alpha:]_([]")
1940	29 20 28 67 72 6f 75 70 20 22 27 22 29 29 20 28 3a 20 28 67 72 6f 75 70 20 28 7c 20 28 72 65 67	).(group."'")).(:.(group.(|.(reg
1960	65 78 70 20 22 5c 5c 5c 5c 5b 5e 5c 6e 5d 5b 5e 27 5c 6e 5d 2a 22 29 20 28 72 65 67 65 78 70 20	exp."\\\\[^\n][^'\n]*").(regexp.
1980	22 5b 5e 5b 3a 61 6c 70 68 61 3a 5d 5f 3a 28 5b 27 5c 6e 5d 5b 5e 27 5c 6e 5d 2a 22 29 29 29 20	"[^[:alpha:]_:(['\n][^'\n]*"))).
19a0	28 7c 20 28 67 72 6f 75 70 20 22 27 22 29 20 22 5c 6e 22 20 28 72 65 67 65 78 70 20 22 5c 5c 27	(|.(group."'")."\n".(regexp."\\'
19c0	22 29 29 29 29 29 29 20 28 23 24 20 2e 20 35 38 34 38 29 29 0a 23 40 34 38 38 20 4e 6f 6e 2d 6e	")))))).(#$...5848)).#@488.Non-n
19e0	69 6c 20 77 68 65 6e 20 70 6f 69 6e 74 20 69 73 20 61 74 20 61 20 63 68 61 72 20 6c 69 74 65 72	il.when.point.is.at.a.char.liter
1a00	61 6c 20 6c 6f 6f 6b 61 6c 69 6b 65 2e 0a 0a 4e 6f 74 65 20 74 68 61 74 20 74 68 69 73 20 66 75	al.lookalike...Note.that.this.fu
1a20	6e 63 74 69 6f 6e 20 6d 61 74 63 68 65 73 20 6d 6f 72 65 20 74 68 61 6e 20 48 61 73 6b 65 6c 6c	nction.matches.more.than.Haskell
1a40	20 52 65 70 6f 72 74 0a 73 70 65 63 69 66 69 65 73 20 62 65 63 61 75 73 65 20 77 65 20 77 61 6e	.Report.specifies.because.we.wan
1a60	74 20 74 6f 20 73 75 70 70 6f 72 74 20 61 6c 73 6f 20 63 6f 64 65 20 75 6e 64 65 72 20 65 64 69	t.to.support.also.code.under.edi
1a80	74 2e 0a 0a 43 68 61 72 20 6c 69 74 65 72 61 6c 73 20 65 6e 64 20 77 69 74 68 20 61 20 71 75 6f	t...Char.literals.end.with.a.quo
1aa0	74 65 20 6f 72 20 61 6e 20 75 6e 65 73 63 61 70 65 64 20 6e 65 77 6c 69 6e 65 20 6f 72 20 65 6e	te.or.an.unescaped.newline.or.en
1ac0	64 0a 6f 66 20 62 75 66 66 65 72 2e 0a 0a 41 66 74 65 72 20 73 75 63 63 65 73 73 66 75 6c 20 6d	d.of.buffer...After.successful.m
1ae0	61 74 63 68 3a 0a 20 28 6d 61 74 63 68 2d 74 65 78 74 20 31 29 20 6d 61 74 63 68 65 73 20 74 68	atch:..(match-text.1).matches.th
1b00	65 20 6f 70 65 6e 69 6e 67 20 71 75 6f 74 65 2e 0a 20 28 6d 61 74 63 68 2d 74 65 78 74 20 32 29	e.opening.quote...(match-text.2)
1b20	20 6d 61 74 63 68 65 73 20 74 68 65 20 69 6e 73 69 64 65 20 6f 66 20 74 68 65 20 63 68 61 72 20	.matches.the.inside.of.the.char.
1b40	6c 69 74 65 72 6c 61 2e 0a 20 28 6d 61 74 63 68 2d 74 65 78 74 20 33 29 20 6d 61 74 63 68 65 73	literla...(match-text.3).matches
1b60	20 74 68 65 20 63 6c 6f 73 69 6e 67 20 71 75 6f 74 65 2c 20 6f 72 20 61 20 63 6c 6f 73 69 6e 67	.the.closing.quote,.or.a.closing
1b80	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 65 77 6c 69 6e 65 20 6f 72 20 69 73 20 6e	.................newline.or.is.n
1ba0	69 6c 20 77 68 65 6e 20 61 74 20 74 68 65 20 65 6e 64 20 6f 66 20 74 68 65 20 62 75 66 66 65 72	il.when.at.the.end.of.the.buffer
1bc0	2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 6c 65 78 65 6d 65 2d 6c 6f 6f	...(defalias.'haskell-lexeme-loo
1be0	6b 69 6e 67 2d 61 74 2d 63 68 61 72 2d 6c 69 74 65 72 61 6c 20 23 5b 30 20 22 5c 33 30 31 08 21	king-at-char-literal.#[0."\301.!
1c00	5c 32 30 35 30 00 5c 33 30 32 5c 33 30 33 5c 32 32 34 5c 33 30 33 5c 32 32 35 5c 33 30 34 5c 32	\2050.\302\303\224\303\225\304\2
1c20	32 34 5c 33 30 34 5c 32 32 35 5c 33 30 35 5c 32 32 34 5c 32 30 36 16 00 5c 33 30 36 5c 32 32 34	24\304\225\305\224\206..\306\224
1c40	5c 33 30 35 5c 32 32 35 5c 32 30 36 1d 00 5c 33 30 36 5c 32 32 35 5c 33 30 37 5c 32 32 34 5c 32	\305\225\206..\306\225\307\224\2
1c60	30 36 24 00 5c 33 31 30 5c 32 32 34 5c 33 30 37 5c 32 32 35 5c 32 30 36 2b 00 5c 33 31 30 5c 32	06$.\310\224\307\225\206+.\310\2
1c80	32 35 5c 32 35 37 08 21 5c 32 31 30 5c 33 31 31 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 6c	25\257.!\210\311\207".[haskell-l
1ca0	65 78 65 6d 65 2d 2d 63 68 61 72 2d 6c 69 74 65 72 61 6c 2d 72 78 20 6c 6f 6f 6b 69 6e 67 2d 61	exeme--char-literal-rx.looking-a
1cc0	74 20 73 65 74 2d 6d 61 74 63 68 2d 64 61 74 61 20 30 20 31 20 32 20 34 20 33 20 35 20 74 5d 20	t.set-match-data.0.1.2.4.3.5.t].
1ce0	39 20 28 23 24 20 2e 20 36 36 31 39 29 5d 29 0a 23 40 32 32 39 20 52 65 67 65 78 70 20 6d 61 74	9.(#$...6619)]).#@229.Regexp.mat
1d00	63 68 69 6e 67 20 61 6e 20 69 74 65 6d 20 74 68 61 74 20 69 73 20 61 20 73 69 6e 67 6c 65 20 63	ching.an.item.that.is.a.single.c
1d20	68 61 72 61 63 74 65 72 20 6f 72 20 61 20 73 69 6e 67 6c 65 0a 65 73 63 61 70 65 20 73 65 71 75	haracter.or.a.single.escape.sequ
1d40	65 6e 63 65 20 69 6e 73 69 64 65 20 6f 66 20 61 20 73 74 72 69 6e 67 20 6c 69 74 65 72 61 6c 2e	ence.inside.of.a.string.literal.
1d60	0a 0a 4e 6f 74 65 20 74 68 61 74 20 60 68 61 73 6b 65 6c 6c 2d 6c 65 78 65 6d 65 2d 73 74 72 69	..Note.that.`haskell-lexeme-stri
1d80	6e 67 2d 6c 69 74 65 72 61 6c 2d 69 6e 73 69 64 65 2d 69 74 65 6d 27 20 6d 61 74 63 68 65 73 0a	ng-literal-inside-item'.matches.
1da0	73 74 72 69 63 74 6c 79 20 6f 6e 6c 79 20 65 73 63 61 70 65 20 73 65 71 75 65 6e 63 65 73 20 64	strictly.only.escape.sequences.d
1dc0	65 66 69 6e 65 64 20 69 6e 20 48 61 73 6b 65 6c 6c 20 52 65 70 6f 72 74 2e 1f 0a 28 64 65 66 63	efined.in.Haskell.Report...(defc
1de0	6f 6e 73 74 20 68 61 73 6b 65 6c 6c 2d 6c 65 78 65 6d 65 2d 73 74 72 69 6e 67 2d 6c 69 74 65 72	onst.haskell-lexeme-string-liter
1e00	61 6c 2d 69 6e 73 69 64 65 2d 69 74 65 6d 20 22 5b 5e 5c 6e 5c 22 5c 5c 5d 5c 5c 7c 5c 5c 5c 5c	al-inside-item."[^\n\"\\]\\|\\\\
1e20	5c 5c 28 3f 3a 61 5c 5c 7c 62 5c 5c 7c 66 5c 5c 7c 6e 5c 5c 7c 72 5c 5c 7c 74 5c 5c 7c 76 5c 5c	\\(?:a\\|b\\|f\\|n\\|r\\|t\\|v\\
1e40	7c 5c 5c 5c 5c 5c 5c 7c 5c 22 5c 5c 7c 27 5c 5c 7c 26 5c 5c 7c 4e 55 4c 5c 5c 7c 53 4f 48 5c 5c	|\\\\\\|\"\\|'\\|&\\|NUL\\|SOH\\
1e60	7c 53 54 58 5c 5c 7c 45 54 58 5c 5c 7c 45 4f 54 5c 5c 7c 45 4e 51 5c 5c 7c 41 43 4b 5c 5c 7c 42	|STX\\|ETX\\|EOT\\|ENQ\\|ACK\\|B
1e80	45 4c 5c 5c 7c 42 53 5c 5c 7c 48 54 5c 5c 7c 4c 46 5c 5c 7c 56 54 5c 5c 7c 46 46 5c 5c 7c 43 52	EL\\|BS\\|HT\\|LF\\|VT\\|FF\\|CR
1ea0	5c 5c 7c 53 4f 5c 5c 7c 53 49 5c 5c 7c 44 4c 45 5c 5c 7c 44 43 31 5c 5c 7c 44 43 32 5c 5c 7c 44	\\|SO\\|SI\\|DLE\\|DC1\\|DC2\\|D
1ec0	43 33 5c 5c 7c 44 43 34 5c 5c 7c 4e 41 4b 5c 5c 7c 53 59 4e 5c 5c 7c 45 54 42 5c 5c 7c 43 41 4e	C3\\|DC4\\|NAK\\|SYN\\|ETB\\|CAN
1ee0	5c 5c 7c 45 4d 5c 5c 7c 53 55 42 5c 5c 7c 45 53 43 5c 5c 7c 46 53 5c 5c 7c 47 53 5c 5c 7c 52 53	\\|EM\\|SUB\\|ESC\\|FS\\|GS\\|RS
1f00	5c 5c 7c 55 53 5c 5c 7c 53 50 5c 5c 7c 44 45 4c 5c 5c 7c 5b 30 2d 39 5d 2b 5c 5c 7c 78 5b 30 2d	\\|US\\|SP\\|DEL\\|[0-9]+\\|x[0-
1f20	39 61 2d 66 41 2d 46 5d 2b 5c 5c 7c 6f 5b 30 2d 37 5d 2b 5c 5c 7c 5c 5c 5e 5b 5d 41 2d 5a 40 5e	9a-fA-F]+\\|o[0-7]+\\|\\^[]A-Z@^
1f40	5f 5c 5c 5b 5d 5c 5c 7c 5b 20 09 5c 6e 0d 0b 5c 66 5d 2a 5c 5c 5c 5c 5c 5c 29 22 20 28 23 24 20	_\\[]\\|[..\n..\f]*\\\\\\)".(#$.
1f60	2e 20 37 34 31 34 29 29 0a 23 40 35 31 34 20 52 65 67 65 78 70 20 6d 61 74 63 68 69 6e 67 20 61	..7414)).#@514.Regexp.matching.a
1f80	20 73 74 72 69 6e 67 20 6c 69 74 65 72 61 6c 20 6c 6f 6f 6b 61 6c 69 6b 65 2e 0a 0a 4e 6f 74 65	.string.literal.lookalike...Note
1fa0	20 74 68 61 74 20 60 68 61 73 6b 65 6c 6c 2d 6c 65 78 65 6d 65 2d 73 74 72 69 6e 67 2d 6c 69 74	.that.`haskell-lexeme-string-lit
1fc0	65 72 61 6c 27 20 6d 61 74 63 68 65 73 20 6d 6f 72 65 20 74 68 61 6e 0a 48 61 73 6b 65 6c 6c 20	eral'.matches.more.than.Haskell.
1fe0	52 65 70 6f 72 74 20 73 70 65 63 69 66 69 65 73 20 62 65 63 61 75 73 65 20 77 65 20 77 61 6e 74	Report.specifies.because.we.want
2000	20 74 6f 20 73 75 70 70 6f 72 74 20 61 6c 73 6f 20 63 6f 64 65 0a 75 6e 64 65 72 20 65 64 69 74	.to.support.also.code.under.edit
2020	2e 0a 0a 53 74 72 69 6e 67 20 6c 69 74 65 72 61 6c 73 20 65 6e 64 20 77 69 74 68 20 64 6f 75 62	...String.literals.end.with.doub
2040	6c 65 20 71 75 6f 74 65 20 6f 72 20 75 6e 65 73 63 61 70 65 64 20 6e 65 77 6c 69 6e 65 20 6f 72	le.quote.or.unescaped.newline.or
2060	20 65 6e 64 0a 6f 66 20 62 75 66 66 65 72 2e 0a 0a 52 65 67 65 78 70 20 68 61 73 20 73 75 62 67	.end.of.buffer...Regexp.has.subg
2080	72 6f 75 70 20 65 78 70 72 65 73 73 69 6f 6e 73 3a 0a 20 28 6d 61 74 63 68 2d 74 65 78 74 20 31	roup.expressions:..(match-text.1
20a0	29 20 6d 61 74 63 68 65 73 20 74 68 65 20 6f 70 65 6e 69 6e 67 20 64 6f 75 62 6c 65 20 71 75 6f	).matches.the.opening.double.quo
20c0	74 65 2e 0a 20 28 6d 61 74 63 68 2d 74 65 78 74 20 32 29 20 6d 61 74 63 68 65 73 20 74 68 65 20	te...(match-text.2).matches.the.
20e0	69 6e 73 69 64 65 20 6f 66 20 74 68 65 20 73 74 72 69 6e 67 2e 0a 20 28 6d 61 74 63 68 2d 74 65	inside.of.the.string...(match-te
2100	78 74 20 33 29 20 6d 61 74 63 68 65 73 20 74 68 65 20 63 6c 6f 73 69 6e 67 20 64 6f 75 62 6c 65	xt.3).matches.the.closing.double
2120	20 71 75 6f 74 65 20 6f 72 20 61 6e 20 65 6d 70 74 79 20 73 74 72 69 6e 67 0a 20 20 20 20 20 20	.quote.or.an.empty.string.......
2140	20 20 20 20 20 20 20 20 20 20 61 74 20 74 68 65 20 65 6e 64 20 6f 66 20 6c 69 6e 65 20 6f 72 20	..........at.the.end.of.line.or.
2160	74 68 65 20 65 6e 64 20 62 75 66 66 65 72 2e 1f 0a 28 64 65 66 63 6f 6e 73 74 20 68 61 73 6b 65	the.end.buffer...(defconst.haske
2180	6c 6c 2d 6c 65 78 65 6d 65 2d 73 74 72 69 6e 67 2d 6c 69 74 65 72 61 6c 20 22 5c 5c 28 5c 22 5c	ll-lexeme-string-literal."\\(\"\
21a0	5c 29 5c 5c 28 5c 5c 28 3f 3a 5c 5c 5c 5c 5b 20 09 5c 6e 0d 0b 5c 66 5d 2a 5c 5c 5c 5c 5c 5c 7c	\)\\(\\(?:\\\\[..\n..\f]*\\\\\\|
21c0	5c 5c 5c 5c 5b 20 09 5c 6e 0d 0b 5c 66 5d 2b 5c 5c 7c 5c 5c 5c 5c 5b 5e 20 09 5c 6e 0d 0b 5c 66	\\\\[..\n..\f]+\\|\\\\[^..\n..\f
21e0	5d 5c 5c 7c 5b 5e 5c 22 5c 6e 5c 5c 5d 2a 5c 5c 29 2a 5c 5c 29 5c 5c 28 5c 22 5c 5c 7c 24 5c 5c	]\\|[^\"\n\\]*\\)*\\)\\(\"\\|$\\
2200	7c 5c 5c 5c 5c 3f 5c 5c 27 5c 5c 29 22 20 28 23 24 20 2e 20 38 30 34 37 29 29 0a 23 40 34 39 34	|\\\\?\\'\\)".(#$...8047)).#@494
2220	20 4e 6f 6e 2d 6e 69 6c 20 77 68 65 6e 20 70 6f 69 6e 74 20 69 73 20 61 74 20 61 20 73 74 72 69	.Non-nil.when.point.is.at.a.stri
2240	6e 67 20 6c 69 74 65 72 61 6c 20 6c 6f 6f 6b 61 6c 69 6b 65 2e 0a 0a 4e 6f 74 65 20 74 68 61 74	ng.literal.lookalike...Note.that
2260	20 74 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 6d 61 74 63 68 65 73 20 6d 6f 72 65 20 74 68 61 6e	.this.function.matches.more.than
2280	20 48 61 73 6b 65 6c 6c 20 52 65 70 6f 72 74 0a 73 70 65 63 69 66 69 65 73 20 62 65 63 61 75 73	.Haskell.Report.specifies.becaus
22a0	65 20 77 65 20 77 61 6e 74 20 74 6f 20 73 75 70 70 6f 72 74 20 61 6c 73 6f 20 63 6f 64 65 20 75	e.we.want.to.support.also.code.u
22c0	6e 64 65 72 20 65 64 69 74 2e 0a 0a 53 74 72 69 6e 67 20 6c 69 74 65 72 61 6c 73 20 65 6e 64 20	nder.edit...String.literals.end.
22e0	77 69 74 68 20 64 6f 75 62 6c 65 20 71 75 6f 74 65 20 6f 72 20 75 6e 65 73 63 61 70 65 64 20 6e	with.double.quote.or.unescaped.n
2300	65 77 6c 69 6e 65 20 6f 72 20 65 6e 64 0a 6f 66 20 62 75 66 66 65 72 2e 0a 0a 41 66 74 65 72 20	ewline.or.end.of.buffer...After.
2320	73 75 63 63 65 73 73 66 75 6c 20 6d 61 74 63 68 3a 0a 20 28 6d 61 74 63 68 2d 74 65 78 74 20 31	successful.match:..(match-text.1
2340	29 20 6d 61 74 63 68 65 73 20 74 68 65 20 6f 70 65 6e 69 6e 67 20 64 6f 75 62 6c 65 71 75 6f 74	).matches.the.opening.doublequot
2360	65 2e 0a 20 28 6d 61 74 63 68 2d 74 65 78 74 20 32 29 20 6d 61 74 63 68 65 73 20 74 68 65 20 69	e...(match-text.2).matches.the.i
2380	6e 73 69 64 65 20 6f 66 20 74 68 65 20 73 74 72 69 6e 67 2e 0a 20 28 6d 61 74 63 68 2d 74 65 78	nside.of.the.string...(match-tex
23a0	74 20 33 29 20 6d 61 74 63 68 65 73 20 74 68 65 20 63 6c 6f 73 69 6e 67 20 71 75 6f 74 65 2c 20	t.3).matches.the.closing.quote,.
23c0	6f 72 20 61 20 63 6c 6f 73 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 65 77	or.a.closing.................new
23e0	6c 69 6e 65 20 6f 72 20 69 73 20 6e 69 6c 20 77 68 65 6e 20 61 74 20 74 68 65 20 65 6e 64 20 6f	line.or.is.nil.when.at.the.end.o
2400	66 20 74 68 65 20 62 75 66 66 65 72 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c	f.the.buffer...(defalias.'haskel
2420	6c 2d 6c 65 78 65 6d 65 2d 6c 6f 6f 6b 69 6e 67 2d 61 74 2d 73 74 72 69 6e 67 2d 6c 69 74 65 72	l-lexeme-looking-at-string-liter
2440	61 6c 20 23 5b 30 20 22 5c 33 30 30 5c 33 30 31 21 5c 32 30 35 5c 32 31 37 00 5c 32 31 32 60 5c	al.#[0."\300\301!\205\217.\212`\
2460	33 30 32 5c 32 32 35 62 5c 32 31 30 5c 33 30 33 5c 32 31 31 5c 32 30 34 77 00 5c 33 30 34 5c 33	302\225b\210\303\211\204w.\304\3
2480	30 35 5c 33 30 33 5c 33 30 36 23 5c 32 30 33 77 00 5c 33 30 37 5c 33 30 32 21 5c 33 31 30 5c 32	05\303\306#\203w.\307\302!\310\2
24a0	33 32 5c 32 30 33 35 00 5c 33 30 30 5c 33 31 31 21 5c 32 30 33 2e 00 5c 33 30 32 5c 32 32 35 62	32\2035.\300\311!\203..\302\225b
24c0	5c 32 31 30 5c 32 30 32 0d 00 60 54 62 5c 32 31 30 5c 32 30 32 0d 00 5c 33 30 37 5c 33 30 32 21	\210\202..`Tb\210\202..\307\302!
24e0	5c 33 30 31 5c 32 33 32 5c 32 30 33 57 00 5c 33 31 32 02 5c 33 30 32 5c 32 32 35 04 5c 32 31 31	\301\232\203W.\312.\302\225.\211
2500	54 06 06 54 5c 33 30 32 5c 32 32 34 5c 33 30 32 5c 32 32 34 5c 33 30 32 5c 32 32 35 5c 32 35 37	T..T\302\224\302\224\302\225\257
2520	08 21 5c 32 31 30 5c 33 31 33 5c 32 36 32 01 5c 32 30 32 0d 00 5c 33 30 37 5c 33 30 32 21 5c 33	.!\210\313\262.\202..\307\302!\3
2540	31 34 5c 32 33 32 5c 32 30 33 0d 00 5c 33 31 32 02 5c 33 30 32 5c 32 32 34 04 5c 32 31 31 54 06	14\232\203..\312.\302\224.\211T.
2560	06 54 5c 33 30 32 5c 32 32 34 5c 33 30 33 5c 32 31 31 5c 32 35 37 08 21 5c 32 31 30 5c 33 31 33	.T\302\224\303\211\257.!\210\313
2580	5c 32 36 32 01 5c 32 30 32 0d 00 5c 32 31 31 5c 32 30 34 5c 32 31 33 00 5c 33 31 32 02 60 04 5c	\262.\202..\211\204\213.\312.`.\
25a0	32 31 31 54 06 06 54 60 5c 33 30 33 5c 32 31 31 5c 32 35 37 08 21 5c 32 31 30 5c 32 36 36 02 29	211T..T`\303\211\257.!\210\266.)
25c0	5c 33 31 33 5c 32 30 37 22 20 5b 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 5c 22 22 20 30 20 6e 69 6c	\313\207".[looking-at."\"".0.nil
25e0	20 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 5b 5c 22 5c 6e 5c 5c 5d 22 20 67 6f	.re-search-forward."[\"\n\\]".go
2600	74 6f 2d 65 6f 62 20 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 22 5c 5c 22 20 22 5b 20 09 5c 6e 0d	to-eob.match-string."\\"."[..\n.
2620	0b 5c 66 5d 2b 5c 5c 5c 5c 3f 22 20 73 65 74 2d 6d 61 74 63 68 2d 64 61 74 61 20 74 20 22 5c 6e	.\f]+\\\\?".set-match-data.t."\n
2640	22 5d 20 31 31 20 28 23 24 20 2e 20 38 37 33 37 29 5d 29 0a 23 40 36 37 30 20 4e 6f 6e 2d 6e 69	"].11.(#$...8737)]).#@670.Non-ni
2660	6c 20 77 68 65 6e 20 70 6f 69 6e 74 20 69 73 20 6a 75 73 74 20 69 6e 20 66 72 6f 6e 74 20 6f 66	l.when.point.is.just.in.front.of
2680	20 54 65 6d 70 6c 61 74 65 20 48 61 73 6b 65 6c 6c 0a 71 75 61 69 73 71 75 6f 74 65 20 6c 69 74	.Template.Haskell.quaisquote.lit
26a0	65 72 61 6c 2e 0a 0a 51 75 61 73 69 20 71 75 6f 74 65 73 20 73 74 61 72 74 20 77 69 74 68 20 27	eral...Quasi.quotes.start.with.'
26c0	5b 78 78 78 7c 27 20 6f 72 20 27 5b 24 78 78 78 7c 27 20 73 65 71 75 65 6e 63 65 20 61 6e 64 20	[xxx|'.or.'[$xxx|'.sequence.and.
26e0	65 6e 64 20 77 69 74 68 0a 20 20 27 7c 5d 27 2e 20 54 68 65 20 27 78 78 78 27 20 69 73 20 61 20	end.with...'|]'..The.'xxx'.is.a.
2700	71 75 6f 74 65 72 20 6e 61 6d 65 2e 20 54 68 65 72 65 20 69 73 20 6e 6f 20 65 73 63 61 70 69 6e	quoter.name..There.is.no.escapin
2720	67 20 6d 65 63 68 61 6e 69 73 6d 0a 70 72 6f 76 69 64 65 64 20 66 6f 72 20 74 68 65 20 65 6e 64	g.mechanism.provided.for.the.end
2740	69 6e 67 20 73 65 71 75 65 6e 63 65 2e 0a 0a 52 65 67 65 78 70 20 68 61 73 20 73 75 62 67 72 6f	ing.sequence...Regexp.has.subgro
2760	75 70 20 65 78 70 72 65 73 73 69 6f 6e 73 3a 0a 20 28 6d 61 74 63 68 2d 74 65 78 74 20 31 29 20	up.expressions:..(match-text.1).
2780	6d 61 74 63 68 65 73 20 74 68 65 20 71 75 6f 74 65 72 20 6e 61 6d 65 20 28 77 69 74 68 6f 75 74	matches.the.quoter.name.(without
27a0	20 24 20 73 69 67 6e 20 69 66 20 70 72 65 73 65 6e 74 29 2e 0a 20 28 6d 61 74 63 68 2d 74 65 78	.$.sign.if.present)...(match-tex
27c0	74 20 32 29 20 6d 61 74 63 68 65 73 20 74 68 65 20 6f 70 65 6e 69 6e 67 20 76 65 72 74 69 63 61	t.2).matches.the.opening.vertica
27e0	6c 20 62 61 72 2e 0a 20 28 6d 61 74 63 68 2d 74 65 78 74 20 33 29 20 6d 61 74 63 68 65 73 20 74	l.bar...(match-text.3).matches.t
2800	68 65 20 69 6e 73 69 64 65 20 6f 66 20 74 68 65 20 71 75 6f 74 65 64 20 73 74 72 69 6e 67 2e 0a	he.inside.of.the.quoted.string..
2820	20 28 6d 61 74 63 68 2d 74 65 78 74 20 34 29 20 6d 61 74 63 68 65 73 20 74 68 65 20 63 6c 6f 73	.(match-text.4).matches.the.clos
2840	69 6e 67 20 76 65 72 74 69 63 61 6c 20 62 61 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ing.vertical.bar................
2860	20 6f 72 20 6e 69 6c 20 69 66 20 61 74 20 74 68 65 20 65 6e 64 20 6f 66 20 74 68 65 20 62 75 66	.or.nil.if.at.the.end.of.the.buf
2880	66 65 72 2e 0a 0a 4e 6f 74 65 20 74 68 61 74 20 74 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 65 78	fer...Note.that.this.function.ex
28a0	63 6c 75 64 65 73 20 27 65 27 2c 20 27 74 27 2c 20 27 64 27 2c 20 27 70 27 20 61 73 20 71 75 6f	cludes.'e',.'t',.'d',.'p'.as.quo
28c0	74 65 72 0a 6e 61 6d 65 73 20 61 63 63 6f 72 64 69 6e 67 20 74 6f 20 54 65 6d 70 6c 61 74 65 20	ter.names.according.to.Template.
28e0	48 61 73 6b 65 6c 6c 20 73 70 65 63 69 66 69 63 61 74 69 6f 6e 2e 1f 0a 28 64 65 66 61 6c 69 61	Haskell.specification...(defalia
2900	73 20 27 68 61 73 6b 65 6c 6c 2d 6c 65 78 65 6d 65 2d 6c 6f 6f 6b 69 6e 67 2d 61 74 2d 71 75 61	s.'haskell-lexeme-looking-at-qua
2920	73 69 2d 71 75 6f 74 65 2d 6c 69 74 65 72 61 6c 20 23 5b 30 20 22 5c 33 30 31 20 5c 33 30 32 5c	si-quote-literal.#[0."\301.\302\
2940	33 30 33 5c 33 30 34 5c 33 30 35 5c 33 30 36 5c 33 30 37 5c 33 31 30 08 44 44 5c 33 31 31 42 42	303\304\305\306\307\310.DD\311BB
2960	42 42 21 21 5c 32 30 33 5c 32 31 34 00 5c 33 31 32 5c 33 31 33 5c 32 32 34 66 21 5c 33 31 34 5c	BB!!\203\214.\312\313\224f!\314\
2980	32 33 32 5c 32 30 33 5c 32 31 34 00 5c 33 31 35 5c 33 31 33 21 5c 33 31 36 5c 32 33 35 5c 32 30	232\203\214.\315\313!\316\235\20
29a0	34 5c 32 31 34 00 5c 32 31 32 5c 33 31 37 5c 32 32 35 62 5c 32 31 30 5c 33 30 31 20 5c 33 32 30	4\214.\212\317\225b\210\301.\320
29c0	5c 33 32 31 5c 33 32 32 5c 33 32 33 23 5c 32 30 35 39 00 5c 33 30 31 20 5c 32 31 31 5c 32 30 33	\321\322\323#\2059.\301.\211\203
29e0	67 00 5c 33 32 34 02 40 02 41 40 5c 33 32 35 05 38 5c 33 32 36 06 06 38 5c 33 32 37 06 07 38 5c	g.\324.@.A@\325.8\326..8\327..8\
2a00	33 33 30 06 08 38 5c 33 33 30 06 09 38 06 08 40 06 09 40 06 5c 6e 40 54 5c 32 35 37 5c 6e 21 5c	330..8\330..8..@..@.\n@T\257\n!\
2a20	32 31 30 5c 32 30 32 5c 32 30 35 00 5c 33 32 34 02 40 64 5c 33 32 35 05 38 5c 33 32 36 06 06 38	210\202\205.\324.@d\325.8\326..8
2a40	5c 33 32 37 06 07 38 5c 33 33 30 06 08 38 5c 33 33 30 06 09 38 64 5c 33 32 32 5c 32 31 31 5c 32	\327..8\330..8\330..8d\322\211\2
2a60	35 37 5c 6e 21 5c 32 31 30 5c 32 36 36 02 29 5c 33 32 33 5c 32 30 32 5c 32 32 31 00 5c 33 32 34	57\n!\210\266.)\323\202\221.\324
2a80	01 21 5c 32 31 30 5c 33 32 32 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 6c 65 78 65 6d 65 2d	.!\210\322\207".[haskell-lexeme-
2aa0	69 64 20 6d 61 74 63 68 2d 64 61 74 61 20 6c 6f 6f 6b 69 6e 67 2d 61 74 20 72 78 2d 74 6f 2d 73	id.match-data.looking-at.rx-to-s
2ac0	74 72 69 6e 67 20 3a 20 22 5b 22 20 28 6f 70 74 69 6f 6e 61 6c 20 22 24 22 29 20 67 72 6f 75 70	tring.:."[".(optional."$").group
2ae0	20 72 65 67 65 78 70 20 28 28 67 72 6f 75 70 20 22 7c 22 29 29 20 68 61 73 6b 65 6c 6c 2d 6c 65	.regexp.((group."|")).haskell-le
2b00	78 65 6d 65 2d 63 6c 61 73 73 69 66 79 2d 62 79 2d 66 69 72 73 74 2d 63 68 61 72 20 31 20 76 61	xeme-classify-by-first-char.1.va
2b20	72 69 64 20 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 28 22 65 22 20 22 74 22 20 22 64 22 20 22 70	rid.match-string.("e"."t"."d"."p
2b40	22 29 20 30 20 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 7c 5d 22 20 6e 69 6c 20	").0.re-search-forward."|]".nil.
2b60	74 20 73 65 74 2d 6d 61 74 63 68 2d 64 61 74 61 20 32 20 33 20 34 20 35 5d 20 31 34 20 28 23 24	t.set-match-data.2.3.4.5].14.(#$
2b80	20 2e 20 39 38 31 38 29 5d 29 0a 23 40 31 31 33 20 43 6c 61 73 73 69 66 79 20 74 6f 6b 65 6e 20	...9818)]).#@113.Classify.token.
2ba0	62 79 20 43 48 41 52 2e 0a 0a 43 48 41 52 20 69 73 20 61 20 63 68 61 72 61 72 61 63 74 65 72 20	by.CHAR...CHAR.is.a.chararacter.
2bc0	74 68 61 74 20 69 73 20 61 73 73 75 6d 65 64 20 74 6f 20 62 65 20 74 68 65 20 66 69 72 73 74 20	that.is.assumed.to.be.the.first.
2be0	63 68 61 72 61 63 74 65 72 0a 6f 66 20 61 20 74 6f 6b 65 6e 2e 0a 0a 28 66 6e 20 43 48 41 52 29	character.of.a.token...(fn.CHAR)
2c00	1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 6c 65 78 65 6d 65 2d 63 6c 61 73	..(defalias.'haskell-lexeme-clas
2c20	73 69 66 79 2d 62 79 2d 66 69 72 73 74 2d 63 68 61 72 20 23 5b 32 35 37 20 22 5c 33 30 30 01 5c	sify-by-first-char.#[257."\300.\
2c40	32 30 36 06 00 5c 33 30 31 5c 33 30 32 5c 22 01 5c 33 30 33 5c 32 33 35 5c 32 30 34 1a 00 01 5c	206..\301\302\".\303\235\204...\
2c60	33 30 34 56 5c 32 30 33 1e 00 5c 32 31 31 5c 33 30 35 5c 32 33 35 5c 32 30 33 1e 00 5c 33 30 36	304V\203..\211\305\235\203..\306
2c80	5c 32 30 32 6d 00 01 5c 33 30 37 5c 32 33 32 5c 32 30 33 28 00 5c 33 31 30 5c 32 30 32 6d 00 01	\202m..\307\232\203(.\310\202m..
2ca0	5c 33 31 31 5c 32 33 32 5c 32 30 33 32 00 5c 33 31 32 5c 32 30 32 6d 00 01 5c 33 31 33 5c 32 33	\311\232\2032.\312\202m..\313\23
2cc0	32 5c 32 30 33 3c 00 5c 33 31 34 5c 32 30 32 6d 00 5c 32 31 31 5c 33 31 35 5c 32 33 35 5c 32 30	2\203<.\314\202m.\211\315\235\20
2ce0	33 46 00 5c 33 31 36 5c 32 30 32 6d 00 01 5c 33 31 37 5c 32 33 32 5c 32 30 34 52 00 5c 32 31 31	3F.\316\202m..\317\232\204R.\211
2d00	5c 33 32 30 5c 32 33 35 5c 32 30 33 56 00 5c 33 32 31 5c 32 30 32 6d 00 01 5c 33 32 32 59 5c 32	\320\235\203V.\321\202m..\322Y\2
2d20	30 33 66 00 01 5c 33 32 33 58 5c 32 30 33 66 00 5c 33 32 34 5c 32 30 32 6d 00 01 5c 33 32 35 5c	03f..\323X\203f.\324\202m..\325\
2d40	32 33 35 5c 32 30 35 6d 00 5c 33 32 36 5c 32 30 37 22 20 5b 67 65 74 2d 63 68 61 72 2d 63 6f 64	235\205m.\326\207".[get-char-cod
2d60	65 2d 70 72 6f 70 65 72 74 79 20 33 32 20 67 65 6e 65 72 61 6c 2d 63 61 74 65 67 6f 72 79 20 28	e-property.32.general-category.(
2d80	33 33 20 33 35 20 33 36 20 33 37 20 33 38 20 34 32 20 34 33 20 34 36 20 34 37 20 36 30 20 36 31	33.35.36.37.38.42.43.46.47.60.61
2da0	20 36 32 20 36 33 20 36 34 20 39 34 20 31 32 34 20 31 32 36 20 39 32 20 34 35 29 20 31 32 37 20	.62.63.64.94.124.126.92.45).127.
2dc0	28 50 63 20 50 64 20 50 6f 20 53 6d 20 53 63 20 53 6b 20 53 6f 29 20 76 61 72 73 79 6d 20 35 38	(Pc.Pd.Po.Sm.Sc.Sk.So).varsym.58
2de0	20 63 6f 6e 73 79 6d 20 33 39 20 63 68 61 72 20 33 34 20 73 74 72 69 6e 67 20 28 4c 75 20 4c 74	.consym.39.char.34.string.(Lu.Lt
2e00	29 20 63 6f 6e 69 64 20 39 35 20 28 4c 6c 20 4c 6f 29 20 76 61 72 69 64 20 34 38 20 35 37 20 6e	).conid.95.(Ll.Lo).varid.48.57.n
2e20	75 6d 62 65 72 20 28 39 33 20 39 31 20 34 30 20 34 31 20 31 32 33 20 31 32 35 20 39 36 20 34 34	umber.(93.91.40.41.123.125.96.44
2e40	20 35 39 29 20 73 70 65 63 69 61 6c 5d 20 34 20 28 23 24 20 2e 20 31 31 31 35 33 29 5d 29 0a 23	.59).special].4.(#$...11153)]).#
2e60	40 31 30 33 30 20 4c 69 6b 65 20 60 6c 6f 6f 6b 69 6e 67 2d 61 74 27 20 62 75 74 20 75 6e 64 65	@1030.Like.`looking-at'.but.unde
2e80	72 73 74 61 6e 64 73 20 48 61 73 6b 65 6c 6c 20 6c 65 78 65 6d 65 73 2e 0a 0a 4d 6f 76 65 73 20	rstands.Haskell.lexemes...Moves.
2ea0	70 6f 69 6e 74 20 66 6f 72 77 61 72 64 20 6f 76 65 72 20 77 68 69 74 65 73 70 61 63 65 2e 20 20	point.forward.over.whitespace...
2ec0	52 65 74 75 72 6e 73 20 61 20 73 79 6d 62 6f 6c 20 64 65 73 63 72 69 62 69 6e 67 0a 74 79 70 65	Returns.a.symbol.describing.type
2ee0	20 6f 66 20 48 61 73 6b 65 6c 6c 20 74 6f 6b 65 6e 20 72 65 63 6f 67 6e 69 7a 65 64 2e 20 20 55	.of.Haskell.token.recognized...U
2f00	73 65 20 60 6d 61 74 63 68 2d 73 74 72 69 6e 67 27 2c 0a 60 6d 61 74 63 68 2d 62 65 67 69 6e 6e	se.`match-string',.`match-beginn
2f20	69 6e 67 27 20 61 6e 64 20 60 6d 61 74 63 68 2d 65 6e 64 27 20 77 69 74 68 20 61 72 67 75 6d 65	ing'.and.`match-end'.with.argume
2f40	6e 74 20 30 20 74 6f 20 71 75 65 72 79 20 6d 61 74 63 68 0a 72 65 73 75 6c 74 2e 0a 0a 50 6f 73	nt.0.to.query.match.result...Pos
2f60	73 69 62 6c 65 20 72 65 73 75 6c 74 73 20 61 72 65 3a 0a 2d 20 27 73 70 65 63 69 61 6c 3a 20 66	sible.results.are:.-.'special:.f
2f80	6f 72 20 63 68 61 72 73 20 5b 5d 28 29 7b 7d 60 2c 3b 0a 2d 20 27 63 6f 6d 6d 65 6e 74 3a 20 66	or.chars.[](){}`,;.-.'comment:.f
2fa0	6f 72 20 73 69 6e 67 6c 65 20 6c 69 6e 65 20 63 6f 6d 6d 65 6e 74 73 0a 2d 20 27 6e 65 73 74 65	or.single.line.comments.-.'neste
2fc0	64 2d 63 6f 6d 6d 65 6e 74 3a 20 66 6f 72 20 6d 75 6c 74 69 6c 69 6e 65 20 63 6f 6d 6d 65 6e 74	d-comment:.for.multiline.comment
2fe0	73 0a 2d 20 27 71 73 79 6d 69 64 3a 20 66 6f 72 20 71 75 61 6c 69 66 69 65 64 20 69 64 65 6e 74	s.-.'qsymid:.for.qualified.ident
3000	69 66 69 65 72 73 20 6f 72 20 73 79 6d 62 6f 6c 73 0a 2d 20 27 73 74 72 69 6e 67 3a 20 66 6f 72	ifiers.or.symbols.-.'string:.for
3020	20 73 74 72 69 6e 67 73 20 6c 69 74 65 72 61 6c 73 0a 2d 20 27 63 68 61 72 3a 20 66 6f 72 20 63	.strings.literals.-.'char:.for.c
3040	68 61 72 20 6c 69 74 65 72 61 6c 73 0a 2d 20 27 6e 75 6d 62 65 72 3a 20 66 6f 72 20 64 65 63 69	har.literals.-.'number:.for.deci
3060	6d 61 6c 2c 20 66 6c 6f 61 74 2c 20 68 65 78 61 64 65 63 69 6d 61 6c 20 61 6e 64 20 6f 63 74 61	mal,.float,.hexadecimal.and.octa
3080	6c 20 6e 75 6d 62 65 72 20 6c 69 74 65 72 61 6c 73 0a 2d 20 27 74 65 6d 70 6c 61 74 65 2d 68 61	l.number.literals.-.'template-ha
30a0	73 6b 65 6c 6c 2d 71 75 6f 74 65 3a 20 66 6f 72 20 61 20 73 74 72 69 6e 67 20 6f 66 20 61 70 6f	skell-quote:.for.a.string.of.apo
30c0	73 74 72 6f 70 68 65 73 20 66 6f 72 20 74 65 6d 70 6c 61 74 65 20 68 61 73 6b 65 6c 6c 0a 2d 20	strophes.for.template.haskell.-.
30e0	27 74 65 6d 70 6c 61 74 65 2d 68 61 73 6b 65 6c 6c 2d 71 75 61 73 69 2d 71 75 6f 74 65 3a 20 66	'template-haskell-quasi-quote:.f
3100	6f 72 20 61 20 73 74 72 69 6e 67 20 6f 66 20 61 70 6f 73 74 72 6f 70 68 65 73 20 66 6f 72 20 74	or.a.string.of.apostrophes.for.t
3120	65 6d 70 6c 61 74 65 20 68 61 73 6b 65 6c 6c 0a 0a 4e 6f 74 65 20 74 68 61 74 20 66 6f 72 20 71	emplate.haskell..Note.that.for.q
3140	75 61 6c 69 66 69 65 64 20 73 79 6d 62 6f 6c 73 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 31	ualified.symbols.(match-string.1
3160	29 20 72 65 74 75 72 6e 73 20 74 68 65 0a 75 6e 71 75 61 6c 69 66 69 65 64 20 69 64 65 6e 74 69	).returns.the.unqualified.identi
3180	66 69 65 72 20 6f 72 20 73 79 6d 62 6f 6c 2e 20 20 46 75 72 74 68 65 72 20 71 75 61 6c 69 66 69	fier.or.symbol...Further.qualifi
31a0	63 61 74 69 6f 6e 20 66 6f 72 0a 73 79 6d 62 6f 6c 20 6f 72 20 69 64 65 6e 74 69 66 69 65 72 20	cation.for.symbol.or.identifier.
31c0	63 61 6e 20 62 65 20 64 6f 6e 65 20 77 69 74 68 3a 0a 0a 20 20 20 28 68 61 73 6b 65 6c 6c 2d 6c	can.be.done.with:.....(haskell-l
31e0	65 78 65 6d 65 2d 63 6c 61 73 73 69 66 79 2d 62 79 2d 66 69 72 73 74 2d 63 68 61 72 20 28 63 68	exeme-classify-by-first-char.(ch
3200	61 72 2d 61 66 74 65 72 20 28 6d 61 74 63 68 2d 62 65 67 69 6e 6e 69 6e 67 20 31 29 29 29 0a 0a	ar-after.(match-beginning.1)))..
3220	53 65 65 20 60 68 61 73 6b 65 6c 6c 2d 6c 65 78 65 6d 65 2d 63 6c 61 73 73 69 66 79 2d 62 79 2d	See.`haskell-lexeme-classify-by-
3240	66 69 72 73 74 2d 63 68 61 72 27 20 66 6f 72 20 64 65 74 61 69 6c 73 2e 0a 0a 28 66 6e 20 26 72	first-char'.for.details...(fn.&r
3260	65 73 74 20 46 4c 41 47 53 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 6c	est.FLAGS)..(defalias.'haskell-l
3280	65 78 65 6d 65 2d 6c 6f 6f 6b 69 6e 67 2d 61 74 2d 74 6f 6b 65 6e 20 23 5b 31 32 38 20 22 5c 33	exeme-looking-at-token.#[128."\3
32a0	30 32 5c 33 30 33 21 5c 33 30 34 56 5c 32 30 34 00 00 5c 33 30 35 01 5c 32 33 35 5c 32 30 34 16	02\303!\304V\204..\305.\235\204.
32c0	00 5c 33 30 36 5c 33 30 37 77 5c 33 30 34 56 5c 32 30 34 00 00 5c 33 30 37 5c 33 31 30 20 01 18	.\306\307w\304V\204..\307\310...
32e0	5c 33 31 31 60 5c 33 31 32 5c 22 5c 33 31 33 5c 32 33 32 5c 32 30 33 33 00 5c 33 31 34 01 5c 33	\311`\312\"\313\232\2033.\314.\3
3300	31 35 20 5c 33 31 36 20 5c 33 30 37 5c 32 32 33 44 21 5c 32 31 30 5c 33 31 37 5c 32 30 32 5c 33	15.\316.\307\223D!\210\317\202\3
3320	30 36 00 5c 33 32 30 5c 33 30 36 21 5c 32 30 33 3d 00 5c 33 30 35 5c 32 30 32 5c 33 30 36 00 5c	06.\320\306!\203=.\305\202\306.\
3340	33 32 30 5c 33 32 31 21 5c 32 30 33 54 00 5c 32 31 32 5c 33 32 32 5c 33 32 33 21 5c 32 31 30 5c	320\321!\203T.\212\322\323!\210\
3360	33 31 34 01 5c 33 31 30 20 44 21 5c 32 31 30 29 5c 33 32 34 5c 32 30 32 5c 33 30 36 00 5c 33 32	314.\310.D!\210)\324\202\306.\32
3380	35 20 5c 32 30 33 5d 00 5c 33 32 36 5c 32 30 32 5c 33 30 36 00 5c 33 32 37 20 5c 32 30 33 66 00	5.\203].\326\202\306.\327.\203f.
33a0	5c 33 33 30 5c 32 30 32 5c 33 30 36 00 5c 33 32 30 5c 33 33 31 21 5c 32 30 33 79 00 5c 33 33 32	\330\202\306.\320\331!\203y.\332
33c0	20 5c 32 30 33 75 00 5c 33 33 33 5c 32 30 32 5c 33 30 36 00 5c 33 33 34 5c 32 30 32 5c 33 30 36	.\203u.\333\202\306.\334\202\306
33e0	00 5c 33 33 35 20 5c 32 30 33 5c 32 35 33 00 5c 33 33 36 20 5c 33 33 37 5c 33 30 34 5c 33 34 30	.\335.\203\253.\336.\337\304\340
3400	5c 33 34 31 5c 33 34 32 05 21 5c 33 34 33 5c 22 5c 33 34 34 24 5c 32 31 36 5c 33 34 35 5c 33 34	\341\342.!\343\"\344$\216\345\34
3420	36 5c 33 34 37 5c 33 30 34 21 5c 22 29 5c 32 36 32 01 5c 32 30 33 5c 32 34 37 00 5c 33 31 34 01	6\347\304!\")\262.\203\247.\314.
3440	5c 33 31 35 20 5c 33 31 36 20 5c 33 30 37 5c 32 32 33 44 21 5c 32 31 30 5c 33 35 30 5c 32 30 32	\315.\316.\307\223D!\210\350\202
3460	5c 33 30 36 00 5c 33 35 31 5c 32 30 32 5c 33 30 36 00 5c 33 32 30 09 21 5c 32 30 33 5c 32 36 35	\306.\351\202\306.\320.!\203\265
3480	00 5c 33 35 32 5c 32 30 32 5c 33 30 36 00 5c 33 32 30 5c 33 35 33 21 5c 32 30 33 5c 32 37 37 00	.\352\202\306.\320\353!\203\277.
34a0	5c 33 35 34 5c 32 30 32 5c 33 30 36 00 5c 33 32 30 5c 33 35 35 21 5c 32 30 35 5c 33 30 36 00 5c	\354\202\306.\320\355!\205\306.\
34c0	33 35 36 29 5c 32 30 37 22 20 5b 63 61 73 65 2d 66 6f 6c 64 2d 73 65 61 72 63 68 20 68 61 73 6b	356)\207".[case-fold-search.hask
34e0	65 6c 6c 2d 6c 65 78 65 6d 65 2d 6e 75 6d 62 65 72 20 73 6b 69 70 2d 73 79 6e 74 61 78 2d 66 6f	ell-lexeme-number.skip-syntax-fo
3500	72 77 61 72 64 20 22 2d 22 20 30 20 6e 65 77 6c 69 6e 65 20 22 5c 6e 22 20 6e 69 6c 20 70 6f 69	rward."-".0.newline."\n".nil.poi
3520	6e 74 2d 6d 61 72 6b 65 72 20 67 65 74 2d 63 68 61 72 2d 70 72 6f 70 65 72 74 79 20 73 79 6e 74	nt-marker.get-char-property.synt
3540	61 78 2d 74 61 62 6c 65 20 28 31 31 29 20 73 65 74 2d 6d 61 74 63 68 2d 64 61 74 61 20 6d 61 6b	ax-table.(11).set-match-data.mak
3560	65 2d 6d 61 72 6b 65 72 20 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e 20 6c 69 74 65 72	e-marker.line-end-position.liter
3580	61 74 65 2d 63 6f 6d 6d 65 6e 74 20 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 7b 2d 22 20 66 6f 72 77	ate-comment.looking-at."{-".forw
35a0	61 72 64 2d 63 6f 6d 6d 65 6e 74 20 31 20 6e 65 73 74 65 64 2d 63 6f 6d 6d 65 6e 74 20 68 61 73	ard-comment.1.nested-comment.has
35c0	6b 65 6c 6c 2d 6c 65 78 65 6d 65 2d 6c 6f 6f 6b 69 6e 67 2d 61 74 2d 63 68 61 72 2d 6c 69 74 65	kell-lexeme-looking-at-char-lite
35e0	72 61 6c 20 63 68 61 72 20 68 61 73 6b 65 6c 6c 2d 6c 65 78 65 6d 65 2d 6c 6f 6f 6b 69 6e 67 2d	ral.char.haskell-lexeme-looking-
3600	61 74 2d 73 74 72 69 6e 67 2d 6c 69 74 65 72 61 6c 20 73 74 72 69 6e 67 20 22 5b 5d 5b 28 29 7b	at-string-literal.string."[][(){
3620	7d 60 2c 3b 5d 22 20 68 61 73 6b 65 6c 6c 2d 6c 65 78 65 6d 65 2d 6c 6f 6f 6b 69 6e 67 2d 61 74	}`,;]".haskell-lexeme-looking-at
3640	2d 71 75 61 73 69 2d 71 75 6f 74 65 2d 6c 69 74 65 72 61 6c 20 74 65 6d 70 6c 61 74 65 2d 68 61	-quasi-quote-literal.template-ha
3660	73 6b 65 6c 6c 2d 71 75 61 73 69 2d 71 75 6f 74 65 20 73 70 65 63 69 61 6c 20 68 61 73 6b 65 6c	skell-quasi-quote.special.haskel
3680	6c 2d 6c 65 78 65 6d 65 2d 6c 6f 6f 6b 69 6e 67 2d 61 74 2d 71 69 64 73 79 6d 20 6d 61 74 63 68	l-lexeme-looking-at-qidsym.match
36a0	2d 64 61 74 61 20 6d 61 6b 65 2d 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 31 5c 33 30 30 5c 33	-data.make-byte-code."\301\300\3
36c0	30 32 5c 22 5c 32 30 37 22 20 76 63 6f 6e 63 61 74 20 76 65 63 74 6f 72 20 5b 73 65 74 2d 6d 61	02\"\207".vconcat.vector.[set-ma
36e0	74 63 68 2d 64 61 74 61 20 65 76 61 70 6f 72 61 74 65 5d 20 33 20 73 74 72 69 6e 67 2d 6d 61 74	tch-data.evaporate].3.string-mat
3700	63 68 20 22 5c 5c 60 2d 2d 2d 2a 5c 5c 27 22 20 6d 61 74 63 68 2d 73 74 72 69 6e 67 2d 6e 6f 2d	ch."\\`---*\\'".match-string-no-
3720	70 72 6f 70 65 72 74 69 65 73 20 63 6f 6d 6d 65 6e 74 20 71 73 79 6d 69 64 20 6e 75 6d 62 65 72	properties.comment.qsymid.number
3740	20 22 27 2b 22 20 74 65 6d 70 6c 61 74 65 2d 68 61 73 6b 65 6c 6c 2d 71 75 6f 74 65 20 22 2e 22	."'+".template-haskell-quote."."
3760	20 69 6c 6c 65 67 61 6c 5d 20 31 30 20 28 23 24 20 2e 20 31 31 38 37 38 29 5d 29 0a 28 70 72 6f	.illegal].10.(#$...11878)]).(pro
3780	76 69 64 65 20 27 68 61 73 6b 65 6c 6c 2d 6c 65 78 65 6d 65 29 0a	vide.'haskell-lexeme).