about summary refs log tree commit diff
path: root/configs/shared/emacs/.emacs.d/elpa/haskell-mode-20180601.143/haskell-indentation.elc
blob: 4d5b998fe25040812cf87750058dc55977acf32e (plain)
ofshex dumpascii
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 62 79 74 65 2d 63 6f 64 65 20 ;;;;;;;;;;;;;;;;;;...(byte-code.
01a0 22 5c 33 30 30 5c 33 30 31 21 5c 32 31 30 5c 33 30 30 5c 33 30 32 21 5c 32 31 30 5c 33 30 33 5c "\300\301!\210\300\302!\210\303\
01c0 33 30 34 5c 33 30 35 5c 33 30 36 5c 33 30 37 5c 33 31 30 5c 33 31 31 5c 33 31 32 5c 33 31 33 5c 304\305\306\307\310\311\312\313\
01e0 33 31 34 26 09 5c 32 31 30 5c 33 31 35 5c 33 31 36 5c 33 31 37 5c 33 32 30 5c 33 32 31 44 44 5c 314&.\210\315\316\317\320\321DD\
0200 33 32 32 5c 33 32 33 5c 33 32 34 5c 33 31 31 5c 33 30 34 26 07 5c 32 31 30 5c 33 31 35 5c 33 32 322\323\324\311\304&.\210\315\32
0220 35 5c 33 31 37 5c 33 32 30 5c 33 32 36 44 44 5c 33 32 37 5c 33 32 33 5c 33 32 34 5c 33 31 31 5c 5\317\320\326DD\327\323\324\311\
0240 33 30 34 26 07 5c 32 31 30 5c 33 31 35 5c 33 33 30 5c 33 31 37 5c 33 32 30 5c 33 33 31 44 44 5c 304&.\210\315\330\317\320\331DD\
0260 33 33 32 5c 33 32 33 5c 33 32 34 5c 33 31 31 5c 33 30 34 26 07 5c 32 31 30 5c 33 31 35 5c 33 33 332\323\324\311\304&.\210\315\33
0280 33 5c 33 31 37 5c 33 32 30 5c 33 33 34 44 44 5c 33 33 35 5c 33 32 33 5c 33 32 34 5c 33 31 31 5c 3\317\320\334DD\335\323\324\311\
02a0 33 30 34 26 07 5c 32 31 30 5c 33 31 35 5c 33 33 36 5c 33 31 37 5c 33 32 30 5c 33 33 37 44 44 5c 304&.\210\315\336\317\320\337DD\
02c0 33 34 30 5c 33 32 33 5c 33 32 34 5c 33 31 31 5c 33 30 34 26 07 5c 32 31 30 5c 33 31 35 5c 33 34 340\323\324\311\304&.\210\315\34
02e0 31 5c 33 31 37 5c 33 32 30 5c 33 34 32 44 44 5c 33 34 33 5c 33 32 33 5c 33 34 34 5c 33 31 31 5c 1\317\320\342DD\343\323\344\311\
0300 33 30 34 26 07 5c 32 31 30 5c 33 34 35 5c 33 34 31 21 5c 32 30 37 22 20 5b 72 65 71 75 69 72 65 304&.\210\345\341!\207".[require
0320 20 63 6c 2d 6c 69 62 20 68 61 73 6b 65 6c 6c 2d 6c 65 78 65 6d 65 20 63 75 73 74 6f 6d 2d 64 65 .cl-lib.haskell-lexeme.custom-de
0340 63 6c 61 72 65 2d 67 72 6f 75 70 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 clare-group.haskell-indentation.
0360 6e 69 6c 20 22 48 61 73 6b 65 6c 6c 20 69 6e 64 65 6e 74 61 74 69 6f 6e 2e 22 20 3a 6c 69 6e 6b nil."Haskell.indentation.".:link
0380 20 28 63 75 73 74 6f 6d 2d 6d 61 6e 75 61 6c 20 22 28 68 61 73 6b 65 6c 6c 2d 6d 6f 64 65 29 49 .(custom-manual."(haskell-mode)I
03a0 6e 64 65 6e 74 61 74 69 6f 6e 22 29 20 3a 67 72 6f 75 70 20 68 61 73 6b 65 6c 6c 20 3a 70 72 65 ndentation").:group.haskell.:pre
03c0 66 69 78 20 22 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 22 20 63 75 73 74 6f fix."haskell-indentation-".custo
03e0 6d 2d 64 65 63 6c 61 72 65 2d 76 61 72 69 61 62 6c 65 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e m-declare-variable.haskell-inden
0400 74 61 74 69 6f 6e 2d 6c 61 79 6f 75 74 2d 6f 66 66 73 65 74 20 66 75 6e 63 61 6c 6c 20 66 75 6e tation-layout-offset.funcall.fun
0420 63 74 69 6f 6e 20 23 5b 30 20 22 5c 33 30 30 5c 32 30 37 22 20 5b 32 5d 20 31 5d 20 22 45 78 74 ction.#[0."\300\207".[2].1]."Ext
0440 72 61 20 69 6e 64 65 6e 74 61 74 69 6f 6e 20 74 6f 20 61 64 64 20 62 65 66 6f 72 65 20 65 78 70 ra.indentation.to.add.before.exp
0460 72 65 73 73 69 6f 6e 73 20 69 6e 20 61 20 48 61 73 6b 65 6c 6c 20 6c 61 79 6f 75 74 20 6c 69 73 ressions.in.a.Haskell.layout.lis
0480 74 2e 22 20 3a 74 79 70 65 20 69 6e 74 65 67 65 72 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 t.".:type.integer.haskell-indent
04a0 61 74 69 6f 6e 2d 73 74 61 72 74 65 72 2d 6f 66 66 73 65 74 20 23 5b 30 20 22 5c 33 30 30 5c 32 ation-starter-offset.#[0."\300\2
04c0 30 37 22 20 5b 32 5d 20 31 5d 20 22 45 78 74 72 61 20 69 6e 64 65 6e 74 61 74 69 6f 6e 20 61 66 07".[2].1]."Extra.indentation.af
04e0 74 65 72 20 61 6e 20 6f 70 65 6e 69 6e 67 20 6b 65 79 77 6f 72 64 20 28 65 2e 67 2e 20 5c 22 6c ter.an.opening.keyword.(e.g..\"l
0500 65 74 5c 22 29 2e 22 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 6c 65 66 74 et\").".haskell-indentation-left
0520 2d 6f 66 66 73 65 74 20 23 5b 30 20 22 5c 33 30 30 5c 32 30 37 22 20 5b 32 5d 20 31 5d 20 22 45 -offset.#[0."\300\207".[2].1]."E
0540 78 74 72 61 20 69 6e 64 65 6e 74 61 74 69 6f 6e 20 61 66 74 65 72 20 61 6e 20 69 6e 64 65 6e 74 xtra.indentation.after.an.indent
0560 61 74 69 6f 6e 20 74 6f 20 74 68 65 20 6c 65 66 74 20 28 65 2e 67 2e 20 61 66 74 65 72 20 5c 22 ation.to.the.left.(e.g..after.\"
0580 64 6f 5c 22 29 2e 22 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 77 68 65 72 do\").".haskell-indentation-wher
05a0 65 2d 70 72 65 2d 6f 66 66 73 65 74 20 23 5b 30 20 22 5c 33 30 30 5c 32 30 37 22 20 5b 32 5d 20 e-pre-offset.#[0."\300\207".[2].
05c0 31 5d 20 22 45 78 74 72 61 20 69 6e 64 65 6e 74 61 74 69 6f 6e 20 62 65 66 6f 72 65 20 74 68 65 1]."Extra.indentation.before.the
05e0 20 6b 65 79 77 6f 72 64 20 5c 22 77 68 65 72 65 5c 22 2e 22 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 .keyword.\"where\".".haskell-ind
0600 65 6e 74 61 74 69 6f 6e 2d 77 68 65 72 65 2d 70 6f 73 74 2d 6f 66 66 73 65 74 20 23 5b 30 20 22 entation-where-post-offset.#[0."
0620 5c 33 30 30 5c 32 30 37 22 20 5b 32 5d 20 31 5d 20 22 45 78 74 72 61 20 69 6e 64 65 6e 74 61 74 \300\207".[2].1]."Extra.indentat
0640 69 6f 6e 20 61 66 74 65 72 20 74 68 65 20 6b 65 79 77 6f 72 64 20 5c 22 77 68 65 72 65 5c 22 2e ion.after.the.keyword.\"where\".
0660 22 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 65 6c 65 63 74 72 69 63 2d 66 ".haskell-indentation-electric-f
0680 6c 61 67 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 4e 6f 6e lag.#[0."\300\207".[nil].1]."Non
06a0 2d 6e 69 6c 20 6d 65 61 6e 73 20 69 6e 73 65 72 74 69 6f 6e 20 6f 66 20 73 6f 6d 65 20 63 68 61 -nil.means.insertion.of.some.cha
06c0 72 61 63 74 65 72 73 20 6d 61 79 20 61 75 74 6f 20 72 65 69 6e 64 65 6e 74 20 74 68 65 20 6c 69 racters.may.auto.reindent.the.li
06e0 6e 65 2e 5c 6e 49 66 20 74 68 65 20 76 61 72 69 61 62 6c 65 20 60 65 6c 65 63 74 72 69 63 2d 69 ne.\nIf.the.variable.`electric-i
0700 6e 64 65 6e 74 2d 6d 6f 64 65 27 20 69 73 20 6e 6f 6e 2d 6e 69 6c 20 74 68 65 6e 20 74 68 69 73 ndent-mode'.is.non-nil.then.this
0720 20 76 61 72 69 61 62 6c 65 20 69 73 5c 6e 6f 76 65 72 72 69 64 64 65 6e 2e 22 20 73 79 6d 62 6f .variable.is\noverridden.".symbo
0740 6c 20 6d 61 6b 65 2d 76 61 72 69 61 62 6c 65 2d 62 75 66 66 65 72 2d 6c 6f 63 61 6c 5d 20 31 30 l.make-variable-buffer-local].10
0760 29 0a 23 40 34 30 20 4b 65 79 6d 61 70 20 66 6f 72 20 60 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e ).#@40.Keymap.for.`haskell-inden
0780 74 61 74 69 6f 6e 2d 6d 6f 64 65 27 2e 1f 0a 28 64 65 66 76 61 72 20 68 61 73 6b 65 6c 6c 2d 69 tation-mode'...(defvar.haskell-i
07a0 6e 64 65 6e 74 61 74 69 6f 6e 2d 6d 6f 64 65 2d 6d 61 70 20 28 62 79 74 65 2d 63 6f 64 65 20 22 ndentation-mode-map.(byte-code."
07c0 5c 33 30 30 20 5c 33 30 31 01 5c 33 30 32 5c 33 30 33 23 5c 32 31 30 5c 33 30 31 01 5c 33 30 34 \300.\301.\302\303#\210\301.\304
07e0 5c 33 30 35 23 5c 32 31 30 5c 33 30 31 01 5c 33 30 36 5c 33 30 37 23 5c 32 31 30 5c 33 30 31 01 \305#\210\301.\306\307#\210\301.
0800 5c 33 31 30 5c 33 30 37 23 5c 32 31 30 5c 33 30 31 01 5c 33 31 31 5c 33 30 37 23 5c 32 31 30 5c \310\307#\210\301.\311\307#\210\
0820 33 30 31 01 5c 33 31 32 5c 33 30 37 23 5c 32 31 30 5c 33 30 31 01 5c 33 31 33 5c 33 30 37 23 5c 301.\312\307#\210\301.\313\307#\
0840 32 31 30 5c 32 31 31 5c 32 30 37 22 20 5b 6d 61 6b 65 2d 73 70 61 72 73 65 2d 6b 65 79 6d 61 70 210\211\207".[make-sparse-keymap
0860 20 64 65 66 69 6e 65 2d 6b 65 79 20 22 0d 22 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 .define-key.".".haskell-indentat
0880 69 6f 6e 2d 6e 65 77 6c 69 6e 65 2d 61 6e 64 2d 69 6e 64 65 6e 74 20 5b 62 61 63 6b 74 61 62 5d ion-newline-and-indent.[backtab]
08a0 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 69 6e 64 65 6e 74 2d 62 61 63 6b .haskell-indentation-indent-back
08c0 77 61 72 64 73 20 22 2c 22 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 63 6f wards.",".haskell-indentation-co
08e0 6d 6d 6f 6e 2d 65 6c 65 63 74 72 69 63 2d 63 6f 6d 6d 61 6e 64 20 22 3b 22 20 22 29 22 20 22 7d mmon-electric-command.";".")"."}
0900 22 20 22 5d 22 5d 20 35 29 20 28 23 24 20 2e 20 31 38 39 35 29 29 0a 23 40 31 31 37 20 4e 6f 6e "."]"].5).(#$...1895)).#@117.Non
0920 2d 6e 69 6c 20 69 66 20 48 61 73 6b 65 6c 6c 2d 49 6e 64 65 6e 74 61 74 69 6f 6e 20 6d 6f 64 65 -nil.if.Haskell-Indentation.mode
0940 20 69 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 .is.enabled..Use.the.command.`ha
0960 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 6d 6f 64 65 27 20 74 6f 20 63 68 61 6e 67 skell-indentation-mode'.to.chang
0980 65 20 74 68 69 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 e.this.variable...(defvar.haskel
09a0 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 6d 6f 64 65 20 6e 69 6c 20 28 23 24 20 2e 20 32 33 33 l-indentation-mode.nil.(#$...233
09c0 33 29 29 0a 28 6d 61 6b 65 2d 76 61 72 69 61 62 6c 65 2d 62 75 66 66 65 72 2d 6c 6f 63 61 6c 20 3)).(make-variable-buffer-local.
09e0 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 6d 6f 64 65 29 0a 23 40 31 38 35 'haskell-indentation-mode).#@185
0a00 20 48 61 73 6b 65 6c 6c 20 69 6e 64 65 6e 74 61 74 69 6f 6e 20 6d 6f 64 65 20 74 68 61 74 20 64 .Haskell.indentation.mode.that.d
0a20 65 61 6c 73 20 77 69 74 68 20 74 68 65 20 6c 61 79 6f 75 74 20 72 75 6c 65 2e 0a 49 74 20 72 65 eals.with.the.layout.rule..It.re
0a40 62 69 6e 64 73 20 52 45 54 2c 20 44 45 4c 20 61 6e 64 20 42 41 43 4b 53 50 41 43 45 2c 20 73 6f binds.RET,.DEL.and.BACKSPACE,.so
0a60 20 74 68 61 74 20 69 6e 64 65 6e 74 61 74 69 6f 6e 73 20 63 61 6e 20 62 65 0a 73 65 74 20 61 6e .that.indentations.can.be.set.an
0a80 64 20 64 65 6c 65 74 65 64 20 61 73 20 69 66 20 74 68 65 79 20 77 65 72 65 20 72 65 61 6c 20 74 d.deleted.as.if.they.were.real.t
0aa0 61 62 73 2e 0a 0a 28 66 6e 20 26 6f 70 74 69 6f 6e 61 6c 20 41 52 47 29 1f 0a 28 64 65 66 61 6c abs...(fn.&optional.ARG)..(defal
0ac0 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 6d 6f 64 65 20 23 5b ias.'haskell-indentation-mode.#[
0ae0 32 35 36 20 22 5c 33 30 34 20 01 5c 33 30 35 3d 5c 32 30 33 0d 00 08 3f 5c 32 30 32 12 00 5c 33 256."\304..\305=\203...?\202..\3
0b00 30 36 02 21 5c 33 30 37 56 10 5c 33 31 30 5c 33 30 32 21 5c 32 31 30 5c 33 31 30 5c 33 30 33 21 06.!\307V.\310\302!\210\310\303!
0b20 5c 32 31 30 08 5c 32 30 33 3e 00 5c 33 31 31 5c 33 30 31 21 5c 32 30 33 32 00 09 5c 32 30 33 32 \210.\203>.\311\301!\2032..\2032
0b40 00 5c 33 31 32 5c 33 31 33 21 5c 32 30 33 32 00 5c 33 31 33 20 5c 32 31 30 5c 33 31 34 5c 33 30 .\312\313!\2032.\313.\210\314\30
0b60 32 21 5c 32 31 30 5c 33 31 35 12 5c 33 31 34 5c 33 30 33 21 5c 32 31 30 5c 33 31 36 13 5c 33 31 2!\210\315.\314\303!\210\316.\31
0b80 37 5c 33 32 30 08 5c 32 30 33 48 00 5c 33 32 31 5c 32 30 32 49 00 5c 33 32 32 5c 22 5c 32 31 30 7\320.\203H.\321\202I.\322\"\210
0ba0 5c 33 32 33 5c 33 32 34 21 5c 32 30 33 6d 00 5c 33 30 34 20 5c 32 30 33 5d 00 5c 32 31 31 5c 33 \323\324!\203m.\304.\203].\211\3
0bc0 30 34 20 5c 32 33 32 5c 32 30 33 6d 00 5c 33 32 35 5c 33 32 36 5c 33 32 37 08 5c 32 30 33 68 00 04.\232\203m.\325\326\327.\203h.
0be0 5c 33 33 30 5c 32 30 32 69 00 5c 33 33 31 03 23 5c 32 36 36 02 5c 32 31 30 5c 33 33 32 20 5c 32 \330\202i.\331.#\266.\210\332.\2
0c00 31 30 08 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 6d 6f 10.\207".[haskell-indentation-mo
0c20 64 65 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 6d 6f 64 65 20 69 6e 64 65 6e 74 2d 6c 69 de.haskell-indent-mode.indent-li
0c40 6e 65 2d 66 75 6e 63 74 69 6f 6e 20 69 6e 64 65 6e 74 2d 72 65 67 69 6f 6e 2d 66 75 6e 63 74 69 ne-function.indent-region-functi
0c60 6f 6e 20 63 75 72 72 65 6e 74 2d 6d 65 73 73 61 67 65 20 74 6f 67 67 6c 65 20 70 72 65 66 69 78 on.current-message.toggle.prefix
0c80 2d 6e 75 6d 65 72 69 63 2d 76 61 6c 75 65 20 30 20 6b 69 6c 6c 2d 6c 6f 63 61 6c 2d 76 61 72 69 -numeric-value.0.kill-local-vari
0ca0 61 62 6c 65 20 62 6f 75 6e 64 70 20 66 62 6f 75 6e 64 70 20 74 75 72 6e 2d 6f 66 66 2d 68 61 73 able.boundp.fboundp.turn-off-has
0cc0 6b 65 6c 6c 2d 69 6e 64 65 6e 74 20 6d 61 6b 65 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 20 kell-indent.make-local-variable.
0ce0 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 69 6e 64 65 6e 74 2d 6c 69 6e 65 20 haskell-indentation-indent-line.
0d00 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 69 6e 64 65 6e 74 2d 72 65 67 69 6f haskell-indentation-indent-regio
0d20 6e 20 72 75 6e 2d 68 6f 6f 6b 73 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d n.run-hooks.haskell-indentation-
0d40 6d 6f 64 65 2d 68 6f 6f 6b 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 6d 6f mode-hook.haskell-indentation-mo
0d60 64 65 2d 6f 6e 2d 68 6f 6f 6b 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 6d de-on-hook.haskell-indentation-m
0d80 6f 64 65 2d 6f 66 66 2d 68 6f 6f 6b 20 63 61 6c 6c 65 64 2d 69 6e 74 65 72 61 63 74 69 76 65 6c ode-off-hook.called-interactivel
0da0 79 2d 70 20 61 6e 79 20 22 20 69 6e 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 22 20 6d 65 73 y-p.any.".in.current.buffer".mes
0dc0 73 61 67 65 20 22 48 61 73 6b 65 6c 6c 2d 49 6e 64 65 6e 74 61 74 69 6f 6e 20 6d 6f 64 65 20 25 sage."Haskell-Indentation.mode.%
0de0 73 61 62 6c 65 64 25 73 22 20 22 65 6e 22 20 22 64 69 73 22 20 66 6f 72 63 65 2d 6d 6f 64 65 2d sabled%s"."en"."dis".force-mode-
0e00 6c 69 6e 65 2d 75 70 64 61 74 65 5d 20 37 20 28 23 24 20 2e 20 32 35 36 31 29 20 28 62 79 74 65 line-update].7.(#$...2561).(byte
0e20 2d 63 6f 64 65 20 22 08 5c 32 30 36 05 00 5c 33 30 31 43 5c 32 30 37 22 20 5b 63 75 72 72 65 6e -code.".\206..\301C\207".[curren
0e40 74 2d 70 72 65 66 69 78 2d 61 72 67 20 74 6f 67 67 6c 65 5d 20 31 29 5d 29 0a 23 40 31 38 39 20 t-prefix-arg.toggle].1)]).#@189.
0e60 48 6f 6f 6b 20 72 75 6e 20 61 66 74 65 72 20 65 6e 74 65 72 69 6e 67 20 6f 72 20 6c 65 61 76 69 Hook.run.after.entering.or.leavi
0e80 6e 67 20 60 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 6d 6f 64 65 27 2e 0a 4e ng.`haskell-indentation-mode'..N
0ea0 6f 20 70 72 6f 62 6c 65 6d 73 20 72 65 73 75 6c 74 20 69 66 20 74 68 69 73 20 76 61 72 69 61 62 o.problems.result.if.this.variab
0ec0 6c 65 20 69 73 20 6e 6f 74 20 62 6f 75 6e 64 2e 0a 60 61 64 64 2d 68 6f 6f 6b 27 20 61 75 74 6f le.is.not.bound..`add-hook'.auto
0ee0 6d 61 74 69 63 61 6c 6c 79 20 62 69 6e 64 73 20 69 74 2e 20 20 28 54 68 69 73 20 69 73 20 74 72 matically.binds.it...(This.is.tr
0f00 75 65 20 66 6f 72 20 61 6c 6c 20 68 6f 6f 6b 20 76 61 72 69 61 62 6c 65 73 2e 29 1f 0a 28 64 65 ue.for.all.hook.variables.)..(de
0f20 66 76 61 72 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 6d 6f 64 65 2d 68 6f fvar.haskell-indentation-mode-ho
0f40 6f 6b 20 6e 69 6c 20 28 23 24 20 2e 20 33 36 38 30 29 29 0a 28 62 79 74 65 2d 63 6f 64 65 20 22 ok.nil.(#$...3680)).(byte-code."
0f60 5c 33 30 31 5c 33 30 32 5c 33 30 33 08 5c 33 30 33 5c 32 31 31 25 5c 32 30 37 22 20 5b 68 61 73 \301\302\303.\303\211%\207".[has
0f80 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 6d 6f 64 65 2d 6d 61 70 20 61 64 64 2d 6d 69 kell-indentation-mode-map.add-mi
0fa0 6e 6f 72 2d 6d 6f 64 65 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 6d 6f 64 nor-mode.haskell-indentation-mod
0fc0 65 20 6e 69 6c 5d 20 36 29 0a 23 40 34 35 20 54 75 72 6e 20 6f 6e 20 74 68 65 20 68 61 73 6b 65 e.nil].6).#@45.Turn.on.the.haske
0fe0 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 6d 69 6e 6f 72 20 6d 6f 64 65 2e 1f 0a 28 64 65 66 ll-indentation.minor.mode...(def
1000 61 6c 69 61 73 20 27 74 75 72 6e 2d 6f 6e 2d 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 alias.'turn-on-haskell-indentati
1020 6f 6e 20 23 5b 30 20 22 5c 33 30 30 5c 33 30 31 21 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d on.#[0."\300\301!\207".[haskell-
1040 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 6d 6f 64 65 20 74 5d 20 32 20 28 23 24 20 2e 20 34 30 34 37 indentation-mode.t].2.(#$...4047
1060 29 20 6e 69 6c 5d 29 0a 28 6d 61 6b 65 2d 6f 62 73 6f 6c 65 74 65 20 27 74 75 72 6e 2d 6f 6e 2d ).nil]).(make-obsolete.'turn-on-
1080 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 haskell-indentation.'haskell-ind
10a0 65 6e 74 61 74 69 6f 6e 2d 6d 6f 64 65 20 22 32 30 31 35 2d 30 35 2d 32 35 22 29 0a 23 40 37 37 entation-mode."2015-05-25").#@77
10c0 20 52 65 74 75 72 6e 20 74 20 69 66 20 74 68 69 73 20 69 73 20 61 20 6c 69 74 65 72 61 74 65 20 .Return.t.if.this.is.a.literate.
10e0 48 61 73 6b 65 6c 6c 20 62 75 66 66 65 72 20 69 6e 20 62 69 72 64 20 73 74 79 6c 65 2c 20 4e 49 Haskell.buffer.in.bird.style,.NI
1100 4c 20 6f 74 68 65 72 77 69 73 65 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c L.otherwise...(defalias.'haskell
1120 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 62 69 72 64 2d 70 20 23 5b 30 20 22 08 5c 33 30 31 3d 5c -indentation-bird-p.#[0.".\301=\
1140 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 6c 69 74 65 72 61 74 65 20 62 69 72 64 5d 20 32 20 28 207".[haskell-literate.bird].2.(
1160 23 24 20 2e 20 34 32 38 39 29 5d 29 0a 23 40 39 37 20 52 65 69 6e 64 65 6e 74 20 63 75 72 72 65 #$...4289)]).#@97.Reindent.curre
1180 6e 74 20 6c 69 6e 65 20 74 6f 20 43 4f 4c 2c 20 6d 6f 76 65 20 74 68 65 20 70 6f 69 6e 74 20 74 nt.line.to.COL,.move.the.point.t
11a0 68 65 72 65 20 69 66 20 4d 4f 56 45 20 69 73 20 6e 6f 6e 2d 4e 49 4c 2e 0a 0a 28 66 6e 20 43 4f here.if.MOVE.is.non-NIL...(fn.CO
11c0 4c 20 26 6f 70 74 69 6f 6e 61 6c 20 4d 4f 56 45 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 L.&optional.MOVE)..(defalias.'ha
11e0 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 72 65 69 6e 64 65 6e 74 2d 74 6f 20 23 5b skell-indentation-reindent-to.#[
1200 35 31 33 20 22 5c 33 30 30 20 5c 32 31 32 5c 33 30 31 01 21 5c 32 31 30 5c 32 31 31 03 58 5c 32 513."\300.\212\301.!\210\211.X\2
1220 30 33 19 00 5c 33 30 32 5c 33 30 33 04 03 5a 5c 33 30 34 5c 22 21 5c 32 31 30 5c 32 30 32 1f 00 03..\302\303..Z\304\"!\210\202..
1240 5c 33 30 35 03 02 5a 21 5c 32 31 30 29 01 5c 32 30 35 27 00 5c 33 30 31 03 21 5c 32 30 37 22 20 \305..Z!\210).\205'.\301.!\207".
1260 5b 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 63 75 72 72 65 6e 74 2d 69 6e 64 [haskell-indentation-current-ind
1280 65 6e 74 61 74 69 6f 6e 20 6d 6f 76 65 2d 74 6f 2d 63 6f 6c 75 6d 6e 20 69 6e 73 65 72 74 2d 62 entation.move-to-column.insert-b
12a0 65 66 6f 72 65 2d 6d 61 72 6b 65 72 73 20 6d 61 6b 65 2d 73 74 72 69 6e 67 20 33 32 20 64 65 6c efore-markers.make-string.32.del
12c0 65 74 65 2d 63 68 61 72 5d 20 37 20 28 23 24 20 2e 20 34 34 36 36 29 5d 29 0a 23 40 32 37 31 20 ete-char].7.(#$...4466)]).#@271.
12e0 49 6e 64 65 6e 74 20 61 6c 6c 20 6c 69 6e 65 73 20 73 74 61 72 74 69 6e 67 20 69 6e 20 74 68 65 Indent.all.lines.starting.in.the
1300 20 72 65 67 69 6f 6e 20 73 69 64 65 77 61 79 73 20 62 79 20 41 52 47 20 63 6f 6c 75 6d 6e 73 2e .region.sideways.by.ARG.columns.
1320 0a 43 61 6c 6c 65 64 20 66 72 6f 6d 20 61 20 70 72 6f 67 72 61 6d 2c 20 74 61 6b 65 73 20 74 68 .Called.from.a.program,.takes.th
1340 72 65 65 20 61 72 67 75 6d 65 6e 74 73 2c 20 53 54 41 52 54 2c 20 45 4e 44 20 61 6e 64 20 41 52 ree.arguments,.START,.END.and.AR
1360 47 2e 0a 59 6f 75 20 63 61 6e 20 72 65 6d 6f 76 65 20 61 6c 6c 20 69 6e 64 65 6e 74 61 74 69 6f G..You.can.remove.all.indentatio
1380 6e 20 66 72 6f 6d 20 61 20 72 65 67 69 6f 6e 20 62 79 20 67 69 76 69 6e 67 20 61 20 6c 61 72 67 n.from.a.region.by.giving.a.larg
13a0 65 0a 6e 65 67 61 74 69 76 65 20 41 52 47 2e 20 20 48 61 6e 64 6c 65 73 20 62 69 72 64 20 73 74 e.negative.ARG...Handles.bird.st
13c0 79 6c 65 20 6c 69 74 65 72 61 74 65 20 48 61 73 6b 65 6c 6c 20 74 6f 6f 2e 0a 0a 28 66 6e 20 53 yle.literate.Haskell.too...(fn.S
13e0 54 41 52 54 20 45 4e 44 20 41 52 47 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c TART.END.ARG)..(defalias.'haskel
1400 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 69 6e 64 65 6e 74 2d 72 69 67 69 64 6c 79 20 23 5b 37 l-indentation-indent-rigidly.#[7
1420 37 31 20 22 5c 32 31 32 01 62 5c 32 31 30 5c 33 30 30 20 03 62 5c 32 31 30 6e 5c 32 30 34 10 00 71."\212.b\210\300..b\210n\204..
1440 5c 33 30 31 79 5c 32 31 30 60 01 57 5c 32 30 33 39 00 5c 33 30 32 20 5c 33 30 33 66 5c 33 30 34 \301y\210`.W\2039.\302.\303f\304
1460 3d 5c 32 30 33 5c 22 00 5c 33 30 35 75 5c 32 31 30 5c 33 30 36 5c 33 30 37 21 5c 32 31 30 6c 5c =\203\".\305u\210\306\307!\210l\
1480 32 30 34 32 00 5c 33 31 30 5c 33 30 31 02 05 5c 5c 5d 21 5c 32 31 30 5c 33 30 35 79 5c 32 36 36 2042.\310\301..\\]!\210\305y\266
14a0 02 5c 32 30 32 10 00 5c 32 31 31 5c 33 30 33 5c 32 31 31 5c 32 32 33 5c 32 36 32 01 29 5c 32 30 .\202..\211\303\211\223\262.)\20
14c0 37 22 20 5b 70 6f 69 6e 74 2d 6d 61 72 6b 65 72 20 30 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 7".[point-marker.0.haskell-inden
14e0 74 61 74 69 6f 6e 2d 63 75 72 72 65 6e 74 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 6e 69 6c 20 36 tation-current-indentation.nil.6
1500 32 20 31 20 73 6b 69 70 2d 73 79 6e 74 61 78 2d 66 6f 72 77 61 72 64 20 22 2d 22 20 68 61 73 6b 2.1.skip-syntax-forward."-".hask
1520 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 72 65 69 6e 64 65 6e 74 2d 74 6f 5d 20 39 20 28 ell-indentation-reindent-to].9.(
1540 23 24 20 2e 20 34 38 33 32 29 20 22 2a 72 5c 6e 70 22 5d 29 0a 23 40 36 38 20 43 6f 6c 75 6d 6e #$...4832)."*r\np"]).#@68.Column
1560 20 70 6f 73 69 74 69 6f 6e 20 6f 66 20 66 69 72 73 74 20 6e 6f 6e 2d 77 68 69 74 65 73 70 61 63 .position.of.first.non-whitespac
1580 65 20 63 68 61 72 61 63 74 65 72 20 69 6e 20 63 75 72 72 65 6e 74 20 6c 69 6e 65 2e 1f 0a 28 64 e.character.in.current.line...(d
15a0 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 63 75 72 efalias.'haskell-indentation-cur
15c0 72 65 6e 74 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 23 5b 30 20 22 5c 32 31 32 5c 33 30 30 20 5c rent-indentation.#[0."\212\300.\
15e0 32 31 30 5c 33 30 31 20 5c 32 30 33 5c 66 00 5c 33 30 32 75 5c 32 31 30 5c 33 30 33 5c 33 30 34 210\301.\203\f.\302u\210\303\304
1600 21 5c 32 31 30 69 29 5c 32 30 37 22 20 5b 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 20 !\210i)\207".[beginning-of-line.
1620 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 62 69 72 64 2d 70 20 6e 69 6c 20 73 haskell-indentation-bird-p.nil.s
1640 6b 69 70 2d 73 79 6e 74 61 78 2d 66 6f 72 77 61 72 64 20 22 2d 22 5d 20 32 20 28 23 24 20 2e 20 kip-syntax-forward."-"].2.(#$...
1660 35 34 36 36 29 5d 29 0a 23 40 36 33 20 4e 6f 6e 2d 4e 49 4c 20 69 66 20 77 65 20 61 72 65 20 69 5466)]).#@63.Non-NIL.if.we.are.i
1680 6e 20 62 69 72 64 20 6c 69 74 65 72 61 74 65 20 6d 6f 64 65 2c 20 62 75 74 20 6f 75 74 73 69 64 n.bird.literate.mode,.but.outsid
16a0 65 20 6f 66 20 63 6f 64 65 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 e.of.code...(defalias.'haskell-i
16c0 6e 64 65 6e 74 61 74 69 6f 6e 2d 62 69 72 64 2d 6f 75 74 73 69 64 65 2d 63 6f 64 65 2d 70 20 23 ndentation-bird-outside-code-p.#
16e0 5b 30 20 22 5c 33 30 30 20 5c 32 30 35 15 00 69 5c 33 30 31 57 5c 32 30 36 15 00 5c 32 31 32 5c [0."\300.\205..i\301W\206..\212\
1700 33 30 32 20 5c 32 31 30 5c 33 30 33 66 29 5c 33 30 34 3d 3f 5c 32 30 37 22 20 5b 68 61 73 6b 65 302.\210\303f)\304=?\207".[haske
1720 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 62 69 72 64 2d 70 20 32 20 62 65 67 69 6e 6e 69 6e ll-indentation-bird-p.2.beginnin
1740 67 2d 6f 66 2d 6c 69 6e 65 20 6e 69 6c 20 36 32 5d 20 32 20 28 23 24 20 2e 20 35 37 34 31 29 5d g-of-line.nil.62].2.(#$...5741)]
1760 29 0a 23 40 32 38 20 49 6e 73 65 72 74 20 6e 65 77 6c 69 6e 65 20 61 6e 64 20 69 6e 64 65 6e 74 ).#@28.Insert.newline.and.indent
1780 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f ...(defalias.'haskell-indentatio
17a0 6e 2d 6e 65 77 6c 69 6e 65 2d 61 6e 64 2d 69 6e 64 65 6e 74 20 23 5b 30 20 22 5c 33 30 30 20 5c n-newline-and-indent.#[0."\300.\
17c0 32 30 33 0b 00 5c 33 30 31 20 5c 32 31 30 5c 33 30 32 20 5c 32 30 37 5c 33 30 33 20 5c 33 30 31 203..\301.\210\302.\207\303.\301
17e0 20 5c 32 31 30 5c 33 30 32 20 5c 32 31 30 5c 33 30 34 20 5c 32 30 36 19 00 5c 33 30 35 5c 33 30 .\210\302.\210\304.\206..\305\30
1800 36 20 5c 32 30 33 21 00 5c 33 30 37 63 5c 32 31 30 5c 33 31 30 5c 33 31 31 03 53 03 5c 33 31 32 6.\203!.\307c\210\310\311.S.\312
1820 23 5c 33 31 33 5c 22 5c 32 36 32 01 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e #\313\"\262.\207".[haskell-inden
1840 74 61 74 69 6f 6e 2d 62 69 72 64 2d 6f 75 74 73 69 64 65 2d 63 6f 64 65 2d 70 20 64 65 6c 65 74 tation-bird-outside-code-p.delet
1860 65 2d 68 6f 72 69 7a 6f 6e 74 61 6c 2d 73 70 61 63 65 20 6e 65 77 6c 69 6e 65 20 68 61 73 6b 65 e-horizontal-space.newline.haske
1880 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 63 75 72 72 65 6e 74 2d 69 6e 64 65 6e 74 61 74 69 ll-indentation-current-indentati
18a0 6f 6e 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 66 69 6e 64 2d 69 6e 64 65 on.haskell-indentation-find-inde
18c0 6e 74 61 74 69 6f 6e 73 20 28 30 29 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e ntations.(0).haskell-indentation
18e0 2d 62 69 72 64 2d 70 20 22 3e 20 22 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e -bird-p.">.".haskell-indentation
1900 2d 72 65 69 6e 64 65 6e 74 2d 74 6f 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e -reindent-to.haskell-indentation
1920 2d 6e 65 78 74 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 6e 6f 66 61 69 6c 20 6d 6f 76 65 5d 20 37 -next-indentation.nofail.move].7
1940 20 28 23 24 20 2e 20 35 39 39 31 29 20 22 2a 22 5d 29 0a 23 40 32 34 34 20 46 69 6e 64 20 74 68 .(#$...5991)."*"]).#@244.Find.th
1960 65 20 6c 65 66 74 6d 6f 73 74 20 69 6e 64 65 6e 74 61 74 69 6f 6e 20 77 68 69 63 68 20 69 73 20 e.leftmost.indentation.which.is.
1980 67 72 65 61 74 65 72 20 74 68 61 6e 20 43 4f 4c 2e 0a 49 6e 64 65 6e 74 61 74 69 6f 6e 73 20 61 greater.than.COL..Indentations.a
19a0 72 65 20 74 61 6b 65 6e 20 66 72 6f 6d 20 49 4e 44 45 4e 54 41 54 49 4f 4e 53 2c 20 77 68 69 63 re.taken.from.INDENTATIONS,.whic
19c0 68 20 73 68 6f 75 6c 64 20 62 65 20 61 0a 6c 69 73 74 2e 20 20 52 65 74 75 72 6e 20 74 68 65 20 h.should.be.a.list...Return.the.
19e0 6c 61 73 74 20 69 6e 64 65 6e 74 61 74 69 6f 6e 20 69 66 20 74 68 65 72 65 20 61 72 65 20 6e 6f last.indentation.if.there.are.no
1a00 20 62 69 67 67 65 72 20 6f 6e 65 73 20 61 6e 64 0a 4e 4f 46 41 49 4c 20 69 73 20 6e 6f 6e 2d 4e .bigger.ones.and.NOFAIL.is.non-N
1a20 49 4c 2e 0a 0a 28 66 6e 20 43 4f 4c 20 49 4e 44 45 4e 54 41 54 49 4f 4e 53 20 26 6f 70 74 69 6f IL...(fn.COL.INDENTATIONS.&optio
1a40 6e 61 6c 20 4e 4f 46 41 49 4c 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d nal.NOFAIL)..(defalias.'haskell-
1a60 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 6e 65 78 74 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 23 5b 37 indentation-next-indentation.#[7
1a80 37 30 20 22 01 5c 32 30 34 08 00 5c 33 30 30 5c 33 30 31 21 5c 32 31 30 5c 33 30 32 5c 33 30 33 70.".\204..\300\301!\210\302\303
1aa0 5c 33 30 34 5c 33 30 35 5c 33 30 36 5c 33 30 37 06 08 21 5c 33 31 30 5c 22 5c 33 31 31 5c 33 31 \304\305\306\307..!\310\"\311\31
1ac0 32 25 03 5c 22 5c 32 30 36 23 00 5c 32 31 31 5c 32 30 35 23 00 5c 33 31 33 02 21 40 5c 32 30 37 2%.\"\206#.\211\205#.\313.!@\207
1ae0 22 20 5b 65 72 72 6f 72 20 22 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 6e 65 ".[error."haskell-indentation-ne
1b00 78 74 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 63 61 6c 6c 65 64 20 77 69 74 68 20 65 6d 70 74 79 xt-indentation.called.with.empty
1b20 20 6c 69 73 74 22 20 63 6c 2d 66 69 6e 64 2d 69 66 20 6d 61 6b 65 2d 62 79 74 65 2d 63 6f 64 65 .list".cl-find-if.make-byte-code
1b40 20 32 35 37 20 22 5c 32 31 31 5c 33 30 30 56 5c 32 30 37 22 20 76 63 6f 6e 63 61 74 20 76 65 63 .257."\211\300V\207".vconcat.vec
1b60 74 6f 72 20 5b 5d 20 33 20 22 5c 6e 5c 6e 28 66 6e 20 49 29 22 20 6c 61 73 74 5d 20 31 30 20 28 tor.[].3."\n\n(fn.I)".last].10.(
1b80 23 24 20 2e 20 36 34 38 39 29 5d 29 0a 23 40 32 31 38 20 46 69 6e 64 20 74 68 65 20 72 69 67 68 #$...6489)]).#@218.Find.the.righ
1ba0 74 6d 6f 73 74 20 69 6e 64 65 6e 74 61 74 69 6f 6e 20 6c 65 73 73 20 74 68 61 6e 20 43 4f 4c 20 tmost.indentation.less.than.COL.
1bc0 66 72 6f 6d 20 49 4e 44 45 4e 54 41 54 49 4f 4e 53 2e 0a 57 68 65 6e 20 6e 6f 20 69 6e 64 65 6e from.INDENTATIONS..When.no.inden
1be0 74 61 74 69 6f 6e 73 20 61 72 65 20 6c 65 73 73 20 74 68 61 6e 20 43 4f 4c 2c 20 72 65 74 75 72 tations.are.less.than.COL,.retur
1c00 6e 20 74 68 65 20 72 69 67 68 74 6d 6f 73 74 20 69 6e 64 65 6e 74 61 74 69 6f 6e 0a 69 66 20 4e n.the.rightmost.indentation.if.N
1c20 4f 46 41 49 4c 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 6f 72 20 6e 69 6c 20 6f 74 68 65 72 77 69 OFAIL.is.non-nil,.or.nil.otherwi
1c40 73 65 2e 0a 0a 28 66 6e 20 43 4f 4c 20 49 4e 44 45 4e 54 41 54 49 4f 4e 53 20 26 6f 70 74 69 6f se...(fn.COL.INDENTATIONS.&optio
1c60 6e 61 6c 20 4e 4f 46 41 49 4c 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d nal.NOFAIL)..(defalias.'haskell-
1c80 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 70 72 65 76 69 6f 75 73 2d 69 6e 64 65 6e 74 61 74 69 6f 6e indentation-previous-indentation
1ca0 20 23 5b 37 37 30 20 22 01 5c 32 30 34 08 00 5c 33 30 30 5c 33 30 31 21 5c 32 31 30 5c 33 30 32 .#[770.".\204..\300\301!\210\302
1cc0 02 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 09 21 5c 33 31 .!\303\304\305\306\307\310..!\31
1ce0 31 5c 22 5c 33 31 32 5c 33 31 33 25 02 5c 22 5c 32 30 36 24 00 01 5c 32 30 35 24 00 5c 32 31 31 1\"\312\313%.\"\206$..\205$.\211
1d00 40 5c 32 30 37 22 20 5b 65 72 72 6f 72 20 22 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 @\207".[error."haskell-indentati
1d20 6f 6e 2d 70 72 65 76 69 6f 75 73 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 63 61 6c 6c 65 64 20 77 on-previous-indentation.called.w
1d40 69 74 68 20 65 6d 70 74 79 20 6c 69 73 74 22 20 72 65 76 65 72 73 65 20 63 6c 2d 66 69 6e 64 2d ith.empty.list".reverse.cl-find-
1d60 69 66 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 5c 33 30 30 57 if.make-byte-code.257."\211\300W
1d80 5c 32 30 37 22 20 76 63 6f 6e 63 61 74 20 76 65 63 74 6f 72 20 5b 5d 20 33 20 22 5c 6e 5c 6e 28 \207".vconcat.vector.[].3."\n\n(
1da0 66 6e 20 49 29 22 5d 20 31 31 20 28 23 24 20 2e 20 37 30 35 39 29 5d 29 0a 23 40 32 20 1f 0a 28 fn.I)"].11.(#$...7059)]).#@2...(
1dc0 64 65 66 76 61 72 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 64 79 6e 2d 6c defvar.haskell-indentation-dyn-l
1de0 61 73 74 2d 64 69 72 65 63 74 69 6f 6e 20 6e 69 6c 20 28 23 24 20 2e 20 37 36 31 33 29 29 0a 23 ast-direction.nil.(#$...7613)).#
1e00 40 32 20 1f 0a 28 64 65 66 76 61 72 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e @2...(defvar.haskell-indentation
1e20 2d 64 79 6e 2d 6c 61 73 74 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 73 20 6e 69 6c 20 28 23 24 20 2e -dyn-last-indentations.nil.(#$..
1e40 20 37 36 38 33 29 29 0a 23 40 33 30 39 20 49 6e 64 65 6e 74 20 63 75 72 72 65 6e 74 20 6c 69 6e .7683)).#@309.Indent.current.lin
1e60 65 2c 20 63 79 63 6c 65 20 74 68 6f 75 67 68 20 69 6e 64 65 6e 74 61 74 69 6f 6e 20 70 6f 73 69 e,.cycle.though.indentation.posi
1e80 74 69 6f 6e 73 2e 0a 44 6f 20 6e 6f 74 68 69 6e 67 20 69 6e 73 69 64 65 20 6d 75 6c 74 69 6c 69 tions..Do.nothing.inside.multili
1ea0 6e 65 20 63 6f 6d 6d 65 6e 74 73 20 61 6e 64 20 6d 75 6c 74 69 6c 69 6e 65 20 73 74 72 69 6e 67 ne.comments.and.multiline.string
1ec0 73 2e 0a 53 74 61 72 74 20 65 6e 75 6d 65 72 61 74 69 6e 67 20 74 68 65 20 69 6e 64 65 6e 74 61 s..Start.enumerating.the.indenta
1ee0 74 69 6f 6e 20 70 6f 69 6e 74 73 20 74 6f 20 74 68 65 20 72 69 67 68 74 2e 20 20 54 68 65 20 75 tion.points.to.the.right...The.u
1f00 73 65 72 0a 63 61 6e 20 63 6f 6e 74 69 6e 75 65 20 62 79 20 72 65 70 65 61 74 65 64 6c 79 20 70 ser.can.continue.by.repeatedly.p
1f20 72 65 73 73 69 6e 67 20 54 41 42 2e 20 20 57 68 65 6e 20 74 68 65 72 65 20 69 73 20 6e 6f 20 6d ressing.TAB...When.there.is.no.m
1f40 6f 72 65 0a 69 6e 64 65 6e 74 61 74 69 6f 6e 20 70 6f 69 6e 74 73 20 74 6f 20 74 68 65 20 72 69 ore.indentation.points.to.the.ri
1f60 67 68 74 2c 20 77 65 20 73 77 69 74 63 68 20 67 6f 69 6e 67 20 74 6f 20 74 68 65 20 6c 65 66 74 ght,.we.switch.going.to.the.left
1f80 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f ...(defalias.'haskell-indentatio
1fa0 6e 2d 69 6e 64 65 6e 74 2d 6c 69 6e 65 20 23 5b 30 20 22 5c 33 30 32 20 3f 5c 32 30 35 3c 00 5c n-indent-line.#[0."\302.?\205<.\
1fc0 33 30 33 10 69 5c 33 30 34 20 5c 32 31 32 5c 33 30 35 01 21 5c 32 31 30 5c 33 30 36 20 5c 32 30 303.i\304.\212\305.!\210\306.\20
1fe0 36 16 00 5c 33 30 37 29 01 01 3e 03 03 57 01 5c 32 30 33 2c 00 5c 32 31 31 5c 32 30 33 2c 00 5c 6..\307)..>..W.\203,.\211\203,.\
2000 33 30 35 04 21 5c 32 31 30 5c 32 30 32 35 00 5c 33 31 30 5c 33 31 31 05 05 5c 33 31 32 23 02 5c 305.!\210\2025.\310\311..\312#.\
2020 22 5c 32 31 30 5c 33 31 33 10 02 5c 32 31 31 11 5c 32 36 36 5c 32 30 35 5c 32 30 37 22 20 5b 68 "\210\313..\211.\266\205\207".[h
2040 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 64 79 6e 2d 6c 61 73 74 2d 64 69 72 65 askell-indentation-dyn-last-dire
2060 63 74 69 6f 6e 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 64 79 6e 2d 6c 61 ction.haskell-indentation-dyn-la
2080 73 74 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 73 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 st-indentations.haskell-indentat
20a0 69 6f 6e 2d 69 6e 64 65 6e 74 2d 6c 69 6e 65 2d 72 65 70 65 61 74 20 6e 69 6c 20 68 61 73 6b 65 ion-indent-line-repeat.nil.haske
20c0 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 63 75 72 72 65 6e 74 2d 69 6e 64 65 6e 74 61 74 69 ll-indentation-current-indentati
20e0 6f 6e 20 6d 6f 76 65 2d 74 6f 2d 63 6f 6c 75 6d 6e 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 on.move-to-column.haskell-indent
2100 61 74 69 6f 6e 2d 66 69 6e 64 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 73 20 28 30 29 20 68 61 73 6b ation-find-indentations.(0).hask
2120 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 72 65 69 6e 64 65 6e 74 2d 74 6f 20 68 61 73 6b ell-indentation-reindent-to.hask
2140 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 6e 65 78 74 2d 69 6e 64 65 6e 74 61 74 69 6f 6e ell-indentation-next-indentation
2160 20 6e 6f 66 61 69 6c 20 72 69 67 68 74 5d 20 31 30 20 28 23 24 20 2e 20 37 37 35 38 29 20 22 2a .nofail.right].10.(#$...7758)."*
2180 22 5d 29 0a 23 40 33 37 20 43 79 63 6c 65 20 74 68 6f 75 67 68 20 69 6e 64 65 6e 74 61 74 69 6f "]).#@37.Cycle.though.indentatio
21a0 6e 20 70 6f 73 69 74 69 6f 6e 73 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c n.positions...(defalias.'haskell
21c0 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 69 6e 64 65 6e 74 2d 6c 69 6e 65 2d 72 65 70 65 61 74 20 -indentation-indent-line-repeat.
21e0 23 5b 30 20 22 08 5c 33 30 34 3e 5c 32 30 33 19 00 09 5c 33 30 35 3d 5c 32 30 33 19 00 5c 33 30 #[0.".\304>\203...\305=\203..\30
2200 36 1a 5c 33 30 37 5c 33 31 30 20 5c 33 31 31 20 5c 33 31 32 23 5c 32 31 30 29 5c 33 30 36 5c 32 6.\307\310.\311.\312#\210)\306\2
2220 30 37 08 5c 33 31 33 3d 5c 32 30 33 55 00 09 5c 33 31 34 3e 5c 32 30 33 55 00 0b 5c 32 30 33 55 07.\313=\203U..\314>\203U..\203U
2240 00 5c 33 31 35 20 09 5c 33 31 36 3d 5c 32 30 33 3c 00 5c 33 31 37 5c 33 32 30 02 0b 5c 33 32 31 .\315..\316=\203<.\317\320..\321
2260 23 21 5c 32 31 30 5c 32 30 32 53 00 5c 33 32 32 01 0b 5c 22 5c 32 30 33 4e 00 5c 33 31 37 5c 33 #!\210\202S.\322..\"\203N.\317\3
2280 32 32 02 0b 5c 33 32 31 23 21 5c 32 31 30 5c 32 30 32 53 00 5c 33 31 36 11 5c 33 32 33 20 5c 32 22..\321#!\210\202S.\316.\323.\2
22a0 31 30 5c 33 30 36 5c 32 30 37 5c 33 32 34 5c 32 30 37 22 20 5b 6c 61 73 74 2d 63 6f 6d 6d 61 6e 10\306\207\324\207".[last-comman
22c0 64 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 64 79 6e 2d 6c 61 73 74 2d 64 d.haskell-indentation-dyn-last-d
22e0 69 72 65 63 74 69 6f 6e 20 6d 61 72 6b 2d 65 76 65 6e 2d 69 66 2d 69 6e 61 63 74 69 76 65 20 68 irection.mark-even-if-inactive.h
2300 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 64 79 6e 2d 6c 61 73 74 2d 69 6e 64 65 askell-indentation-dyn-last-inde
2320 6e 74 61 74 69 6f 6e 73 20 28 69 6e 64 65 6e 74 2d 66 6f 72 2d 74 61 62 2d 63 6f 6d 6d 61 6e 64 ntations.(indent-for-tab-command
2340 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 69 6e 64 65 6e 74 2d 62 61 63 6b .haskell-indentation-indent-back
2360 77 61 72 64 73 29 20 72 65 67 69 6f 6e 20 74 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 wards).region.t.haskell-indentat
2380 69 6f 6e 2d 69 6e 64 65 6e 74 2d 72 69 67 69 64 6c 79 20 72 65 67 69 6f 6e 2d 62 65 67 69 6e 6e ion-indent-rigidly.region-beginn
23a0 69 6e 67 20 72 65 67 69 6f 6e 2d 65 6e 64 20 31 20 69 6e 64 65 6e 74 2d 66 6f 72 2d 74 61 62 2d ing.region-end.1.indent-for-tab-
23c0 63 6f 6d 6d 61 6e 64 20 28 6c 65 66 74 20 72 69 67 68 74 29 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 command.(left.right).haskell-ind
23e0 65 6e 74 61 74 69 6f 6e 2d 63 75 72 72 65 6e 74 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 6c 65 66 entation-current-indentation.lef
2400 74 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 72 65 69 6e 64 65 6e 74 2d 74 t.haskell-indentation-reindent-t
2420 6f 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 70 72 65 76 69 6f 75 73 2d 69 o.haskell-indentation-previous-i
2440 6e 64 65 6e 74 61 74 69 6f 6e 20 6e 6f 66 61 69 6c 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 ndentation.nofail.haskell-indent
2460 61 74 69 6f 6e 2d 6e 65 78 74 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 68 61 73 6b 65 6c 6c 2d 69 ation-next-indentation.haskell-i
2480 6e 64 65 6e 74 61 74 69 6f 6e 2d 69 6e 64 65 6e 74 2d 6c 69 6e 65 2d 72 65 70 65 61 74 20 6e 69 ndentation-indent-line-repeat.ni
24a0 6c 5d 20 36 20 28 23 24 20 2e 20 38 35 38 35 29 5d 29 0a 23 40 34 32 30 20 54 68 69 73 20 66 75 l].6.(#$...8585)]).#@420.This.fu
24c0 6e 63 74 69 6f 6e 20 64 6f 65 73 20 6e 6f 74 68 69 6e 67 2e 0a 0a 49 74 20 69 73 20 62 65 74 74 nction.does.nothing...It.is.bett
24e0 65 72 20 74 6f 20 64 6f 20 6e 6f 74 68 69 6e 67 20 74 6f 20 69 6e 64 65 6e 74 20 72 65 67 69 6f er.to.do.nothing.to.indent.regio
2500 6e 20 69 6e 20 48 61 73 6b 65 6c 6c 20 74 68 61 6e 20 74 6f 0a 62 72 65 61 6b 20 74 68 65 20 73 n.in.Haskell.than.to.break.the.s
2520 65 6d 61 6e 74 69 63 73 20 6f 66 20 69 6e 64 65 6e 74 61 74 69 6f 6e 2e 20 20 54 68 69 73 20 66 emantics.of.indentation...This.f
2540 75 6e 63 74 69 6f 6e 20 69 73 20 75 73 65 64 20 66 6f 72 0a 60 69 6e 64 65 6e 74 2d 72 65 67 69 unction.is.used.for.`indent-regi
2560 6f 6e 2d 66 75 6e 63 74 69 6f 6e 27 20 62 65 63 61 75 73 65 20 74 68 65 20 64 65 66 61 75 6c 74 on-function'.because.the.default
2580 20 69 73 20 74 6f 20 63 61 6c 6c 0a 60 69 6e 64 65 6e 74 2d 6c 69 6e 65 2d 66 75 6e 63 74 69 6f .is.to.call.`indent-line-functio
25a0 6e 27 20 6f 6e 20 65 76 65 72 79 20 6c 69 6e 65 20 66 72 6f 6d 20 53 54 41 52 54 20 74 6f 20 45 n'.on.every.line.from.START.to.E
25c0 4e 44 20 61 6e 64 20 74 68 61 74 0a 61 6c 73 6f 20 70 72 6f 64 75 63 65 73 20 63 61 74 61 73 74 ND.and.that.also.produces.catast
25e0 72 6f 70 68 69 63 20 72 65 73 75 6c 74 73 2e 0a 0a 53 6f 6d 65 64 61 79 20 77 65 20 77 69 6c 6c rophic.results...Someday.we.will
2600 20 68 61 76 65 20 69 6e 64 65 6e 74 20 72 65 67 69 6f 6e 20 74 68 61 74 20 70 72 65 73 65 72 76 .have.indent.region.that.preserv
2620 65 73 20 73 65 6d 61 6e 74 69 63 73 20 61 6e 64 0a 66 69 78 65 73 20 75 70 20 6f 6e 6c 79 20 69 es.semantics.and.fixes.up.only.i
2640 6e 64 65 6e 74 61 74 69 6f 6e 2e 0a 0a 28 66 6e 20 53 54 41 52 54 20 45 4e 44 29 1f 0a 28 64 65 ndentation...(fn.START.END)..(de
2660 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 69 6e 64 65 falias.'haskell-indentation-inde
2680 6e 74 2d 72 65 67 69 6f 6e 20 23 5b 35 31 34 20 22 5c 33 30 30 5c 32 30 37 22 20 5b 6e 69 6c 5d nt-region.#[514."\300\207".[nil]
26a0 20 33 20 28 23 24 20 2e 20 39 34 30 31 29 5d 29 0a 23 40 36 30 20 49 6e 64 65 6e 74 20 74 68 65 .3.(#$...9401)]).#@60.Indent.the
26c0 20 63 75 72 72 65 6e 74 20 6c 69 6e 65 20 74 6f 20 74 68 65 20 70 72 65 76 69 6f 75 73 20 69 6e .current.line.to.the.previous.in
26e0 64 65 6e 74 61 74 69 6f 6e 20 70 6f 69 6e 74 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 dentation.point...(defalias.'has
2700 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 69 6e 64 65 6e 74 2d 62 61 63 6b 77 61 72 64 kell-indentation-indent-backward
2720 73 20 23 5b 30 20 22 08 5c 33 30 33 3e 5c 32 30 33 17 00 09 5c 33 30 34 3d 5c 32 30 33 17 00 5c s.#[0.".\303>\203...\304=\203..\
2740 33 30 35 1a 5c 33 30 36 5c 33 30 37 20 5c 33 31 30 20 5c 33 31 31 23 29 5c 32 30 37 5c 33 31 32 305.\306\307.\310.\311#)\207\312
2760 20 5c 32 30 33 2a 00 5c 33 30 34 11 5c 33 30 36 5c 33 30 37 20 5c 33 31 30 20 5c 33 31 31 23 5c .\203*.\304.\306\307.\310.\311#\
2780 32 31 30 5c 33 31 33 5c 33 31 34 21 5c 32 30 37 5c 33 31 35 11 69 5c 33 31 36 20 5c 32 31 32 5c 210\313\314!\207\315.i\316.\212\
27a0 33 31 37 01 21 5c 32 31 30 5c 33 32 30 20 5c 32 30 36 3a 00 5c 33 32 31 29 02 02 57 5c 33 32 32 317.!\210\320.\206:.\321)..W\322
27c0 03 03 5c 22 5c 32 31 31 5c 32 30 34 4f 00 5c 33 32 33 5c 33 32 34 20 40 03 5c 22 5c 32 30 32 53 ..\"\211\204O.\323\324.@.\"\202S
27e0 00 5c 33 32 33 01 03 5c 22 5c 32 30 37 22 20 5b 6c 61 73 74 2d 63 6f 6d 6d 61 6e 64 20 68 61 73 .\323..\"\207".[last-command.has
2800 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 64 79 6e 2d 6c 61 73 74 2d 64 69 72 65 63 74 kell-indentation-dyn-last-direct
2820 69 6f 6e 20 6d 61 72 6b 2d 65 76 65 6e 2d 69 66 2d 69 6e 61 63 74 69 76 65 20 28 69 6e 64 65 6e ion.mark-even-if-inactive.(inden
2840 74 2d 66 6f 72 2d 74 61 62 2d 63 6f 6d 6d 61 6e 64 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 t-for-tab-command.haskell-indent
2860 61 74 69 6f 6e 2d 69 6e 64 65 6e 74 2d 62 61 63 6b 77 61 72 64 73 29 20 72 65 67 69 6f 6e 20 74 ation-indent-backwards).region.t
2880 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 69 6e 64 65 6e 74 2d 72 69 67 69 .haskell-indentation-indent-rigi
28a0 64 6c 79 20 72 65 67 69 6f 6e 2d 62 65 67 69 6e 6e 69 6e 67 20 72 65 67 69 6f 6e 2d 65 6e 64 20 dly.region-beginning.region-end.
28c0 2d 31 20 75 73 65 2d 72 65 67 69 6f 6e 2d 70 20 6d 65 73 73 61 67 65 20 22 50 72 65 73 73 20 54 -1.use-region-p.message."Press.T
28e0 41 42 20 6f 72 20 53 2d 54 41 42 20 61 67 61 69 6e 20 74 6f 20 69 6e 64 65 6e 74 20 74 68 65 20 AB.or.S-TAB.again.to.indent.the.
2900 72 65 67 69 6f 6e 20 6d 6f 72 65 22 20 6e 69 6c 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 region.more".nil.haskell-indenta
2920 74 69 6f 6e 2d 63 75 72 72 65 6e 74 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 6d 6f 76 65 2d 74 6f tion-current-indentation.move-to
2940 2d 63 6f 6c 75 6d 6e 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 66 69 6e 64 -column.haskell-indentation-find
2960 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 73 20 28 30 29 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 -indentations.(0).haskell-indent
2980 61 74 69 6f 6e 2d 70 72 65 76 69 6f 75 73 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 68 61 73 6b 65 ation-previous-indentation.haske
29a0 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 72 65 69 6e 64 65 6e 74 2d 74 6f 20 68 61 73 6b 65 ll-indentation-reindent-to.haske
29c0 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 66 69 72 73 74 2d 69 6e 64 65 6e 74 61 74 69 6f 6e ll-indentation-first-indentation
29e0 5d 20 38 20 28 23 24 20 2e 20 39 39 31 30 29 20 22 2a 22 5d 29 0a 23 40 33 39 35 20 43 61 6c 6c ].8.(#$...9910)."*"]).#@395.Call
2a00 20 60 73 65 6c 66 2d 69 6e 73 65 72 74 2d 63 6f 6d 6d 61 6e 64 27 20 74 6f 20 69 6e 73 65 72 74 .`self-insert-command'.to.insert
2a20 20 74 68 65 20 63 68 61 72 61 63 74 65 72 20 74 79 70 65 64 20 41 52 47 20 74 69 6d 65 73 0a 61 .the.character.typed.ARG.times.a
2a40 6e 64 20 69 6e 64 65 6e 74 20 77 68 65 6e 20 61 6c 6c 20 6f 66 20 74 68 65 20 66 6f 6c 6c 6f 77 nd.indent.when.all.of.the.follow
2a60 69 6e 67 20 61 72 65 20 74 72 75 65 3a 0a 31 29 20 54 68 65 20 63 68 61 72 61 63 74 65 72 20 69 ing.are.true:.1).The.character.i
2a80 73 20 74 68 65 20 66 69 72 73 74 20 6e 6f 6e 2d 77 68 69 74 65 73 70 61 63 65 20 63 68 61 72 61 s.the.first.non-whitespace.chara
2aa0 63 74 65 72 20 6f 6e 20 74 68 65 20 6c 69 6e 65 2e 0a 32 29 20 54 68 65 72 65 20 69 73 20 6f 6e cter.on.the.line..2).There.is.on
2ac0 6c 79 20 6f 6e 65 20 70 6f 73 73 69 62 6c 65 20 69 6e 64 65 6e 74 61 74 69 6f 6e 20 70 6f 73 69 ly.one.possible.indentation.posi
2ae0 74 69 6f 6e 2e 0a 33 29 20 54 68 65 20 76 61 72 69 61 62 6c 65 20 60 65 6c 65 63 74 72 69 63 2d tion..3).The.variable.`electric-
2b00 69 6e 64 65 6e 74 2d 6d 6f 64 65 27 20 6f 72 20 60 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 indent-mode'.or.`haskell-indenta
2b20 74 69 6f 6e 2d 65 6c 65 63 74 72 69 63 2d 66 6c 61 67 27 0a 20 20 20 69 73 20 6e 6f 6e 2d 6e 69 tion-electric-flag'....is.non-ni
2b40 6c 2e 0a 34 29 20 54 68 65 20 70 6f 69 6e 74 20 69 73 20 6e 6f 74 20 69 6e 20 61 20 63 6f 6d 6d l..4).The.point.is.not.in.a.comm
2b60 65 6e 74 2c 20 73 74 72 69 6e 67 2c 20 6f 72 20 71 75 61 73 69 71 75 6f 74 65 2e 0a 0a 28 66 6e ent,.string,.or.quasiquote...(fn
2b80 20 41 52 47 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 .ARG)..(defalias.'haskell-indent
2ba0 61 74 69 6f 6e 2d 63 6f 6d 6d 6f 6e 2d 65 6c 65 63 74 72 69 63 2d 63 6f 6d 6d 61 6e 64 20 23 5b ation-common-electric-command.#[
2bc0 32 35 37 20 22 69 5c 33 30 32 5c 33 30 33 03 21 5c 32 31 30 08 5c 32 30 34 0e 00 09 5c 32 30 35 257."i\302\303.!\210.\204...\205
2be0 38 00 5c 33 30 34 20 02 55 5c 32 30 35 38 00 02 5c 33 30 35 56 5c 32 30 35 38 00 5c 33 30 36 5c 8.\304..U\2058..\305V\2058.\306\
2c00 33 30 37 20 38 3f 5c 32 30 35 38 00 5c 32 31 32 5c 33 31 30 02 21 5c 32 31 30 5c 33 31 31 20 5c 307.8?\2058.\212\310.!\210\311.\
2c20 32 31 31 5c 32 36 32 02 47 29 5c 33 31 32 55 5c 32 30 35 38 00 5c 33 31 33 01 40 21 5c 32 30 37 211\262.G)\312U\2058.\313.@!\207
2c40 22 20 5b 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 65 6c 65 63 74 72 69 63 2d ".[haskell-indentation-electric-
2c60 66 6c 61 67 20 65 6c 65 63 74 72 69 63 2d 69 6e 64 65 6e 74 2d 6d 6f 64 65 20 6e 69 6c 20 73 65 flag.electric-indent-mode.nil.se
2c80 6c 66 2d 69 6e 73 65 72 74 2d 63 6f 6d 6d 61 6e 64 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 lf-insert-command.haskell-indent
2ca0 61 74 69 6f 6e 2d 63 75 72 72 65 6e 74 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 30 20 38 20 73 79 ation-current-indentation.0.8.sy
2cc0 6e 74 61 78 2d 70 70 73 73 20 6d 6f 76 65 2d 74 6f 2d 63 6f 6c 75 6d 6e 20 68 61 73 6b 65 6c 6c ntax-ppss.move-to-column.haskell
2ce0 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 66 69 6e 64 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 73 20 31 -indentation-find-indentations.1
2d00 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 72 65 69 6e 64 65 6e 74 2d 74 6f .haskell-indentation-reindent-to
2d20 5d 20 35 20 28 23 24 20 2e 20 31 30 37 34 38 29 20 22 2a 70 22 5d 29 0a 23 40 32 20 1f 0a 28 64 ].5.(#$...10748)."*p"]).#@2...(d
2d40 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 67 6f 74 efalias.'haskell-indentation-got
2d60 6f 2d 6c 65 61 73 74 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 23 5b 30 20 22 5c 33 30 30 20 5c 32 o-least-indentation.#[0."\300.\2
2d80 31 30 5c 33 30 31 20 5c 32 30 33 54 00 5c 33 30 32 32 5c 32 35 36 00 5c 33 30 33 66 5c 33 30 34 10\301.\203T.\3022\256.\303f\304
2da0 3d 5c 32 30 34 1e 00 5c 33 30 33 79 5c 32 31 30 5c 33 30 35 75 5c 32 31 30 5c 33 30 36 5c 33 30 =\204..\303y\210\305u\210\306\30
2dc0 32 5c 33 30 33 5c 22 5c 32 31 30 5c 33 30 37 5c 33 31 30 20 38 5c 32 31 31 5c 32 30 33 2c 00 5c 2\303\"\210\307\310.8\211\203,.\
2de0 32 31 31 62 5c 32 31 30 5c 33 30 30 20 5c 32 31 30 5c 32 31 30 5c 33 30 35 5c 33 31 31 20 59 5c 211b\210\300.\210\210\305\311.Y\
2e00 32 30 33 42 00 5c 33 31 32 5c 33 31 33 21 5c 32 30 34 42 00 5c 33 30 35 75 5c 32 31 30 5c 33 30 203B.\312\313!\204B.\305u\210\30
2e20 36 5c 33 30 32 5c 33 30 33 5c 22 5c 32 31 30 6f 5c 32 30 33 4e 00 5c 33 30 35 75 5c 32 31 30 5c 6\302\303\"\210o\203N.\305u\210\
2e40 33 30 36 5c 33 30 32 5c 33 30 33 5c 22 5c 32 31 30 5c 33 31 34 79 5c 32 31 30 5c 32 30 32 5c 66 306\302\303\"\210\314y\210\202\f
2e60 00 5c 33 30 32 32 5c 32 34 32 00 6f 3f 5c 32 30 35 5c 32 34 31 00 60 5c 33 31 35 5c 33 31 36 20 .\3022\242.o?\205\241.`\315\316.
2e80 5b 21 5c 32 31 30 60 01 5c 32 33 32 5c 32 30 33 70 00 5c 33 31 34 79 5c 32 31 30 5c 32 30 32 73 [!\210`.\232\203p.\314y\210\202s
2ea0 00 5c 33 30 30 20 5c 32 31 30 5c 32 31 30 5c 33 31 30 20 5c 33 30 37 01 38 01 41 40 01 5c 32 30 .\300.\210\210\310.\307.8.A@.\20
2ec0 33 5c 32 30 36 00 01 62 5c 32 31 30 5c 32 30 32 5c 32 33 34 00 5c 32 31 31 5c 32 30 33 5c 32 32 3\206..b\210\202\234.\211\203\22
2ee0 30 00 5c 32 31 31 62 5c 32 31 30 5c 32 30 32 5c 32 33 34 00 5c 33 31 31 20 5c 33 31 37 55 5c 32 0.\211b\210\202\234.\311.\317U\2
2f00 30 33 5c 32 33 34 00 5c 33 30 36 5c 33 30 32 5c 33 30 33 5c 22 5c 32 31 30 5c 32 36 36 03 5c 32 03\234.\306\302\303\"\210\266.\2
2f20 30 32 58 00 30 5c 32 31 30 5c 33 30 30 20 5c 32 31 30 6f 5c 32 30 35 5c 32 35 36 00 5c 33 31 35 02X.0\210\300.\210o\205\256.\315
2f40 5c 33 31 36 20 21 5c 32 30 37 22 20 5b 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 20 68 \316.!\207".[beginning-of-line.h
2f60 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 62 69 72 64 2d 70 20 72 65 74 75 72 6e askell-indentation-bird-p.return
2f80 20 6e 69 6c 20 36 32 20 32 20 74 68 72 6f 77 20 38 20 73 79 6e 74 61 78 2d 70 70 73 73 20 68 61 .nil.62.2.throw.8.syntax-ppss.ha
2fa0 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 63 75 72 72 65 6e 74 2d 69 6e 64 65 6e 74 skell-indentation-current-indent
2fc0 61 74 69 6f 6e 20 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 3e 5c 5c 73 2d 2a 24 22 20 2d 31 20 66 6f ation.looking-at.">\\s-*$".-1.fo
2fe0 72 77 61 72 64 2d 63 6f 6d 6d 65 6e 74 20 62 75 66 66 65 72 2d 73 69 7a 65 20 30 5d 20 36 20 28 rward-comment.buffer-size.0].6.(
3000 23 24 20 2e 20 31 31 35 38 30 29 5d 29 0a 23 40 32 20 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 #$...11580)]).#@2...(defalias.'h
3020 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 70 61 72 73 65 2d 74 6f 2d 69 6e 64 65 askell-indentation-parse-to-inde
3040 6e 74 61 74 69 6f 6e 73 20 23 5b 30 20 22 5c 32 31 32 5c 33 30 36 5c 33 30 37 21 5c 32 31 30 60 ntations.#[0."\212\306\307!\210`
3060 5c 33 31 30 08 5c 32 31 31 5c 32 31 31 5c 33 31 31 5c 32 31 31 5c 32 31 31 5c 32 31 31 5c 32 31 \310.\211\211\311\211\211\211\21
3080 31 5c 32 31 31 19 1a 1b 1c 1d 1e 0f 1e 10 1e 11 1e 12 1e 13 1e 14 5c 33 31 32 20 5c 32 31 30 0e 1\211.................\312.\210.
30a0 14 60 58 5c 32 30 33 30 00 5c 33 31 33 20 5c 32 30 32 3c 00 5c 33 31 34 20 15 5c 33 31 35 32 3a .`X\2030.\313.\202<.\314..\3152:
30c0 00 5c 33 31 36 20 30 5c 32 31 30 5c 6e 2e 5c 66 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 69 .\316.0\210\n.\f\207".[haskell-i
30e0 6e 64 65 6e 74 61 74 69 6f 6e 2d 6c 61 79 6f 75 74 2d 6f 66 66 73 65 74 20 69 6d 70 6c 69 63 69 ndentation-layout-offset.implici
3100 74 2d 6c 61 79 6f 75 74 2d 61 63 74 69 76 65 20 70 6f 73 73 69 62 6c 65 2d 69 6e 64 65 6e 74 61 t-layout-active.possible-indenta
3120 74 69 6f 6e 73 20 66 6f 6c 6c 6f 77 69 6e 67 2d 74 6f 6b 65 6e 20 70 72 65 76 69 6f 75 73 2d 74 tions.following-token.previous-t
3140 6f 6b 65 6e 20 63 75 72 72 65 6e 74 2d 74 6f 6b 65 6e 20 73 6b 69 70 2d 73 79 6e 74 61 78 2d 66 oken.current-token.skip-syntax-f
3160 6f 72 77 61 72 64 20 22 2d 22 20 30 20 6e 69 6c 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 orward."-".0.nil.haskell-indenta
3180 74 69 6f 6e 2d 67 6f 74 6f 2d 6c 65 61 73 74 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 68 61 73 6b tion-goto-least-indentation.hask
31a0 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 66 69 72 73 74 2d 69 6e 64 65 6e 74 61 74 69 6f ell-indentation-first-indentatio
31c0 6e 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 70 65 65 6b 2d 74 6f 6b 65 6e n.haskell-indentation-peek-token
31e0 20 70 61 72 73 65 2d 65 6e 64 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 74 .parse-end.haskell-indentation-t
3200 6f 70 6c 65 76 65 6c 20 63 61 73 65 2d 66 6f 6c 64 2d 73 65 61 72 63 68 20 6c 65 66 74 2d 69 6e oplevel.case-fold-search.left-in
3220 64 65 6e 74 20 73 74 61 72 74 65 72 2d 69 6e 64 65 6e 74 20 63 75 72 72 65 6e 74 2d 69 6e 64 65 dent.starter-indent.current-inde
3240 6e 74 20 6c 61 79 6f 75 74 2d 69 6e 64 65 6e 74 20 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 70 6f 69 nt.layout-indent.indentation-poi
3260 6e 74 5d 20 31 31 20 28 23 24 20 2e 20 31 32 33 30 36 29 5d 29 0a 23 40 33 37 20 52 65 74 75 72 nt].11.(#$...12306)]).#@37.Retur
3280 6e 20 63 6f 6c 75 6d 6e 20 6f 66 20 66 69 72 73 74 20 69 6e 64 65 6e 74 61 74 69 6f 6e 2e 1f 0a n.column.of.first.indentation...
32a0 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 66 (defalias.'haskell-indentation-f
32c0 69 72 73 74 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 23 5b 30 20 22 5c 33 30 30 20 5c 32 30 33 09 irst-indentation.#[0."\300.\203.
32e0 00 5c 33 30 31 5c 32 30 32 5c 6e 00 5c 33 30 32 43 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d .\301\202\n.\302C\207".[haskell-
3300 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 62 69 72 64 2d 70 20 32 20 30 5d 20 31 20 28 23 24 20 2e 20 indentation-bird-p.2.0].1.(#$...
3320 31 32 39 32 33 29 5d 29 0a 23 40 37 39 20 52 65 74 75 72 6e 20 6c 69 73 74 20 6f 66 20 69 6e 64 12923)]).#@79.Return.list.of.ind
3340 65 6e 74 61 74 69 6f 6e 20 70 6f 73 69 74 69 6f 6e 73 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 entation.positions.corresponding
3360 20 74 6f 20 61 63 74 75 61 6c 20 63 75 72 73 6f 72 20 70 6f 73 69 74 69 6f 6e 2e 1f 0a 28 64 65 .to.actual.cursor.position...(de
3380 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 66 69 6e 64 falias.'haskell-indentation-find
33a0 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 73 20 23 5b 30 20 22 5c 33 30 30 20 5c 33 30 31 01 38 5c 32 -indentations.#[0."\300.\301.8\2
33c0 30 33 32 00 5c 32 31 32 5c 33 30 32 79 5c 32 30 35 13 00 5c 33 30 33 01 38 60 57 29 5c 32 30 33 032.\212\302y\205..\303.8`W)\203
33e0 5c 22 00 5c 32 31 32 5c 33 30 32 79 5c 32 31 30 5c 33 30 34 20 29 43 5c 32 30 32 60 00 5c 33 30 \".\212\302y\210\304.)C\202`.\30
3400 35 5c 33 30 36 20 5c 32 31 32 5c 33 30 33 03 38 62 5c 32 31 30 69 29 43 5c 22 5c 32 30 32 60 00 5\306.\212\303.8b\210i)C\"\202`.
3420 5c 33 30 37 01 38 5c 32 30 33 5e 00 5c 32 31 32 5c 33 31 30 5c 33 31 31 21 5c 32 30 35 50 00 6c \307.8\203^.\212\310\311!\205P.l
3440 5c 32 30 35 50 00 5c 33 31 32 79 5c 33 31 33 56 3f 5c 32 30 35 50 00 5c 33 30 37 5c 33 30 30 20 \205P.\312y\313V?\205P.\307\300.
3460 38 3f 29 5c 32 30 33 59 00 5c 33 31 34 20 5c 32 30 32 60 00 5c 33 30 36 20 5c 32 30 32 60 00 5c 8?)\203Y.\314.\202`.\306.\202`.\
3480 33 31 34 20 5c 32 30 37 22 20 5b 73 79 6e 74 61 78 2d 70 70 73 73 20 33 20 2d 31 20 38 20 63 75 314.\207".[syntax-ppss.3.-1.8.cu
34a0 72 72 65 6e 74 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 61 70 70 65 6e 64 20 68 61 73 6b 65 6c 6c rrent-indentation.append.haskell
34c0 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 66 69 72 73 74 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 34 -indentation-first-indentation.4
34e0 20 73 6b 69 70 2d 73 79 6e 74 61 78 2d 66 6f 72 77 61 72 64 20 22 2d 22 20 31 20 30 20 68 61 73 .skip-syntax-forward."-".1.0.has
3500 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 70 61 72 73 65 2d 74 6f 2d 69 6e 64 65 6e 74 kell-indentation-parse-to-indent
3520 61 74 69 6f 6e 73 5d 20 35 20 28 23 24 20 2e 20 31 33 31 30 32 29 5d 29 0a 23 40 37 30 20 54 72 ations].5.(#$...13102)]).#@70.Tr
3540 61 6e 73 6c 61 74 69 6f 6e 20 66 72 6f 6d 20 55 6e 69 63 6f 64 65 53 79 6e 74 61 78 20 74 6f 6b anslation.from.UnicodeSyntax.tok
3560 65 6e 73 20 74 6f 20 74 68 65 69 72 20 41 53 43 49 49 20 72 65 70 72 65 73 65 6e 74 61 74 69 6f ens.to.their.ASCII.representatio
3580 6e 2e 1f 0a 28 64 65 66 63 6f 6e 73 74 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f n...(defconst.haskell-indentatio
35a0 6e 2d 75 6e 69 63 6f 64 65 2d 74 6f 6b 65 6e 73 20 27 28 28 22 e2 86 92 22 20 2e 20 22 2d 3e 22 n-unicode-tokens.'(("..."..."->"
35c0 29 20 28 22 e2 88 b7 22 20 2e 20 22 3a 3a 22 29 20 28 22 e2 86 90 22 20 2e 20 22 3c 2d 22 29 20 ).("..."..."::").("..."..."<-").
35e0 28 22 e2 87 92 22 20 2e 20 22 3d 3e 22 29 20 28 22 e2 88 80 22 20 2e 20 22 66 6f 72 61 6c 6c 22 ("..."..."=>").("..."..."forall"
3600 29 20 28 22 e2 a4 99 22 20 2e 20 22 2d 3c 22 29 20 28 22 e2 a4 9a 22 20 2e 20 22 3e 2d 22 29 20 ).("..."..."-<").("..."...">-").
3620 28 22 e2 a4 9b 22 20 2e 20 22 2d 3c 3c 22 29 20 28 22 e2 a4 9c 22 20 2e 20 22 3e 3e 2d 22 29 20 ("..."..."-<<").("..."...">>-").
3640 28 22 e2 98 85 22 20 2e 20 22 2a 22 29 29 20 28 23 24 20 2e 20 31 33 36 33 30 29 29 0a 23 40 35 ("..."..."*")).(#$...13630)).#@5
3660 33 20 41 6c 69 73 74 20 6f 66 20 74 6f 70 6c 65 76 65 6c 20 6b 65 79 77 6f 72 64 73 20 77 69 74 3.Alist.of.toplevel.keywords.wit
3680 68 20 61 73 73 6f 63 69 61 74 65 64 20 70 61 72 73 65 72 73 2e 1f 0a 28 64 65 66 63 6f 6e 73 74 h.associated.parsers...(defconst
36a0 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 74 6f 70 6c 65 76 65 6c 2d 6c 69 .haskell-indentation-toplevel-li
36c0 73 74 20 27 28 28 22 6d 6f 64 75 6c 65 22 20 2e 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 st.'(("module"...haskell-indenta
36e0 74 69 6f 6e 2d 6d 6f 64 75 6c 65 29 20 28 22 73 69 67 6e 61 74 75 72 65 22 20 2e 20 68 61 73 6b tion-module).("signature"...hask
3700 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 6d 6f 64 75 6c 65 29 20 28 22 64 61 74 61 22 20 ell-indentation-module).("data".
3720 2e 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 64 61 74 61 29 20 28 22 74 79 ..haskell-indentation-data).("ty
3740 70 65 22 20 2e 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 64 61 74 61 29 20 pe"...haskell-indentation-data).
3760 28 22 6e 65 77 74 79 70 65 22 20 2e 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e ("newtype"...haskell-indentation
3780 2d 64 61 74 61 29 20 28 22 69 6d 70 6f 72 74 22 20 2e 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e -data).("import"...haskell-inden
37a0 74 61 74 69 6f 6e 2d 69 6d 70 6f 72 74 29 20 28 22 66 6f 72 65 69 67 6e 22 20 2e 20 68 61 73 6b tation-import).("foreign"...hask
37c0 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 66 6f 72 65 69 67 6e 29 20 28 22 77 68 65 72 65 ell-indentation-foreign).("where
37e0 22 20 2e 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 74 6f 70 6c 65 76 65 6c "...haskell-indentation-toplevel
3800 2d 77 68 65 72 65 29 20 28 22 63 6c 61 73 73 22 20 2e 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e -where).("class"...haskell-inden
3820 74 61 74 69 6f 6e 2d 63 6c 61 73 73 2d 64 65 63 6c 61 72 61 74 69 6f 6e 29 20 28 22 69 6e 73 74 tation-class-declaration).("inst
3840 61 6e 63 65 22 20 2e 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 63 6c 61 73 ance"...haskell-indentation-clas
3860 73 2d 64 65 63 6c 61 72 61 74 69 6f 6e 29 20 28 22 64 65 72 69 76 69 6e 67 22 20 2e 20 68 61 73 s-declaration).("deriving"...has
3880 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 64 65 72 69 76 69 6e 67 29 29 20 28 23 24 20 kell-indentation-deriving)).(#$.
38a0 2e 20 31 33 39 32 32 29 29 0a 23 40 36 33 20 41 6c 69 73 74 20 6f 66 20 74 6f 6b 65 6e 73 20 69 ..13922)).#@63.Alist.of.tokens.i
38c0 6e 20 74 79 70 65 20 64 65 63 6c 61 72 61 74 69 6f 6e 73 20 77 69 74 68 20 61 73 73 6f 63 69 61 n.type.declarations.with.associa
38e0 74 65 64 20 70 61 72 73 65 72 73 2e 1f 0a 28 64 65 66 63 6f 6e 73 74 20 68 61 73 6b 65 6c 6c 2d ted.parsers...(defconst.haskell-
3900 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 74 79 70 65 2d 6c 69 73 74 20 28 62 79 74 65 2d 63 6f 64 65 indentation-type-list.(byte-code
3920 20 22 5c 33 30 30 5c 33 30 31 5c 33 30 32 5c 33 30 31 5c 33 30 33 5c 33 30 34 5c 33 30 35 23 5c ."\300\301\302\301\303\304\305#\
3940 22 42 5c 33 30 36 5c 33 30 31 5c 33 30 37 5c 33 30 34 5c 33 31 30 5c 33 31 31 24 42 5c 33 31 32 "B\306\301\307\304\310\311$B\312
3960 5c 33 30 31 5c 33 30 37 5c 33 30 34 5c 33 31 33 5c 33 31 31 24 42 5c 33 31 34 5c 33 30 31 5c 33 \301\307\304\313\311$B\314\301\3
3980 30 37 5c 33 30 34 5c 33 31 35 5c 33 31 31 24 42 46 5c 32 30 37 22 20 5b 22 3a 3a 22 20 61 70 70 07\304\315\311$BF\207".["::".app
39a0 6c 79 2d 70 61 72 74 69 61 6c 6c 79 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e ly-partially.haskell-indentation
39c0 2d 77 69 74 68 2d 73 74 61 72 74 65 72 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f -with-starter.haskell-indentatio
39e0 6e 2d 73 65 70 61 72 61 74 65 64 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d n-separated.haskell-indentation-
3a00 74 79 70 65 20 28 22 2d 3e 22 20 22 3d 3e 22 29 20 22 28 22 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 type.("->"."=>")."(".haskell-ind
3a20 65 6e 74 61 74 69 6f 6e 2d 6c 69 73 74 20 22 29 22 20 22 2c 22 20 22 5b 22 20 22 5d 22 20 22 7b entation-list.")".","."["."]"."{
3a40 22 20 22 7d 22 5d 20 39 29 20 28 23 24 20 2e 20 31 34 35 31 31 29 29 0a 23 40 35 39 20 41 6c 69 "."}"].9).(#$...14511)).#@59.Ali
3a60 73 74 20 6f 66 20 6b 65 79 77 6f 72 64 73 20 69 6e 20 65 78 70 72 65 73 73 69 6f 6e 73 20 77 69 st.of.keywords.in.expressions.wi
3a80 74 68 20 61 73 73 6f 63 69 61 74 65 64 20 70 61 72 73 65 72 73 2e 1f 0a 28 64 65 66 63 6f 6e 73 th.associated.parsers...(defcons
3aa0 74 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 65 78 70 72 65 73 73 69 6f 6e t.haskell-indentation-expression
3ac0 2d 6c 69 73 74 20 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 30 5c 33 30 31 5c 33 30 32 5c 33 -list.(byte-code."\300\301\302\3
3ae0 30 33 5c 33 30 34 5c 33 30 35 5c 33 30 36 5c 33 30 37 5c 22 42 5c 33 31 30 5c 33 30 35 5c 33 31 03\304\305\306\307\"B\310\305\31
3b00 31 5c 33 31 32 5c 22 42 5c 33 31 33 5c 33 30 35 5c 33 31 31 5c 33 31 32 5c 22 42 5c 33 31 34 5c 1\312\"B\313\305\311\312\"B\314\
3b20 33 30 35 5c 33 31 31 5c 33 31 32 5c 22 42 5c 33 31 35 5c 33 30 35 5c 33 30 36 5c 33 31 36 5c 22 305\311\312\"B\315\305\306\316\"
3b40 42 5c 33 31 37 5c 33 30 35 5c 33 31 31 5c 33 32 30 5c 22 42 5c 33 32 31 5c 33 30 35 5c 33 30 36 B\317\305\311\320\"B\321\305\306
3b60 5c 33 32 32 5c 22 42 5c 33 32 33 5c 33 30 35 5c 33 31 31 5c 33 32 34 5c 33 32 35 5c 33 32 36 24 \322\"B\323\305\311\324\325\326$
3b80 42 5c 33 32 37 5c 33 33 30 5c 33 30 35 5c 33 33 31 5c 33 33 32 5c 22 42 5c 33 33 33 5c 33 30 35 B\327\330\305\331\332\"B\333\305
3ba0 5c 33 33 31 5c 33 33 32 5c 22 42 5c 33 33 34 5c 33 30 35 5c 33 33 35 5c 33 33 32 5c 33 33 36 5c \331\332\"B\334\305\335\332\336\
3bc0 33 33 37 24 42 5c 33 34 30 5c 33 30 35 5c 33 33 35 5c 33 33 32 5c 33 34 31 5c 33 34 32 5c 33 34 337$B\340\305\335\332\341\342\34
3be0 33 25 42 5c 33 34 34 5c 33 30 35 5c 33 33 35 5c 33 33 32 5c 33 34 35 5c 33 34 32 24 42 5c 32 35 3%B\344\305\335\332\345\342$B\25
3c00 37 12 5c 32 30 37 22 20 5b 28 22 64 61 74 61 22 20 2e 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 7.\207".[("data"...haskell-inden
3c20 74 61 74 69 6f 6e 2d 64 61 74 61 29 20 28 22 74 79 70 65 22 20 2e 20 68 61 73 6b 65 6c 6c 2d 69 tation-data).("type"...haskell-i
3c40 6e 64 65 6e 74 61 74 69 6f 6e 2d 64 61 74 61 29 20 28 22 6e 65 77 74 79 70 65 22 20 2e 20 68 61 ndentation-data).("newtype"...ha
3c60 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 64 61 74 61 29 20 28 22 69 66 22 20 2e 20 skell-indentation-data).("if"...
3c80 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 69 66 29 20 22 6c 65 74 22 20 61 70 haskell-indentation-if)."let".ap
3ca0 70 6c 79 2d 70 61 72 74 69 61 6c 6c 79 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f ply-partially.haskell-indentatio
3cc0 6e 2d 70 68 72 61 73 65 20 28 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 64 65 n-phrase.(haskell-indentation-de
3ce0 63 6c 61 72 61 74 69 6f 6e 2d 6c 61 79 6f 75 74 20 22 69 6e 22 20 68 61 73 6b 65 6c 6c 2d 69 6e claration-layout."in".haskell-in
3d00 64 65 6e 74 61 74 69 6f 6e 2d 65 78 70 72 65 73 73 69 6f 6e 29 20 22 64 6f 22 20 68 61 73 6b 65 dentation-expression)."do".haske
3d20 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 77 69 74 68 2d 73 74 61 72 74 65 72 20 68 61 73 6b ll-indentation-with-starter.hask
3d40 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 65 78 70 72 65 73 73 69 6f 6e 2d 6c 61 79 6f 75 ell-indentation-expression-layou
3d60 74 20 22 6d 64 6f 22 20 22 72 65 63 22 20 22 63 61 73 65 22 20 28 68 61 73 6b 65 6c 6c 2d 69 6e t."mdo"."rec"."case".(haskell-in
3d80 64 65 6e 74 61 74 69 6f 6e 2d 65 78 70 72 65 73 73 69 6f 6e 20 22 6f 66 22 20 68 61 73 6b 65 6c dentation-expression."of".haskel
3da0 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 63 61 73 65 2d 6c 61 79 6f 75 74 29 20 22 5c 5c 22 20 l-indentation-case-layout)."\\".
3dc0 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 6c 61 6d 62 64 61 2d 6d 61 79 62 65 haskell-indentation-lambda-maybe
3de0 2d 6c 61 6d 62 64 61 63 61 73 65 20 22 70 72 6f 63 22 20 28 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 -lambdacase."proc".(haskell-inde
3e00 6e 74 61 74 69 6f 6e 2d 65 78 70 72 65 73 73 69 6f 6e 20 22 2d 3e 22 20 68 61 73 6b 65 6c 6c 2d ntation-expression."->".haskell-
3e20 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 65 78 70 72 65 73 73 69 6f 6e 29 20 22 77 68 65 72 65 22 20 indentation-expression)."where".
3e40 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 64 65 63 6c 61 72 61 74 69 6f 6e 2d haskell-indentation-declaration-
3e60 6c 61 79 6f 75 74 20 6e 69 6c 20 74 20 28 22 3a 3a 22 20 2e 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 layout.nil.t.("::"...haskell-ind
3e80 65 6e 74 61 74 69 6f 6e 2d 73 63 6f 70 65 64 2d 74 79 70 65 29 20 22 3d 22 20 68 61 73 6b 65 6c entation-scoped-type)."=".haskel
3ea0 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 73 74 61 74 65 6d 65 6e 74 2d 72 69 67 68 74 20 68 61 l-indentation-statement-right.ha
3ec0 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 65 78 70 72 65 73 73 69 6f 6e 20 22 3c 2d skell-indentation-expression."<-
3ee0 22 20 22 28 22 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 6c 69 73 74 20 22 "."(".haskell-indentation-list."
3f00 29 22 20 28 6c 69 73 74 20 22 2c 22 20 22 2d 3e 22 29 20 22 5b 22 20 22 5d 22 20 22 2c 22 20 22 )".(list.","."->")."["."]".","."
3f20 7c 22 20 22 7b 22 20 22 7d 22 5d 20 32 33 29 20 28 23 24 20 2e 20 31 34 39 34 31 29 29 0a 23 40 |"."{"."}"].23).(#$...14941)).#@
3f40 35 37 20 50 61 72 73 65 20 6c 61 79 6f 75 74 20 6c 69 73 74 20 77 69 74 68 20 65 78 70 72 65 73 57.Parse.layout.list.with.expres
3f60 73 69 6f 6e 73 2c 20 73 75 63 68 20 61 73 20 61 66 74 65 72 20 22 64 6f 22 2e 1f 0a 28 64 65 66 sions,.such.as.after."do"...(def
3f80 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 65 78 70 72 65 alias.'haskell-indentation-expre
3fa0 73 73 69 6f 6e 2d 6c 61 79 6f 75 74 20 23 5b 30 20 22 5c 33 30 30 5c 33 30 31 21 5c 32 30 37 22 ssion-layout.#[0."\300\301!\207"
3fc0 20 5b 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 6c 61 79 6f 75 74 20 68 61 73 .[haskell-indentation-layout.has
3fe0 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 65 78 70 72 65 73 73 69 6f 6e 5d 20 32 20 28 kell-indentation-expression].2.(
4000 23 24 20 2e 20 31 36 31 39 35 29 5d 29 0a 23 40 36 31 20 50 61 72 73 65 20 6c 61 79 6f 75 74 20 #$...16195)]).#@61.Parse.layout.
4020 6c 69 73 74 20 77 69 74 68 20 64 65 63 6c 61 72 61 74 69 6f 6e 73 2c 20 73 75 63 68 20 61 73 20 list.with.declarations,.such.as.
4040 61 66 74 65 72 20 22 77 68 65 72 65 22 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 after."where"...(defalias.'haske
4060 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 64 65 63 6c 61 72 61 74 69 6f 6e 2d 6c 61 79 6f 75 ll-indentation-declaration-layou
4080 74 20 23 5b 30 20 22 5c 33 30 30 5c 33 30 31 21 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 69 t.#[0."\300\301!\207".[haskell-i
40a0 6e 64 65 6e 74 61 74 69 6f 6e 2d 6c 61 79 6f 75 74 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 ndentation-layout.haskell-indent
40c0 61 74 69 6f 6e 2d 64 65 63 6c 61 72 61 74 69 6f 6e 5d 20 32 20 28 23 24 20 2e 20 31 36 34 30 33 ation-declaration].2.(#$...16403
40e0 29 5d 29 0a 23 40 34 32 20 50 61 72 73 65 20 6c 61 79 6f 75 74 20 6c 69 73 74 20 77 69 74 68 20 )]).#@42.Parse.layout.list.with.
4100 63 61 73 65 20 65 78 70 72 65 73 73 69 6f 6e 73 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 case.expressions...(defalias.'ha
4120 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 63 61 73 65 2d 6c 61 79 6f 75 74 20 23 5b skell-indentation-case-layout.#[
4140 30 20 22 5c 33 30 30 5c 33 30 31 21 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 0."\300\301!\207".[haskell-inden
4160 74 61 74 69 6f 6e 2d 6c 61 79 6f 75 74 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f tation-layout.haskell-indentatio
4180 6e 2d 63 61 73 65 5d 20 32 20 28 23 24 20 2e 20 31 36 36 31 37 29 5d 29 0a 23 40 32 38 30 20 50 n-case].2.(#$...16617)]).#@280.P
41a0 61 72 73 65 20 6c 61 6d 62 64 61 20 6f 72 20 6c 61 6d 62 64 61 2d 63 61 73 65 20 65 78 70 72 65 arse.lambda.or.lambda-case.expre
41c0 73 73 69 6f 6e 2e 0a 41 66 74 65 72 20 61 20 6c 61 6d 62 64 61 20 28 62 61 63 6b 73 6c 61 73 68 ssion..After.a.lambda.(backslash
41e0 29 20 74 68 65 72 65 20 61 72 65 20 74 77 6f 20 70 6f 73 73 69 62 6c 65 20 63 61 73 65 73 3a 0a ).there.are.two.possible.cases:.
4200 0a 2d 20 74 68 65 20 6e 65 77 20 6c 61 6d 62 64 61 63 61 73 65 20 65 78 70 72 65 73 73 69 6f 6e .-.the.new.lambdacase.expression
4220 2c 20 74 68 61 74 20 63 61 6e 20 62 65 20 72 65 63 6f 67 6e 69 7a 65 64 20 62 79 20 74 68 65 0a ,.that.can.be.recognized.by.the.
4240 20 20 6e 65 78 74 20 74 6f 6b 65 6e 20 62 65 69 6e 67 20 22 63 61 73 65 22 3b 0a 0a 2d 20 6f 72 ..next.token.being."case";..-.or
4260 20 73 69 6d 70 6c 79 20 61 6e 20 61 6e 6f 6e 79 6d 6f 75 73 20 66 75 6e 63 74 69 6f 6e 20 64 65 .simply.an.anonymous.function.de
4280 66 69 6e 69 74 69 6f 6e 20 69 6e 20 74 68 65 20 66 6f 72 6d 20 6f 66 0a 20 20 22 65 78 70 72 65 finition.in.the.form.of..."expre
42a0 73 73 69 6f 6e 20 2d 3e 20 65 78 70 72 65 73 73 69 6f 6e 22 2e 1f 0a 28 64 65 66 61 6c 69 61 73 ssion.->.expression"...(defalias
42c0 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 6c 61 6d 62 64 61 2d 6d 61 79 .'haskell-indentation-lambda-may
42e0 62 65 2d 6c 61 6d 62 64 61 63 61 73 65 20 23 5b 30 20 22 08 5c 33 30 31 5c 32 33 30 5c 32 30 33 be-lambdacase.#[0.".\301\230\203
4300 5c 6e 00 5c 33 30 32 5c 33 30 33 21 5c 32 30 37 5c 33 30 34 5c 33 30 35 21 5c 32 30 37 22 20 5b \n.\302\303!\207\304\305!\207".[
4320 63 75 72 72 65 6e 74 2d 74 6f 6b 65 6e 20 22 63 61 73 65 22 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 current-token."case".haskell-ind
4340 65 6e 74 61 74 69 6f 6e 2d 77 69 74 68 2d 73 74 61 72 74 65 72 20 68 61 73 6b 65 6c 6c 2d 69 6e entation-with-starter.haskell-in
4360 64 65 6e 74 61 74 69 6f 6e 2d 63 61 73 65 2d 6c 61 79 6f 75 74 20 68 61 73 6b 65 6c 6c 2d 69 6e dentation-case-layout.haskell-in
4380 64 65 6e 74 61 74 69 6f 6e 2d 70 68 72 61 73 65 2d 72 65 73 74 20 28 68 61 73 6b 65 6c 6c 2d 69 dentation-phrase-rest.(haskell-i
43a0 6e 64 65 6e 74 61 74 69 6f 6e 2d 65 78 70 72 65 73 73 69 6f 6e 20 22 2d 3e 22 20 68 61 73 6b 65 ndentation-expression."->".haske
43c0 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 65 78 70 72 65 73 73 69 6f 6e 29 5d 20 32 20 28 23 ll-indentation-expression)].2.(#
43e0 24 20 2e 20 31 36 37 39 39 29 5d 29 0a 23 40 33 30 20 50 61 72 73 65 20 66 75 6e 63 74 69 6f 6e $...16799)]).#@30.Parse.function
4400 61 6c 20 64 65 70 65 6e 64 65 6e 63 79 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 al.dependency...(defalias.'haske
4420 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 66 75 6e 64 65 70 20 23 5b 30 20 22 5c 33 30 30 5c ll-indentation-fundep.#[0."\300\
4440 33 30 31 5c 33 30 32 5c 33 30 33 5c 33 30 34 23 21 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 301\302\303\304#!\207".[haskell-
4460 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 77 69 74 68 2d 73 74 61 72 74 65 72 20 61 70 70 6c 79 2d 70 indentation-with-starter.apply-p
4480 61 72 74 69 61 6c 6c 79 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 73 65 70 artially.haskell-indentation-sep
44a0 61 72 61 74 65 64 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 66 75 6e 64 65 arated.haskell-indentation-funde
44c0 70 31 20 22 2c 22 5d 20 35 20 28 23 24 20 2e 20 31 37 33 39 34 29 5d 29 0a 23 40 35 33 20 50 61 p1.","].5.(#$...17394)]).#@53.Pa
44e0 72 73 65 20 61 6e 20 69 74 65 6d 20 69 6e 20 66 75 6e 63 74 69 6f 6e 61 6c 20 64 65 70 65 6e 64 rse.an.item.in.functional.depend
4500 65 6e 63 79 20 64 65 63 6c 61 72 61 74 69 6f 6e 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 ency.declaration...(defalias.'ha
4520 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 66 75 6e 64 65 70 31 20 23 5b 30 20 22 69 skell-indentation-fundep1.#[0."i
4540 18 09 5c 33 30 33 5c 32 33 35 5c 32 30 33 0e 00 5c 33 30 34 20 5c 32 31 30 5c 32 30 32 02 00 09 ..\303\235\203..\304.\210\202...
4560 5c 33 30 35 3d 5c 32 30 35 1d 00 5c 6e 5c 33 30 36 5c 32 33 35 5c 32 30 35 1d 00 5c 33 30 37 08 \305=\205..\n\306\235\205..\307.
4580 21 29 5c 32 30 37 22 20 5b 63 75 72 72 65 6e 74 2d 69 6e 64 65 6e 74 20 63 75 72 72 65 6e 74 2d !)\207".[current-indent.current-
45a0 74 6f 6b 65 6e 20 66 6f 6c 6c 6f 77 69 6e 67 2d 74 6f 6b 65 6e 20 28 76 61 6c 75 65 20 22 2d 3e token.following-token.(value."->
45c0 22 29 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 72 65 61 64 2d 6e 65 78 74 ").haskell-indentation-read-next
45e0 2d 74 6f 6b 65 6e 20 65 6e 64 2d 74 6f 6b 65 6e 73 20 28 76 61 6c 75 65 20 22 2d 3e 22 29 20 68 -token.end-tokens.(value."->").h
4600 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 61 64 64 2d 69 6e 64 65 6e 74 61 74 69 askell-indentation-add-indentati
4620 6f 6e 5d 20 32 20 28 23 24 20 2e 20 31 37 36 33 30 29 5d 29 0a 23 40 32 38 20 50 61 72 73 65 20 on].2.(#$...17630)]).#@28.Parse.
4640 74 6f 70 6c 65 76 65 6c 20 73 74 61 74 65 6d 65 6e 74 73 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 toplevel.statements...(defalias.
4660 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 74 6f 70 6c 65 76 65 6c 20 23 5b 'haskell-indentation-toplevel.#[
4680 30 20 22 5c 33 30 30 5c 33 30 31 21 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 0."\300\301!\207".[haskell-inden
46a0 74 61 74 69 6f 6e 2d 6c 61 79 6f 75 74 20 23 5b 30 20 22 5c 33 30 32 08 09 5c 22 5c 32 31 31 5c tation-layout.#[0."\302..\"\211\
46c0 32 30 33 0e 00 5c 32 31 31 41 20 5c 32 30 32 10 00 5c 33 30 33 20 5c 32 30 37 22 20 5b 63 75 72 203..\211A.\202..\303.\207".[cur
46e0 72 65 6e 74 2d 74 6f 6b 65 6e 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 74 rent-token.haskell-indentation-t
4700 6f 70 6c 65 76 65 6c 2d 6c 69 73 74 20 61 73 73 6f 63 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e oplevel-list.assoc.haskell-inden
4720 74 61 74 69 6f 6e 2d 64 65 63 6c 61 72 61 74 69 6f 6e 5d 20 33 5d 5d 20 32 20 28 23 24 20 2e 20 tation-declaration].3]].2.(#$...
4740 31 37 39 37 38 29 5d 29 0a 23 40 32 35 20 50 61 72 73 65 20 74 79 70 65 20 64 65 63 6c 61 72 61 17978)]).#@25.Parse.type.declara
4760 74 69 6f 6e 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 tion...(defalias.'haskell-indent
4780 61 74 69 6f 6e 2d 74 79 70 65 20 23 5b 30 20 22 69 18 5c 33 30 36 32 53 00 09 5c 33 30 37 5c 32 ation-type.#[0."i.\3062S..\307\2
47a0 33 35 5c 32 30 33 12 00 5c 33 31 30 20 5c 32 31 30 5c 32 30 32 06 00 09 5c 33 31 31 3d 5c 32 30 35\203..\310.\210\202...\311=\20
47c0 33 3b 00 5c 6e 5c 33 31 32 5c 32 33 35 5c 32 30 33 33 00 5c 6e 5c 33 31 33 5c 32 33 32 5c 32 30 3;.\n\312\235\2033.\n\313\232\20
47e0 33 2b 00 5c 33 31 34 0b 21 5c 32 31 30 5c 32 30 32 2f 00 5c 33 31 34 08 21 5c 32 31 30 5c 33 31 3+.\314.!\210\202/.\314.!\210\31
4800 34 5c 66 21 5c 32 31 30 5c 33 31 35 5c 33 30 36 5c 33 31 36 5c 22 5c 32 31 30 5c 32 30 32 06 00 4\f!\210\315\306\316\"\210\202..
4820 5c 33 31 37 09 0d 5c 22 5c 32 31 31 5c 32 30 34 4b 00 5c 33 31 35 5c 33 30 36 5c 33 31 36 5c 22 \317..\"\211\204K.\315\306\316\"
4840 5c 32 31 30 5c 32 30 32 4f 00 5c 32 31 31 41 20 5c 32 31 30 5c 32 31 30 5c 32 30 32 06 00 29 5c \210\202O.\211A.\210\210\202..)\
4860 32 30 37 22 20 5b 63 75 72 72 65 6e 74 2d 69 6e 64 65 6e 74 20 63 75 72 72 65 6e 74 2d 74 6f 6b 207".[current-indent.current-tok
4880 65 6e 20 66 6f 6c 6c 6f 77 69 6e 67 2d 74 6f 6b 65 6e 20 73 74 61 72 74 65 72 2d 69 6e 64 65 6e en.following-token.starter-inden
48a0 74 20 6c 65 66 74 2d 69 6e 64 65 6e 74 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f t.left-indent.haskell-indentatio
48c0 6e 2d 74 79 70 65 2d 6c 69 73 74 20 72 65 74 75 72 6e 20 28 76 61 6c 75 65 20 6f 70 65 72 61 74 n-type-list.return.(value.operat
48e0 6f 72 20 22 2d 3e 22 20 22 3d 3e 22 29 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f or."->"."=>").haskell-indentatio
4900 6e 2d 72 65 61 64 2d 6e 65 78 74 2d 74 6f 6b 65 6e 20 65 6e 64 2d 74 6f 6b 65 6e 73 20 28 76 61 n-read-next-token.end-tokens.(va
4920 6c 75 65 20 6f 70 65 72 61 74 6f 72 20 6e 6f 2d 66 6f 6c 6c 6f 77 69 6e 67 2d 74 6f 6b 65 6e 20 lue.operator.no-following-token.
4940 22 28 22 20 22 5b 22 20 22 7b 22 20 22 3a 3a 22 29 20 22 3d 3e 22 20 68 61 73 6b 65 6c 6c 2d 69 "("."["."{"."::")."=>".haskell-i
4960 6e 64 65 6e 74 61 74 69 6f 6e 2d 61 64 64 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 74 68 72 6f 77 ndentation-add-indentation.throw
4980 20 6e 69 6c 20 61 73 73 6f 63 5d 20 34 20 28 23 24 20 2e 20 31 38 32 35 34 29 5d 29 0a 23 40 33 .nil.assoc].4.(#$...18254)]).#@3
49a0 34 20 50 61 72 73 65 20 61 20 73 69 6e 67 6c 65 20 74 79 70 65 20 64 65 63 6c 61 72 61 74 69 6f 4.Parse.a.single.type.declaratio
49c0 6e 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 n...(defalias.'haskell-indentati
49e0 6f 6e 2d 74 79 70 65 2d 31 20 23 5b 30 20 22 69 18 5c 33 30 34 32 3d 00 09 5c 33 30 35 5c 32 33 on-type-1.#[0."i.\3042=..\305\23
4a00 35 5c 32 30 33 11 00 5c 33 30 36 20 5c 32 30 32 3c 00 09 5c 33 30 37 3d 5c 32 30 33 28 00 5c 6e 5\203..\306.\202<..\307=\203(.\n
4a20 5c 33 31 30 5c 32 33 35 5c 32 30 33 21 00 5c 33 31 31 08 21 5c 32 31 30 5c 33 31 32 5c 33 30 34 \310\235\203!.\311.!\210\312\304
4a40 5c 33 31 33 5c 22 5c 32 30 32 3c 00 5c 33 31 34 09 0b 5c 22 5c 32 31 31 5c 32 30 34 37 00 5c 33 \313\"\202<.\314..\"\211\2047.\3
4a60 31 32 5c 33 30 34 5c 33 31 33 5c 22 5c 32 30 32 3a 00 5c 32 31 31 41 20 5c 32 36 32 01 30 29 5c 12\304\313\"\202:.\211A.\262.0)\
4a80 32 30 37 22 20 5b 63 75 72 72 65 6e 74 2d 69 6e 64 65 6e 74 20 63 75 72 72 65 6e 74 2d 74 6f 6b 207".[current-indent.current-tok
4aa0 65 6e 20 66 6f 6c 6c 6f 77 69 6e 67 2d 74 6f 6b 65 6e 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e en.following-token.haskell-inden
4ac0 74 61 74 69 6f 6e 2d 74 79 70 65 2d 6c 69 73 74 20 72 65 74 75 72 6e 20 28 76 61 6c 75 65 20 6f tation-type-list.return.(value.o
4ae0 70 65 72 61 74 6f 72 20 22 2d 3e 22 20 22 3d 3e 22 29 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e perator."->"."=>").haskell-inden
4b00 74 61 74 69 6f 6e 2d 72 65 61 64 2d 6e 65 78 74 2d 74 6f 6b 65 6e 20 65 6e 64 2d 74 6f 6b 65 6e tation-read-next-token.end-token
4b20 73 20 28 76 61 6c 75 65 20 6f 70 65 72 61 74 6f 72 20 6e 6f 2d 66 6f 6c 6c 6f 77 69 6e 67 2d 74 s.(value.operator.no-following-t
4b40 6f 6b 65 6e 20 22 2d 3e 22 20 22 3d 3e 22 20 22 28 22 20 22 5b 22 20 22 7b 22 20 22 3a 3a 22 29 oken."->"."=>"."("."["."{"."::")
4b60 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 61 64 64 2d 69 6e 64 65 6e 74 61 .haskell-indentation-add-indenta
4b80 74 69 6f 6e 20 74 68 72 6f 77 20 6e 69 6c 20 61 73 73 6f 63 5d 20 34 20 28 23 24 20 2e 20 31 38 tion.throw.nil.assoc].4.(#$...18
4ba0 38 35 30 29 5d 29 0a 23 40 39 34 20 50 61 72 73 65 20 73 63 6f 70 65 64 20 74 79 70 65 20 64 65 850)]).#@94.Parse.scoped.type.de
4bc0 63 6c 61 72 61 74 69 6f 6e 2e 0a 0a 46 6f 72 20 65 78 61 6d 70 6c 65 0a 20 20 20 6c 65 74 20 78 claration...For.example....let.x
4be0 20 3a 3a 20 49 6e 74 20 3d 20 31 32 0a 20 20 20 64 6f 20 78 20 3a 3a 20 49 6e 74 20 3c 2d 20 72 .::.Int.=.12....do.x.::.Int.<-.r
4c00 65 74 75 72 6e 20 31 32 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 eturn.12..(defalias.'haskell-ind
4c20 65 6e 74 61 74 69 6f 6e 2d 73 63 6f 70 65 64 2d 74 79 70 65 20 23 5b 30 20 22 5c 33 30 31 5c 33 entation-scoped-type.#[0."\301\3
4c40 30 32 5c 33 30 33 5c 33 30 34 5c 33 30 35 23 21 5c 32 31 30 08 5c 33 30 36 5c 32 33 35 5c 32 30 02\303\304\305#!\210.\306\235\20
4c60 35 11 00 5c 33 30 37 5c 33 31 30 21 5c 32 30 37 22 20 5b 63 75 72 72 65 6e 74 2d 74 6f 6b 65 6e 5..\307\310!\207".[current-token
4c80 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 77 69 74 68 2d 73 74 61 72 74 65 .haskell-indentation-with-starte
4ca0 72 20 61 70 70 6c 79 2d 70 61 72 74 69 61 6c 6c 79 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 r.apply-partially.haskell-indent
4cc0 61 74 69 6f 6e 2d 73 65 70 61 72 61 74 65 64 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 ation-separated.haskell-indentat
4ce0 69 6f 6e 2d 74 79 70 65 20 28 22 2d 3e 22 20 22 3d 3e 22 29 20 28 22 3c 2d 22 20 22 3d 22 29 20 ion-type.("->"."=>").("<-"."=").
4d00 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 73 74 61 74 65 6d 65 6e 74 2d 72 69 haskell-indentation-statement-ri
4d20 67 68 74 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 65 78 70 72 65 73 73 69 ght.haskell-indentation-expressi
4d40 6f 6e 5d 20 35 20 28 23 24 20 2e 20 31 39 33 37 32 29 5d 29 0a 23 40 33 33 20 50 61 72 73 65 20 on].5.(#$...19372)]).#@33.Parse.
4d60 64 61 74 61 20 6f 72 20 74 79 70 65 20 64 65 63 6c 61 72 61 74 69 6f 6e 2e 1f 0a 28 64 65 66 61 data.or.type.declaration...(defa
4d80 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 64 61 74 61 20 23 lias.'haskell-indentation-data.#
4da0 5b 30 20 22 5c 33 30 33 20 5c 32 31 30 08 5c 33 30 34 5c 32 33 30 5c 32 30 33 5c 66 00 5c 33 30 [0."\303.\210.\304\230\203\f.\30
4dc0 33 20 5c 32 31 30 5c 33 30 35 20 5c 32 31 30 08 5c 33 30 36 3d 5c 32 30 33 24 00 09 5c 33 30 37 3.\210\305.\210.\306=\203$..\307
4de0 5c 32 33 35 5c 32 30 35 71 00 5c 33 31 30 5c 6e 21 5c 32 31 30 5c 33 31 31 5c 33 31 32 5c 33 31 \235\205q.\310\n!\210\311\312\31
4e00 33 5c 22 5c 32 30 37 08 5c 33 31 34 5c 32 33 30 5c 32 30 33 4e 00 69 5c 33 31 35 5c 33 31 36 21 3\"\207.\314\230\203N.i\315\316!
4e20 5c 32 31 30 08 5c 33 30 36 5c 32 33 32 5c 32 30 33 44 00 09 5c 33 31 37 5c 32 33 30 5c 32 30 35 \210.\306\232\203D..\317\230\205
4e40 4d 00 5c 33 32 30 01 21 5c 32 31 30 5c 33 32 31 20 5c 32 30 32 4d 00 08 5c 33 31 37 5c 32 33 32 M.\320.!\210\321.\202M..\317\232
4e60 5c 32 30 35 4d 00 5c 33 31 35 5c 33 32 32 21 5c 32 30 37 08 5c 33 32 33 5c 32 33 30 5c 32 30 35 \205M.\315\322!\207.\323\230\205
4e80 71 00 5c 33 31 35 5c 33 32 34 5c 33 31 33 5c 22 5c 32 31 30 08 5c 33 30 36 5c 32 33 32 5c 32 30 q.\315\324\313\"\210.\306\232\20
4ea0 33 68 00 09 5c 33 31 37 5c 32 33 30 5c 32 30 35 71 00 5c 33 32 31 20 5c 32 30 37 08 5c 33 31 37 3h..\317\230\205q.\321.\207.\317
4ec0 5c 32 33 32 5c 32 30 35 71 00 5c 33 31 35 5c 33 32 32 21 5c 32 30 37 22 20 5b 63 75 72 72 65 6e \232\205q.\315\322!\207".[curren
4ee0 74 2d 74 6f 6b 65 6e 20 66 6f 6c 6c 6f 77 69 6e 67 2d 74 6f 6b 65 6e 20 63 75 72 72 65 6e 74 2d t-token.following-token.current-
4f00 69 6e 64 65 6e 74 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 72 65 61 64 2d indent.haskell-indentation-read-
4f20 6e 65 78 74 2d 74 6f 6b 65 6e 20 22 69 6e 73 74 61 6e 63 65 22 20 68 61 73 6b 65 6c 6c 2d 69 6e next-token."instance".haskell-in
4f40 64 65 6e 74 61 74 69 6f 6e 2d 74 79 70 65 20 65 6e 64 2d 74 6f 6b 65 6e 73 20 28 22 3d 22 20 22 dentation-type.end-tokens.("="."
4f60 77 68 65 72 65 22 29 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 61 64 64 2d where").haskell-indentation-add-
4f80 69 6e 64 65 6e 74 61 74 69 6f 6e 20 74 68 72 6f 77 20 70 61 72 73 65 2d 65 6e 64 20 6e 69 6c 20 indentation.throw.parse-end.nil.
4fa0 22 3d 22 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 77 69 74 68 2d 73 74 61 "=".haskell-indentation-with-sta
4fc0 72 74 65 72 20 23 5b 30 20 22 5c 33 30 30 5c 33 30 31 5c 33 30 32 5c 22 5c 32 30 37 22 20 5b 68 rter.#[0."\300\301\302\"\207".[h
4fe0 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 73 65 70 61 72 61 74 65 64 20 68 61 73 askell-indentation-separated.has
5000 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 65 78 70 72 65 73 73 69 6f 6e 20 22 7c 22 5d kell-indentation-expression."|"]
5020 20 33 5d 20 22 64 65 72 69 76 69 6e 67 22 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 .3]."deriving".haskell-indentati
5040 6f 6e 2d 70 75 73 68 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 on-push-indentation.haskell-inde
5060 6e 74 61 74 69 6f 6e 2d 61 64 64 2d 6c 65 66 74 2d 69 6e 64 65 6e 74 20 68 61 73 6b 65 6c 6c 2d ntation-add-left-indent.haskell-
5080 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 74 79 70 65 2d 31 20 22 77 68 65 72 65 22 20 68 61 73 6b 65 indentation-type-1."where".haske
50a0 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 65 78 70 72 65 73 73 69 6f 6e 2d 6c 61 79 6f 75 74 ll-indentation-expression-layout
50c0 5d 20 33 20 28 23 24 20 2e 20 31 39 38 30 32 29 5d 29 0a 23 40 32 37 20 50 61 72 73 65 20 69 6d ].3.(#$...19802)]).#@27.Parse.im
50e0 70 6f 72 74 20 64 65 63 6c 61 72 61 74 69 6f 6e 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 port.declaration...(defalias.'ha
5100 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 69 6d 70 6f 72 74 20 23 5b 30 20 22 5c 33 skell-indentation-import.#[0."\3
5120 30 30 5c 33 30 31 21 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 00\301!\207".[haskell-indentatio
5140 6e 2d 77 69 74 68 2d 73 74 61 72 74 65 72 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 n-with-starter.haskell-indentati
5160 6f 6e 2d 65 78 70 72 65 73 73 69 6f 6e 5d 20 32 20 28 23 24 20 2e 20 32 30 36 39 36 29 5d 29 0a on-expression].2.(#$...20696)]).
5180 23 40 33 35 20 50 61 72 73 65 20 66 6f 72 65 69 67 6e 20 69 6d 70 6f 72 74 20 64 65 63 6c 61 72 #@35.Parse.foreign.import.declar
51a0 61 74 69 6f 6e 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e ation...(defalias.'haskell-inden
51c0 74 61 74 69 6f 6e 2d 66 6f 72 65 69 67 6e 20 23 5b 30 20 22 5c 33 30 30 5c 33 30 31 5c 33 30 32 tation-foreign.#[0."\300\301\302
51e0 5c 33 30 33 5c 22 21 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f \303\"!\207".[haskell-indentatio
5200 6e 2d 77 69 74 68 2d 73 74 61 72 74 65 72 20 61 70 70 6c 79 2d 70 61 72 74 69 61 6c 6c 79 20 68 n-with-starter.apply-partially.h
5220 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 65 78 70 72 65 73 73 69 6f 6e 20 28 76 askell-indentation-expression.(v
5240 61 6c 75 65 20 6f 70 65 72 61 74 6f 72 20 22 69 6d 70 6f 72 74 22 29 5d 20 34 20 28 23 24 20 2e alue.operator."import")].4.(#$..
5260 20 32 30 38 36 39 29 5d 29 0a 23 40 32 36 20 50 61 72 73 65 20 63 6c 61 73 73 20 64 65 63 6c 61 .20869)]).#@26.Parse.class.decla
5280 72 61 74 69 6f 6e 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 ration...(defalias.'haskell-inde
52a0 6e 74 61 74 69 6f 6e 2d 63 6c 61 73 73 2d 64 65 63 6c 61 72 61 74 69 6f 6e 20 23 5b 30 20 22 5c ntation-class-declaration.#[0."\
52c0 33 30 30 5c 33 30 31 21 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 300\301!\207".[haskell-indentati
52e0 6f 6e 2d 77 69 74 68 2d 73 74 61 72 74 65 72 20 23 5b 30 20 22 5c 33 30 31 20 5c 32 31 30 08 5c on-with-starter.#[0."\301.\210.\
5300 33 30 32 5c 32 33 30 5c 32 30 33 5c 66 00 5c 33 30 33 20 5c 32 31 30 08 5c 33 30 34 5c 32 33 30 302\230\203\f.\303.\210.\304\230
5320 5c 32 30 35 16 00 5c 33 30 35 5c 33 30 36 5c 33 30 37 5c 22 5c 32 30 37 22 20 5b 63 75 72 72 65 \205..\305\306\307\"\207".[curre
5340 6e 74 2d 74 6f 6b 65 6e 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 74 79 70 nt-token.haskell-indentation-typ
5360 65 20 22 7c 22 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 66 75 6e 64 65 70 e."|".haskell-indentation-fundep
5380 20 22 77 68 65 72 65 22 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 77 69 74 ."where".haskell-indentation-wit
53a0 68 2d 73 74 61 72 74 65 72 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 64 65 h-starter.haskell-indentation-de
53c0 63 6c 61 72 61 74 69 6f 6e 2d 6c 61 79 6f 75 74 20 6e 69 6c 5d 20 33 5d 5d 20 32 20 28 23 24 20 claration-layout.nil].3]].2.(#$.
53e0 2e 20 32 31 31 30 33 29 5d 29 0a 23 40 33 31 20 50 61 72 73 65 20 73 74 61 6e 64 61 6c 6f 6e 65 ..21103)]).#@31.Parse.standalone
5400 20 64 65 63 6c 61 72 61 74 69 6f 6e 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c .declaration...(defalias.'haskel
5420 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 64 65 72 69 76 69 6e 67 20 23 5b 30 20 22 5c 33 30 30 l-indentation-deriving.#[0."\300
5440 5c 33 30 31 21 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d \301!\207".[haskell-indentation-
5460 77 69 74 68 2d 73 74 61 72 74 65 72 20 23 5b 30 20 22 08 5c 33 30 31 5c 32 33 30 5c 32 30 33 09 with-starter.#[0.".\301\230\203.
5480 00 5c 33 30 32 20 5c 32 31 30 08 5c 33 30 33 5c 32 33 32 5c 32 30 33 17 00 5c 33 30 34 20 5c 32 .\302.\210.\303\232\203..\304.\2
54a0 31 30 5c 33 30 35 5c 33 30 36 5c 33 30 37 5c 22 5c 32 31 30 5c 33 31 30 20 5c 32 31 30 08 5c 33 10\305\306\307\"\210\310.\210.\3
54c0 31 31 5c 32 33 30 5c 32 30 35 5c 22 00 5c 33 31 32 20 5c 32 30 37 22 20 5b 63 75 72 72 65 6e 74 11\230\205\".\312.\207".[current
54e0 2d 74 6f 6b 65 6e 20 22 69 6e 73 74 61 6e 63 65 22 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 -token."instance".haskell-indent
5500 61 74 69 6f 6e 2d 72 65 61 64 2d 6e 65 78 74 2d 74 6f 6b 65 6e 20 65 6e 64 2d 74 6f 6b 65 6e 73 ation-read-next-token.end-tokens
5520 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 61 64 64 2d 6c 65 66 74 2d 69 6e .haskell-indentation-add-left-in
5540 64 65 6e 74 20 74 68 72 6f 77 20 70 61 72 73 65 2d 65 6e 64 20 6e 69 6c 20 68 61 73 6b 65 6c 6c dent.throw.parse-end.nil.haskell
5560 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 74 79 70 65 20 22 7c 22 20 68 61 73 6b 65 6c 6c 2d 69 6e -indentation-type."|".haskell-in
5580 64 65 6e 74 61 74 69 6f 6e 2d 66 75 6e 64 65 70 5d 20 33 5d 5d 20 32 20 28 23 24 20 2e 20 32 31 dentation-fundep].3]].2.(#$...21
55a0 34 38 38 29 5d 29 0a 23 40 32 37 20 50 61 72 73 65 20 6d 6f 64 75 6c 65 20 64 65 63 6c 61 72 61 488)]).#@27.Parse.module.declara
55c0 74 69 6f 6e 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 tion...(defalias.'haskell-indent
55e0 61 74 69 6f 6e 2d 6d 6f 64 75 6c 65 20 23 5b 30 20 22 5c 33 30 30 5c 33 30 31 21 5c 32 30 37 22 ation-module.#[0."\300\301!\207"
5600 20 5b 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 77 69 74 68 2d 73 74 61 72 74 .[haskell-indentation-with-start
5620 65 72 20 23 5b 30 20 22 5c 33 30 35 20 5c 32 31 30 08 5c 33 30 36 5c 32 33 32 5c 32 30 33 5c 66 er.#[0."\305.\210.\306\232\203\f
5640 00 5c 33 30 35 20 5c 32 31 30 08 5c 33 30 37 5c 32 33 30 5c 32 30 33 18 00 5c 33 31 30 5c 33 31 .\305.\210.\307\230\203..\310\31
5660 31 5c 33 31 32 5c 33 31 33 23 5c 32 31 30 08 5c 33 31 34 5c 32 33 30 5c 32 30 33 21 00 5c 33 30 1\312\313#\210.\314\230\203!.\30
5680 35 20 5c 32 30 37 08 5c 33 31 35 3d 5c 32 30 35 45 00 09 5c 33 31 36 5c 32 33 35 5c 32 30 33 3e 5.\207.\315=\205E..\316\235\203>
56a0 00 5c 33 31 37 5c 6e 0b 5c 5c 21 5c 32 31 30 5c 33 31 37 5c 66 0b 5c 5c 21 5c 32 31 30 5c 33 32 .\317\n.\\!\210\317\f.\\!\210\32
56c0 30 5c 33 32 31 5c 33 32 32 5c 22 5c 32 31 30 5c 33 32 33 20 5c 32 31 30 5c 33 32 30 5c 33 32 31 0\321\322\"\210\323.\210\320\321
56e0 5c 33 32 32 5c 22 5c 32 30 37 22 20 5b 63 75 72 72 65 6e 74 2d 74 6f 6b 65 6e 20 66 6f 6c 6c 6f \322\"\207".[current-token.follo
5700 77 69 6e 67 2d 74 6f 6b 65 6e 20 73 74 61 72 74 65 72 2d 69 6e 64 65 6e 74 20 68 61 73 6b 65 6c wing-token.starter-indent.haskel
5720 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 73 74 61 72 74 65 72 2d 6f 66 66 73 65 74 20 6c 65 66 l-indentation-starter-offset.lef
5740 74 2d 69 6e 64 65 6e 74 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 72 65 61 t-indent.haskell-indentation-rea
5760 64 2d 6e 65 78 74 2d 74 6f 6b 65 6e 20 6c 61 79 6f 75 74 2d 69 74 65 6d 20 22 28 22 20 68 61 73 d-next-token.layout-item."(".has
5780 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 6c 69 73 74 20 68 61 73 6b 65 6c 6c 2d 69 6e kell-indentation-list.haskell-in
57a0 64 65 6e 74 61 74 69 6f 6e 2d 6d 6f 64 75 6c 65 2d 65 78 70 6f 72 74 20 22 29 22 20 22 2c 22 20 dentation-module-export.")".",".
57c0 22 77 68 65 72 65 22 20 65 6e 64 2d 74 6f 6b 65 6e 73 20 28 76 61 6c 75 65 20 6e 6f 2d 66 6f 6c "where".end-tokens.(value.no-fol
57e0 6c 6f 77 69 6e 67 2d 74 6f 6b 65 6e 20 22 28 22 29 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 lowing-token."(").haskell-indent
5800 61 74 69 6f 6e 2d 61 64 64 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 74 68 72 6f 77 20 70 61 72 73 ation-add-indentation.throw.pars
5820 65 2d 65 6e 64 20 6e 69 6c 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 61 64 e-end.nil.haskell-indentation-ad
5840 64 2d 6c 61 79 6f 75 74 2d 69 6e 64 65 6e 74 5d 20 34 5d 5d 20 32 20 28 23 24 20 2e 20 32 31 39 d-layout-indent].4]].2.(#$...219
5860 33 32 29 5d 29 0a 23 40 37 30 20 50 61 72 73 65 20 27 77 68 65 72 65 27 20 74 68 61 74 20 77 65 32)]).#@70.Parse.'where'.that.we
5880 20 6d 61 79 20 68 69 74 20 61 73 20 61 20 73 74 61 6e 64 61 6c 6f 6e 65 20 69 6e 20 6d 6f 64 75 .may.hit.as.a.standalone.in.modu
58a0 6c 65 20 64 65 63 6c 61 72 61 74 69 6f 6e 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b le.declaration...(defalias.'hask
58c0 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 74 6f 70 6c 65 76 65 6c 2d 77 68 65 72 65 20 23 ell-indentation-toplevel-where.#
58e0 5b 30 20 22 5c 33 30 31 20 5c 32 31 30 08 5c 33 30 32 3d 5c 32 30 35 10 00 5c 33 30 33 20 5c 32 [0."\301.\210.\302=\205..\303.\2
5900 31 30 5c 33 30 34 5c 33 30 35 5c 33 30 36 5c 22 5c 32 30 37 22 20 5b 63 75 72 72 65 6e 74 2d 74 10\304\305\306\"\207".[current-t
5920 6f 6b 65 6e 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 72 65 61 64 2d 6e 65 oken.haskell-indentation-read-ne
5940 78 74 2d 74 6f 6b 65 6e 20 65 6e 64 2d 74 6f 6b 65 6e 73 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 xt-token.end-tokens.haskell-inde
5960 6e 74 61 74 69 6f 6e 2d 61 64 64 2d 6c 61 79 6f 75 74 2d 69 6e 64 65 6e 74 20 74 68 72 6f 77 20 ntation-add-layout-indent.throw.
5980 70 61 72 73 65 2d 65 6e 64 20 6e 69 6c 5d 20 33 20 28 23 24 20 2e 20 32 32 36 33 35 29 5d 29 0a parse-end.nil].3.(#$...22635)]).
59a0 23 40 32 30 20 50 61 72 73 65 20 65 78 70 6f 72 74 20 6c 69 73 74 2e 1f 0a 28 64 65 66 61 6c 69 #@20.Parse.export.list...(defali
59c0 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 6d 6f 64 75 6c 65 2d 65 as.'haskell-indentation-module-e
59e0 78 70 6f 72 74 20 23 5b 30 20 22 08 5c 33 30 32 5c 32 33 30 5c 32 30 33 21 00 69 19 5c 33 30 33 xport.#[0.".\302\230\203!.i.\303
5a00 20 5c 32 31 30 08 5c 33 30 34 3d 5c 32 30 33 17 00 5c 33 30 35 09 21 5c 32 30 32 1f 00 08 5c 33 .\210.\304=\203..\305.!\202...\3
5a20 30 36 3d 5c 32 30 35 1f 00 5c 33 30 33 20 29 5c 32 30 37 5c 33 30 37 20 5c 32 30 37 22 20 5b 63 06=\205..\303.)\207\307.\207".[c
5a40 75 72 72 65 6e 74 2d 74 6f 6b 65 6e 20 63 75 72 72 65 6e 74 2d 69 6e 64 65 6e 74 20 22 6d 6f 64 urrent-token.current-indent."mod
5a60 75 6c 65 22 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 72 65 61 64 2d 6e 65 ule".haskell-indentation-read-ne
5a80 78 74 2d 74 6f 6b 65 6e 20 65 6e 64 2d 74 6f 6b 65 6e 73 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 xt-token.end-tokens.haskell-inde
5aa0 6e 74 61 74 69 6f 6e 2d 61 64 64 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 76 61 6c 75 65 20 68 61 ntation-add-indentation.value.ha
5ac0 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 74 79 70 65 5d 20 32 20 28 23 24 20 2e 20 skell-indentation-type].2.(#$...
5ae0 32 32 39 34 39 29 5d 29 0a 23 40 31 37 35 20 50 61 72 73 65 20 61 20 6c 69 73 74 2c 20 70 61 69 22949)]).#@175.Parse.a.list,.pai
5b00 72 20 6f 72 20 6f 74 68 65 72 20 65 78 70 72 65 73 73 69 6f 6e 20 63 6f 6e 74 61 69 6e 69 6e 67 r.or.other.expression.containing
5b20 20 6d 75 6c 74 69 70 6c 65 0a 69 74 65 6d 73 20 70 61 72 73 65 64 20 62 79 20 50 41 52 53 45 52 .multiple.items.parsed.by.PARSER
5b40 2c 20 73 65 70 61 72 61 74 65 64 20 62 79 20 53 45 50 20 6f 72 20 53 54 4d 54 2d 53 45 50 2c 20 ,.separated.by.SEP.or.STMT-SEP,.
5b60 61 6e 64 20 65 6e 64 69 6e 67 0a 77 69 74 68 20 45 4e 44 2e 0a 0a 28 66 6e 20 50 41 52 53 45 52 and.ending.with.END...(fn.PARSER
5b80 20 45 4e 44 20 53 45 50 20 26 6f 70 74 69 6f 6e 61 6c 20 53 54 4d 54 2d 53 45 50 29 1f 0a 28 64 .END.SEP.&optional.STMT-SEP)..(d
5ba0 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 6c 69 73 efalias.'haskell-indentation-lis
5bc0 74 20 23 5b 31 30 32 37 20 22 5c 33 30 30 5c 33 30 31 5c 33 30 32 5c 33 30 33 5c 33 30 34 5c 33 t.#[1027."\300\301\302\303\304\3
5be0 30 35 5c 33 30 36 06 5c 6e 44 06 08 06 08 46 45 45 04 5c 22 5c 32 30 37 22 20 5b 68 61 73 6b 65 05\306.\nD....FEE.\"\207".[haske
5c00 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 77 69 74 68 2d 73 74 61 72 74 65 72 20 6c 61 6d 62 ll-indentation-with-starter.lamb
5c20 64 61 20 6e 69 6c 20 6c 65 74 20 28 28 69 6d 70 6c 69 63 69 74 2d 6c 61 79 6f 75 74 2d 61 63 74 da.nil.let.((implicit-layout-act
5c40 69 76 65 20 6e 69 6c 29 29 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 73 65 ive.nil)).haskell-indentation-se
5c60 70 61 72 61 74 65 64 20 66 75 6e 63 74 69 6f 6e 5d 20 31 33 20 28 23 24 20 2e 20 32 33 32 37 39 parated.function].13.(#$...23279
5c80 29 5d 29 0a 23 40 31 33 36 20 50 61 72 73 65 20 61 6e 20 65 78 70 72 65 73 73 69 6f 6e 20 73 74 )]).#@136.Parse.an.expression.st
5ca0 61 72 74 69 6e 67 20 77 69 74 68 20 61 20 6b 65 79 77 6f 72 64 20 6f 72 20 70 61 72 65 6e 74 68 arting.with.a.keyword.or.parenth
5cc0 65 73 69 73 2e 0a 53 6b 69 70 20 74 68 65 20 6b 65 79 77 6f 72 64 20 6f 72 20 70 61 72 65 6e 74 esis..Skip.the.keyword.or.parent
5ce0 68 65 73 69 73 2e 0a 0a 28 66 6e 20 50 41 52 53 45 52 20 26 6f 70 74 69 6f 6e 61 6c 20 45 4e 44 hesis...(fn.PARSER.&optional.END
5d00 20 57 48 45 52 45 2d 45 58 50 52 5c 3d 5c 3f 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 .WHERE-EXPR\=\?)..(defalias.'has
5d20 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 77 69 74 68 2d 73 74 61 72 74 65 72 20 23 5b kell-indentation-with-starter.#[
5d40 37 36 39 20 22 69 08 69 5c 33 30 36 20 55 5c 32 30 33 0d 00 69 5c 32 30 32 0e 00 09 19 18 5c 33 769."i.i\306.U\203..i\202.....\3
5d60 30 37 20 5c 32 31 30 5c 6e 5c 33 31 30 3d 5c 32 30 33 39 00 0b 03 5c 32 33 32 5c 32 30 33 26 00 07.\210\n\310=\2039...\232\203&.
5d80 5c 33 31 31 01 21 5c 32 31 30 5c 32 30 32 34 00 01 5c 32 30 33 31 00 5c 33 31 32 09 21 5c 32 31 \311.!\210\2024..\2031.\312.!\21
5da0 30 5c 32 30 32 34 00 5c 33 31 33 20 5c 32 31 30 5c 33 31 34 5c 33 31 35 5c 33 31 36 5c 22 5c 32 0\2024.\313.\210\314\315\316\"\2
5dc0 31 30 69 18 5c 32 31 31 08 5e 1c 02 5c 32 30 33 49 00 5c 66 0d 5c 5c 5c 32 30 32 4a 00 09 19 03 10i.\211.^..\203I.\f.\\\202J....
5de0 20 5c 32 31 30 5c 6e 5c 33 31 30 3d 5c 32 30 33 69 00 0b 03 5c 32 33 32 5c 32 30 33 5e 00 5c 33 .\210\n\310=\203i...\232\203^.\3
5e00 31 31 5c 66 21 5c 32 31 30 02 5c 32 30 35 71 00 5c 33 31 34 5c 33 31 35 5c 33 31 36 5c 22 5c 32 11\f!\210.\205q.\314\315\316\"\2
5e20 30 32 71 00 5c 6e 03 5c 32 33 32 5c 32 30 35 71 00 5c 33 30 37 20 2d 5c 32 30 37 22 20 5b 63 75 02q.\n.\232\205q.\307.-\207".[cu
5e40 72 72 65 6e 74 2d 69 6e 64 65 6e 74 20 6c 65 66 74 2d 69 6e 64 65 6e 74 20 63 75 72 72 65 6e 74 rrent-indent.left-indent.current
5e60 2d 74 6f 6b 65 6e 20 66 6f 6c 6c 6f 77 69 6e 67 2d 74 6f 6b 65 6e 20 73 74 61 72 74 65 72 2d 69 -token.following-token.starter-i
5e80 6e 64 65 6e 74 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 73 74 61 72 74 65 ndent.haskell-indentation-starte
5ea0 72 2d 6f 66 66 73 65 74 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 63 75 72 r-offset.haskell-indentation-cur
5ec0 72 65 6e 74 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 rent-indentation.haskell-indenta
5ee0 74 69 6f 6e 2d 72 65 61 64 2d 6e 65 78 74 2d 74 6f 6b 65 6e 20 65 6e 64 2d 74 6f 6b 65 6e 73 20 tion-read-next-token.end-tokens.
5f00 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 61 64 64 2d 69 6e 64 65 6e 74 61 74 haskell-indentation-add-indentat
5f20 69 6f 6e 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 61 64 64 2d 77 68 65 72 ion.haskell-indentation-add-wher
5f40 65 2d 70 6f 73 74 2d 69 6e 64 65 6e 74 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f e-post-indent.haskell-indentatio
5f60 6e 2d 61 64 64 2d 6c 65 66 74 2d 69 6e 64 65 6e 74 20 74 68 72 6f 77 20 70 61 72 73 65 2d 65 6e n-add-left-indent.throw.parse-en
5f80 64 20 6e 69 6c 5d 20 37 20 28 23 24 20 2e 20 32 33 36 39 30 29 5d 29 0a 23 40 32 20 1f 0a 28 64 d.nil].7.(#$...23690)]).#@2...(d
5fa0 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 63 61 73 efalias.'haskell-indentation-cas
5fc0 65 2d 61 6c 74 65 72 6e 61 74 69 76 65 20 23 5b 30 20 22 69 10 5c 33 30 33 5c 33 30 34 5c 33 30 e-alternative.#[0."i.\303\304\30
5fe0 35 5c 33 30 36 23 5c 32 31 30 09 5c 33 30 37 3d 5c 32 30 33 12 00 5c 33 31 30 5c 6e 21 5c 32 30 5\306#\210.\307=\203..\310\n!\20
6000 37 09 5c 33 31 31 5c 32 33 30 5c 32 30 35 1b 00 5c 33 31 32 5c 33 30 34 21 5c 32 30 37 22 20 5b 7.\311\230\205..\312\304!\207".[
6020 6c 65 66 74 2d 69 6e 64 65 6e 74 20 63 75 72 72 65 6e 74 2d 74 6f 6b 65 6e 20 63 75 72 72 65 6e left-indent.current-token.curren
6040 74 2d 69 6e 64 65 6e 74 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 73 65 70 t-indent.haskell-indentation-sep
6060 61 72 61 74 65 64 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 65 78 70 72 65 arated.haskell-indentation-expre
6080 73 73 69 6f 6e 20 22 2c 22 20 6e 69 6c 20 65 6e 64 2d 74 6f 6b 65 6e 73 20 68 61 73 6b 65 6c 6c ssion.",".nil.end-tokens.haskell
60a0 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 61 64 64 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 22 2d 3e -indentation-add-indentation."->
60c0 22 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 73 74 61 74 65 6d 65 6e 74 2d ".haskell-indentation-statement-
60e0 72 69 67 68 74 5d 20 34 20 28 23 24 20 2e 20 32 34 34 37 36 29 5d 29 0a 23 40 32 20 1f 0a 28 64 right].4.(#$...24476)]).#@2...(d
6100 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 63 61 73 efalias.'haskell-indentation-cas
6120 65 20 23 5b 30 20 22 5c 33 30 32 20 5c 32 31 30 08 5c 33 30 33 3d 5c 32 30 33 0d 00 5c 33 30 34 e.#[0."\302.\210.\303=\203..\304
6140 09 21 5c 32 30 37 08 5c 33 30 35 5c 32 33 30 5c 32 30 33 1d 00 5c 33 30 36 5c 33 30 37 5c 33 31 .!\207.\305\230\203..\306\307\31
6160 30 5c 33 31 31 5c 33 30 35 5c 33 31 32 24 5c 33 31 32 5c 22 5c 32 30 37 08 5c 33 31 33 5c 32 33 0\311\305\312$\312\"\207.\313\23
6180 30 5c 32 30 35 26 00 5c 33 31 34 5c 33 30 32 21 5c 32 30 37 22 20 5b 63 75 72 72 65 6e 74 2d 74 0\205&.\314\302!\207".[current-t
61a0 6f 6b 65 6e 20 63 75 72 72 65 6e 74 2d 69 6e 64 65 6e 74 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 oken.current-indent.haskell-inde
61c0 6e 74 61 74 69 6f 6e 2d 65 78 70 72 65 73 73 69 6f 6e 20 65 6e 64 2d 74 6f 6b 65 6e 73 20 68 61 ntation-expression.end-tokens.ha
61e0 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 61 64 64 2d 69 6e 64 65 6e 74 61 74 69 6f skell-indentation-add-indentatio
6200 6e 20 22 7c 22 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 77 69 74 68 2d 73 n."|".haskell-indentation-with-s
6220 74 61 72 74 65 72 20 61 70 70 6c 79 2d 70 61 72 74 69 61 6c 6c 79 20 68 61 73 6b 65 6c 6c 2d 69 tarter.apply-partially.haskell-i
6240 6e 64 65 6e 74 61 74 69 6f 6e 2d 73 65 70 61 72 61 74 65 64 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 ndentation-separated.haskell-ind
6260 65 6e 74 61 74 69 6f 6e 2d 63 61 73 65 2d 61 6c 74 65 72 6e 61 74 69 76 65 20 6e 69 6c 20 22 2d entation-case-alternative.nil."-
6280 3e 22 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 73 74 61 74 65 6d 65 6e 74 >".haskell-indentation-statement
62a0 2d 72 69 67 68 74 5d 20 36 20 28 23 24 20 2e 20 32 34 38 32 38 29 5d 29 0a 23 40 31 37 35 20 50 -right].6.(#$...24828)]).#@175.P
62c0 72 6f 63 65 73 73 20 72 69 67 68 74 20 73 69 64 65 20 6f 66 20 61 20 73 74 61 74 65 6d 65 6e 74 rocess.right.side.of.a.statement
62e0 2e 0a 53 65 74 20 60 63 75 72 72 65 6e 74 2d 69 6e 64 65 6e 74 27 20 74 6f 20 74 68 65 20 63 75 ..Set.`current-indent'.to.the.cu
6300 72 72 65 6e 74 20 63 6f 6c 75 6d 6e 20 61 6e 64 20 63 61 6c 6c 73 20 74 68 65 20 67 69 76 65 6e rrent.column.and.calls.the.given
6320 0a 70 61 72 73 65 72 2e 20 20 49 66 20 70 61 72 73 69 6e 67 20 65 6e 64 73 20 68 65 72 65 2c 20 .parser...If.parsing.ends.here,.
6340 73 65 74 20 69 6e 64 65 6e 74 61 74 69 6f 6e 20 74 6f 20 6c 65 66 74 2d 69 6e 64 65 6e 74 2e 0a set.indentation.to.left-indent..
6360 0a 28 66 6e 20 50 41 52 53 45 52 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c .(fn.PARSER)..(defalias.'haskell
6380 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 73 74 61 74 65 6d 65 6e 74 2d 72 69 67 68 74 20 23 5b 32 -indentation-statement-right.#[2
63a0 35 37 20 22 5c 33 30 32 20 5c 32 31 30 08 5c 33 30 33 3d 5c 32 30 33 15 00 5c 33 30 34 20 5c 32 57."\302.\210.\303=\203..\304.\2
63c0 31 30 5c 33 30 35 09 21 5c 32 31 30 5c 33 30 36 5c 33 30 37 5c 33 31 30 5c 22 5c 32 31 30 5c 32 10\305.!\210\306\307\310\"\210\2
63e0 31 31 20 5c 32 31 30 08 5c 33 31 31 5c 32 33 32 5c 32 30 35 5c 22 00 5c 33 31 32 5c 33 31 33 5c 11.\210.\311\232\205\".\312\313\
6400 33 31 30 5c 22 5c 32 30 37 22 20 5b 63 75 72 72 65 6e 74 2d 74 6f 6b 65 6e 20 63 75 72 72 65 6e 310\"\207".[current-token.curren
6420 74 2d 69 6e 64 65 6e 74 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 72 65 61 t-indent.haskell-indentation-rea
6440 64 2d 6e 65 78 74 2d 74 6f 6b 65 6e 20 65 6e 64 2d 74 6f 6b 65 6e 73 20 68 61 73 6b 65 6c 6c 2d d-next-token.end-tokens.haskell-
6460 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 61 64 64 2d 6c 65 66 74 2d 69 6e 64 65 6e 74 20 68 61 73 6b indentation-add-left-indent.hask
6480 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 61 64 64 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 ell-indentation-add-indentation.
64a0 74 68 72 6f 77 20 70 61 72 73 65 2d 65 6e 64 20 6e 69 6c 20 22 77 68 65 72 65 22 20 68 61 73 6b throw.parse-end.nil."where".hask
64c0 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 77 69 74 68 2d 73 74 61 72 74 65 72 20 68 61 73 ell-indentation-with-starter.has
64e0 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 65 78 70 72 65 73 73 69 6f 6e 2d 6c 61 79 6f kell-indentation-expression-layo
6500 75 74 5d 20 34 20 28 23 24 20 2e 20 32 35 32 37 39 29 5d 29 0a 23 40 32 36 20 50 61 72 73 65 20 ut].4.(#$...25279)]).#@26.Parse.
6520 22 67 75 61 72 64 22 20 73 74 61 74 65 6d 65 6e 74 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 "guard".statement...(defalias.'h
6540 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 67 75 61 72 64 20 23 5b 30 20 22 69 10 askell-indentation-guard.#[0."i.
6560 5c 33 30 31 5c 33 30 32 5c 33 30 33 5c 33 30 34 23 5c 32 30 37 22 20 5b 6c 65 66 74 2d 69 6e 64 \301\302\303\304#\207".[left-ind
6580 65 6e 74 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 73 65 70 61 72 61 74 65 ent.haskell-indentation-separate
65a0 64 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 65 78 70 72 65 73 73 69 6f 6e d.haskell-indentation-expression
65c0 20 22 2c 22 20 6e 69 6c 5d 20 34 20 28 23 24 20 2e 20 32 35 38 38 32 29 5d 29 0a 23 40 33 37 20 .",".nil].4.(#$...25882)]).#@37.
65e0 50 61 72 73 65 20 66 75 6e 63 74 69 6f 6e 20 6f 72 20 74 79 70 65 20 64 65 63 6c 61 72 61 74 69 Parse.function.or.type.declarati
6600 6f 6e 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 on...(defalias.'haskell-indentat
6620 69 6f 6e 2d 64 65 63 6c 61 72 61 74 69 6f 6e 20 23 5b 30 20 22 5c 33 30 33 5c 33 30 34 5c 33 30 ion-declaration.#[0."\303\304\30
6640 35 5c 33 30 36 23 5c 32 31 30 08 5c 33 30 37 5c 32 33 30 5c 32 30 33 16 00 5c 33 31 30 5c 33 31 5\306#\210.\307\230\203..\310\31
6660 31 5c 33 30 33 5c 33 31 32 5c 33 30 37 5c 33 30 36 24 5c 33 30 36 5c 22 5c 32 31 30 08 5c 33 31 1\303\312\307\306$\306\"\210.\31
6680 33 3d 5c 32 30 35 2a 00 09 5c 33 31 34 5c 32 33 35 5c 32 30 35 2a 00 5c 33 31 35 5c 6e 21 5c 32 3=\205*..\314\235\205*.\315\n!\2
66a0 31 30 5c 33 31 36 5c 33 31 37 5c 33 30 36 5c 22 5c 32 30 37 22 20 5b 63 75 72 72 65 6e 74 2d 74 10\316\317\306\"\207".[current-t
66c0 6f 6b 65 6e 20 66 6f 6c 6c 6f 77 69 6e 67 2d 74 6f 6b 65 6e 20 63 75 72 72 65 6e 74 2d 69 6e 64 oken.following-token.current-ind
66e0 65 6e 74 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 73 65 70 61 72 61 74 65 ent.haskell-indentation-separate
6700 64 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 65 78 70 72 65 73 73 69 6f 6e d.haskell-indentation-expression
6720 20 22 2c 22 20 6e 69 6c 20 22 7c 22 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e .",".nil."|".haskell-indentation
6740 2d 77 69 74 68 2d 73 74 61 72 74 65 72 20 61 70 70 6c 79 2d 70 61 72 74 69 61 6c 6c 79 20 68 61 -with-starter.apply-partially.ha
6760 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 67 75 61 72 64 20 65 6e 64 2d 74 6f 6b 65 skell-indentation-guard.end-toke
6780 6e 73 20 28 22 7c 22 20 22 3d 22 20 22 3a 3a 22 20 22 2c 22 29 20 68 61 73 6b 65 6c 6c 2d 69 6e ns.("|"."="."::".",").haskell-in
67a0 64 65 6e 74 61 74 69 6f 6e 2d 61 64 64 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 74 68 72 6f 77 20 dentation-add-indentation.throw.
67c0 70 61 72 73 65 2d 65 6e 64 5d 20 36 20 28 23 24 20 2e 20 32 36 30 38 30 29 5d 29 0a 23 40 37 37 parse-end].6.(#$...26080)]).#@77
67e0 20 50 61 72 73 65 20 6c 61 79 6f 75 74 20 6c 69 73 74 2c 20 77 68 65 72 65 20 65 61 63 68 20 6c .Parse.layout.list,.where.each.l
6800 61 79 6f 75 74 20 69 74 65 6d 20 69 73 20 70 61 72 73 65 64 20 62 79 20 70 61 72 73 65 72 2e 0a ayout.item.is.parsed.by.parser..
6820 0a 28 66 6e 20 50 41 52 53 45 52 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c .(fn.PARSER)..(defalias.'haskell
6840 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 6c 61 79 6f 75 74 20 23 5b 32 35 37 20 22 08 5c 33 30 31 -indentation-layout.#[257.".\301
6860 5c 32 33 30 5c 32 30 33 5c 66 00 5c 33 30 32 01 5c 33 30 33 5c 33 30 34 23 5c 32 30 37 5c 33 30 \230\203\f.\302.\303\304#\207\30
6880 35 01 21 5c 32 30 37 22 20 5b 63 75 72 72 65 6e 74 2d 74 6f 6b 65 6e 20 22 7b 22 20 68 61 73 6b 5.!\207".[current-token."{".hask
68a0 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 6c 69 73 74 20 22 7d 22 20 22 3b 22 20 68 61 73 ell-indentation-list."}".";".has
68c0 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 69 6d 70 6c 69 63 69 74 2d 6c 61 79 6f 75 74 kell-indentation-implicit-layout
68e0 2d 6c 69 73 74 5d 20 35 20 28 23 24 20 2e 20 32 36 35 39 33 29 5d 29 0a 23 40 36 37 20 52 65 74 -list].5.(#$...26593)]).#@67.Ret
6900 75 72 6e 20 6e 6f 6e 2d 4e 49 4c 20 76 61 6c 75 65 20 69 66 20 54 4f 4b 45 4e 20 69 73 20 61 6e urn.non-NIL.value.if.TOKEN.is.an
6920 20 65 78 70 72 65 73 73 69 6f 6e 20 74 6f 6b 65 6e 2e 0a 0a 28 66 6e 20 54 4f 4b 45 4e 29 1f 0a .expression.token...(fn.TOKEN)..
6940 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 65 (defalias.'haskell-indentation-e
6960 78 70 72 65 73 73 69 6f 6e 2d 74 6f 6b 65 6e 2d 70 20 23 5b 32 35 37 20 22 5c 32 31 31 5c 33 30 xpression-token-p.#[257."\211\30
6980 30 5c 32 33 35 5c 32 30 37 22 20 5b 28 22 69 66 22 20 22 6c 65 74 22 20 22 64 6f 22 20 22 63 61 0\235\207".[("if"."let"."do"."ca
69a0 73 65 22 20 22 5c 5c 22 20 22 28 22 20 22 7b 22 20 22 5b 22 20 22 3a 3a 22 20 76 61 6c 75 65 20 se"."\\"."("."{"."["."::".value.
69c0 6f 70 65 72 61 74 6f 72 20 6e 6f 2d 66 6f 6c 6c 6f 77 69 6e 67 2d 74 6f 6b 65 6e 29 5d 20 33 20 operator.no-following-token)].3.
69e0 28 23 24 20 2e 20 32 36 38 37 37 29 5d 29 0a 23 40 39 32 20 50 61 72 73 65 20 61 6e 20 65 78 70 (#$...26877)]).#@92.Parse.an.exp
6a00 72 65 73 73 69 6f 6e 20 75 6e 74 69 6c 20 61 6e 20 75 6e 6b 6e 6f 77 6e 20 74 6f 6b 65 6e 20 69 ression.until.an.unknown.token.i
6a20 73 20 65 6e 63 6f 75 6e 74 65 72 65 64 2e 0a 0a 28 66 6e 20 26 6f 70 74 69 6f 6e 61 6c 20 41 43 s.encountered...(fn.&optional.AC
6a40 43 45 50 54 45 44 2d 54 4f 4b 45 4e 53 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 CEPTED-TOKENS)..(defalias.'haske
6a60 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 65 78 70 72 65 73 73 69 6f 6e 20 23 5b 32 35 36 20 ll-indentation-expression.#[256.
6a80 22 5c 33 30 35 32 62 00 69 18 5c 32 31 31 5c 32 30 34 0d 00 5c 33 30 36 5c 32 36 32 01 09 01 3e "\3052b.i.\211\204..\306\262...>
6aa0 5c 32 30 33 19 00 5c 33 30 37 20 5c 32 31 30 5c 32 30 32 0d 00 09 5c 33 31 30 3d 5c 32 30 33 41 \203..\307.\210\202...\310=\203A
6ac0 00 5c 6e 5c 33 31 31 5c 32 33 30 5c 32 30 33 2b 00 5c 33 31 32 20 5c 32 31 30 5c 32 30 32 39 00 .\n\311\230\203+.\312.\210\2029.
6ae0 5c 33 31 33 5c 6e 21 5c 32 30 33 39 00 5c 33 31 34 08 21 5c 32 31 30 5c 33 31 34 0b 21 5c 32 31 \313\n!\2039.\314.!\210\314.!\21
6b00 30 5c 33 31 35 5c 33 30 35 5c 33 31 36 5c 22 5c 32 31 30 5c 32 30 32 0d 00 5c 33 31 37 09 5c 66 0\315\305\316\"\210\202..\317.\f
6b20 5c 22 5c 32 31 31 5c 32 30 34 4e 00 5c 33 31 35 5c 33 30 35 5c 33 31 36 5c 22 5c 32 31 30 5c 32 \"\211\204N.\315\305\316\"\210\2
6b40 31 31 41 20 5c 32 31 30 5c 32 31 31 40 5c 33 32 30 5c 32 33 35 5c 32 30 34 5e 00 5c 33 31 35 5c 11A.\210\211@\320\235\204^.\315\
6b60 33 30 35 5c 33 31 36 5c 22 5c 32 31 30 5c 32 31 30 5c 32 30 32 0d 00 5c 32 30 37 22 20 5b 63 75 305\316\"\210\210\202..\207".[cu
6b80 72 72 65 6e 74 2d 69 6e 64 65 6e 74 20 63 75 72 72 65 6e 74 2d 74 6f 6b 65 6e 20 66 6f 6c 6c 6f rrent-indent.current-token.follo
6ba0 77 69 6e 67 2d 74 6f 6b 65 6e 20 6c 65 66 74 2d 69 6e 64 65 6e 74 20 68 61 73 6b 65 6c 6c 2d 69 wing-token.left-indent.haskell-i
6bc0 6e 64 65 6e 74 61 74 69 6f 6e 2d 65 78 70 72 65 73 73 69 6f 6e 2d 6c 69 73 74 20 72 65 74 75 72 ndentation-expression-list.retur
6be0 6e 20 28 76 61 6c 75 65 20 6f 70 65 72 61 74 6f 72 29 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e n.(value.operator).haskell-inden
6c00 74 61 74 69 6f 6e 2d 72 65 61 64 2d 6e 65 78 74 2d 74 6f 6b 65 6e 20 65 6e 64 2d 74 6f 6b 65 6e tation-read-next-token.end-token
6c20 73 20 22 77 68 65 72 65 22 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 61 64 s."where".haskell-indentation-ad
6c40 64 2d 77 68 65 72 65 2d 70 72 65 2d 69 6e 64 65 6e 74 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e d-where-pre-indent.haskell-inden
6c60 74 61 74 69 6f 6e 2d 65 78 70 72 65 73 73 69 6f 6e 2d 74 6f 6b 65 6e 2d 70 20 68 61 73 6b 65 6c tation-expression-token-p.haskel
6c80 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 61 64 64 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 74 68 l-indentation-add-indentation.th
6ca0 72 6f 77 20 6e 69 6c 20 61 73 73 6f 63 20 28 22 28 22 20 22 5b 22 20 22 7b 22 20 22 63 61 73 65 row.nil.assoc.("("."["."{"."case
6cc0 22 29 5d 20 35 20 28 23 24 20 2e 20 32 37 31 32 34 29 5d 29 0a 23 40 32 32 36 20 45 76 61 6c 75 ")].5.(#$...27124)]).#@226.Evalu
6ce0 61 74 65 20 50 41 52 53 45 52 20 73 65 70 61 72 61 74 65 64 20 62 79 20 53 45 50 41 52 41 54 4f ate.PARSER.separated.by.SEPARATO
6d00 52 20 61 6e 64 20 53 54 4d 54 2d 53 45 50 41 52 41 54 4f 52 2e 0a 49 66 20 53 54 4d 54 2d 53 45 R.and.STMT-SEPARATOR..If.STMT-SE
6d20 50 41 52 41 54 4f 52 20 69 73 20 6e 6f 74 20 4e 49 4c 2c 20 69 74 20 77 69 6c 6c 20 62 65 20 75 PARATOR.is.not.NIL,.it.will.be.u
6d40 73 65 64 20 74 6f 20 73 65 74 20 61 20 6e 65 77 20 73 74 61 72 74 65 72 2d 69 6e 64 65 6e 74 2e sed.to.set.a.new.starter-indent.
6d60 0a 0a 46 6f 72 20 65 78 61 6d 70 6c 65 3a 0a 0a 20 20 20 5b 20 69 20 7c 20 69 20 3c 2d 20 5b 31 ..For.example:.....[.i.|.i.<-.[1
6d80 2e 2e 31 30 5d 0a 20 20 20 20 2c 0a 0a 28 66 6e 20 50 41 52 53 45 52 20 53 45 50 41 52 41 54 4f ..10].....,..(fn.PARSER.SEPARATO
6da0 52 20 26 6f 70 74 69 6f 6e 61 6c 20 53 54 4d 54 2d 53 45 50 41 52 41 54 4f 52 29 1f 0a 28 64 65 R.&optional.STMT-SEPARATOR)..(de
6dc0 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 73 65 70 61 falias.'haskell-indentation-sepa
6de0 72 61 74 65 64 20 23 5b 37 37 30 20 22 5c 33 30 34 32 76 00 01 3c 5c 32 30 34 0d 00 01 43 5c 32 rated.#[770."\3042v..<\204...C\2
6e00 36 32 02 5c 32 31 31 3c 5c 32 30 34 16 00 5c 32 31 31 43 5c 32 36 32 01 02 20 5c 32 31 30 08 02 62.\211<\204..\211C\262...\210..
6e20 5c 32 33 35 5c 32 30 33 25 00 5c 33 30 35 20 5c 32 31 30 5c 32 30 32 16 00 08 01 5c 32 33 35 5c \235\203%.\305.\210\202....\235\
6e40 32 30 33 33 00 69 11 5c 33 30 35 20 5c 32 31 30 5c 32 30 32 16 00 08 5c 33 30 36 3d 5c 32 30 33 2033.i.\305.\210\202...\306=\203
6e60 6e 00 5c 6e 02 5c 32 33 35 5c 32 30 34 45 00 5c 6e 01 5c 32 33 35 5c 32 30 33 58 00 5c 33 30 37 n.\n.\235\204E.\n.\235\203X.\307
6e80 09 21 5c 32 31 30 0b 09 57 5c 32 30 33 53 00 5c 33 30 37 0b 21 5c 32 31 30 5c 33 31 30 5c 33 31 .!\210..W\203S.\307.!\210\310\31
6ea0 31 5c 33 31 32 5c 22 5c 32 31 30 5c 6e 5c 33 31 33 5c 32 33 32 5c 32 30 33 66 00 5c 33 30 37 09 1\312\"\210\n\313\232\203f.\307.
6ec0 21 5c 32 31 30 5c 33 30 37 0b 21 5c 32 31 30 5c 33 31 30 5c 33 30 34 5c 33 31 32 5c 22 5c 32 31 !\210\307.!\210\310\304\312\"\21
6ee0 30 5c 32 30 32 16 00 5c 33 31 30 5c 33 30 34 5c 33 31 32 5c 22 5c 32 31 30 5c 32 30 32 16 00 5c 0\202..\310\304\312\"\210\202..\
6f00 32 30 37 22 20 5b 63 75 72 72 65 6e 74 2d 74 6f 6b 65 6e 20 73 74 61 72 74 65 72 2d 69 6e 64 65 207".[current-token.starter-inde
6f20 6e 74 20 66 6f 6c 6c 6f 77 69 6e 67 2d 74 6f 6b 65 6e 20 6c 65 66 74 2d 69 6e 64 65 6e 74 20 72 nt.following-token.left-indent.r
6f40 65 74 75 72 6e 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 61 74 2d 73 65 70 eturn.haskell-indentation-at-sep
6f60 61 72 61 74 6f 72 20 65 6e 64 2d 74 6f 6b 65 6e 73 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 arator.end-tokens.haskell-indent
6f80 61 74 69 6f 6e 2d 61 64 64 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 74 68 72 6f 77 20 70 61 72 73 ation-add-indentation.throw.pars
6fa0 65 2d 65 6e 64 20 6e 69 6c 20 6e 6f 2d 66 6f 6c 6c 6f 77 69 6e 67 2d 74 6f 6b 65 6e 5d 20 36 20 e-end.nil.no-following-token].6.
6fc0 28 23 24 20 2e 20 32 37 38 36 37 29 5d 29 0a 23 40 31 37 33 20 41 74 20 61 20 73 65 70 61 72 61 (#$...27867)]).#@173.At.a.separa
6fe0 74 6f 72 2e 0a 0a 49 66 20 61 74 20 61 20 6e 65 77 20 6c 69 6e 65 2c 20 73 65 74 20 73 74 61 72 tor...If.at.a.new.line,.set.star
7000 74 65 72 2d 69 6e 64 65 6e 74 20 61 74 20 74 68 65 20 73 65 70 61 72 61 74 6f 72 0a 61 6e 64 20 ter-indent.at.the.separator.and.
7020 63 75 72 72 65 6e 74 2d 69 6e 64 65 6e 74 20 61 66 74 65 72 20 74 68 65 20 73 65 70 61 72 61 74 current-indent.after.the.separat
7040 6f 72 2c 20 66 6f 72 20 65 78 61 6d 70 6c 65 3a 0a 0a 6c 20 3d 20 5b 20 20 31 0a 20 20 20 20 20 or,.for.example:..l.=.[..1......
7060 2c 20 32 0a 20 20 20 20 20 2c 20 20 20 20 2d 2d 20 73 74 61 72 74 20 6e 6f 77 20 68 65 72 65 2e ,.2......,....--.start.now.here.
7080 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e ..(defalias.'haskell-indentation
70a0 2d 61 74 2d 73 65 70 61 72 61 74 6f 72 20 23 5b 30 20 22 69 5c 33 30 35 20 55 5c 32 30 35 08 00 -at-separator.#[0."i\305.U\205..
70c0 69 5c 33 30 36 20 5c 32 31 30 08 5c 33 30 37 3d 5c 32 30 33 20 00 5c 33 31 30 09 21 5c 32 31 30 i\306.\210.\307=\203..\310.!\210
70e0 5c 33 31 30 5c 6e 21 5c 32 31 30 5c 33 31 31 5c 33 31 32 5c 33 31 33 5c 22 5c 32 30 32 2d 00 5c \310\n!\210\311\312\313\"\202-.\
7100 32 31 31 5c 32 30 35 2d 00 69 11 5c 32 31 31 13 5c 32 31 31 5c 66 5c 5c 5c 32 31 31 12 5c 32 30 211\205-.i.\211.\211\f\\\211.\20
7120 37 22 20 5b 63 75 72 72 65 6e 74 2d 74 6f 6b 65 6e 20 63 75 72 72 65 6e 74 2d 69 6e 64 65 6e 74 7".[current-token.current-indent
7140 20 6c 65 66 74 2d 69 6e 64 65 6e 74 20 73 74 61 72 74 65 72 2d 69 6e 64 65 6e 74 20 68 61 73 6b .left-indent.starter-indent.hask
7160 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 73 74 61 72 74 65 72 2d 6f 66 66 73 65 74 20 68 ell-indentation-starter-offset.h
7180 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 63 75 72 72 65 6e 74 2d 69 6e 64 65 6e askell-indentation-current-inden
71a0 74 61 74 69 6f 6e 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 72 65 61 64 2d tation.haskell-indentation-read-
71c0 6e 65 78 74 2d 74 6f 6b 65 6e 20 65 6e 64 2d 74 6f 6b 65 6e 73 20 68 61 73 6b 65 6c 6c 2d 69 6e next-token.end-tokens.haskell-in
71e0 64 65 6e 74 61 74 69 6f 6e 2d 61 64 64 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 74 68 72 6f 77 20 dentation-add-indentation.throw.
7200 72 65 74 75 72 6e 20 6e 69 6c 5d 20 34 20 28 23 24 20 2e 20 32 38 36 32 39 29 5d 29 0a 23 40 31 return.nil].4.(#$...28629)]).#@1
7220 35 30 20 41 6e 20 69 6d 70 6c 69 63 69 74 20 6c 61 79 6f 75 74 20 6c 69 73 74 2c 20 65 6c 65 6d 50.An.implicit.layout.list,.elem
7240 65 6e 74 73 20 61 72 65 20 70 61 72 73 65 64 20 77 69 74 68 20 50 41 52 53 45 52 2e 0a 54 68 69 ents.are.parsed.with.PARSER..Thi
7260 73 20 73 65 74 73 20 74 68 65 20 60 6c 61 79 6f 75 74 2d 69 6e 64 65 6e 74 27 20 76 61 72 69 61 s.sets.the.`layout-indent'.varia
7280 62 6c 65 20 74 6f 20 74 68 65 20 63 6f 6c 75 6d 6e 20 77 68 65 72 65 20 74 68 65 0a 6c 61 79 6f ble.to.the.column.where.the.layo
72a0 75 74 20 73 74 61 72 74 73 2e 0a 0a 28 66 6e 20 50 41 52 53 45 52 29 1f 0a 28 64 65 66 61 6c 69 ut.starts...(fn.PARSER)..(defali
72c0 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 69 6d 70 6c 69 63 69 74 as.'haskell-indentation-implicit
72e0 2d 6c 61 79 6f 75 74 2d 6c 69 73 74 20 23 5b 32 35 37 20 22 69 18 69 19 69 1a 5c 33 30 36 1b 5c -layout-list.#[257."i.i.i.\306.\
7300 33 30 37 32 66 00 5c 6e 1a 5c 32 31 31 20 5c 32 31 30 29 5c 66 5c 33 31 30 5c 32 33 35 5c 32 30 3072f.\n.\211.\210)\f\310\235\20
7320 33 1e 00 5c 33 31 31 20 5c 32 31 30 5c 32 30 32 5c 66 00 5c 66 5c 33 31 32 3d 5c 32 30 33 5e 00 3..\311.\210\202\f.\f\312=\203^.
7340 0d 5c 33 31 33 5c 32 33 35 5c 32 30 34 37 00 0e 17 5c 33 31 34 5c 32 33 35 5c 32 30 34 37 00 5c .\313\235\2047...\314\235\2047.\
7360 33 31 35 0d 21 5c 32 30 34 53 00 0d 5c 33 31 36 5c 32 33 30 5c 32 30 34 53 00 08 5c 33 31 37 5c 315.!\204S..\316\230\204S..\317\
7380 32 33 32 5c 32 30 33 56 00 0d 5c 33 32 30 5c 33 32 31 0e 18 5c 22 5c 32 33 35 5c 32 30 33 56 00 232\203V..\320\321..\"\235\203V.
73a0 0d 5c 33 32 32 5c 32 33 30 5c 32 30 34 56 00 5c 33 32 33 20 5c 32 31 30 5c 33 32 34 5c 33 30 37 .\322\230\204V.\323.\210\324\307
73c0 5c 33 32 35 5c 22 5c 32 31 30 5c 32 30 32 5c 66 00 5c 33 32 34 5c 33 30 37 5c 33 32 35 5c 22 5c \325\"\210\202\f.\324\307\325\"\
73e0 32 31 30 5c 32 30 32 5c 66 00 5c 32 31 30 2c 5c 66 5c 33 32 36 3d 5c 32 30 35 73 00 5c 33 30 36 210\202\f.\210,\f\326=\205s.\306
7400 1b 5c 33 31 31 20 29 5c 32 30 37 22 20 5b 6c 61 79 6f 75 74 2d 69 6e 64 65 6e 74 20 63 75 72 72 .\311.)\207".[layout-indent.curr
7420 65 6e 74 2d 69 6e 64 65 6e 74 20 6c 65 66 74 2d 69 6e 64 65 6e 74 20 69 6d 70 6c 69 63 69 74 2d ent-indent.left-indent.implicit-
7440 6c 61 79 6f 75 74 2d 61 63 74 69 76 65 20 63 75 72 72 65 6e 74 2d 74 6f 6b 65 6e 20 66 6f 6c 6c layout-active.current-token.foll
7460 6f 77 69 6e 67 2d 74 6f 6b 65 6e 20 74 20 72 65 74 75 72 6e 20 28 6c 61 79 6f 75 74 2d 69 74 65 owing-token.t.return.(layout-ite
7480 6d 20 22 3b 22 29 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 72 65 61 64 2d m.";").haskell-indentation-read-
74a0 6e 65 78 74 2d 74 6f 6b 65 6e 20 65 6e 64 2d 74 6f 6b 65 6e 73 20 28 22 7b 22 20 6f 70 65 72 61 next-token.end-tokens.("{".opera
74c0 74 6f 72 29 20 28 6f 70 65 72 61 74 6f 72 29 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 tor).(operator).haskell-indentat
74e0 69 6f 6e 2d 65 78 70 72 65 73 73 69 6f 6e 2d 74 6f 6b 65 6e 2d 70 20 22 3b 22 20 30 20 6d 61 70 ion-expression-token-p.";".0.map
7500 63 61 72 20 63 61 72 20 22 77 68 65 72 65 22 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 car.car."where".haskell-indentat
7520 69 6f 6e 2d 61 64 64 2d 6c 61 79 6f 75 74 2d 69 6e 64 65 6e 74 20 74 68 72 6f 77 20 6e 69 6c 20 ion-add-layout-indent.throw.nil.
7540 6c 61 79 6f 75 74 2d 65 6e 64 20 70 72 65 76 69 6f 75 73 2d 74 6f 6b 65 6e 20 68 61 73 6b 65 6c layout-end.previous-token.haskel
7560 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 74 6f 70 6c 65 76 65 6c 2d 6c 69 73 74 5d 20 35 20 28 l-indentation-toplevel-list].5.(
7580 23 24 20 2e 20 32 39 32 31 39 29 5d 29 0a 23 40 32 20 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 #$...29219)]).#@2...(defalias.'h
75a0 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 69 66 20 23 5b 30 20 22 5c 33 30 30 5c askell-indentation-if.#[0."\300\
75c0 33 30 31 5c 33 30 32 5c 22 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 301\302\"\207".[haskell-indentat
75e0 69 6f 6e 2d 77 69 74 68 2d 73 74 61 72 74 65 72 20 23 5b 30 20 22 08 5c 33 30 31 5c 32 33 30 5c ion-with-starter.#[0.".\301\230\
7600 32 30 33 0b 00 5c 33 30 32 5c 33 30 33 5c 33 30 34 5c 22 5c 32 30 37 5c 33 30 35 5c 33 30 36 21 203..\302\303\304\"\207\305\306!
7620 5c 32 30 37 22 20 5b 63 75 72 72 65 6e 74 2d 74 6f 6b 65 6e 20 22 7c 22 20 68 61 73 6b 65 6c 6c \207".[current-token."|".haskell
7640 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 77 69 74 68 2d 73 74 61 72 74 65 72 20 23 5b 30 20 22 5c -indentation-with-starter.#[0."\
7660 33 30 30 5c 33 30 31 5c 33 30 32 5c 33 30 33 23 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 69 300\301\302\303#\207".[haskell-i
7680 6e 64 65 6e 74 61 74 69 6f 6e 2d 73 65 70 61 72 61 74 65 64 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 ndentation-separated.haskell-ind
76a0 65 6e 74 61 74 69 6f 6e 2d 63 61 73 65 2d 61 6c 74 65 72 6e 61 74 69 76 65 20 22 7c 22 20 6e 69 entation-case-alternative."|".ni
76c0 6c 5d 20 34 5d 20 6e 69 6c 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 70 68 l].4].nil.haskell-indentation-ph
76e0 72 61 73 65 2d 72 65 73 74 20 28 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 65 rase-rest.(haskell-indentation-e
7700 78 70 72 65 73 73 69 6f 6e 20 22 74 68 65 6e 22 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 xpression."then".haskell-indenta
7720 74 69 6f 6e 2d 65 78 70 72 65 73 73 69 6f 6e 20 22 65 6c 73 65 22 20 68 61 73 6b 65 6c 6c 2d 69 tion-expression."else".haskell-i
7740 6e 64 65 6e 74 61 74 69 6f 6e 2d 65 78 70 72 65 73 73 69 6f 6e 29 5d 20 33 5d 20 6e 69 6c 5d 20 ndentation-expression)].3].nil].
7760 33 20 28 23 24 20 2e 20 33 30 30 39 38 29 5d 29 0a 23 40 31 35 20 0a 0a 28 66 6e 20 50 48 52 41 3.(#$...30098)]).#@15...(fn.PHRA
7780 53 45 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 SE)..(defalias.'haskell-indentat
77a0 69 6f 6e 2d 70 68 72 61 73 65 20 23 5b 32 35 37 20 22 5c 33 30 30 5c 33 30 31 5c 33 30 32 03 5c ion-phrase.#[257."\300\301\302.\
77c0 22 5c 33 30 33 5c 22 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f "\303\"\207".[haskell-indentatio
77e0 6e 2d 77 69 74 68 2d 73 74 61 72 74 65 72 20 61 70 70 6c 79 2d 70 61 72 74 69 61 6c 6c 79 20 68 n-with-starter.apply-partially.h
7800 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 70 68 72 61 73 65 2d 72 65 73 74 20 6e askell-indentation-phrase-rest.n
7820 69 6c 5d 20 35 20 28 23 24 20 2e 20 33 30 35 38 32 29 5d 29 0a 23 40 31 36 20 0a 0a 28 66 6e 20 il].5.(#$...30582)]).#@16...(fn.
7840 50 48 52 41 53 45 31 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 PHRASE1)..(defalias.'haskell-ind
7860 65 6e 74 61 74 69 6f 6e 2d 70 68 72 61 73 65 2d 72 65 73 74 20 23 5b 32 35 37 20 22 5c 32 31 31 entation-phrase-rest.#[257."\211
7880 5c 32 30 35 5c 32 31 37 00 5c 32 31 31 5c 33 30 36 5c 32 36 32 02 69 08 09 19 18 1a 5c 32 31 31 \205\217.\211\306\262.i.....\211
78a0 40 20 5c 32 31 30 2b 0b 5c 33 30 37 3d 5c 32 30 33 5d 00 5c 32 31 31 41 5c 32 30 33 5c 32 31 33 @.\210+.\307=\203].\211A\203\213
78c0 00 5c 66 01 41 40 5c 32 33 32 5c 32 30 33 3c 00 5c 33 31 30 0d 21 5c 32 31 30 5c 66 5c 33 31 31 .\f.A@\232\203<.\310.!\210\f\311
78e0 5c 32 33 35 5c 32 30 34 34 00 5c 33 31 30 08 21 5c 32 31 30 5c 33 31 32 5c 33 31 33 5c 33 30 36 \235\2044.\310.!\210\312\313\306
7900 5c 22 5c 32 31 30 5c 32 30 32 5c 32 31 33 00 5c 32 31 31 41 40 5c 33 31 34 5c 32 33 30 5c 32 30 \"\210\202\213.\211A@\314\230\20
7920 33 55 00 08 09 55 5c 32 30 33 5c 32 31 33 00 5c 33 31 35 20 5c 32 31 30 5c 33 31 32 5c 33 31 33 3U...U\203\213.\315.\210\312\313
7940 5c 33 30 36 5c 22 5c 32 31 30 5c 32 30 32 5c 32 31 33 00 5c 33 31 32 5c 33 31 33 5c 33 30 36 5c \306\"\210\202\213.\312\313\306\
7960 22 5c 32 31 30 5c 32 30 32 5c 32 31 33 00 5c 32 31 31 41 5c 32 30 33 5c 32 31 33 00 5c 32 31 31 "\210\202\213.\211A\203\213.\211
7980 41 40 0b 5c 32 33 32 5c 32 30 33 5c 32 31 33 00 5c 33 31 36 20 5c 32 31 30 0b 5c 33 30 37 3d 5c A@.\232\203\213.\316.\210.\307=\
79a0 32 30 33 5c 32 30 36 00 5c 33 31 30 0d 0e 0f 5c 5c 21 5c 32 31 30 5c 33 31 30 08 0e 0f 5c 5c 21 203\206.\310...\\!\210\310...\\!
79c0 5c 32 31 30 5c 33 31 32 5c 33 31 33 5c 33 30 36 5c 22 5c 32 31 30 5c 32 31 31 41 41 5c 32 36 32 \210\312\313\306\"\210\211AA\262
79e0 02 5c 32 31 30 5c 32 30 32 00 00 5c 32 30 37 22 20 5b 6c 65 66 74 2d 69 6e 64 65 6e 74 20 6c 61 .\210\202..\207".[left-indent.la
7a00 79 6f 75 74 2d 69 6e 64 65 6e 74 20 63 75 72 72 65 6e 74 2d 69 6e 64 65 6e 74 20 63 75 72 72 65 yout-indent.current-indent.curre
7a20 6e 74 2d 74 6f 6b 65 6e 20 66 6f 6c 6c 6f 77 69 6e 67 2d 74 6f 6b 65 6e 20 73 74 61 72 74 65 72 nt-token.following-token.starter
7a40 2d 69 6e 64 65 6e 74 20 6e 69 6c 20 65 6e 64 2d 74 6f 6b 65 6e 73 20 68 61 73 6b 65 6c 6c 2d 69 -indent.nil.end-tokens.haskell-i
7a60 6e 64 65 6e 74 61 74 69 6f 6e 2d 61 64 64 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 28 22 2c 22 20 ndentation-add-indentation.(",".
7a80 22 3b 22 29 20 74 68 72 6f 77 20 70 61 72 73 65 2d 65 6e 64 20 22 69 6e 22 20 68 61 73 6b 65 6c ";").throw.parse-end."in".haskel
7aa0 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 61 64 64 2d 6c 61 79 6f 75 74 2d 69 6e 64 65 6e 74 20 l-indentation-add-layout-indent.
7ac0 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 72 65 61 64 2d 6e 65 78 74 2d 74 6f haskell-indentation-read-next-to
7ae0 6b 65 6e 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 73 74 61 72 74 65 72 2d ken.haskell-indentation-starter-
7b00 6f 66 66 73 65 74 5d 20 35 20 28 23 24 20 2e 20 33 30 37 37 38 29 5d 29 0a 23 40 31 35 20 0a 0a offset].5.(#$...30778)]).#@15...
7b20 28 66 6e 20 49 4e 44 45 4e 54 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d (fn.INDENT)..(defalias.'haskell-
7b40 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 61 64 64 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 23 5b 32 35 indentation-add-indentation.#[25
7b60 37 20 22 5c 33 30 32 01 08 58 5c 32 30 33 0d 00 08 09 5c 5c 5c 32 30 32 0e 00 01 21 5c 32 30 37 7."\302..X\203....\\\202...!\207
7b80 22 20 5b 6c 61 79 6f 75 74 2d 69 6e 64 65 6e 74 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 ".[layout-indent.haskell-indenta
7ba0 74 69 6f 6e 2d 6c 61 79 6f 75 74 2d 6f 66 66 73 65 74 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e tion-layout-offset.haskell-inden
7bc0 74 61 74 69 6f 6e 2d 70 75 73 68 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 5d 20 34 20 28 23 24 20 2e tation-push-indentation].4.(#$..
7be0 20 33 31 35 31 38 29 5d 29 0a 23 40 32 20 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 .31518)]).#@2...(defalias.'haske
7c00 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 61 64 64 2d 6c 61 79 6f 75 74 2d 69 6e 64 65 6e 74 ll-indentation-add-layout-indent
7c20 20 23 5b 30 20 22 5c 33 30 31 08 21 5c 32 30 37 22 20 5b 6c 61 79 6f 75 74 2d 69 6e 64 65 6e 74 .#[0."\301.!\207".[layout-indent
7c40 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 70 75 73 68 2d 69 6e 64 65 6e 74 .haskell-indentation-push-indent
7c60 61 74 69 6f 6e 5d 20 32 20 28 23 24 20 2e 20 33 31 37 32 36 29 5d 29 0a 23 40 32 20 1f 0a 28 64 ation].2.(#$...31726)]).#@2...(d
7c80 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 61 64 64 efalias.'haskell-indentation-add
7ca0 2d 77 68 65 72 65 2d 70 72 65 2d 69 6e 64 65 6e 74 20 23 5b 30 20 22 5c 33 30 33 08 09 5c 5c 21 -where-pre-indent.#[0."\303..\\!
7cc0 5c 32 31 30 08 5c 6e 55 5c 32 30 35 0f 00 5c 33 30 33 09 21 5c 32 30 37 22 20 5b 6c 61 79 6f 75 \210.\nU\205..\303.!\207".[layou
7ce0 74 2d 69 6e 64 65 6e 74 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 77 68 65 t-indent.haskell-indentation-whe
7d00 72 65 2d 70 72 65 2d 6f 66 66 73 65 74 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f re-pre-offset.haskell-indentatio
7d20 6e 2d 6c 61 79 6f 75 74 2d 6f 66 66 73 65 74 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 n-layout-offset.haskell-indentat
7d40 69 6f 6e 2d 70 75 73 68 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 5d 20 33 20 28 23 24 20 2e 20 33 31 ion-push-indentation].3.(#$...31
7d60 38 36 38 29 5d 29 0a 23 40 31 35 20 0a 0a 28 66 6e 20 49 4e 44 45 4e 54 29 1f 0a 28 64 65 66 61 868)]).#@15...(fn.INDENT)..(defa
7d80 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 61 64 64 2d 77 68 lias.'haskell-indentation-add-wh
7da0 65 72 65 2d 70 6f 73 74 2d 69 6e 64 65 6e 74 20 23 5b 32 35 37 20 22 5c 33 30 31 01 08 5c 5c 21 ere-post-indent.#[257."\301..\\!
7dc0 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 77 68 65 72 65 \207".[haskell-indentation-where
7de0 2d 70 6f 73 74 2d 6f 66 66 73 65 74 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e -post-offset.haskell-indentation
7e00 2d 70 75 73 68 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 5d 20 34 20 28 23 24 20 2e 20 33 32 31 30 38 -push-indentation].4.(#$...32108
7e20 29 5d 29 0a 23 40 32 20 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 )]).#@2...(defalias.'haskell-ind
7e40 65 6e 74 61 74 69 6f 6e 2d 61 64 64 2d 6c 65 66 74 2d 69 6e 64 65 6e 74 20 23 5b 30 20 22 5c 33 entation-add-left-indent.#[0."\3
7e60 30 32 08 09 5c 5c 21 5c 32 30 37 22 20 5b 6c 65 66 74 2d 69 6e 64 65 6e 74 20 68 61 73 6b 65 6c 02..\\!\207".[left-indent.haskel
7e80 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 6c 65 66 74 2d 6f 66 66 73 65 74 20 68 61 73 6b 65 6c l-indentation-left-offset.haskel
7ea0 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 61 64 64 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 5d 20 33 l-indentation-add-indentation].3
7ec0 20 28 23 24 20 2e 20 33 32 32 39 36 29 5d 29 0a 23 40 31 35 36 20 41 64 64 20 49 4e 44 45 4e 54 .(#$...32296)]).#@156.Add.INDENT
7ee0 20 74 6f 20 6c 69 73 74 20 6f 66 20 70 6f 73 73 69 62 6c 65 20 69 6e 64 65 6e 74 61 74 69 6f 6e .to.list.of.possible.indentation
7f00 73 2e 0a 0a 41 64 64 20 49 4e 44 45 4e 54 20 74 6f 20 60 70 6f 73 73 69 62 6c 65 2d 69 6e 64 65 s...Add.INDENT.to.`possible-inde
7f20 6e 74 61 74 69 6f 6e 73 27 20 69 66 20 69 74 20 69 73 20 6e 6f 74 20 74 68 65 72 65 0a 79 65 74 ntations'.if.it.is.not.there.yet
7f40 2e 20 4b 65 65 70 20 74 68 65 20 6c 69 73 74 20 69 6e 20 61 73 63 65 6e 64 69 6e 67 20 6f 72 64 ..Keep.the.list.in.ascending.ord
7f60 65 72 2e 0a 0a 28 66 6e 20 49 4e 44 45 4e 54 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 er...(fn.INDENT)..(defalias.'has
7f80 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 70 75 73 68 2d 69 6e 64 65 6e 74 61 74 69 6f kell-indentation-push-indentatio
7fa0 6e 20 23 5b 32 35 37 20 22 5c 32 31 31 08 5c 32 33 35 3f 5c 32 30 35 0f 00 5c 33 30 31 01 08 42 n.#[257."\211.\235?\205..\301..B
7fc0 5c 33 30 32 5c 22 5c 32 31 31 10 5c 32 30 37 22 20 5b 70 6f 73 73 69 62 6c 65 2d 69 6e 64 65 6e \302\"\211.\207".[possible-inden
7fe0 74 61 74 69 6f 6e 73 20 73 6f 72 74 20 3c 5d 20 34 20 28 23 24 20 2e 20 33 32 34 37 30 29 5d 29 tations.sort.<].4.(#$...32470)])
8000 0a 23 40 37 30 35 20 47 6f 20 74 6f 20 74 68 65 20 6e 65 78 74 20 74 6f 6b 65 6e 20 61 6e 64 20 .#@705.Go.to.the.next.token.and.
8020 73 65 74 20 63 75 72 72 65 6e 74 2d 74 6f 6b 65 6e 20 74 6f 20 74 68 65 20 6e 65 78 74 20 74 6f set.current-token.to.the.next.to
8040 6b 65 6e 2e 0a 0a 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 73 79 6d 62 6f 6c 73 20 61 72 65 20 ken...The.following.symbols.are.
8060 75 73 65 64 20 61 73 20 70 73 65 75 64 6f 20 74 6f 6b 65 6e 73 3a 0a 0a 27 6c 61 79 6f 75 74 2d used.as.pseudo.tokens:..'layout-
8080 69 74 65 6d 3a 20 41 20 6e 65 77 20 69 74 65 6d 20 69 6e 20 61 20 6c 61 79 6f 75 74 20 6c 69 73 item:.A.new.item.in.a.layout.lis
80a0 74 2e 20 20 54 68 65 20 6e 65 78 74 20 74 6f 6b 65 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 t...The.next.token..............
80c0 20 77 69 6c 6c 20 62 65 20 74 68 65 20 66 69 72 73 74 20 74 6f 6b 65 6e 20 66 72 6f 6d 20 74 68 .will.be.the.first.token.from.th
80e0 65 20 69 74 65 6d 2e 0a 0a 27 6c 61 79 6f 75 74 2d 65 6e 64 3a 20 20 74 68 65 20 65 6e 64 20 6f e.item...'layout-end:..the.end.o
8100 66 20 61 20 6c 61 79 6f 75 74 20 6c 69 73 74 2e 20 20 4e 65 78 74 20 74 6f 6b 65 6e 20 77 69 6c f.a.layout.list...Next.token.wil
8120 6c 20 62 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 68 65 20 66 69 72 73 74 20 74 6f 6b l.be...............the.first.tok
8140 65 6e 20 61 66 74 65 72 20 74 68 65 20 6c 61 79 6f 75 74 20 6c 69 73 74 2e 0a 0a 27 65 6e 64 2d en.after.the.layout.list...'end-
8160 74 6f 6b 65 6e 73 3a 20 20 62 61 63 6b 20 61 74 20 70 6f 69 6e 74 20 77 68 65 72 65 20 77 65 20 tokens:..back.at.point.where.we.
8180 73 74 61 72 74 65 64 2c 20 66 6f 6c 6c 6f 77 69 6e 67 2d 74 6f 6b 65 6e 0a 20 20 20 20 20 20 20 started,.following-token........
81a0 20 20 20 20 20 20 20 77 69 6c 6c 20 62 65 20 73 65 74 20 74 6f 20 74 68 65 20 6e 65 78 74 20 74 .......will.be.set.to.the.next.t
81c0 6f 6b 65 6e 2e 0a 0a 50 73 65 75 64 6f 20 74 6f 6b 65 6e 73 20 61 72 65 20 75 73 65 64 20 6f 6e oken...Pseudo.tokens.are.used.on
81e0 6c 79 20 77 68 65 6e 20 69 6d 70 6c 69 63 69 74 2d 6c 61 79 6f 75 74 2d 61 63 74 69 76 65 20 69 ly.when.implicit-layout-active.i
8200 73 0a 74 2e 20 54 68 61 74 20 69 73 20 74 68 65 20 63 61 73 65 20 6f 6e 6c 79 20 61 66 74 65 72 s.t..That.is.the.case.only.after
8220 20 6b 65 79 77 6f 72 64 73 20 22 64 6f 22 2c 20 22 77 68 65 72 65 22 2c 0a 22 6c 65 74 22 20 61 .keywords."do",."where",."let".a
8240 6e 64 20 22 6f 66 22 2e 0a 0a 49 66 20 77 65 20 61 72 65 20 61 74 20 61 20 6e 65 77 20 6c 69 6e nd."of"...If.we.are.at.a.new.lin
8260 65 2c 20 70 61 72 73 65 2d 6c 69 6e 65 20 69 73 20 69 6e 63 72 65 61 73 65 64 2c 20 61 6e 64 0a e,.parse-line.is.increased,.and.
8280 63 75 72 72 65 6e 74 2d 69 6e 64 65 6e 74 20 61 6e 64 20 6c 65 66 74 2d 69 6e 64 65 6e 74 20 61 current-indent.and.left-indent.a
82a0 72 65 20 73 65 74 20 74 6f 20 74 68 65 20 69 6e 64 65 6e 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 re.set.to.the.indentation.of.the
82c0 0a 6c 69 6e 65 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e .line...(defalias.'haskell-inden
82e0 74 61 74 69 6f 6e 2d 72 65 61 64 2d 6e 65 78 74 2d 74 6f 6b 65 6e 20 23 5b 30 20 22 08 5c 32 30 tation-read-next-token.#[0.".\20
8300 33 5c 66 00 09 5c 33 30 36 3d 5c 32 30 33 5c 66 00 5c 33 30 36 5c 32 30 37 08 5c 32 30 33 33 00 3\f..\306=\203\f.\306\207.\2033.
8320 09 5c 33 30 37 3d 5c 32 30 33 33 00 5c 6e 69 56 5c 32 30 33 1e 00 5c 33 30 37 5c 32 30 37 5c 6e .\307=\2033.\niV\203..\307\207\n
8340 69 55 5c 32 30 33 28 00 5c 33 31 30 5c 32 31 31 11 5c 32 30 37 5c 6e 69 57 5c 32 30 35 5c 32 33 iU\203(.\310\211.\207\niW\205\23
8360 33 00 5c 33 31 31 20 5c 32 31 31 11 5c 32 30 37 08 5c 32 30 33 42 00 09 5c 33 31 30 3d 5c 32 30 3.\311.\211.\207.\203B..\310=\20
8380 33 42 00 5c 33 31 31 20 5c 32 31 31 11 5c 32 30 37 08 5c 32 30 33 50 00 5c 6e 69 56 5c 32 30 33 3B.\311.\211.\207.\203P.\niV\203
83a0 50 00 5c 33 30 37 5c 32 31 31 11 5c 32 30 37 5c 33 31 31 20 13 5c 33 31 32 20 5c 32 31 30 60 5c P.\307\211.\207\311..\312.\210`\
83c0 66 59 5c 32 30 33 71 00 6d 5c 32 30 34 6b 00 60 5c 66 55 5c 32 30 33 6b 00 5c 33 31 31 20 5c 32 fY\203q.m\204k.`\fU\203k.\311.\2
83e0 30 32 6c 00 5c 33 31 33 15 5c 33 30 36 5c 32 31 31 11 5c 32 30 37 69 5c 33 31 34 20 55 5c 32 30 02l.\313.\306\211.\207i\314.U\20
8400 33 7b 00 69 16 0d 08 5c 32 30 33 5c 32 31 31 00 5c 6e 69 56 5c 32 30 33 5c 32 31 31 00 5c 33 30 3{.i...\203\211.\niV\203\211.\30
8420 37 5c 32 31 31 11 5c 32 30 37 08 5c 32 30 33 5c 32 32 37 00 5c 6e 69 55 5c 32 30 33 5c 32 32 37 7\211.\207.\203\227.\niU\203\227
8440 00 5c 33 31 30 5c 32 31 31 11 5c 32 30 37 5c 33 31 31 20 5c 32 31 31 11 5c 32 30 37 22 20 5b 69 .\310\211.\207\311.\211.\207".[i
8460 6d 70 6c 69 63 69 74 2d 6c 61 79 6f 75 74 2d 61 63 74 69 76 65 20 63 75 72 72 65 6e 74 2d 74 6f mplicit-layout-active.current-to
8480 6b 65 6e 20 6c 61 79 6f 75 74 2d 69 6e 64 65 6e 74 20 70 72 65 76 69 6f 75 73 2d 74 6f 6b 65 6e ken.layout-indent.previous-token
84a0 20 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 70 6f 69 6e 74 20 66 6f 6c 6c 6f 77 69 6e 67 2d 74 6f 6b .indentation-point.following-tok
84c0 65 6e 20 65 6e 64 2d 74 6f 6b 65 6e 73 20 6c 61 79 6f 75 74 2d 65 6e 64 20 6c 61 79 6f 75 74 2d en.end-tokens.layout-end.layout-
84e0 69 74 65 6d 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 70 65 65 6b 2d 74 6f item.haskell-indentation-peek-to
8500 6b 65 6e 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 73 6b 69 70 2d 74 6f 6b ken.haskell-indentation-skip-tok
8520 65 6e 20 6e 6f 2d 66 6f 6c 6c 6f 77 69 6e 67 2d 74 6f 6b 65 6e 20 68 61 73 6b 65 6c 6c 2d 69 6e en.no-following-token.haskell-in
8540 64 65 6e 74 61 74 69 6f 6e 2d 63 75 72 72 65 6e 74 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 63 75 dentation-current-indentation.cu
8560 72 72 65 6e 74 2d 69 6e 64 65 6e 74 5d 20 32 20 28 23 24 20 2e 20 33 32 37 37 35 29 5d 29 0a 23 rrent-indent].2.(#$...32775)]).#
8580 40 33 33 20 52 65 74 75 72 6e 20 74 6f 6b 65 6e 20 73 74 61 72 74 69 6e 67 20 61 74 20 70 6f 69 @33.Return.token.starting.at.poi
85a0 6e 74 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 nt...(defalias.'haskell-indentat
85c0 69 6f 6e 2d 70 65 65 6b 2d 74 6f 6b 65 6e 20 23 5b 30 20 22 5c 33 30 31 5c 33 30 32 21 5c 32 30 ion-peek-token.#[0."\301\302!\20
85e0 33 5c 6e 00 5c 33 30 33 5c 33 30 34 21 5c 32 30 37 5c 33 30 31 5c 33 30 35 21 5c 32 30 33 14 00 3\n.\303\304!\207\301\305!\203..
8600 5c 33 30 33 5c 33 30 36 21 5c 32 30 37 5c 33 30 31 5c 33 30 37 21 5c 32 30 33 1e 00 5c 33 30 33 \303\306!\207\301\307!\203..\303
8620 5c 33 30 34 21 5c 32 30 37 5c 33 30 31 5c 33 31 30 21 5c 32 30 33 31 00 5c 33 30 33 5c 33 30 34 \304!\207\301\310!\2031.\303\304
8640 21 5c 33 31 31 01 08 5c 22 41 5c 32 30 36 30 00 5c 32 31 31 5c 32 30 37 5c 33 30 31 5c 33 31 32 !\311..\"A\2060.\211\207\301\312
8660 21 5c 32 30 33 39 00 5c 33 31 33 5c 32 30 37 5c 33 31 34 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c !\2039.\313\207\314\207".[haskel
8680 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 75 6e 69 63 6f 64 65 2d 74 6f 6b 65 6e 73 20 6c 6f 6f l-indentation-unicode-tokens.loo
86a0 6b 69 6e 67 2d 61 74 20 22 5c 5c 28 69 66 5c 5c 7c 74 68 65 6e 5c 5c 7c 65 6c 73 65 5c 5c 7c 6c king-at."\\(if\\|then\\|else\\|l
86c0 65 74 5c 5c 7c 69 6e 5c 5c 7c 6d 64 6f 5c 5c 7c 72 65 63 5c 5c 7c 64 6f 5c 5c 7c 70 72 6f 63 5c et\\|in\\|mdo\\|rec\\|do\\|proc\
86e0 5c 7c 63 61 73 65 5c 5c 7c 6f 66 5c 5c 7c 77 68 65 72 65 5c 5c 7c 6d 6f 64 75 6c 65 5c 5c 7c 73 \|case\\|of\\|where\\|module\\|s
8700 69 67 6e 61 74 75 72 65 5c 5c 7c 64 65 72 69 76 69 6e 67 5c 5c 7c 69 6d 70 6f 72 74 5c 5c 7c 64 ignature\\|deriving\\|import\\|d
8720 61 74 61 5c 5c 7c 74 79 70 65 5c 5c 7c 6e 65 77 74 79 70 65 5c 5c 7c 63 6c 61 73 73 5c 5c 7c 69 ata\\|type\\|newtype\\|class\\|i
8740 6e 73 74 61 6e 63 65 5c 5c 29 5c 5c 28 5b 5e 5b 3a 61 6c 6e 75 6d 3a 5d 27 5f 5d 5c 5c 7c 24 5c nstance\\)\\([^[:alnum:]'_]\\|$\
8760 5c 29 22 20 6d 61 74 63 68 2d 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 31 \)".match-string-no-properties.1
8780 20 22 5b 5d 5b 28 29 7b 7d 5b 2c 3b 5d 22 20 30 20 22 5c 5c 28 5c 5c 5c 5c 5c 5c 7c 2d 3e 5c 5c ."[][(){}[,;]".0."\\(\\\\\\|->\\
87a0 7c 3c 2d 5c 5c 7c 3a 3a 5c 5c 7c 3d 5c 5c 7c 7c 5c 5c 7c 3d 3e 5c 5c 29 5c 5c 28 5b 5e 2d 3a 21 |<-\\|::\\|=\\||\\|=>\\)\\([^-:!
87c0 23 24 25 26 2a 2b 2e 2f 3c 3d 3e 3f 40 5c 5c 5c 5c 5e 7c 7e 5d 5c 5c 7c 24 5c 5c 29 22 20 22 5c #$%&*+./<=>?@\\\\^|~]\\|$\\)"."\
87e0 5c 28 e2 86 92 5c 5c 7c e2 86 90 5c 5c 7c e2 88 b7 5c 5c 7c e2 87 92 5c 5c 29 5c 5c 28 5b 5e 2d \(...\\|...\\|...\\|...\\)\\([^-
8800 3a 21 23 24 25 26 2a 2b 2e 2f 3c 3d 3e 3f 40 5c 5c 5c 5c 5e 7c 7e 5d 5c 5c 7c 24 5c 5c 29 22 20 :!#$%&*+./<=>?@\\\\^|~]\\|$\\)".
8820 61 73 73 6f 63 20 22 5b 2d 3a 21 23 24 25 26 2a 2b 2e 2f 3c 3d 3e 3f 40 5c 5c 5c 5c 5e 7c 7e 60 assoc."[-:!#$%&*+./<=>?@\\\\^|~`
8840 5d 22 20 6f 70 65 72 61 74 6f 72 20 76 61 6c 75 65 5d 20 34 20 28 23 24 20 2e 20 33 34 31 38 30 ]".operator.value].4.(#$...34180
8860 29 5d 29 0a 23 40 32 35 20 53 6b 69 70 20 74 6f 20 74 68 65 20 6e 65 78 74 20 74 6f 6b 65 6e 2e )]).#@25.Skip.to.the.next.token.
8880 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e ..(defalias.'haskell-indentation
88a0 2d 73 6b 69 70 2d 74 6f 6b 65 6e 20 23 5b 30 20 22 5c 33 30 30 20 5c 32 30 33 5c 66 00 5c 33 30 -skip-token.#[0."\300.\203\f.\30
88c0 31 5c 32 32 35 62 5c 32 31 30 5c 32 30 32 10 00 5c 33 30 32 5c 33 30 33 21 5c 32 31 30 5c 33 30 1\225b\210\202..\302\303!\210\30
88e0 34 5c 33 30 35 77 5c 32 31 30 5c 33 30 36 5c 33 30 37 20 21 5c 32 31 30 5c 33 31 30 20 5c 32 30 4\305w\210\306\307.!\210\310.\20
8900 35 34 00 6e 5c 32 30 35 34 00 5c 33 30 35 66 5c 33 31 31 3d 5c 32 30 35 34 00 5c 33 30 35 75 5c 54.n\2054.\305f\311=\2054.\305u\
8920 32 31 30 5c 33 30 36 5c 33 30 37 20 21 5c 32 31 30 5c 32 30 32 19 00 5c 32 30 37 22 20 5b 68 61 210\306\307.!\210\202..\207".[ha
8940 73 6b 65 6c 6c 2d 6c 65 78 65 6d 65 2d 6c 6f 6f 6b 69 6e 67 2d 61 74 2d 74 6f 6b 65 6e 20 30 20 skell-lexeme-looking-at-token.0.
8960 73 6b 69 70 2d 73 79 6e 74 61 78 2d 66 6f 72 77 61 72 64 20 22 5e 2d 22 20 22 5c 6e 22 20 6e 69 skip-syntax-forward."^-"."\n".ni
8980 6c 20 66 6f 72 77 61 72 64 2d 63 6f 6d 6d 65 6e 74 20 62 75 66 66 65 72 2d 73 69 7a 65 20 68 61 l.forward-comment.buffer-size.ha
89a0 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 62 69 72 64 2d 70 20 36 32 5d 20 32 20 28 skell-indentation-bird-p.62].2.(
89c0 23 24 20 2e 20 33 34 39 32 31 29 5d 29 0a 28 70 72 6f 76 69 64 65 20 27 68 61 73 6b 65 6c 6c 2d #$...34921)]).(provide.'haskell-
89e0 69 6e 64 65 6e 74 61 74 69 6f 6e 29 0a indentation).