about summary refs log tree commit diff
path: root/configs/shared/emacs/.emacs.d/elpa/haskell-mode-20180913.348/haskell-indent.elc
blob: a22b1be2641d41124a0923c3ae44bf99cae23950 (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 32 35 5c 33 32 36 5c 33 30 37 5c 33 30 34 26 09 5c 32 31 322\323\324\325\326\307\304&.\21
0220 30 5c 33 31 35 5c 33 32 37 5c 33 31 37 5c 33 32 30 5c 33 33 30 44 44 5c 33 33 31 5c 33 32 33 5c 0\315\327\317\320\330DD\331\323\
0240 33 32 34 5c 33 32 35 5c 33 32 36 5c 33 30 37 5c 33 30 34 26 09 5c 32 31 30 5c 33 31 35 5c 33 33 324\325\326\307\304&.\210\315\33
0260 32 5c 33 31 37 5c 33 32 30 5c 33 33 33 44 44 5c 33 33 34 5c 33 32 33 5c 33 32 34 5c 33 32 35 5c 2\317\320\333DD\334\323\324\325\
0280 33 32 36 5c 33 30 37 5c 33 30 34 26 09 5c 32 30 37 22 20 5b 72 65 71 75 69 72 65 20 63 6c 2d 6c 326\307\304&.\207".[require.cl-l
02a0 69 62 20 68 61 73 6b 65 6c 6c 2d 73 74 72 69 6e 67 20 63 75 73 74 6f 6d 2d 64 65 63 6c 61 72 65 ib.haskell-string.custom-declare
02c0 2d 67 72 6f 75 70 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 20 6e 69 6c 20 22 48 61 73 6b 65 -group.haskell-indent.nil."Haske
02e0 6c 6c 20 69 6e 64 65 6e 74 61 74 69 6f 6e 2e 22 20 3a 67 72 6f 75 70 20 68 61 73 6b 65 6c 6c 20 ll.indentation.".:group.haskell.
0300 3a 6c 69 6e 6b 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 :link.(custom-manual."(haskell-m
0320 6f 64 65 29 49 6e 64 65 6e 74 61 74 69 6f 6e 22 29 20 3a 70 72 65 66 69 78 20 22 68 61 73 6b 65 ode)Indentation").:prefix."haske
0340 6c 6c 2d 69 6e 64 65 6e 74 2d 22 20 63 75 73 74 6f 6d 2d 64 65 63 6c 61 72 65 2d 76 61 72 69 61 ll-indent-".custom-declare-varia
0360 62 6c 65 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 6f 66 66 73 65 74 20 66 75 6e 63 61 6c ble.haskell-indent-offset.funcal
0380 6c 20 66 75 6e 63 74 69 6f 6e 20 23 5b 30 20 22 5c 33 30 30 5c 32 30 37 22 20 5b 34 5d 20 31 5d l.function.#[0."\300\207".[4].1]
03a0 20 22 49 6e 64 65 6e 74 61 74 69 6f 6e 20 6f 66 20 48 61 73 6b 65 6c 6c 20 73 74 61 74 65 6d 65 ."Indentation.of.Haskell.stateme
03c0 6e 74 73 20 77 69 74 68 20 72 65 73 70 65 63 74 20 74 6f 20 63 6f 6e 74 61 69 6e 69 6e 67 20 62 nts.with.respect.to.containing.b
03e0 6c 6f 63 6b 2e 22 20 3a 74 79 70 65 20 69 6e 74 65 67 65 72 20 3a 73 61 66 65 20 6e 61 74 6e 75 lock.".:type.integer.:safe.natnu
0400 6d 70 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 6c 69 74 65 72 61 74 65 2d 42 69 72 64 2d mp.haskell-indent-literate-Bird-
0420 64 65 66 61 75 6c 74 2d 6f 66 66 73 65 74 20 23 5b 30 20 22 5c 33 30 30 5c 32 30 37 22 20 5b 31 default-offset.#[0."\300\207".[1
0440 5d 20 31 5d 20 22 44 65 66 61 75 6c 74 20 6e 75 6d 62 65 72 20 6f 66 20 62 6c 61 6e 6b 73 20 61 ].1]."Default.number.of.blanks.a
0460 66 74 65 72 20 3e 20 69 6e 20 61 20 42 69 72 64 20 73 74 79 6c 65 20 6c 69 74 65 72 61 74 65 20 fter.>.in.a.Bird.style.literate.
0480 73 63 72 69 70 74 2e 22 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 72 68 73 2d 61 6c 69 67 script.".haskell-indent-rhs-alig
04a0 6e 2d 63 6f 6c 75 6d 6e 20 23 5b 30 20 22 5c 33 30 30 5c 32 30 37 22 20 5b 30 5d 20 31 5d 20 22 n-column.#[0."\300\207".[0].1]."
04c0 43 6f 6c 75 6d 6e 20 6f 6e 20 77 68 69 63 68 20 74 6f 20 61 6c 69 67 6e 20 72 69 67 68 74 2d 68 Column.on.which.to.align.right-h
04e0 61 6e 64 20 73 69 64 65 73 20 28 75 73 65 20 30 20 66 6f 72 20 61 64 2d 68 6f 63 20 61 6c 69 67 and.sides.(use.0.for.ad-hoc.alig
0500 6e 6d 65 6e 74 29 2e 22 5d 20 31 30 29 0a 23 40 35 30 20 52 65 74 75 72 6e 20 74 68 65 20 63 6f nment)."].10).#@50.Return.the.co
0520 6c 75 6d 6e 20 6e 75 6d 62 65 72 20 6f 66 20 41 50 4f 49 4e 54 2e 0a 0a 28 66 6e 20 41 50 4f 49 lumn.number.of.APOINT...(fn.APOI
0540 4e 54 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 2d 70 NT)..(defalias.'haskell-indent-p
0560 6f 69 6e 74 2d 74 6f 2d 63 6f 6c 20 23 5b 32 35 37 20 22 5c 32 31 32 5c 32 31 31 62 5c 32 31 30 oint-to-col.#[257."\212\211b\210
0580 69 29 5c 32 30 37 22 20 5b 5d 20 32 20 28 23 24 20 2e 20 31 32 39 39 29 5d 29 0a 23 40 37 36 20 i)\207".[].2.(#$...1299)]).#@76.
05a0 52 65 67 65 78 70 20 66 6f 72 20 6b 65 79 77 6f 72 64 73 20 74 6f 20 63 6f 6d 70 6c 65 74 65 20 Regexp.for.keywords.to.complete.
05c0 77 68 65 6e 20 73 74 61 6e 64 69 6e 67 20 61 74 20 74 68 65 20 66 69 72 73 74 20 77 6f 72 64 20 when.standing.at.the.first.word.
05e0 6f 66 20 61 20 6c 69 6e 65 2e 1f 0a 28 64 65 66 63 6f 6e 73 74 20 68 61 73 6b 65 6c 6c 2d 69 6e of.a.line...(defconst.haskell-in
0600 64 65 6e 74 2d 73 74 61 72 74 2d 6b 65 79 77 6f 72 64 73 2d 72 65 20 22 5c 5c 3c 5c 5c 28 63 6c dent-start-keywords-re."\\<\\(cl
0620 61 73 73 5c 5c 7c 64 61 74 61 5c 5c 7c 69 5c 5c 28 3f 3a 6d 70 6f 72 74 5c 5c 7c 6e 5c 5c 28 3f ass\\|data\\|i\\(?:mport\\|n\\(?
0640 3a 66 69 78 5b 6c 72 5d 3f 5c 5c 7c 73 74 61 6e 63 65 5c 5c 29 5c 5c 29 5c 5c 7c 5c 5c 28 3f 3a :fix[lr]?\\|stance\\)\\)\\|\\(?:
0660 6d 6f 64 75 6c 5c 5c 7c 6e 65 77 74 79 70 5c 5c 7c 70 72 69 6d 69 74 69 76 5c 5c 7c 73 69 67 6e modul\\|newtyp\\|primitiv\\|sign
0680 61 74 75 72 5c 5c 7c 74 79 70 5c 5c 29 65 5c 5c 29 5c 5c 3e 22 20 28 23 24 20 2e 20 31 34 34 30 atur\\|typ\\)e\\)\\>".(#$...1440
06a0 29 29 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 2d 6d 61 72 )).(defalias.'haskell-indent-mar
06c0 6b 2d 61 63 74 69 76 65 20 23 5b 30 20 22 08 5c 32 30 37 22 20 5b 6d 61 72 6b 2d 61 63 74 69 76 k-active.#[0.".\207".[mark-activ
06e0 65 5d 20 31 5d 29 0a 23 40 32 31 38 20 50 75 73 68 20 69 6e 64 65 6e 74 61 74 69 6f 6e 20 69 6e e].1]).#@218.Push.indentation.in
0700 66 6f 72 6d 61 74 69 6f 6e 20 66 6f 72 20 74 68 65 20 63 6f 6c 75 6d 6e 20 43 4f 4c 2e 0a 54 68 formation.for.the.column.COL..Th
0720 65 20 69 6e 66 6f 20 69 73 20 66 6f 6c 6c 6f 77 65 64 20 62 79 20 4e 41 4d 45 20 28 69 66 20 70 e.info.is.followed.by.NAME.(if.p
0740 72 65 73 65 6e 74 29 2e 0a 4d 61 6b 65 73 20 73 75 72 65 20 74 68 61 74 20 74 68 65 20 73 61 6d resent)..Makes.sure.that.the.sam
0760 65 20 69 6e 64 65 6e 74 61 74 69 6f 6e 20 69 6e 66 6f 20 69 73 20 6e 6f 74 20 70 75 73 68 65 64 e.indentation.info.is.not.pushed
0780 20 74 77 69 63 65 2e 0a 55 73 65 73 20 66 72 65 65 20 76 61 72 20 60 68 61 73 6b 65 6c 6c 2d 69 .twice..Uses.free.var.`haskell-i
07a0 6e 64 65 6e 74 2d 69 6e 66 6f 27 2e 0a 0a 28 66 6e 20 43 4f 4c 20 26 6f 70 74 69 6f 6e 61 6c 20 ndent-info'...(fn.COL.&optional.
07c0 4e 41 4d 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 NAME)..(defalias.'haskell-indent
07e0 2d 70 75 73 68 2d 63 6f 6c 20 23 5b 35 31 33 20 22 01 01 42 5c 32 31 31 08 5c 32 33 35 5c 32 30 -push-col.#[513."..B\211.\235\20
0800 33 0d 00 08 5c 32 30 32 12 00 5c 32 31 31 08 42 5c 32 31 31 10 5c 32 30 37 22 20 5b 68 61 73 6b 3...\202..\211.B\211.\207".[hask
0820 65 6c 6c 2d 69 6e 64 65 6e 74 2d 69 6e 66 6f 5d 20 35 20 28 23 24 20 2e 20 31 37 37 33 29 5d 29 ell-indent-info].5.(#$...1773)])
0840 0a 23 40 39 34 20 50 75 73 68 20 69 6e 64 65 6e 74 61 74 69 6f 6e 20 69 6e 66 6f 72 6d 61 74 69 .#@94.Push.indentation.informati
0860 6f 6e 20 66 6f 72 20 50 4f 53 20 66 6f 6c 6c 6f 77 65 64 20 62 79 20 4e 41 4d 45 20 28 69 66 20 on.for.POS.followed.by.NAME.(if.
0880 70 72 65 73 65 6e 74 29 2e 0a 0a 28 66 6e 20 50 4f 53 20 26 6f 70 74 69 6f 6e 61 6c 20 4e 41 4d present)...(fn.POS.&optional.NAM
08a0 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 2d 70 75 E)..(defalias.'haskell-indent-pu
08c0 73 68 2d 70 6f 73 20 23 5b 35 31 33 20 22 5c 33 30 30 5c 33 30 31 03 21 02 5c 22 5c 32 30 37 22 sh-pos.#[513."\300\301.!.\"\207"
08e0 20 5b 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 70 75 73 68 2d 63 6f 6c 20 68 61 73 6b 65 6c .[haskell-indent-push-col.haskel
0900 6c 2d 69 6e 64 65 6e 74 2d 70 6f 69 6e 74 2d 74 6f 2d 63 6f 6c 5d 20 35 20 28 23 24 20 2e 20 32 l-indent-point-to-col].5.(#$...2
0920 31 31 38 29 5d 29 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 118)]).(defalias.'haskell-indent
0940 2d 63 6f 6c 75 6d 6e 2b 6f 66 66 73 65 74 20 23 5b 35 31 34 20 22 5c 32 31 31 5c 32 30 34 07 00 -column+offset.#[514."\211\204..
0960 08 5c 32 36 32 01 01 01 5c 5c 5c 32 36 32 02 01 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 69 .\262...\\\262..\207".[haskell-i
0980 6e 64 65 6e 74 2d 6f 66 66 73 65 74 5d 20 34 20 22 5c 6e 5c 6e 28 66 6e 20 43 4f 4c 55 4d 4e 20 ndent-offset].4."\n\n(fn.COLUMN.
09a0 4f 46 46 53 45 54 29 22 5d 29 0a 23 40 31 38 33 20 50 75 73 68 65 73 20 69 6e 64 65 6e 74 61 74 OFFSET)"]).#@183.Pushes.indentat
09c0 69 6f 6e 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 66 6f 72 20 74 68 65 20 63 6f 6c 75 6d 6e 20 63 ion.information.for.the.column.c
09e0 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20 74 6f 20 50 4f 53 0a 66 6f 6c 6c 6f 77 65 64 20 62 79 20 orresponding.to.POS.followed.by.
0a00 61 6e 20 4f 46 46 53 45 54 20 28 69 66 20 70 72 65 73 65 6e 74 20 75 73 65 20 69 74 73 20 76 61 an.OFFSET.(if.present.use.its.va
0a20 6c 75 65 20 6f 74 68 65 72 77 69 73 65 20 75 73 65 0a 60 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e lue.otherwise.use.`haskell-inden
0a40 74 2d 6f 66 66 73 65 74 27 29 2e 0a 0a 28 66 6e 20 50 4f 53 20 26 6f 70 74 69 6f 6e 61 6c 20 4f t-offset')...(fn.POS.&optional.O
0a60 46 46 53 45 54 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 FFSET)..(defalias.'haskell-inden
0a80 74 2d 70 75 73 68 2d 70 6f 73 2d 6f 66 66 73 65 74 20 23 5b 35 31 33 20 22 5c 33 30 30 5c 33 30 t-push-pos-offset.#[513."\300\30
0aa0 31 5c 33 30 32 04 21 03 5c 22 21 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 1\302.!.\"!\207".[haskell-indent
0ac0 2d 70 75 73 68 2d 63 6f 6c 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 63 6f 6c 75 6d 6e 2b -push-col.haskell-indent-column+
0ae0 6f 66 66 73 65 74 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 70 6f 69 6e 74 2d 74 6f 2d 63 offset.haskell-indent-point-to-c
0b00 6f 6c 5d 20 36 20 28 23 24 20 2e 20 32 34 38 31 29 5d 29 0a 23 40 35 34 20 60 62 6f 6c 70 27 20 ol].6.(#$...2481)]).#@54.`bolp'.
0b20 62 75 74 20 64 65 61 6c 69 6e 67 20 77 69 74 68 20 42 69 72 64 2d 73 74 79 6c 65 20 6c 69 74 65 but.dealing.with.Bird-style.lite
0b40 72 61 74 65 20 73 63 72 69 70 74 73 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c rate.scripts...(defalias.'haskel
0b60 6c 2d 69 6e 64 65 6e 74 2d 62 6f 6c 70 20 23 5b 30 20 22 6e 5c 32 30 36 16 00 08 5c 33 30 32 3d l-indent-bolp.#[0."n\206...\302=
0b80 5c 32 30 35 16 00 69 09 54 58 5c 32 30 35 16 00 5c 33 30 33 20 66 5c 33 30 34 3d 5c 32 30 37 22 \205..i.TX\205..\303.f\304=\207"
0ba0 20 5b 68 61 73 6b 65 6c 6c 2d 6c 69 74 65 72 61 74 65 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e .[haskell-literate.haskell-inden
0bc0 74 2d 6c 69 74 65 72 61 74 65 2d 42 69 72 64 2d 64 65 66 61 75 6c 74 2d 6f 66 66 73 65 74 20 62 t-literate-Bird-default-offset.b
0be0 69 72 64 20 6c 69 6e 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 70 6f 73 69 74 69 6f 6e 20 36 32 5d 20 ird.line-beginning-position.62].
0c00 32 20 28 23 24 20 2e 20 32 38 34 31 29 5d 29 0a 23 40 36 39 20 43 68 65 63 6b 73 20 69 66 20 74 2.(#$...2841)]).#@69.Checks.if.t
0c20 68 65 20 63 75 72 72 65 6e 74 20 6c 69 6e 65 20 69 73 20 65 6d 70 74 79 3b 20 64 65 61 6c 73 20 he.current.line.is.empty;.deals.
0c40 77 69 74 68 20 42 69 72 64 20 73 74 79 6c 65 20 73 63 72 69 70 74 73 2e 1f 0a 28 64 65 66 61 6c with.Bird.style.scripts...(defal
0c60 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 65 6d 70 74 79 2d 6c 69 6e 65 2d 70 ias.'haskell-indent-empty-line-p
0c80 20 23 5b 30 20 22 5c 32 31 32 5c 33 30 31 20 5c 32 31 30 08 5c 33 30 32 3d 5c 32 30 33 13 00 67 .#[0."\212\301.\210.\302=\203..g
0ca0 5c 33 30 33 3d 5c 32 30 33 13 00 5c 33 30 34 75 5c 32 31 30 5c 33 30 35 5c 33 30 36 21 29 5c 32 \303=\203..\304u\210\305\306!)\2
0cc0 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 6c 69 74 65 72 61 74 65 20 62 65 67 69 6e 6e 69 6e 67 2d 07".[haskell-literate.beginning-
0ce0 6f 66 2d 6c 69 6e 65 20 62 69 72 64 20 36 32 20 31 20 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 5b 20 of-line.bird.62.1.looking-at."[.
0d00 09 5d 2a 24 22 5d 20 32 20 28 23 24 20 2e 20 33 30 39 33 29 5d 29 0a 23 40 37 38 20 60 62 61 63 .]*$"].2.(#$...3093)]).#@78.`bac
0d20 6b 2d 74 6f 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 27 20 66 75 6e 63 74 69 6f 6e 20 62 75 74 20 64 k-to-indentation'.function.but.d
0d40 65 61 6c 69 6e 67 20 77 69 74 68 20 42 69 72 64 2d 73 74 79 6c 65 20 6c 69 74 65 72 61 74 65 20 ealing.with.Bird-style.literate.
0d60 73 63 72 69 70 74 73 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 scripts...(defalias.'haskell-ind
0d80 65 6e 74 2d 62 61 63 6b 2d 74 6f 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 23 5b 30 20 22 08 5c 33 ent-back-to-indentation.#[0.".\3
0da0 30 31 3d 5c 32 30 33 16 00 5c 33 30 32 20 5c 32 31 30 67 5c 33 30 33 3d 5c 32 30 33 16 00 5c 33 01=\203..\302.\210g\303=\203..\3
0dc0 30 34 75 5c 32 31 30 5c 33 30 35 5c 33 30 36 77 5c 32 30 37 5c 33 30 37 20 5c 32 30 37 22 20 5b 04u\210\305\306w\207\307.\207".[
0de0 68 61 73 6b 65 6c 6c 2d 6c 69 74 65 72 61 74 65 20 62 69 72 64 20 62 65 67 69 6e 6e 69 6e 67 2d haskell-literate.bird.beginning-
0e00 6f 66 2d 6c 69 6e 65 20 36 32 20 31 20 22 20 09 22 20 6e 69 6c 20 62 61 63 6b 2d 74 6f 2d 69 6e of-line.62.1."..".nil.back-to-in
0e20 64 65 6e 74 61 74 69 6f 6e 5d 20 32 20 28 23 24 20 2e 20 33 33 35 36 29 5d 29 0a 23 40 37 34 20 dentation].2.(#$...3356)]).#@74.
0e40 60 63 75 72 72 65 6e 74 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 27 20 66 75 6e 63 74 69 6f 6e 20 64 `current-indentation'.function.d
0e60 65 61 6c 69 6e 67 20 77 69 74 68 20 42 69 72 64 2d 73 74 79 6c 65 20 6c 69 74 65 72 61 74 65 20 ealing.with.Bird-style.literate.
0e80 73 63 72 69 70 74 73 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 scripts...(defalias.'haskell-ind
0ea0 65 6e 74 2d 63 75 72 72 65 6e 74 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 23 5b 30 20 22 08 5c 33 ent-current-indentation.#[0.".\3
0ec0 30 31 3d 5c 32 30 33 0d 00 5c 32 31 32 5c 33 30 32 20 5c 32 31 30 69 29 5c 32 30 37 5c 33 30 33 01=\203..\212\302.\210i)\207\303
0ee0 20 5c 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 20 68 61 .\207".[haskell-literate.bird.ha
0f00 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 62 61 63 6b 2d 74 6f 2d 69 6e 64 65 6e 74 61 74 69 6f 6e skell-indent-back-to-indentation
0f20 20 63 75 72 72 65 6e 74 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 5d 20 32 20 28 23 24 20 2e 20 33 36 .current-indentation].2.(#$...36
0f40 34 38 29 5d 29 0a 23 40 38 36 20 60 62 61 63 6b 77 61 72 64 2d 74 6f 2d 69 6e 64 65 6e 74 61 74 48)]).#@86.`backward-to-indentat
0f60 69 6f 6e 27 20 66 75 6e 63 74 69 6f 6e 20 64 65 61 6c 69 6e 67 20 77 69 74 68 20 42 69 72 64 2d ion'.function.dealing.with.Bird-
0f80 73 74 79 6c 65 20 6c 69 74 65 72 61 74 65 20 73 63 72 69 70 74 73 2e 0a 0a 28 66 6e 20 4e 29 1f style.literate.scripts...(fn.N).
0fa0 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 2d 62 61 63 6b 77 .(defalias.'haskell-indent-backw
0fc0 61 72 64 2d 74 6f 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 23 5b 32 35 37 20 22 08 5c 33 30 31 3d ard-to-indentation.#[257.".\301=
0fe0 5c 32 30 33 0d 00 5c 32 31 31 5b 79 5c 32 31 30 5c 33 30 32 20 5c 32 30 37 5c 33 30 33 01 21 5c \203..\211[y\210\302.\207\303.!\
1000 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 20 68 61 73 6b 207".[haskell-literate.bird.hask
1020 65 6c 6c 2d 69 6e 64 65 6e 74 2d 62 61 63 6b 2d 74 6f 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 62 ell-indent-back-to-indentation.b
1040 61 63 6b 77 61 72 64 2d 74 6f 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 5d 20 33 20 28 23 24 20 2e 20 ackward-to-indentation].3.(#$...
1060 33 39 31 35 29 5d 29 0a 23 40 38 39 20 60 66 6f 72 77 61 72 64 2d 6c 69 6e 65 27 20 66 75 6e 63 3915)]).#@89.`forward-line'.func
1080 74 69 6f 6e 20 62 75 74 20 64 65 61 6c 69 6e 67 20 77 69 74 68 20 42 69 72 64 2d 73 74 79 6c 65 tion.but.dealing.with.Bird-style
10a0 20 6c 69 74 65 72 61 74 65 20 73 63 72 69 70 74 73 2e 0a 0a 28 66 6e 20 26 6f 70 74 69 6f 6e 61 .literate.scripts...(fn.&optiona
10c0 6c 20 4e 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 2d l.N)..(defalias.'haskell-indent-
10e0 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 23 5b 32 35 36 20 22 5c 32 31 31 79 08 5c 33 30 31 3d 5c forward-line.#[256."\211y.\301=\
1100 32 30 33 15 00 67 5c 33 30 32 3d 5c 32 30 33 15 00 5c 33 30 33 75 5c 32 31 30 5c 33 30 34 5c 33 203..g\302=\203..\303u\210\304\3
1120 30 35 77 5c 32 31 30 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 6c 69 74 65 72 61 74 65 20 62 05w\210\207".[haskell-literate.b
1140 69 72 64 20 36 32 20 31 20 22 20 09 22 20 6e 69 6c 5d 20 34 20 28 23 24 20 2e 20 34 32 30 35 29 ird.62.1."..".nil].4.(#$...4205)
1160 5d 29 0a 23 40 38 31 20 60 69 6e 64 65 6e 74 2d 6c 69 6e 65 2d 74 6f 27 20 66 75 6e 63 74 69 6f ]).#@81.`indent-line-to'.functio
1180 6e 20 62 75 74 20 64 65 61 6c 69 6e 67 20 77 69 74 68 20 42 69 72 64 2d 73 74 79 6c 65 20 6c 69 n.but.dealing.with.Bird-style.li
11a0 74 65 72 61 74 65 20 73 63 72 69 70 74 73 2e 0a 0a 28 66 6e 20 4e 29 1f 0a 28 64 65 66 61 6c 69 terate.scripts...(fn.N)..(defali
11c0 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 6c 69 6e 65 2d 74 6f 20 23 5b 32 35 37 as.'haskell-indent-line-to.#[257
11e0 20 22 08 5c 33 30 31 3d 5c 32 30 33 2c 00 5c 33 30 32 20 5c 32 31 30 67 5c 33 30 33 3d 5c 32 30 .".\301=\203,.\302.\210g\303=\20
1200 33 13 00 5c 33 30 34 5c 33 30 35 21 5c 32 31 30 5c 33 30 36 20 5c 32 31 30 5c 33 30 37 01 21 5c 3..\304\305!\210\306.\210\307.!\
1220 32 31 30 5c 32 31 32 5c 33 30 32 20 5c 32 31 30 5c 32 31 31 5c 33 31 30 56 5c 32 30 33 28 00 5c 210\212\302.\210\211\310V\203(.\
1240 33 30 34 5c 33 30 35 21 5c 32 31 30 5c 33 30 33 63 29 5c 32 30 37 5c 33 30 37 01 21 5c 32 30 37 304\305!\210\303c)\207\307.!\207
1260 22 20 5b 68 61 73 6b 65 6c 6c 2d 6c 69 74 65 72 61 74 65 20 62 69 72 64 20 62 65 67 69 6e 6e 69 ".[haskell-literate.bird.beginni
1280 6e 67 2d 6f 66 2d 6c 69 6e 65 20 36 32 20 64 65 6c 65 74 65 2d 63 68 61 72 20 31 20 64 65 6c 65 ng-of-line.62.delete-char.1.dele
12a0 74 65 2d 68 6f 72 69 7a 6f 6e 74 61 6c 2d 73 70 61 63 65 20 69 6e 64 65 6e 74 2d 6c 69 6e 65 2d te-horizontal-space.indent-line-
12c0 74 6f 20 30 5d 20 33 20 28 23 24 20 2e 20 34 34 35 36 29 5d 29 0a 23 40 31 30 36 20 53 6b 69 70 to.0].3.(#$...4456)]).#@106.Skip
12e0 20 66 6f 72 77 61 72 64 20 62 6c 61 6e 6b 73 2c 20 74 61 62 73 20 61 6e 64 20 6e 65 77 6c 69 6e .forward.blanks,.tabs.and.newlin
1300 65 73 20 75 6e 74 69 6c 20 45 4e 44 2e 0a 54 61 6b 65 20 61 63 63 6f 75 6e 74 20 6f 66 20 42 69 es.until.END..Take.account.of.Bi
1320 72 64 2d 73 74 79 6c 65 20 6c 69 74 65 72 61 74 65 20 73 63 72 69 70 74 73 2e 0a 0a 28 66 6e 20 rd-style.literate.scripts...(fn.
1340 45 4e 44 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 2d END)..(defalias.'haskell-indent-
1360 73 6b 69 70 2d 62 6c 61 6e 6b 73 2d 61 6e 64 2d 6e 65 77 6c 69 6e 65 73 2d 66 6f 72 77 61 72 64 skip-blanks-and-newlines-forward
1380 20 23 5b 32 35 37 20 22 5c 33 30 31 01 77 5c 32 31 30 08 5c 33 30 32 3d 5c 32 30 35 1e 00 6e 5c .#[257."\301.w\210.\302=\205..n\
13a0 32 30 35 1e 00 67 5c 33 30 33 3d 5c 32 30 35 1e 00 5c 33 30 34 75 5c 32 31 30 5c 33 30 31 01 77 205..g\303=\205..\304u\210\301.w
13c0 5c 32 31 30 5c 32 30 32 5c 6e 00 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 6c 69 74 65 72 61 \210\202\n.\207".[haskell-litera
13e0 74 65 20 22 20 09 5c 6e 22 20 62 69 72 64 20 36 32 20 31 5d 20 33 20 28 23 24 20 2e 20 34 38 32 te."..\n".bird.62.1].3.(#$...482
1400 38 29 5d 29 0a 23 40 31 31 31 20 53 6b 69 70 20 62 61 63 6b 77 61 72 64 20 62 6c 61 6e 6b 73 2c 8)]).#@111.Skip.backward.blanks,
1420 20 74 61 62 73 20 61 6e 64 20 6e 65 77 6c 69 6e 65 73 20 75 70 20 74 6f 20 53 54 41 52 54 2e 0a .tabs.and.newlines.up.to.START..
1440 54 61 6b 65 20 61 63 63 6f 75 6e 74 20 6f 66 20 42 69 72 64 2d 73 74 79 6c 65 20 6c 69 74 65 72 Take.account.of.Bird-style.liter
1460 61 74 65 20 73 63 72 69 70 74 73 2e 0a 0a 28 66 6e 20 53 54 41 52 54 29 1f 0a 28 64 65 66 61 6c ate.scripts...(fn.START)..(defal
1480 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 73 6b 69 70 2d 62 6c 61 6e 6b 73 2d ias.'haskell-indent-skip-blanks-
14a0 61 6e 64 2d 6e 65 77 6c 69 6e 65 73 2d 62 61 63 6b 77 61 72 64 20 23 5b 32 35 37 20 22 5c 33 30 and-newlines-backward.#[257."\30
14c0 31 01 78 5c 32 31 30 08 5c 33 30 32 3d 5c 32 30 35 20 00 69 5c 33 30 33 3d 5c 32 30 35 20 00 68 1.x\210.\302=\205..i\303=\205..h
14e0 5c 33 30 34 3d 5c 32 30 35 20 00 5c 33 30 35 75 5c 32 31 30 5c 33 30 31 01 78 5c 32 31 30 5c 32 \304=\205..\305u\210\301.x\210\2
1500 30 32 5c 6e 00 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 6c 69 74 65 72 61 74 65 20 22 20 09 02\n.\207".[haskell-literate."..
1520 5c 6e 22 20 62 69 72 64 20 31 20 36 32 20 2d 31 5d 20 33 20 28 23 24 20 2e 20 35 31 33 31 29 5d \n".bird.1.62.-1].3.(#$...5131)]
1540 29 0a 23 40 32 31 36 20 43 68 65 63 6b 20 69 66 20 70 6f 69 6e 74 20 69 73 20 77 69 74 68 69 6e ).#@216.Check.if.point.is.within
1560 20 61 20 70 61 72 74 20 6f 66 20 6c 69 74 65 72 61 74 65 20 48 61 73 6b 65 6c 6c 20 63 6f 64 65 .a.part.of.literate.Haskell.code
1580 2e 0a 49 66 20 73 6f 2c 20 72 65 74 75 72 6e 20 69 74 73 20 73 74 61 72 74 3b 20 6f 74 68 65 72 ..If.so,.return.its.start;.other
15a0 77 69 73 65 20 72 65 74 75 72 6e 20 6e 69 6c 3a 0a 49 66 20 69 74 20 69 73 20 42 69 72 64 2d 73 wise.return.nil:.If.it.is.Bird-s
15c0 74 79 6c 65 2c 20 74 68 65 6e 20 72 65 74 75 72 6e 20 74 68 65 20 70 6f 73 69 74 69 6f 6e 20 6f tyle,.then.return.the.position.o
15e0 66 20 74 68 65 20 3e 3b 0a 6f 74 68 65 72 77 69 73 65 20 72 65 74 75 72 6e 20 74 68 65 20 65 6e f.the.>;.otherwise.return.the.en
1600 64 69 6e 67 20 70 6f 73 69 74 69 6f 6e 20 6f 66 20 5c 62 65 67 69 6e 7b 63 6f 64 65 7d 2e 1f 0a ding.position.of.\begin{code}...
1620 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 2d 77 69 74 68 69 6e (defalias.'haskell-indent-within
1640 2d 6c 69 74 65 72 61 74 65 2d 63 6f 64 65 20 23 5b 30 20 22 5c 32 31 32 5c 33 30 31 08 5c 33 30 -literate-code.#[0."\212\301.\30
1660 32 5c 22 5c 32 30 33 3a 00 5c 33 30 33 20 5c 32 31 30 67 5c 33 30 34 3d 5c 32 30 34 20 00 6e 5c 2\"\203:.\303.\210g\304=\204..n\
1680 32 30 35 51 00 5c 33 30 35 79 5c 32 30 35 51 00 67 5c 33 30 34 3d 5c 32 30 35 51 00 5c 33 30 35 205Q.\305y\205Q.g\304=\205Q.\305
16a0 79 5c 33 30 36 55 5c 32 30 33 2d 00 67 5c 33 30 34 3d 5c 32 30 34 20 00 67 5c 33 30 34 3d 5c 32 y\306U\203-.g\304=\204..g\304=\2
16c0 30 34 36 00 5c 33 30 37 79 5c 32 31 30 60 5c 32 30 32 51 00 5c 33 31 30 08 5c 33 31 31 5c 22 5c 046.\307y\210`\202Q.\310.\311\"\
16e0 32 30 33 4e 00 5c 33 31 32 5c 33 31 33 5c 33 30 37 5c 33 31 34 23 5c 32 30 35 51 00 5c 33 31 35 203N.\312\313\307\314#\205Q.\315
1700 5c 32 32 35 5c 32 30 32 51 00 5c 33 31 36 5c 33 31 37 21 29 5c 32 30 37 22 20 5b 68 61 73 6b 65 \225\202Q.\316\317!)\207".[haske
1720 6c 6c 2d 6c 69 74 65 72 61 74 65 20 65 71 6c 20 62 69 72 64 20 62 65 67 69 6e 6e 69 6e 67 2d 6f ll-literate.eql.bird.beginning-o
1740 66 2d 6c 69 6e 65 20 36 32 20 2d 31 20 30 20 6e 69 6c 20 6d 65 6d 71 6c 20 28 6c 61 74 65 78 20 f-line.62.-1.0.nil.memql.(latex.
1760 74 65 78 29 20 72 65 2d 73 65 61 72 63 68 2d 62 61 63 6b 77 61 72 64 20 22 5e 5c 5c 28 5c 5c 5c tex).re-search-backward."^\\(\\\
1780 5c 62 65 67 69 6e 7b 63 6f 64 65 7d 24 5c 5c 29 5c 5c 7c 5c 5c 28 5c 5c 5c 5c 65 6e 64 7b 63 6f \begin{code}$\\)\\|\\(\\\\end{co
17a0 64 65 7d 24 5c 5c 29 22 20 74 20 31 20 65 72 72 6f 72 20 22 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 de}$\\)".t.1.error."haskell-inde
17c0 6e 74 2d 77 69 74 68 69 6e 2d 6c 69 74 65 72 61 74 65 2d 63 6f 64 65 3a 20 73 68 6f 75 6c 64 20 nt-within-literate-code:.should.
17e0 6e 6f 74 20 68 61 70 70 65 6e 21 22 5d 20 34 20 28 23 24 20 2e 20 35 34 34 38 29 5d 29 0a 23 40 not.happen!"].4.(#$...5448)]).#@
1800 32 30 39 20 50 75 74 20 6c 69 6e 65 73 20 6f 66 20 74 68 65 20 72 65 67 69 6f 6e 20 61 73 20 61 209.Put.lines.of.the.region.as.a
1820 20 70 69 65 63 65 20 6f 66 20 6c 69 74 65 72 61 74 65 20 63 6f 64 65 2e 0a 57 69 74 68 20 70 72 .piece.of.literate.code..With.pr
1840 65 66 69 78 20 61 72 67 2c 20 72 65 6d 6f 76 65 20 69 6e 64 69 63 61 74 69 6f 6e 20 74 68 61 74 efix.arg,.remove.indication.that
1860 20 74 68 65 20 72 65 67 69 6f 6e 20 69 73 20 6c 69 74 65 72 61 74 65 20 63 6f 64 65 2e 0a 49 74 .the.region.is.literate.code..It
1880 20 64 65 61 6c 73 20 77 69 74 68 20 62 6f 74 68 20 42 69 72 64 20 73 74 79 6c 65 20 61 6e 64 20 .deals.with.both.Bird.style.and.
18a0 6e 6f 6e 20 42 69 72 64 2d 73 74 79 6c 65 20 73 63 72 69 70 74 73 2e 0a 0a 28 66 6e 20 42 45 47 non.Bird-style.scripts...(fn.BEG
18c0 20 45 4e 44 20 26 6f 70 74 69 6f 6e 61 6c 20 41 52 47 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 .END.&optional.ARG)..(defalias.'
18e0 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 70 75 74 2d 72 65 67 69 6f 6e 2d 69 6e 2d 6c 69 74 haskell-indent-put-region-in-lit
1900 65 72 61 74 65 20 23 5b 37 37 30 20 22 08 5c 32 30 34 08 00 5c 33 30 36 5c 33 30 37 21 5c 32 31 erate.#[770.".\204..\306\307!\21
1920 30 08 5c 33 31 30 3d 5c 32 30 33 1f 00 5c 33 31 31 5c 33 31 32 5c 33 31 33 5c 33 31 34 5c 33 31 0.\310=\203..\311\312\313\314\31
1940 35 19 1a 1b 1c 1d 5c 33 31 36 03 03 03 23 2d 5c 32 30 37 5c 32 31 31 5c 32 30 33 48 00 5c 32 31 5.....\316...#-\207\211\203H.\21
1960 32 01 62 5c 32 31 30 5c 33 31 37 5c 33 32 30 5c 33 32 31 5c 33 32 32 21 5c 33 32 33 23 5c 32 30 2.b\210\317\320\321\322!\323#\20
1980 33 37 00 60 5c 33 32 31 5c 33 32 34 21 7c 5c 32 31 30 02 62 5c 32 31 30 5c 33 32 35 20 5c 32 31 37.`\321\324!|\210.b\210\325.\21
19a0 30 5c 33 32 36 5c 33 32 37 21 5c 32 30 35 46 00 5c 33 33 30 5c 33 33 31 21 29 5c 32 30 37 5c 32 0\326\327!\205F.\330\331!)\207\2
19c0 31 32 01 62 5c 32 31 30 6e 5c 32 30 34 53 00 5c 33 33 32 20 5c 32 31 30 5c 33 33 33 63 5c 32 31 12.b\210n\204S.\332.\210\333c\21
19e0 30 02 62 5c 32 31 30 6e 5c 32 30 34 60 00 5c 33 33 32 20 5c 32 31 30 5c 33 33 34 63 29 5c 32 30 0.b\210n\204`.\332.\210\334c)\20
1a00 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 6c 69 74 65 72 61 74 65 20 63 6f 6d 6d 65 6e 74 2d 73 74 79 7".[haskell-literate.comment-sty
1a20 6c 65 20 63 6f 6d 6d 65 6e 74 2d 65 6e 64 2d 73 6b 69 70 20 63 6f 6d 6d 65 6e 74 2d 65 6e 64 20 le.comment-end-skip.comment-end.
1a40 63 6f 6d 6d 65 6e 74 2d 73 74 61 72 74 2d 73 6b 69 70 20 63 6f 6d 6d 65 6e 74 2d 73 74 61 72 74 comment-start-skip.comment-start
1a60 20 65 72 72 6f 72 20 22 43 61 6e 6e 6f 74 20 70 75 74 20 61 20 72 65 67 69 6f 6e 20 69 6e 20 6c .error."Cannot.put.a.region.in.l
1a80 69 74 65 72 61 74 65 20 69 6e 20 61 20 6e 6f 6e 20 6c 69 74 65 72 61 74 65 20 73 63 72 69 70 74 iterate.in.a.non.literate.script
1aa0 22 20 62 69 72 64 20 22 3e 20 22 20 22 5e 3e 20 3f 22 20 22 22 20 22 5c 6e 22 20 70 6c 61 69 6e ".bird.">."."^>.?".""."\n".plain
1ac0 20 63 6f 6d 6d 65 6e 74 2d 72 65 67 69 6f 6e 20 72 65 2d 73 65 61 72 63 68 2d 62 61 63 6b 77 61 .comment-region.re-search-backwa
1ae0 72 64 20 22 5e 5c 5c 5c 5c 65 6e 64 7b 63 6f 64 65 7d 5b 20 09 5c 6e 5d 2a 5c 5c 3d 22 20 6c 69 rd."^\\\\end{code}[..\n]*\\=".li
1b00 6e 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 70 6f 73 69 74 69 6f 6e 20 2d 32 20 74 20 32 20 62 65 67 ne-beginning-position.-2.t.2.beg
1b20 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 20 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 5c 5c 5c 5c 62 inning-of-line.looking-at."\\\\b
1b40 65 67 69 6e 7b 63 6f 64 65 7d 22 20 6b 69 6c 6c 2d 6c 69 6e 65 20 31 20 6e 65 77 6c 69 6e 65 20 egin{code}".kill-line.1.newline.
1b60 22 5c 5c 65 6e 64 7b 63 6f 64 65 7d 5c 6e 22 20 22 5c 5c 62 65 67 69 6e 7b 63 6f 64 65 7d 5c 6e "\\end{code}\n"."\\begin{code}\n
1b80 22 5d 20 38 20 28 23 24 20 2e 20 36 31 34 38 29 20 22 72 5c 6e 50 22 5d 29 0a 28 62 79 74 65 2d "].8.(#$...6148)."r\nP"]).(byte-
1ba0 63 6f 64 65 20 22 5c 33 30 30 5c 33 30 31 5c 33 30 32 5c 33 30 33 5c 33 30 34 44 44 5c 33 30 35 code."\300\301\302\303\304DD\305
1bc0 5c 33 30 36 5c 33 30 37 5c 33 31 30 5c 33 31 31 5c 33 31 32 5c 33 31 33 26 09 5c 32 30 37 22 20 \306\307\310\311\312\313&.\207".
1be0 5b 63 75 73 74 6f 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 [custom-declare-variable.haskell
1c00 2d 69 6e 64 65 6e 74 2d 6c 6f 6f 6b 2d 70 61 73 74 2d 65 6d 70 74 79 2d 6c 69 6e 65 20 66 75 6e -indent-look-past-empty-line.fun
1c20 63 61 6c 6c 20 66 75 6e 63 74 69 6f 6e 20 23 5b 30 20 22 5c 33 30 30 5c 32 30 37 22 20 5b 74 5d call.function.#[0."\300\207".[t]
1c40 20 31 5d 20 22 49 66 20 6e 69 6c 2c 20 69 6e 64 65 6e 74 61 74 69 6f 6e 20 65 6e 67 69 6e 65 20 .1]."If.nil,.indentation.engine.
1c60 77 69 6c 6c 20 6e 6f 74 20 6c 6f 6f 6b 20 70 61 73 74 20 61 6e 20 65 6d 70 74 79 20 6c 69 6e 65 will.not.look.past.an.empty.line
1c80 20 66 6f 72 20 6c 61 79 6f 75 74 20 70 6f 69 6e 74 73 2e 22 20 3a 67 72 6f 75 70 20 68 61 73 6b .for.layout.points.".:group.hask
1ca0 65 6c 6c 2d 69 6e 64 65 6e 74 20 3a 73 61 66 65 20 62 6f 6f 6c 65 61 6e 70 20 3a 74 79 70 65 20 ell-indent.:safe.booleanp.:type.
1cc0 62 6f 6f 6c 65 61 6e 5d 20 31 30 29 0a 23 40 32 35 39 20 52 65 74 75 72 6e 20 74 68 65 20 70 6f boolean].10).#@259.Return.the.po
1ce0 73 69 74 69 6f 6e 20 6f 66 20 74 68 65 20 73 74 61 72 74 20 6f 66 20 61 20 64 65 66 69 6e 69 74 sition.of.the.start.of.a.definit
1d00 69 6f 6e 2e 0a 54 68 65 20 73 74 61 72 74 20 6f 66 20 61 20 64 65 66 20 69 73 20 65 78 70 65 63 ion..The.start.of.a.def.is.expec
1d20 74 65 64 20 74 6f 20 62 65 20 72 65 63 6f 67 6e 69 7a 61 62 6c 65 20 62 79 20 73 74 61 72 74 69 ted.to.be.recognizable.by.starti
1d40 6e 67 20 69 6e 20 63 6f 6c 75 6d 6e 20 30 2c 0a 75 6e 6c 65 73 73 20 60 68 61 73 6b 65 6c 6c 2d ng.in.column.0,.unless.`haskell-
1d60 69 6e 64 65 6e 74 2d 6c 6f 6f 6b 2d 70 61 73 74 2d 65 6d 70 74 79 2d 6c 69 6e 65 27 20 69 73 20 indent-look-past-empty-line'.is.
1d80 6e 69 6c 2c 20 69 6e 20 77 68 69 63 68 20 63 61 73 65 20 77 65 0a 74 61 6b 65 20 61 20 63 6f 61 nil,.in.which.case.we.take.a.coa
1da0 72 73 65 72 20 61 70 70 72 6f 78 69 6d 61 74 69 6f 6e 20 61 6e 64 20 73 74 6f 70 20 61 74 20 74 rser.approximation.and.stop.at.t
1dc0 68 65 20 66 69 72 73 74 20 65 6d 70 74 79 20 6c 69 6e 65 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 he.first.empty.line...(defalias.
1de0 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 73 74 61 72 74 2d 6f 66 2d 64 65 66 20 23 5b 30 'haskell-indent-start-of-def.#[0
1e00 20 22 5c 32 31 32 08 5c 32 30 35 07 00 5c 33 30 32 20 08 5c 33 30 33 3d 5c 32 30 33 11 00 5c 33 ."\212.\205..\302..\303=\203..\3
1e20 30 34 5c 32 30 32 12 00 5c 33 30 35 60 02 5c 32 30 33 1c 00 02 54 5c 32 30 32 1d 00 65 5c 32 36 04\202..\305`.\203...T\202..e\26
1e40 32 03 5c 33 30 36 5c 33 30 37 21 5c 32 31 30 09 5c 32 30 33 33 00 5c 33 31 30 20 02 56 5c 32 30 2.\306\307!\210.\2033.\310..V\20
1e60 34 40 00 5c 33 31 31 20 5c 32 30 32 3d 00 5c 33 31 30 20 02 56 5c 32 30 33 4e 00 5c 33 31 31 20 4@.\311.\202=.\310..V\203N.\311.
1e80 3f 5c 32 30 33 4e 00 60 03 56 5c 32 30 33 4e 00 5c 33 30 36 5c 33 30 37 21 5c 33 30 35 55 5c 32 ?\203N.`.V\203N.\306\307!\305U\2
1ea0 30 34 23 00 5c 33 31 31 20 5c 32 30 33 57 00 5c 33 30 36 5c 33 31 32 21 5c 32 31 30 60 5c 32 36 04#.\311.\203W.\306\312!\210`\26
1ec0 32 03 5c 33 31 33 64 21 5c 32 31 30 60 01 56 5c 32 30 33 68 00 02 5c 32 30 32 69 00 60 5c 32 36 2.\313d!\210`.V\203h..\202i.`\26
1ee0 36 5c 32 30 33 29 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 6c 69 74 65 72 61 74 65 20 68 61 6\203)\207".[haskell-literate.ha
1f00 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 6c 6f 6f 6b 2d 70 61 73 74 2d 65 6d 70 74 79 2d 6c 69 6e skell-indent-look-past-empty-lin
1f20 65 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 77 69 74 68 69 6e 2d 6c 69 74 65 72 61 74 65 e.haskell-indent-within-literate
1f40 2d 63 6f 64 65 20 62 69 72 64 20 32 20 30 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 66 6f -code.bird.2.0.haskell-indent-fo
1f60 72 77 61 72 64 2d 6c 69 6e 65 20 2d 31 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 63 75 72 rward-line.-1.haskell-indent-cur
1f80 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 2d rent-indentation.haskell-indent-
1fa0 65 6d 70 74 79 2d 6c 69 6e 65 2d 70 20 31 20 66 6f 72 77 61 72 64 2d 63 6f 6d 6d 65 6e 74 5d 20 empty-line-p.1.forward-comment].
1fc0 35 20 28 23 24 20 2e 20 37 33 37 39 29 5d 29 0a 23 40 31 34 37 20 49 66 20 61 6e 79 20 73 74 72 5.(#$...7379)]).#@147.If.any.str
1fe0 75 63 74 75 72 65 20 28 6c 69 73 74 20 6f 72 20 74 75 70 6c 65 29 20 69 73 20 6e 6f 74 20 63 6c ucture.(list.or.tuple).is.not.cl
2000 6f 73 65 64 2c 20 62 65 74 77 65 65 6e 20 53 54 41 52 54 20 61 6e 64 20 45 4e 44 2c 0a 72 65 74 osed,.between.START.and.END,.ret
2020 75 72 6e 73 20 74 68 65 20 6c 6f 63 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 6f 70 65 6e 69 6e 67 urns.the.location.of.the.opening
2040 20 73 79 6d 62 6f 6c 2c 20 6e 69 6c 20 6f 74 68 65 72 77 69 73 65 2e 0a 0a 28 66 6e 20 53 54 41 .symbol,.nil.otherwise...(fn.STA
2060 52 54 20 45 4e 44 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 RT.END)..(defalias.'haskell-inde
2080 6e 74 2d 6f 70 65 6e 2d 73 74 72 75 63 74 75 72 65 20 23 5b 35 31 34 20 22 5c 32 31 32 5c 33 30 nt-open-structure.#[514."\212\30
20a0 30 02 02 5c 22 41 40 29 5c 32 30 37 22 20 5b 70 61 72 73 65 2d 70 61 72 74 69 61 6c 2d 73 65 78 0..\"A@)\207".[parse-partial-sex
20c0 70 5d 20 35 20 28 23 24 20 2e 20 38 31 35 30 29 5d 29 0a 23 40 31 32 37 20 49 66 20 61 20 73 74 p].5.(#$...8150)]).#@127.If.a.st
20e0 72 69 6e 67 20 69 73 20 6e 6f 74 20 63 6c 6f 73 65 64 20 2c 20 62 65 74 77 65 65 6e 20 53 54 41 ring.is.not.closed.,.between.STA
2100 52 54 20 61 6e 64 20 45 4e 44 2c 20 72 65 74 75 72 6e 73 20 74 68 65 0a 6c 6f 63 61 74 69 6f 6e RT.and.END,.returns.the.location
2120 20 6f 66 20 74 68 65 20 6f 70 65 6e 69 6e 67 20 73 79 6d 62 6f 6c 2c 20 6e 69 6c 20 6f 74 68 65 .of.the.opening.symbol,.nil.othe
2140 72 77 69 73 65 2e 0a 0a 28 66 6e 20 53 54 41 52 54 20 45 4e 44 29 1f 0a 28 64 65 66 61 6c 69 61 rwise...(fn.START.END)..(defalia
2160 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 69 6e 2d 73 74 72 69 6e 67 20 23 5b 35 31 s.'haskell-indent-in-string.#[51
2180 34 20 22 5c 32 31 32 5c 33 30 30 02 02 5c 22 5c 33 30 31 01 38 5c 32 30 35 0e 00 5c 33 30 32 01 4."\212\300..\"\301.8\205..\302.
21a0 38 5c 32 36 32 01 29 5c 32 30 37 22 20 5b 70 61 72 73 65 2d 70 61 72 74 69 61 6c 2d 73 65 78 70 8\262.)\207".[parse-partial-sexp
21c0 20 33 20 38 5d 20 35 20 28 23 24 20 2e 20 38 34 30 39 29 5d 29 0a 23 40 31 34 34 20 43 68 65 63 .3.8].5.(#$...8409)]).#@144.Chec
21e0 6b 2c 20 73 74 61 72 74 69 6e 67 20 66 72 6f 6d 20 53 54 41 52 54 2c 20 69 66 20 45 4e 44 20 69 k,.starting.from.START,.if.END.i
2200 73 20 61 74 20 6f 72 20 77 69 74 68 69 6e 20 61 20 63 6f 6d 6d 65 6e 74 2e 0a 52 65 74 75 72 6e s.at.or.within.a.comment..Return
2220 73 20 74 68 65 20 6c 6f 63 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 73 74 61 72 74 20 6f 66 20 74 s.the.location.of.the.start.of.t
2240 68 65 20 63 6f 6d 6d 65 6e 74 2c 20 6e 69 6c 20 6f 74 68 65 72 77 69 73 65 2e 0a 0a 28 66 6e 20 he.comment,.nil.otherwise...(fn.
2260 53 54 41 52 54 20 45 4e 44 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 START.END)..(defalias.'haskell-i
2280 6e 64 65 6e 74 2d 69 6e 2d 63 6f 6d 6d 65 6e 74 20 23 5b 35 31 34 20 22 5c 33 30 30 02 02 58 5c ndent-in-comment.#[514."\300..X\
22a0 32 30 34 0b 00 5c 33 30 31 5c 33 30 32 21 5c 32 31 30 02 02 55 5c 32 30 33 15 00 5c 33 30 30 5c 204..\301\302!\210..U\203..\300\
22c0 32 30 32 4b 00 5c 33 30 33 5c 32 31 32 5c 33 30 34 04 04 5c 22 5c 32 31 31 5c 32 36 32 03 29 38 202K.\303\212\304..\"\211\262.)8
22e0 5c 32 30 33 29 00 5c 33 30 35 01 38 5c 32 30 32 4b 00 5c 33 30 35 01 38 3f 5c 32 30 35 4b 00 64 \203).\305.8\202K.\305.8?\205K.d
2300 02 5c 33 30 36 5c 5c 59 5c 32 30 35 4b 00 5c 33 30 33 5c 32 31 32 5c 33 30 34 03 5c 32 31 31 5c .\306\\Y\205K.\303\212\304.\211\
2320 33 30 36 5c 5c 5c 22 5c 32 31 31 5c 32 36 32 03 29 38 5c 32 30 35 4b 00 5c 33 30 35 01 38 5c 32 306\\\"\211\262.)8\205K.\305.8\2
2340 30 37 22 20 5b 6e 69 6c 20 63 6c 2d 2d 61 73 73 65 72 74 69 6f 6e 2d 66 61 69 6c 65 64 20 28 3c 07".[nil.cl--assertion-failed.(<
2360 3d 20 73 74 61 72 74 20 65 6e 64 29 20 34 20 70 61 72 73 65 2d 70 61 72 74 69 61 6c 2d 73 65 78 =.start.end).4.parse-partial-sex
2380 70 20 38 20 32 5d 20 38 20 28 23 24 20 2e 20 38 36 36 38 29 5d 29 0a 28 64 65 66 76 61 72 20 68 p.8.2].8.(#$...8668)]).(defvar.h
23a0 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 6f 66 66 2d 73 69 64 65 2d 6b 65 79 77 6f 72 64 73 2d askell-indent-off-side-keywords-
23c0 72 65 20 22 5c 5c 3c 5c 5c 28 64 6f 5c 5c 7c 6c 65 74 5c 5c 7c 6f 66 5c 5c 7c 77 68 65 72 65 5c re."\\<\\(do\\|let\\|of\\|where\
23e0 5c 7c 6d 64 6f 5c 5c 7c 72 65 63 5c 5c 29 5c 5c 3e 5b 20 09 5d 2a 22 29 0a 23 40 37 30 20 52 65 \|mdo\\|rec\\)\\>[..]*").#@70.Re
2400 74 75 72 6e 20 74 68 65 20 74 79 70 65 20 6f 66 20 74 68 65 20 6c 69 6e 65 20 28 61 6c 73 6f 20 turn.the.type.of.the.line.(also.
2420 70 75 74 73 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 69 6e 20 60 6d 61 74 63 68 2d 64 61 74 61 27 puts.information.in.`match-data'
2440 29 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 2d 74 79 )...(defalias.'haskell-indent-ty
2460 70 65 2d 61 74 2d 70 6f 69 6e 74 20 23 5b 30 20 22 5c 33 30 30 20 5c 32 30 33 07 00 5c 33 30 31 pe-at-point.#[0."\300.\203..\301
2480 5c 32 30 37 5c 33 30 32 65 60 5c 22 5c 32 30 33 10 00 5c 33 30 33 5c 32 30 37 5c 33 30 34 5c 33 \207\302e`\"\203..\303\207\304\3
24a0 30 35 21 5c 32 30 33 18 00 5c 33 30 36 5c 32 30 37 5c 33 30 34 5c 33 30 37 21 5c 32 30 33 20 00 05!\203..\306\207\304\307!\203..
24c0 5c 33 31 30 5c 32 30 37 5c 33 30 34 5c 33 31 31 21 5c 32 30 33 28 00 5c 33 31 32 5c 32 30 37 5c \310\207\304\311!\203(.\312\207\
24e0 33 31 33 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 65 6d 70 74 79 2d 6c 313\207".[haskell-indent-empty-l
2500 69 6e 65 2d 70 20 65 6d 70 74 79 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 69 6e 2d 63 6f ine-p.empty.haskell-indent-in-co
2520 6d 6d 65 6e 74 20 63 6f 6d 6d 65 6e 74 20 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 5c 5c 28 5c 5c 28 mment.comment.looking-at."\\(\\(
2540 5b 5b 3a 61 6c 70 68 61 3a 5d 5d 5c 5c 28 5c 5c 73 77 5c 5c 7c 27 5c 5c 29 2a 5c 5c 29 5c 5c 7c [[:alpha:]]\\(\\sw\\|'\\)*\\)\\|
2560 5f 5c 5c 29 5b 20 09 5c 6e 5d 2a 22 20 69 64 65 6e 74 20 22 5c 5c 28 7c 5b 5e 7c 5d 5c 5c 29 5b _\\)[..\n]*".ident."\\(|[^|]\\)[
2580 20 09 5c 6e 5d 2a 22 20 67 75 61 72 64 20 22 5c 5c 28 3d 5b 5e 3e 3d 5d 5c 5c 7c 3a 3a 5c 5c 7c ..\n]*".guard."\\(=[^>=]\\|::\\|
25a0 e2 88 b7 5c 5c 7c e2 86 92 5c 5c 7c e2 86 90 5c 5c 7c 2d 3e 5c 5c 7c 3c 2d 5c 5c 29 5b 20 09 5c ...\\|...\\|...\\|->\\|<-\\)[..\
25c0 6e 5d 2a 22 20 72 68 73 20 6f 74 68 65 72 5d 20 33 20 28 23 24 20 2e 20 39 32 31 34 29 5d 29 0a n]*".rhs.other].3.(#$...9214)]).
25e0 23 40 37 36 20 47 6c 6f 62 61 6c 20 76 61 72 69 61 62 6c 65 20 74 68 61 74 20 6b 65 65 70 73 20 #@76.Global.variable.that.keeps.
2600 74 72 61 63 6b 20 6f 66 20 74 68 65 20 66 69 72 73 74 20 69 64 65 6e 74 20 6f 66 20 74 68 65 20 track.of.the.first.ident.of.the.
2620 6c 69 6e 65 20 74 6f 20 69 6e 64 65 6e 74 2e 1f 0a 28 64 65 66 76 61 72 20 68 61 73 6b 65 6c 6c line.to.indent...(defvar.haskell
2640 2d 69 6e 64 65 6e 74 2d 63 75 72 72 65 6e 74 2d 6c 69 6e 65 2d 66 69 72 73 74 2d 69 64 65 6e 74 -indent-current-line-first-ident
2660 20 22 22 20 28 23 24 20 2e 20 39 37 30 31 29 29 0a 23 40 37 36 20 47 65 6e 65 72 61 74 65 20 63 ."".(#$...9701)).#@76.Generate.c
2680 6f 6e 74 6f 75 72 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 62 65 74 77 65 65 6e 20 53 54 41 52 54 ontour.information.between.START
26a0 20 61 6e 64 20 45 4e 44 20 70 6f 69 6e 74 73 2e 0a 0a 28 66 6e 20 53 54 41 52 54 20 45 4e 44 29 .and.END.points...(fn.START.END)
26c0 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 2d 63 6f 6e 74 ..(defalias.'haskell-indent-cont
26e0 6f 75 72 2d 6c 69 6e 65 20 23 5b 35 31 34 20 22 01 01 57 5c 32 30 35 53 00 5c 32 31 32 5c 32 31 our-line.#[514."..W\205S.\212\21
2700 31 62 5c 32 31 30 5c 33 30 30 02 21 5c 32 31 30 69 5c 33 30 31 5c 33 30 32 02 5c 33 30 31 56 5c 1b\210\300.!\210i\301\302.\301V\
2720 32 30 33 50 00 01 5c 33 30 31 55 5c 32 30 33 50 00 60 05 59 5c 32 30 33 50 00 5c 33 30 33 20 5c 203P..\301U\203P.`.Y\203P.\303.\
2740 32 31 30 60 05 57 5c 32 30 33 2f 00 04 62 5c 32 31 30 5c 33 30 34 20 5c 33 30 35 5c 32 33 35 5c 210`.W\203/..b\210\304.\305\235\
2760 32 30 34 48 00 69 03 57 5c 32 30 33 48 00 60 01 42 5c 32 31 31 5c 32 36 32 02 5c 32 30 33 48 00 204H.i.W\203H.`.B\211\262.\203H.
2780 69 5c 32 36 32 03 5c 33 30 36 5c 33 30 37 21 5c 32 36 32 02 5c 32 30 32 11 00 5c 32 36 36 5c 32 i\262.\306\307!\262.\202..\266\2
27a0 30 32 29 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 73 6b 69 70 2d 62 6c 02)\207".[haskell-indent-skip-bl
27c0 61 6e 6b 73 2d 61 6e 64 2d 6e 65 77 6c 69 6e 65 73 2d 62 61 63 6b 77 61 72 64 20 30 20 6e 69 6c anks-and-newlines-backward.0.nil
27e0 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 62 61 63 6b 2d 74 6f 2d 69 6e 64 65 6e 74 61 74 .haskell-indent-back-to-indentat
2800 69 6f 6e 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 74 79 70 65 2d 61 74 2d 70 6f 69 6e 74 ion.haskell-indent-type-at-point
2820 20 28 65 6d 70 74 79 20 63 6f 6d 6d 65 6e 74 29 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d .(empty.comment).haskell-indent-
2840 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 2d 31 5d 20 37 20 28 23 24 20 2e 20 39 38 34 36 29 5d 29 forward-line.-1].7.(#$...9846)])
2860 0a 23 40 34 32 20 4d 6f 76 65 20 70 6f 69 6e 74 20 74 6f 20 74 68 65 20 6e 65 78 74 20 73 79 6d .#@42.Move.point.to.the.next.sym
2880 62 6f 6c 2e 0a 0a 28 66 6e 20 45 4e 44 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 bol...(fn.END)..(defalias.'haske
28a0 6c 6c 2d 69 6e 64 65 6e 74 2d 6e 65 78 74 2d 73 79 6d 62 6f 6c 20 23 5b 32 35 37 20 22 5c 33 30 ll-indent-next-symbol.#[257."\30
28c0 30 5c 33 30 31 02 5c 22 5c 32 31 30 60 01 57 5c 32 30 35 12 00 5c 33 30 32 5c 33 30 33 21 5c 32 0\301.\"\210`.W\205..\302\303!\2
28e0 31 30 5c 33 30 34 01 21 5c 32 30 37 22 20 5b 73 6b 69 70 2d 73 79 6e 74 61 78 2d 66 6f 72 77 61 10\304.!\207".[skip-syntax-forwa
2900 72 64 20 22 29 22 20 66 6f 72 77 61 72 64 2d 73 65 78 70 20 31 20 68 61 73 6b 65 6c 6c 2d 69 6e rd.")".forward-sexp.1.haskell-in
2920 64 65 6e 74 2d 73 6b 69 70 2d 62 6c 61 6e 6b 73 2d 61 6e 64 2d 6e 65 77 6c 69 6e 65 73 2d 66 6f dent-skip-blanks-and-newlines-fo
2940 72 77 61 72 64 5d 20 34 20 28 23 24 20 2e 20 31 30 33 34 32 29 5d 29 0a 23 40 31 30 34 20 50 75 rward].4.(#$...10342)]).#@104.Pu
2960 74 73 20 70 6f 69 6e 74 20 74 6f 20 74 68 65 20 6e 65 78 74 20 66 6f 6c 6c 6f 77 69 6e 67 20 73 ts.point.to.the.next.following.s
2980 79 6d 62 6f 6c 2c 20 6f 72 20 74 6f 20 65 6e 64 20 69 66 20 74 68 65 72 65 20 61 72 65 20 6e 6f ymbol,.or.to.end.if.there.are.no
29a0 20 6d 6f 72 65 20 73 79 6d 62 6f 6c 73 20 69 6e 20 74 68 65 20 73 65 78 70 2e 0a 0a 28 66 6e 20 .more.symbols.in.the.sexp...(fn.
29c0 45 4e 44 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 2d END)..(defalias.'haskell-indent-
29e0 6e 65 78 74 2d 73 79 6d 62 6f 6c 2d 73 61 66 65 20 23 5b 32 35 37 20 22 5c 33 30 30 31 09 00 5c next-symbol-safe.#[257."\3001..\
2a00 33 30 31 01 21 30 5c 32 30 37 01 62 5c 32 30 37 22 20 5b 28 65 72 72 6f 72 29 20 68 61 73 6b 65 301.!0\207.b\207".[(error).haske
2a20 6c 6c 2d 69 6e 64 65 6e 74 2d 6e 65 78 74 2d 73 79 6d 62 6f 6c 5d 20 33 20 28 23 24 20 2e 20 31 ll-indent-next-symbol].3.(#$...1
2a40 30 35 39 30 29 5d 29 0a 23 40 37 37 20 52 65 74 75 72 6e 20 61 20 6c 69 73 74 20 6f 66 20 70 6f 0590)]).#@77.Return.a.list.of.po
2a60 73 69 74 69 6f 6e 73 20 66 6f 72 20 69 6d 70 6f 72 74 61 6e 74 20 70 61 72 74 73 20 6f 66 20 61 sitions.for.important.parts.of.a
2a80 20 76 61 6c 64 65 66 2e 0a 0a 28 66 6e 20 53 54 41 52 54 20 45 4e 44 29 1f 0a 28 64 65 66 61 6c .valdef...(fn.START.END)..(defal
2aa0 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 73 65 70 61 72 61 74 65 2d 76 61 6c ias.'haskell-indent-separate-val
2ac0 64 65 66 20 23 5b 35 31 34 20 22 5c 32 31 32 5c 33 30 30 5c 32 31 31 5c 32 31 31 5c 32 31 31 5c def.#[514."\212\300\211\211\211\
2ae0 32 31 31 5c 32 31 31 5c 32 31 31 5c 32 31 31 06 09 62 5c 32 31 30 5c 33 30 31 20 5c 32 36 32 01 211\211\211\211..b\210\301.\262.
2b00 5c 32 31 31 5c 33 30 32 3e 5c 32 30 33 5e 00 5c 32 31 31 5c 33 30 33 3d 5c 32 30 33 2d 00 5c 33 \211\302>\203^.\211\303=\203-.\3
2b20 30 34 5c 32 32 34 5c 32 36 32 08 5c 33 30 35 5c 33 30 34 21 5c 32 36 32 07 5c 33 30 34 5c 32 32 04\224\262.\305\304!\262.\304\22
2b40 35 62 5c 32 31 30 5c 32 30 32 3a 00 5c 33 30 36 06 09 77 5c 32 31 30 60 5c 32 36 32 08 5c 33 30 5b\210\202:.\306..w\210`\262.\30
2b60 37 06 09 21 5c 32 31 30 60 06 09 57 5c 32 30 33 5e 00 5c 33 30 31 20 5c 32 31 31 5c 32 36 32 02 7..!\210`..W\203^.\301.\211\262.
2b80 5c 32 30 33 5e 00 5c 32 31 31 5c 33 31 30 3e 5c 32 30 33 5e 00 05 5c 32 30 34 56 00 60 5c 32 36 \203^.\211\310>\203^..\204V.`\26
2ba0 32 06 5c 33 30 37 06 09 21 5c 32 31 30 5c 32 30 32 3a 00 60 06 09 57 5c 32 30 33 5c 32 32 37 00 2.\307..!\210\202:.`..W\203\227.
2bc0 5c 32 31 31 5c 33 31 31 3d 5c 32 30 33 5c 32 32 37 00 5c 33 30 34 5c 32 32 34 5c 32 36 32 05 5c \211\311=\203\227.\304\224\262.\
2be0 33 30 34 5c 32 32 35 62 5c 32 31 30 60 06 09 57 5c 32 30 33 5c 32 32 37 00 5c 33 30 31 20 5c 32 304\225b\210`..W\203\227.\301.\2
2c00 31 31 5c 32 36 32 02 5c 32 30 33 5c 32 32 37 00 5c 32 31 31 5c 33 31 32 3d 5c 32 30 34 5c 32 32 11\262.\203\227.\211\312=\204\22
2c20 37 00 03 5c 32 30 34 5c 32 31 37 00 60 5c 32 36 32 04 5c 33 30 37 06 09 21 5c 32 31 30 5c 32 30 7..\204\217.`\262.\307..!\210\20
2c40 32 73 00 60 06 09 57 5c 32 30 33 5c 32 36 36 00 5c 32 31 31 5c 33 31 32 3d 5c 32 30 33 5c 32 36 2s.`..W\203\266.\211\312=\203\26
2c60 36 00 5c 33 30 34 5c 32 32 34 5c 32 36 32 03 5c 33 30 34 5c 32 32 35 62 5c 32 31 30 60 06 09 57 6.\304\224\262.\304\225b\210`..W
2c80 5c 32 30 33 5c 32 36 36 00 60 5c 32 36 32 02 06 07 06 07 06 07 06 07 06 07 06 07 06 07 5c 32 35 \203\266.`\262...............\25
2ca0 37 07 5c 32 36 36 5c 32 31 30 29 5c 32 30 37 22 20 5b 6e 69 6c 20 68 61 73 6b 65 6c 6c 2d 69 6e 7.\266\210)\207".[nil.haskell-in
2cc0 64 65 6e 74 2d 74 79 70 65 2d 61 74 2d 70 6f 69 6e 74 20 28 69 64 65 6e 74 20 6f 74 68 65 72 29 dent-type-at-point.(ident.other)
2ce0 20 69 64 65 6e 74 20 30 20 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 22 20 09 22 20 68 61 73 6b 65 .ident.0.match-string."..".haske
2d00 6c 6c 2d 69 6e 64 65 6e 74 2d 6e 65 78 74 2d 73 79 6d 62 6f 6c 2d 73 61 66 65 20 28 69 64 65 6e ll-indent-next-symbol-safe.(iden
2d20 74 20 6f 74 68 65 72 29 20 67 75 61 72 64 20 72 68 73 5d 20 31 37 20 28 23 24 20 2e 20 31 30 38 t.other).guard.rhs].17.(#$...108
2d40 32 39 29 5d 29 0a 23 40 35 34 20 43 68 65 63 6b 20 69 66 20 74 68 65 72 65 20 69 73 20 6e 6f 20 29)]).#@54.Check.if.there.is.no.
2d60 6f 74 68 65 72 77 69 73 65 20 61 74 20 47 55 41 52 44 2e 0a 0a 28 66 6e 20 47 55 41 52 44 29 1f otherwise.at.GUARD...(fn.GUARD).
2d80 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 2d 6e 6f 2d 6f 74 .(defalias.'haskell-indent-no-ot
2da0 68 65 72 77 69 73 65 20 23 5b 32 35 37 20 22 5c 32 31 32 5c 32 31 31 62 5c 32 31 30 5c 33 30 30 herwise.#[257."\212\211b\210\300
2dc0 5c 33 30 31 21 29 3f 5c 32 30 37 22 20 5b 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 7c 5b 20 09 5d 2a \301!)?\207".[looking-at."|[..]*
2de0 6f 74 68 65 72 77 69 73 65 5c 5c 3e 22 5d 20 33 20 28 23 24 20 2e 20 31 31 35 39 35 29 5d 29 0a otherwise\\>"].3.(#$...11595)]).
2e00 28 70 75 74 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 6e 6f 2d 6f 74 68 65 72 77 69 73 (put.'haskell-indent-no-otherwis
2e20 65 20 27 62 79 74 65 2d 6f 70 74 69 6d 69 7a 65 72 20 27 62 79 74 65 2d 63 6f 6d 70 69 6c 65 2d e.'byte-optimizer.'byte-compile-
2e40 69 6e 6c 69 6e 65 2d 65 78 70 61 6e 64 29 0a 23 40 31 30 34 20 46 69 6e 64 20 69 6e 64 65 6e 74 inline-expand).#@104.Find.indent
2e60 61 74 69 6f 6e 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 66 6f 72 20 61 20 6c 69 6e 65 20 73 74 61 ation.information.for.a.line.sta
2e80 72 74 69 6e 67 20 77 69 74 68 20 61 20 67 75 61 72 64 2e 0a 0a 28 66 6e 20 53 54 41 52 54 20 45 rting.with.a.guard...(fn.START.E
2ea0 4e 44 20 45 4e 44 2d 56 49 53 49 42 4c 45 20 49 4e 44 45 4e 54 2d 49 4e 46 4f 29 1f 0a 28 64 65 ND.END-VISIBLE.INDENT-INFO)..(de
2ec0 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 67 75 61 72 64 20 23 5b 31 falias.'haskell-indent-guard.#[1
2ee0 30 32 38 20 22 5c 32 31 32 5c 32 31 31 18 5c 33 30 31 04 04 5c 22 5c 32 31 31 40 5c 33 30 32 02 028."\212\211.\301..\"\211@\302.
2f00 38 5c 33 30 33 03 38 01 5c 32 30 33 30 00 01 06 06 57 5c 32 30 33 30 00 01 5c 32 31 32 5c 32 31 8\303.8.\2030....W\2030..\212\21
2f20 31 62 5c 32 31 30 5c 33 30 34 5c 33 30 35 21 29 3f 5c 32 36 32 01 5c 32 30 33 30 00 5c 33 30 36 1b\210\304\305!)?\262.\2030.\306
2f40 02 21 5c 32 31 30 5c 32 30 32 43 00 5c 32 31 31 5c 32 30 33 3b 00 5c 33 30 36 01 21 5c 32 31 30 .!\210\202C.\211\203;.\306.!\210
2f60 5c 32 30 32 43 00 02 5c 32 30 33 43 00 5c 33 30 37 03 21 5c 32 31 30 08 29 5c 32 36 36 5c 32 30 \202C..\203C.\307.!\210.)\266\20
2f80 34 29 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 69 6e 66 6f 20 68 61 73 4)\207".[haskell-indent-info.has
2fa0 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 73 65 70 61 72 61 74 65 2d 76 61 6c 64 65 66 20 33 20 35 20 kell-indent-separate-valdef.3.5.
2fc0 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 7c 5b 20 09 5d 2a 6f 74 68 65 72 77 69 73 65 5c 5c 3e 22 20 looking-at."|[..]*otherwise\\>".
2fe0 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 70 75 73 68 2d 70 6f 73 20 68 61 73 6b 65 6c 6c 2d haskell-indent-push-pos.haskell-
3000 69 6e 64 65 6e 74 2d 70 75 73 68 2d 70 6f 73 2d 6f 66 66 73 65 74 5d 20 31 31 20 28 23 24 20 2e indent-push-pos-offset].11.(#$..
3020 20 31 31 38 36 31 29 5d 29 0a 23 40 31 30 32 20 46 69 6e 64 20 69 6e 64 65 6e 74 61 74 69 6f 6e .11861)]).#@102.Find.indentation
3040 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 66 6f 72 20 61 20 6c 69 6e 65 20 73 74 61 72 74 69 6e 67 .information.for.a.line.starting
3060 20 77 69 74 68 20 61 20 72 68 73 2e 0a 0a 28 66 6e 20 53 54 41 52 54 20 45 4e 44 20 45 4e 44 2d .with.a.rhs...(fn.START.END.END-
3080 56 49 53 49 42 4c 45 20 49 4e 44 45 4e 54 2d 49 4e 46 4f 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 VISIBLE.INDENT-INFO)..(defalias.
30a0 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 72 68 73 20 23 5b 31 30 32 38 20 22 5c 32 31 32 'haskell-indent-rhs.#[1028."\212
30c0 5c 32 31 31 18 5c 33 30 31 04 04 5c 22 5c 32 31 31 40 5c 33 30 32 02 38 5c 33 30 33 03 38 5c 32 \211.\301..\"\211@\302.8\303.8\2
30e0 31 31 5c 32 30 33 21 00 5c 32 31 31 06 06 57 5c 32 30 33 21 00 5c 33 30 34 01 21 5c 32 31 30 5c 11\203!.\211..W\203!.\304.!\210\
3100 32 30 32 3b 00 01 5c 32 30 33 33 00 01 06 06 57 5c 32 30 33 33 00 5c 33 30 35 02 21 5c 32 31 30 202;..\2033....W\2033.\305.!\210
3120 5c 32 30 32 3b 00 02 5c 32 30 33 3b 00 5c 33 30 35 03 21 5c 32 31 30 08 29 5c 32 36 36 5c 32 30 \202;..\203;.\305.!\210.)\266\20
3140 34 29 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 69 6e 66 6f 20 68 61 73 4)\207".[haskell-indent-info.has
3160 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 73 65 70 61 72 61 74 65 2d 76 61 6c 64 65 66 20 33 20 35 20 kell-indent-separate-valdef.3.5.
3180 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 70 75 73 68 2d 70 6f 73 20 68 61 73 6b 65 6c 6c 2d haskell-indent-push-pos.haskell-
31a0 69 6e 64 65 6e 74 2d 70 75 73 68 2d 70 6f 73 2d 6f 66 66 73 65 74 5d 20 31 30 20 28 23 24 20 2e indent-push-pos-offset].10.(#$..
31c0 20 31 32 33 33 36 29 5d 29 0a 28 64 65 66 63 6f 6e 73 74 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 .12336)]).(defconst.haskell-inde
31e0 6e 74 2d 64 65 63 69 73 69 6f 6e 2d 74 61 62 6c 65 20 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 nt-decision-table.(byte-code."\3
3200 30 30 5c 33 30 31 5c 33 30 32 02 5c 33 30 33 04 5c 33 30 34 06 06 5c 33 30 35 06 08 5c 33 30 36 00\301\302.\303.\304..\305..\306
3220 06 5c 6e 5c 33 30 37 06 5c 66 5c 33 31 30 06 0e 5c 33 31 31 06 10 5c 33 31 32 06 12 5c 33 31 33 .\n\307.\f\310..\311..\312..\313
3240 06 14 5c 33 31 34 06 16 5c 33 31 35 06 18 5c 33 31 36 06 1a 5c 33 31 37 06 1c 5c 33 32 30 5c 33 ..\314..\315..\316..\317..\320\3
3260 32 31 5c 32 36 30 1f 5c 32 30 37 22 20 5b 22 5c 5c 29 5c 5c 7c 5c 5c 28 22 20 22 5c 5c 28 22 20 21\260.\207".["\\)\\|\\("."\\(".
3280 22 31 2e 31 2e 31 31 22 20 22 31 2e 31 2e 31 30 22 20 22 31 2e 31 31 30 30 22 20 22 31 2e 31 30 "1.1.11"."1.1.10"."1.1100"."1.10
32a0 30 30 22 20 22 31 2e 30 30 31 31 22 20 22 31 2e 30 30 31 30 22 20 22 31 31 30 30 30 30 22 20 22 00"."1.0011"."1.0010"."110000"."
32c0 31 30 30 30 30 30 22 20 22 30 30 31 2e 31 31 22 20 22 30 30 31 2e 31 30 22 20 22 30 30 31 31 30 100000"."001.11"."001.10"."00110
32e0 30 22 20 22 30 30 31 30 30 30 22 20 22 30 30 30 30 31 31 22 20 22 30 30 30 30 31 30 22 20 22 30 0"."001000"."000011"."000010"."0
3300 30 30 30 30 30 22 20 22 5c 5c 29 22 5d 20 33 32 29 29 0a 23 40 36 38 20 46 69 6e 64 20 74 68 65 00000"."\\)"].32)).#@68.Find.the
3320 20 69 6e 64 65 78 20 74 68 61 74 20 6d 61 74 63 68 65 73 20 54 45 53 54 20 69 6e 20 74 68 65 20 .index.that.matches.TEST.in.the.
3340 64 65 63 69 73 69 6f 6e 20 74 61 62 6c 65 2e 0a 0a 28 66 6e 20 54 45 53 54 29 1f 0a 28 64 65 66 decision.table...(fn.TEST)..(def
3360 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 66 69 6e 64 2d 63 61 73 65 20 alias.'haskell-indent-find-case.
3380 23 5b 32 35 37 20 22 5c 33 30 31 08 02 5c 22 5c 32 30 33 0f 00 5c 33 30 32 5c 33 30 33 21 47 5c #[257."\301..\"\203..\302\303!G\
33a0 33 30 34 5c 32 34 35 53 5c 32 30 37 5c 33 30 35 5c 33 30 36 02 5c 22 5c 32 30 37 22 20 5b 68 61 304\245S\207\305\306.\"\207".[ha
33c0 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 64 65 63 69 73 69 6f 6e 2d 74 61 62 6c 65 20 73 74 72 69 skell-indent-decision-table.stri
33e0 6e 67 2d 6d 61 74 63 68 20 6d 61 74 63 68 2d 64 61 74 61 20 69 6e 74 65 67 65 72 73 20 32 20 65 ng-match.match-data.integers.2.e
3400 72 72 6f 72 20 22 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 66 69 6e 64 2d 63 61 73 65 3a 20 rror."haskell-indent-find-case:.
3420 69 6d 70 6f 73 73 69 62 6c 65 20 63 61 73 65 3a 20 25 73 22 5d 20 34 20 28 23 24 20 2e 20 31 33 impossible.case:.%s"].4.(#$...13
3440 30 38 30 29 5d 29 0a 23 40 38 34 20 46 69 6e 64 20 69 6e 64 65 6e 74 61 74 69 6f 6e 20 70 6f 69 080)]).#@84.Find.indentation.poi
3460 6e 74 73 20 66 6f 72 20 61 6e 20 65 6d 70 74 79 20 6c 69 6e 65 2e 0a 0a 28 66 6e 20 53 54 41 52 nts.for.an.empty.line...(fn.STAR
3480 54 20 45 4e 44 20 45 4e 44 2d 56 49 53 49 42 4c 45 20 49 4e 44 45 4e 54 2d 49 4e 46 4f 29 1f 0a T.END.END-VISIBLE.INDENT-INFO)..
34a0 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 2d 65 6d 70 74 79 20 (defalias.'haskell-indent-empty.
34c0 23 5b 31 30 32 38 20 22 5c 32 31 32 5c 32 31 31 18 5c 33 30 32 04 04 5c 22 5c 32 31 31 01 41 5c #[1028."\212\211.\302..\"\211.A\
34e0 32 36 32 02 5c 32 34 32 01 5c 32 31 31 41 5c 32 36 32 03 5c 32 34 32 02 5c 32 31 31 41 5c 32 36 262.\242.\211A\262.\242.\211A\26
3500 32 04 5c 32 34 32 03 5c 32 31 31 41 5c 32 36 32 05 5c 32 34 32 04 5c 32 31 31 41 5c 32 36 32 06 2.\242.\211A\262.\242.\211A\262.
3520 5c 32 34 32 05 5c 32 31 31 41 5c 32 36 32 07 5c 32 34 32 06 06 5c 32 31 31 41 5c 32 36 32 08 5c \242.\211A\262.\242..\211A\262.\
3540 32 34 32 06 5c 6e 06 5c 6e 55 5c 33 30 33 06 08 5c 32 30 33 41 00 5c 33 30 34 5c 32 30 32 42 00 242.\n.\nU\303..\203A.\304\202B.
3560 5c 33 30 35 06 07 5c 32 30 33 53 00 06 07 06 0d 57 5c 32 30 33 53 00 5c 33 30 34 5c 32 30 32 54 \305..\203S.....W\203S.\304\202T
3580 00 5c 33 30 35 06 07 5c 32 30 33 65 00 06 07 06 0e 57 5c 32 30 33 65 00 5c 33 30 34 5c 32 30 32 .\305..\203e.....W\203e.\304\202
35a0 66 00 5c 33 30 35 06 07 5c 32 30 33 77 00 06 07 06 0f 57 5c 32 30 33 77 00 5c 33 30 34 5c 32 30 f.\305..\203w.....W\203w.\304\20
35c0 32 78 00 5c 33 30 35 06 07 5c 32 30 33 5c 32 31 31 00 06 07 06 10 57 5c 32 30 33 5c 32 31 31 00 2x.\305..\203\211.....W\203\211.
35e0 5c 33 30 34 5c 32 30 32 5c 32 31 32 00 5c 33 30 35 06 07 5c 32 30 33 5c 32 33 33 00 06 07 06 11 \304\202\212.\305..\203\233.....
3600 57 5c 32 30 33 5c 32 33 33 00 5c 33 30 34 5c 32 30 32 5c 32 33 34 00 5c 33 30 35 26 06 06 07 5c W\203\233.\304\202\234.\305&...\
3620 32 30 33 5c 33 32 33 00 5c 33 30 36 09 06 09 5c 22 5c 32 30 33 5c 33 32 33 00 5c 33 30 37 06 09 203\323.\306...\"\203\323.\307..
3640 21 5c 32 31 30 5c 33 30 36 5c 33 31 30 06 09 5c 22 5c 32 30 33 5c 33 31 33 00 03 5c 32 30 33 5c !\210\306\310..\"\203\313..\203\
3660 33 30 33 00 5c 33 30 37 04 21 5c 32 31 30 5c 32 30 32 5c 32 36 34 02 5c 33 31 31 06 09 21 5c 32 303.\307.!\210\202\264.\311..!\2
3680 31 30 5c 32 30 32 5c 32 36 34 02 5c 33 31 31 06 09 21 5c 32 31 30 5c 32 30 32 5c 32 36 34 02 5c 10\202\264.\311..!\210\202\264.\
36a0 33 31 32 01 21 5c 33 31 33 01 5c 33 31 34 5c 22 5c 32 30 33 06 01 5c 33 30 37 06 5c 6e 21 5c 32 312.!\313.\314\"\203..\307.\n!\2
36c0 31 30 5c 33 30 37 06 5c 6e 06 5c 6e 5c 22 5c 32 31 30 06 06 5c 32 31 32 5c 32 31 31 62 5c 32 31 10\307.\n.\n\"\210..\212\211b\21
36e0 30 5c 33 31 35 5c 33 31 36 21 29 3f 5c 32 36 32 01 5c 32 30 33 5c 33 37 37 00 5c 33 30 37 06 07 0\315\316!)?\262.\203\377.\307..
3700 5c 33 31 37 5c 22 5c 32 31 30 5c 33 30 37 04 21 5c 32 31 30 5c 32 30 32 5c 32 36 33 02 5c 33 31 \317\"\210\307.!\210\202\263.\31
3720 33 01 5c 33 32 30 5c 22 5c 32 30 33 3e 01 5c 33 30 37 06 5c 6e 21 5c 32 31 30 5c 33 30 37 06 5c 3.\320\"\203>.\307.\n!\210\307.\
3740 6e 06 5c 6e 5c 22 5c 32 31 30 02 5c 32 30 33 25 01 5c 33 31 31 06 07 21 5c 32 31 30 5c 32 30 32 n.\n\"\210.\203%.\311..!\210\202
3760 5c 32 36 33 02 06 06 5c 32 31 32 5c 32 31 31 62 5c 32 31 30 5c 33 31 35 5c 33 31 36 21 29 3f 5c \263...\212\211b\210\315\316!)?\
3780 32 36 32 01 5c 32 30 33 5c 32 36 33 02 5c 33 30 37 06 07 5c 33 31 37 5c 22 5c 32 31 30 5c 32 30 262.\203\263.\307..\317\"\210\20
37a0 32 5c 32 36 33 02 5c 33 31 33 01 5c 33 32 31 5c 22 5c 32 30 33 5b 01 5c 33 30 37 06 5c 6e 21 5c 2\263.\313.\321\"\203[.\307.\n!\
37c0 32 31 30 5c 33 30 37 06 06 21 5c 32 31 30 02 5c 32 30 33 5c 32 36 33 02 5c 33 31 31 06 5c 6e 21 210\307..!\210.\203\263.\311.\n!
37e0 5c 32 31 30 5c 32 30 32 5c 32 36 33 02 5c 33 31 33 01 5c 33 32 32 5c 22 5c 32 30 33 74 01 5c 33 \210\202\263.\313.\322\"\203t.\3
3800 30 37 06 5c 6e 21 5c 32 31 30 02 5c 32 30 33 5c 32 36 33 02 5c 33 31 31 06 07 5c 33 32 30 5c 22 07.\n!\210.\203\263.\311..\320\"
3820 5c 32 31 30 5c 32 30 32 5c 32 36 33 02 5c 33 31 33 01 5c 33 32 33 5c 22 5c 32 30 33 5c 32 34 31 \210\202\263.\313.\323\"\203\241
3840 01 5c 33 30 37 06 5c 6e 21 5c 32 31 30 06 07 5c 32 30 33 5c 32 31 34 01 04 66 5c 33 32 34 55 5c .\307.\n!\210..\203\214..f\324U\
3860 32 30 34 5c 32 32 33 01 04 66 5c 33 32 35 55 5c 32 30 33 5c 32 33 32 01 5c 33 30 37 06 5c 6e 06 204\223..f\325U\203\232.\307.\n.
3880 5c 6e 5c 22 5c 32 31 30 5c 33 30 37 04 21 5c 32 31 30 5c 32 30 32 5c 32 36 33 02 5c 33 31 33 01 \n\"\210\307.!\210\202\263.\313.
38a0 5c 33 32 36 5c 22 5c 32 30 33 5c 33 30 30 01 5c 33 30 37 06 5c 6e 21 5c 32 31 30 5c 33 30 37 06 \326\"\203\300.\307.\n!\210\307.
38c0 5c 6e 06 5c 6e 5c 22 5c 32 31 30 02 5c 32 30 33 5c 32 36 33 02 5c 33 31 31 06 5c 6e 21 5c 32 31 \n.\n\"\210.\203\263.\311.\n!\21
38e0 30 5c 32 30 32 5c 32 36 33 02 5c 33 31 33 01 5c 33 32 37 5c 22 5c 32 30 33 5c 33 34 32 01 5c 33 0\202\263.\313.\327\"\203\342.\3
3900 30 37 06 5c 6e 21 5c 32 31 30 02 5c 32 30 33 5c 33 33 30 01 5c 33 30 37 06 08 21 5c 32 31 30 5c 07.\n!\210.\203\330.\307..!\210\
3920 32 30 32 5c 32 36 33 02 5c 33 30 37 06 5c 6e 06 5c 6e 5c 22 5c 32 31 30 5c 32 30 32 5c 32 36 33 202\263.\307.\n.\n\"\210\202\263
3940 02 5c 33 31 33 01 5c 33 33 30 5c 22 5c 32 30 33 5c 33 36 31 01 5c 33 30 37 06 5c 6e 21 5c 32 31 .\313.\330\"\203\361.\307.\n!\21
3960 30 5c 32 30 32 5c 32 36 33 02 5c 33 31 33 01 5c 33 33 31 5c 22 5c 32 30 33 15 02 06 06 5c 32 31 0\202\263.\313.\331\"\203....\21
3980 32 5c 32 31 31 62 5c 32 31 30 5c 33 31 35 5c 33 31 36 21 29 3f 5c 32 36 32 01 5c 32 30 33 0e 02 2\211b\210\315\316!)?\262.\203..
39a0 5c 33 30 37 06 07 5c 33 31 37 5c 22 5c 32 31 30 5c 33 30 37 04 21 5c 32 31 30 5c 32 30 32 5c 32 \307..\317\"\210\307.!\210\202\2
39c0 36 33 02 5c 33 31 33 01 5c 33 33 32 5c 22 5c 32 30 33 3e 02 06 06 5c 32 31 32 5c 32 31 31 62 5c 63.\313.\332\"\203>...\212\211b\
39e0 32 31 30 5c 33 31 35 5c 33 31 36 21 29 3f 5c 32 36 32 01 5c 32 30 33 32 02 5c 33 30 37 06 07 5c 210\315\316!)?\262.\2032.\307..\
3a00 33 31 37 5c 22 5c 32 31 30 02 5c 32 30 33 5c 32 36 33 02 5c 33 31 31 06 07 21 5c 32 31 30 5c 32 317\"\210.\203\263.\311..!\210\2
3a20 30 32 5c 32 36 33 02 5c 33 31 33 01 5c 33 33 33 5c 22 5c 32 30 33 63 02 06 06 5c 32 31 32 5c 32 02\263.\313.\333\"\203c...\212\2
3a40 31 31 62 5c 32 31 30 5c 33 31 35 5c 33 31 36 21 29 3f 5c 32 36 32 01 5c 32 30 33 5b 02 5c 33 30 11b\210\315\316!)?\262.\203[.\30
3a60 37 06 07 5c 33 31 37 5c 22 5c 32 31 30 5c 33 30 37 06 06 21 5c 32 31 30 5c 32 30 32 5c 32 36 33 7..\317\"\210\307..!\210\202\263
3a80 02 5c 33 31 33 01 5c 33 33 34 5c 22 5c 32 30 33 5c 32 31 35 02 06 06 5c 32 31 32 5c 32 31 31 62 .\313.\334\"\203\215...\212\211b
3aa0 5c 32 31 30 5c 33 31 35 5c 33 31 36 21 29 3f 5c 32 36 32 01 5c 32 30 33 5c 32 30 30 02 5c 33 30 \210\315\316!)?\262.\203\200.\30
3ac0 37 06 07 5c 33 31 37 5c 22 5c 32 31 30 02 5c 32 30 33 5c 32 36 33 02 5c 33 31 31 06 07 5c 33 32 7..\317\"\210.\203\263.\311..\32
3ae0 30 5c 22 5c 32 31 30 5c 32 30 32 5c 32 36 33 02 5c 33 31 33 01 5c 33 33 35 5c 22 5c 32 30 33 5c 0\"\210\202\263.\313.\335\"\203\
3b00 32 33 33 02 5c 33 30 37 04 21 5c 32 31 30 5c 32 30 32 5c 32 36 33 02 5c 33 31 33 01 5c 33 33 36 233.\307.!\210\202\263.\313.\336
3b20 5c 22 5c 32 30 33 5c 32 35 36 02 02 5c 32 30 33 5c 32 36 33 02 5c 33 31 31 05 5c 33 32 30 5c 22 \"\203\256..\203\263.\311.\320\"
3b40 5c 32 31 30 5c 32 30 32 5c 32 36 33 02 5c 33 33 37 5c 33 34 30 03 5c 22 5c 32 31 30 5c 32 31 30 \210\202\263.\337\340.\"\210\210
3b60 08 29 5c 32 36 36 5c 32 31 32 29 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 .)\266\212)\207".[haskell-indent
3b80 2d 69 6e 66 6f 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 73 74 61 72 74 2d 6b 65 79 77 6f -info.haskell-indent-start-keywo
3ba0 72 64 73 2d 72 65 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 73 65 70 61 72 61 74 65 2d 76 rds-re.haskell-indent-separate-v
3bc0 61 6c 64 65 66 20 73 74 72 69 6e 67 20 34 39 20 34 38 20 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 aldef.string.49.48.string-match.
3be0 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 70 75 73 68 2d 70 6f 73 20 22 5c 5c 3c 64 61 74 61 haskell-indent-push-pos."\\<data
3c00 5c 5c 3e 22 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 70 75 73 68 2d 70 6f 73 2d 6f 66 66 \\>".haskell-indent-push-pos-off
3c20 73 65 74 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 66 69 6e 64 2d 63 61 73 65 20 65 71 6c set.haskell-indent-find-case.eql
3c40 20 31 20 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 7c 5b 20 09 5d 2a 6f 74 68 65 72 77 69 73 65 5c 5c .1.looking-at."|[..]*otherwise\\
3c60 3e 22 20 22 7c 20 22 20 32 20 33 20 34 20 35 20 36 31 20 35 38 20 36 20 37 20 38 20 39 20 31 30 >"."|.".2.3.4.5.61.58.6.7.8.9.10
3c80 20 31 31 20 31 32 20 31 33 20 31 34 20 65 72 72 6f 72 20 22 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 .11.12.13.14.error."haskell-inde
3ca0 6e 74 2d 65 6d 70 74 79 3a 20 25 73 20 69 6d 70 6f 73 73 69 62 6c 65 20 63 61 73 65 22 5d 20 32 nt-empty:.%s.impossible.case"].2
3cc0 31 20 28 23 24 20 2e 20 31 33 33 38 38 29 5d 29 0a 23 40 31 30 35 20 46 69 6e 64 20 69 6e 64 65 1.(#$...13388)]).#@105.Find.inde
3ce0 6e 74 61 74 69 6f 6e 20 70 6f 69 6e 74 73 20 66 6f 72 20 61 20 6c 69 6e 65 20 73 74 61 72 74 69 ntation.points.for.a.line.starti
3d00 6e 67 20 77 69 74 68 20 61 6e 20 69 64 65 6e 74 69 66 69 65 72 2e 0a 0a 28 66 6e 20 53 54 41 52 ng.with.an.identifier...(fn.STAR
3d20 54 20 45 4e 44 20 45 4e 44 2d 56 49 53 49 42 4c 45 20 49 4e 44 45 4e 54 2d 49 4e 46 4f 29 1f 0a T.END.END-VISIBLE.INDENT-INFO)..
3d40 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 2d 69 64 65 6e 74 20 (defalias.'haskell-indent-ident.
3d60 23 5b 31 30 32 38 20 22 5c 32 31 32 5c 32 31 31 18 5c 33 30 33 04 04 5c 22 5c 32 31 31 01 41 5c #[1028."\212\211.\303..\"\211.A\
3d80 32 36 32 02 5c 32 34 32 01 5c 32 31 31 41 5c 32 36 32 03 5c 32 34 32 02 5c 32 31 31 41 5c 32 36 262.\242.\211A\262.\242.\211A\26
3da0 32 04 5c 32 34 32 03 5c 32 31 31 41 5c 32 36 32 05 5c 32 34 32 04 5c 32 31 31 41 5c 32 36 32 06 2.\242.\211A\262.\242.\211A\262.
3dc0 5c 32 34 32 05 5c 32 31 31 41 5c 32 36 32 07 5c 32 34 32 06 06 5c 32 31 31 41 5c 32 36 32 08 5c \242.\211A\262.\242..\211A\262.\
3de0 32 34 32 06 5c 6e 06 5c 6e 55 5c 33 30 34 5c 33 30 35 09 5c 22 06 07 3f 5c 32 30 36 4a 00 5c 33 242.\n.\nU\304\305.\"..?\206J.\3
3e00 30 36 06 08 21 5c 33 30 36 09 21 5c 32 33 30 3f 5c 33 30 37 06 5c 6e 5c 32 30 33 54 00 5c 33 31 06..!\306.!\230?\307.\n\203T.\31
3e20 30 5c 32 30 32 55 00 5c 33 31 31 06 09 5c 32 30 33 66 00 06 09 06 0f 57 5c 32 30 33 66 00 5c 33 0\202U.\311..\203f.....W\203f.\3
3e40 31 30 5c 32 30 32 67 00 5c 33 31 31 06 09 5c 32 30 33 78 00 06 09 06 10 57 5c 32 30 33 78 00 5c 10\202g.\311..\203x.....W\203x.\
3e60 33 31 30 5c 32 30 32 79 00 5c 33 31 31 06 09 5c 32 30 33 5c 32 31 32 00 06 09 06 11 57 5c 32 30 310\202y.\311..\203\212.....W\20
3e80 33 5c 32 31 32 00 5c 33 31 30 5c 32 30 32 5c 32 31 33 00 5c 33 31 31 06 09 5c 32 30 33 5c 32 33 3\212.\310\202\213.\311..\203\23
3ea0 34 00 06 09 06 12 57 5c 32 30 33 5c 32 33 34 00 5c 33 31 30 5c 32 30 32 5c 32 33 35 00 5c 33 31 4.....W\203\234.\310\202\235.\31
3ec0 31 06 09 5c 32 30 33 5c 32 35 36 00 06 09 06 13 57 5c 32 30 33 5c 32 35 36 00 5c 33 31 30 5c 32 1..\203\256.....W\203\256.\310\2
3ee0 30 32 5c 32 35 37 00 5c 33 31 31 26 06 06 09 5c 32 30 33 5c 33 35 35 00 5c 33 30 34 5c 6e 06 0b 02\257.\311&...\203\355.\304\n..
3f00 5c 22 5c 32 30 33 5c 33 35 35 00 5c 33 31 32 06 0b 21 5c 32 31 30 5c 33 30 34 5c 33 31 33 06 0b \"\203\355.\312..!\210\304\313..
3f20 5c 22 5c 32 30 33 5c 33 33 36 00 04 5c 32 30 33 5c 33 32 36 00 5c 33 31 32 05 21 5c 32 31 30 5c \"\203\336..\203\326.\312.!\210\
3f40 32 30 32 5c 32 37 35 02 5c 33 31 34 06 0b 21 5c 32 31 30 5c 32 30 32 5c 32 37 35 02 5c 33 30 34 202\275.\314..!\210\202\275.\304
3f60 5c 6e 09 5c 22 5c 32 30 34 5c 32 37 35 02 5c 33 31 34 06 0b 21 5c 32 31 30 5c 32 30 32 5c 32 37 \n.\"\204\275.\314..!\210\202\27
3f80 35 02 09 5c 33 31 35 5c 32 33 30 5c 32 30 33 00 01 06 5c 6e 5c 32 30 33 5c 32 37 35 02 5c 33 31 5..\315\230\203...\n\203\275.\31
3fa0 32 06 0b 21 5c 32 31 30 5c 32 30 32 5c 32 37 35 02 5c 33 31 36 01 21 5c 33 31 37 01 5c 33 32 30 2..!\210\202\275.\316.!\317.\320
3fc0 5c 22 5c 32 30 33 27 01 03 5c 32 30 33 16 01 5c 33 31 32 06 09 21 5c 32 31 30 5c 32 30 32 5c 32 \"\203'..\203..\312..!\210\202\2
3fe0 37 34 02 5c 33 31 32 06 5c 66 21 5c 32 31 30 02 5c 32 30 33 5c 32 37 34 02 5c 33 31 32 06 06 21 74.\312.\f!\210.\203\274.\312..!
4000 5c 32 31 30 5c 32 30 32 5c 32 37 34 02 5c 33 31 37 01 5c 33 32 31 5c 22 5c 32 30 33 4b 01 03 5c \210\202\274.\317.\321\"\203K..\
4020 32 30 33 3a 01 5c 33 31 32 06 09 21 5c 32 31 30 5c 32 30 32 5c 32 37 34 02 5c 33 31 32 06 5c 66 203:.\312..!\210\202\274.\312.\f
4040 21 5c 32 31 30 04 5c 32 30 33 5c 32 37 34 02 5c 33 31 34 06 09 21 5c 32 31 30 5c 32 30 32 5c 32 !\210.\203\274.\314..!\210\202\2
4060 37 34 02 5c 33 31 37 01 5c 33 32 32 5c 22 5c 32 30 33 6f 01 03 5c 32 30 33 5e 01 5c 33 31 34 06 74.\317.\322\"\203o..\203^.\314.
4080 09 21 5c 32 31 30 5c 32 30 32 5c 32 37 34 02 5c 33 31 32 06 5c 66 21 5c 32 31 30 02 5c 32 30 33 .!\210\202\274.\312.\f!\210.\203
40a0 5c 32 37 34 02 5c 33 31 32 06 08 21 5c 32 31 30 5c 32 30 32 5c 32 37 34 02 5c 33 31 37 01 5c 33 \274.\312..!\210\202\274.\317.\3
40c0 32 33 5c 22 5c 32 30 33 5c 32 32 34 01 03 5c 32 30 33 5c 32 30 32 01 5c 33 31 32 06 09 21 5c 32 23\"\203\224..\203\202.\312..!\2
40e0 31 30 5c 32 30 32 5c 32 37 34 02 5c 33 31 32 06 5c 66 21 5c 32 31 30 04 5c 32 30 33 5c 32 37 34 10\202\274.\312.\f!\210.\203\274
4100 02 5c 33 31 34 06 09 5c 33 32 31 5c 22 5c 32 31 30 5c 32 30 32 5c 32 37 34 02 5c 33 31 37 01 5c .\314..\321\"\210\202\274.\317.\
4120 33 32 34 5c 22 5c 32 30 33 5c 32 37 30 01 03 5c 32 30 33 5c 32 34 37 01 5c 33 31 34 06 5c 66 21 324\"\203\270..\203\247.\314.\f!
4140 5c 32 31 30 5c 32 30 32 5c 32 37 34 02 5c 33 31 32 06 5c 66 21 5c 32 31 30 02 5c 32 30 33 5c 32 \210\202\274.\312.\f!\210.\203\2
4160 37 34 02 5c 33 31 32 06 06 21 5c 32 31 30 5c 32 30 32 5c 32 37 34 02 5c 33 31 37 01 5c 33 32 35 74.\312..!\210\202\274.\317.\325
4180 5c 22 5c 32 30 33 5c 33 33 34 01 03 5c 32 30 33 5c 33 31 33 01 5c 33 31 34 06 5c 66 21 5c 32 31 \"\203\334..\203\313.\314.\f!\21
41a0 30 5c 32 30 32 5c 32 37 34 02 5c 33 31 32 06 5c 66 21 5c 32 31 30 04 5c 32 30 33 5c 32 37 34 02 0\202\274.\312.\f!\210.\203\274.
41c0 5c 33 31 34 06 5c 66 21 5c 32 31 30 5c 32 30 32 5c 32 37 34 02 5c 33 31 37 01 5c 33 32 36 5c 22 \314.\f!\210\202\274.\317.\326\"
41e0 5c 32 30 33 00 02 03 5c 32 30 33 5c 33 35 37 01 5c 33 31 34 06 5c 66 21 5c 32 31 30 5c 32 30 32 \203...\203\357.\314.\f!\210\202
4200 5c 32 37 34 02 5c 33 31 32 06 5c 66 21 5c 32 31 30 04 5c 32 30 33 5c 32 37 34 02 5c 33 31 32 06 \274.\312.\f!\210.\203\274.\312.
4220 5c 6e 21 5c 32 31 30 5c 32 30 32 5c 32 37 34 02 5c 33 31 37 01 5c 33 32 37 5c 22 5c 32 30 33 1b \n!\210\202\274.\317.\327\"\203.
4240 02 03 5c 32 30 33 13 02 5c 33 31 34 06 5c 66 21 5c 32 31 30 5c 32 30 32 5c 32 37 34 02 5c 33 31 ..\203..\314.\f!\210\202\274.\31
4260 32 06 5c 66 21 5c 32 31 30 5c 32 30 32 5c 32 37 34 02 5c 33 31 37 01 5c 33 33 30 5c 22 5c 32 30 2.\f!\210\202\274.\317.\330\"\20
4280 33 36 02 03 5c 32 30 33 2e 02 5c 33 31 32 06 09 21 5c 32 31 30 5c 32 30 32 5c 32 37 34 02 5c 33 36..\203..\312..!\210\202\274.\3
42a0 31 32 06 06 21 5c 32 31 30 5c 32 30 32 5c 32 37 34 02 5c 33 31 37 01 5c 33 33 31 5c 22 5c 32 30 12..!\210\202\274.\317.\331\"\20
42c0 33 55 02 03 5c 32 30 33 49 02 5c 33 31 32 06 09 21 5c 32 31 30 5c 32 30 32 5c 32 37 34 02 04 5c 3U..\203I.\312..!\210\202\274..\
42e0 32 30 33 5c 32 37 34 02 5c 33 31 34 06 09 21 5c 32 31 30 5c 32 30 32 5c 32 37 34 02 5c 33 31 37 203\274.\314..!\210\202\274.\317
4300 01 5c 33 33 32 5c 22 5c 32 30 33 5c 32 30 30 02 03 5c 32 30 33 68 02 5c 33 31 32 06 09 21 5c 32 .\332\"\203\200..\203h.\312..!\2
4320 31 30 5c 32 30 32 5c 32 37 34 02 06 08 5c 32 31 32 5c 32 31 31 62 5c 32 31 30 5c 33 33 33 5c 33 10\202\274...\212\211b\210\333\3
4340 33 34 21 29 3f 5c 32 36 32 01 5c 32 30 33 5c 32 37 34 02 5c 33 31 32 06 08 21 5c 32 31 30 5c 32 34!)?\262.\203\274.\312..!\210\2
4360 30 32 5c 32 37 34 02 5c 33 31 37 01 5c 33 33 35 5c 22 5c 32 30 33 5c 32 32 34 02 04 5c 32 30 33 02\274.\317.\335\"\203\224..\203
4380 5c 32 37 34 02 5c 33 31 34 06 09 5c 33 32 31 5c 22 5c 32 31 30 5c 32 30 32 5c 32 37 34 02 5c 33 \274.\314..\321\"\210\202\274.\3
43a0 31 37 01 5c 33 33 36 5c 22 5c 32 30 33 5c 32 34 33 02 5c 33 31 32 06 06 21 5c 32 31 30 5c 32 30 17.\336\"\203\243.\312..!\210\20
43c0 32 5c 32 37 34 02 5c 33 31 37 01 5c 33 33 37 5c 22 5c 32 30 33 5c 32 36 37 02 04 5c 32 30 33 5c 2\274.\317.\337\"\203\267..\203\
43e0 32 37 34 02 5c 33 31 34 06 07 5c 33 32 31 5c 22 5c 32 31 30 5c 32 30 32 5c 32 37 34 02 5c 33 34 274.\314..\321\"\210\202\274.\34
4400 30 5c 33 34 31 03 5c 22 5c 32 31 30 5c 32 31 30 08 29 5c 32 36 36 5c 32 31 34 29 5c 32 30 37 22 0\341.\"\210\210.)\266\214)\207"
4420 20 5b 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 69 6e 66 6f 20 68 61 73 6b 65 6c 6c 2d 69 6e .[haskell-indent-info.haskell-in
4440 64 65 6e 74 2d 63 75 72 72 65 6e 74 2d 6c 69 6e 65 2d 66 69 72 73 74 2d 69 64 65 6e 74 20 68 61 dent-current-line-first-ident.ha
4460 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 73 74 61 72 74 2d 6b 65 79 77 6f 72 64 73 2d 72 65 20 68 skell-indent-start-keywords-re.h
4480 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 73 65 70 61 72 61 74 65 2d 76 61 6c 64 65 66 20 73 74 askell-indent-separate-valdef.st
44a0 72 69 6e 67 2d 6d 61 74 63 68 20 22 77 68 65 72 65 5b 20 09 5d 2a 22 20 68 61 73 6b 65 6c 6c 2d ring-match."where[..]*".haskell-
44c0 73 74 72 69 6e 67 2d 74 72 69 6d 20 73 74 72 69 6e 67 20 34 39 20 34 38 20 68 61 73 6b 65 6c 6c string-trim.string.49.48.haskell
44e0 2d 69 6e 64 65 6e 74 2d 70 75 73 68 2d 70 6f 73 20 22 5c 5c 3c 64 61 74 61 5c 5c 3e 22 20 68 61 -indent-push-pos."\\<data\\>".ha
4500 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 70 75 73 68 2d 70 6f 73 2d 6f 66 66 73 65 74 20 22 3a 3a skell-indent-push-pos-offset."::
4520 22 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 66 69 6e 64 2d 63 61 73 65 20 65 71 6c 20 31 ".haskell-indent-find-case.eql.1
4540 20 32 20 33 20 34 20 35 20 36 20 37 20 38 20 39 20 31 30 20 31 31 20 6c 6f 6f 6b 69 6e 67 2d 61 .2.3.4.5.6.7.8.9.10.11.looking-a
4560 74 20 22 7c 5b 20 09 5d 2a 6f 74 68 65 72 77 69 73 65 5c 5c 3e 22 20 31 32 20 31 33 20 31 34 20 t."|[..]*otherwise\\>".12.13.14.
4580 65 72 72 6f 72 20 22 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 69 64 65 6e 74 3a 20 25 73 20 error."haskell-indent-ident:.%s.
45a0 69 6d 70 6f 73 73 69 62 6c 65 20 63 61 73 65 22 5d 20 32 33 20 28 23 24 20 2e 20 31 35 35 37 35 impossible.case"].23.(#$...15575
45c0 29 5d 29 0a 23 40 31 35 32 20 46 69 6e 64 20 69 6e 64 65 6e 74 61 74 69 6f 6e 20 70 6f 69 6e 74 )]).#@152.Find.indentation.point
45e0 73 20 66 6f 72 20 61 20 6e 6f 6e 2d 65 6d 70 74 79 20 6c 69 6e 65 20 73 74 61 72 74 69 6e 67 20 s.for.a.non-empty.line.starting.
4600 77 69 74 68 20 73 6f 6d 65 74 68 69 6e 67 20 6f 74 68 65 72 0a 74 68 61 6e 20 61 6e 20 69 64 65 with.something.other.than.an.ide
4620 6e 74 69 66 69 65 72 2c 20 61 20 67 75 61 72 64 20 6f 72 20 72 68 73 2e 0a 0a 28 66 6e 20 53 54 ntifier,.a.guard.or.rhs...(fn.ST
4640 41 52 54 20 45 4e 44 20 45 4e 44 2d 56 49 53 49 42 4c 45 20 49 4e 44 45 4e 54 2d 49 4e 46 4f 29 ART.END.END-VISIBLE.INDENT-INFO)
4660 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 2d 6f 74 68 65 ..(defalias.'haskell-indent-othe
4680 72 20 23 5b 31 30 32 38 20 22 5c 32 31 32 5c 32 31 31 18 5c 33 30 32 04 04 5c 22 5c 32 31 31 01 r.#[1028."\212\211.\302..\"\211.
46a0 41 5c 32 36 32 02 5c 32 34 32 01 5c 32 31 31 41 5c 32 36 32 03 5c 32 34 32 02 5c 32 31 31 41 5c A\262.\242.\211A\262.\242.\211A\
46c0 32 36 32 04 5c 32 34 32 03 5c 32 31 31 41 5c 32 36 32 05 5c 32 34 32 04 5c 32 31 31 41 5c 32 36 262.\242.\211A\262.\242.\211A\26
46e0 32 06 5c 32 34 32 05 5c 32 31 31 41 5c 32 36 32 07 5c 32 34 32 06 06 5c 32 31 31 41 5c 32 36 32 2.\242.\211A\262.\242..\211A\262
4700 08 5c 32 34 32 06 5c 6e 06 5c 6e 55 5c 33 30 33 06 08 5c 32 30 33 41 00 5c 33 30 34 5c 32 30 32 .\242.\n.\nU\303..\203A.\304\202
4720 42 00 5c 33 30 35 06 07 5c 32 30 33 53 00 06 07 06 0d 57 5c 32 30 33 53 00 5c 33 30 34 5c 32 30 B.\305..\203S.....W\203S.\304\20
4740 32 54 00 5c 33 30 35 06 07 5c 32 30 33 65 00 06 07 06 0e 57 5c 32 30 33 65 00 5c 33 30 34 5c 32 2T.\305..\203e.....W\203e.\304\2
4760 30 32 66 00 5c 33 30 35 06 07 5c 32 30 33 77 00 06 07 06 0f 57 5c 32 30 33 77 00 5c 33 30 34 5c 02f.\305..\203w.....W\203w.\304\
4780 32 30 32 78 00 5c 33 30 35 06 07 5c 32 30 33 5c 32 31 31 00 06 07 06 10 57 5c 32 30 33 5c 32 31 202x.\305..\203\211.....W\203\21
47a0 31 00 5c 33 30 34 5c 32 30 32 5c 32 31 32 00 5c 33 30 35 06 07 5c 32 30 33 5c 32 33 33 00 06 07 1.\304\202\212.\305..\203\233...
47c0 06 11 57 5c 32 30 33 5c 32 33 33 00 5c 33 30 34 5c 32 30 32 5c 32 33 34 00 5c 33 30 35 26 06 06 ..W\203\233.\304\202\234.\305&..
47e0 07 5c 32 30 33 5c 32 36 33 00 5c 33 30 36 09 06 09 5c 22 5c 32 30 33 5c 32 36 33 00 5c 33 30 37 .\203\263.\306...\"\203\263.\307
4800 06 09 21 5c 32 31 30 5c 32 30 32 5c 33 31 35 01 5c 33 31 30 01 21 5c 33 31 31 01 5c 33 31 32 5c ..!\210\202\315.\310.!\311.\312\
4820 22 5c 32 30 33 5c 33 30 34 00 5c 33 31 33 04 21 5c 32 31 30 5c 32 30 32 5c 33 31 34 01 5c 33 31 "\203\304.\313.!\210\202\314.\31
4840 31 01 5c 33 31 34 5c 22 5c 32 30 33 5c 33 33 37 00 02 5c 32 30 33 5c 33 32 37 00 5c 33 30 37 06 1.\314\"\203\337..\203\327.\307.
4860 07 21 5c 32 31 30 5c 32 30 32 5c 33 31 34 01 5c 33 30 37 05 5c 33 31 34 5c 22 5c 32 31 30 5c 32 .!\210\202\314.\307.\314\"\210\2
4880 30 32 5c 33 31 34 01 5c 33 31 31 01 5c 33 31 35 5c 22 5c 32 30 33 5c 33 35 36 00 5c 33 31 33 06 02\314.\311.\315\"\203\356.\313.
48a0 06 21 5c 32 31 30 5c 32 30 32 5c 33 31 34 01 5c 33 31 31 01 5c 33 31 36 5c 22 5c 32 30 33 5c 33 .!\210\202\314.\311.\316\"\203\3
48c0 37 36 00 5c 33 30 37 06 07 5c 33 31 34 5c 22 5c 32 31 30 5c 32 30 32 5c 33 31 34 01 5c 33 31 31 76.\307..\314\"\210\202\314.\311
48e0 01 5c 33 31 37 5c 22 5c 32 30 33 11 01 5c 33 31 33 06 5c 6e 21 5c 32 31 30 5c 33 31 33 04 21 5c .\317\"\203..\313.\n!\210\313.!\
4900 32 31 30 5c 32 30 32 5c 33 31 34 01 5c 33 31 31 01 5c 33 32 30 5c 22 5c 32 30 33 2c 01 02 5c 32 210\202\314.\311.\320\"\203,..\2
4920 30 33 24 01 5c 33 30 37 06 5c 6e 21 5c 32 31 30 5c 32 30 32 5c 33 31 34 01 5c 33 30 37 05 5c 33 03$.\307.\n!\210\202\314.\307.\3
4940 31 34 5c 22 5c 32 31 30 5c 32 30 32 5c 33 31 34 01 5c 33 31 31 01 5c 33 32 31 5c 22 5c 32 30 33 14\"\210\202\314.\311.\321\"\203
4960 3b 01 5c 33 30 37 06 08 21 5c 32 31 30 5c 32 30 32 5c 33 31 34 01 5c 33 31 31 01 5c 33 32 32 5c ;.\307..!\210\202\314.\311.\322\
4980 22 5c 32 30 33 4a 01 5c 33 31 33 06 5c 6e 21 5c 32 31 30 5c 32 30 32 5c 33 31 34 01 5c 33 31 31 "\203J.\313.\n!\210\202\314.\311
49a0 01 5c 33 32 33 5c 22 5c 32 30 33 58 01 5c 33 31 33 04 21 5c 32 31 30 5c 32 30 32 5c 33 31 34 01 .\323\"\203X.\313.!\210\202\314.
49c0 5c 33 31 31 01 5c 33 32 34 5c 22 5c 32 30 33 73 01 02 5c 32 30 33 6b 01 5c 33 30 37 06 07 21 5c \311.\324\"\203s..\203k.\307..!\
49e0 32 31 30 5c 32 30 32 5c 33 31 34 01 5c 33 30 37 05 5c 33 31 34 5c 22 5c 32 31 30 5c 32 30 32 5c 210\202\314.\307.\314\"\210\202\
4a00 33 31 34 01 5c 33 31 31 01 5c 33 32 35 5c 22 5c 32 30 33 5c 32 32 32 01 06 06 5c 32 31 32 5c 32 314.\311.\325\"\203\222...\212\2
4a20 31 31 62 5c 32 31 30 5c 33 32 36 5c 33 32 37 21 29 3f 5c 32 36 32 01 5c 32 30 33 5c 33 31 34 01 11b\210\326\327!)?\262.\203\314.
4a40 5c 33 31 33 06 06 21 5c 32 31 30 5c 32 30 32 5c 33 31 34 01 5c 33 31 31 01 5c 33 33 30 5c 22 5c \313..!\210\202\314.\311.\330\"\
4a60 32 30 33 5c 32 34 36 01 02 5c 32 30 33 5c 33 31 34 01 5c 33 30 37 06 07 5c 33 31 34 5c 22 5c 32 203\246..\203\314.\307..\314\"\2
4a80 31 30 5c 32 30 32 5c 33 31 34 01 5c 33 31 31 01 5c 33 33 31 5c 22 5c 32 30 33 5c 32 36 34 01 5c 10\202\314.\311.\331\"\203\264.\
4aa0 33 31 33 04 21 5c 32 31 30 5c 32 30 32 5c 33 31 34 01 5c 33 31 31 01 5c 33 33 32 5c 22 5c 32 30 313.!\210\202\314.\311.\332\"\20
4ac0 33 5c 33 30 37 01 02 5c 32 30 33 5c 33 31 34 01 5c 33 30 37 05 5c 33 31 34 5c 22 5c 32 31 30 5c 3\307..\203\314.\307.\314\"\210\
4ae0 32 30 32 5c 33 31 34 01 5c 33 33 33 5c 33 33 34 03 5c 22 5c 32 31 30 5c 32 31 30 08 29 5c 32 36 202\314.\333\334.\"\210\210.)\26
4b00 36 5c 32 31 32 29 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 69 6e 66 6f 6\212)\207".[haskell-indent-info
4b20 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 73 74 61 72 74 2d 6b 65 79 77 6f 72 64 73 2d 72 .haskell-indent-start-keywords-r
4b40 65 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 73 65 70 61 72 61 74 65 2d 76 61 6c 64 65 66 e.haskell-indent-separate-valdef
4b60 20 73 74 72 69 6e 67 20 34 39 20 34 38 20 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 68 61 73 6b 65 .string.49.48.string-match.haske
4b80 6c 6c 2d 69 6e 64 65 6e 74 2d 70 75 73 68 2d 70 6f 73 2d 6f 66 66 73 65 74 20 68 61 73 6b 65 6c ll-indent-push-pos-offset.haskel
4ba0 6c 2d 69 6e 64 65 6e 74 2d 66 69 6e 64 2d 63 61 73 65 20 65 71 6c 20 31 20 68 61 73 6b 65 6c 6c l-indent-find-case.eql.1.haskell
4bc0 2d 69 6e 64 65 6e 74 2d 70 75 73 68 2d 70 6f 73 20 32 20 33 20 34 20 35 20 36 20 37 20 38 20 39 -indent-push-pos.2.3.4.5.6.7.8.9
4be0 20 31 30 20 31 31 20 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 7c 5b 20 09 5d 2a 6f 74 68 65 72 77 69 .10.11.looking-at."|[..]*otherwi
4c00 73 65 5c 5c 3e 22 20 31 32 20 31 33 20 31 34 20 65 72 72 6f 72 20 22 68 61 73 6b 65 6c 6c 2d 69 se\\>".12.13.14.error."haskell-i
4c20 6e 64 65 6e 74 2d 6f 74 68 65 72 3a 20 25 73 20 69 6d 70 6f 73 73 69 62 6c 65 20 63 61 73 65 22 ndent-other:.%s.impossible.case"
4c40 5d 20 32 31 20 28 23 24 20 2e 20 31 37 38 36 36 29 5d 29 0a 23 40 31 30 39 20 46 69 6e 64 20 69 ].21.(#$...17866)]).#@109.Find.i
4c60 6e 64 65 6e 74 61 74 69 6f 6e 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 66 6f 72 20 61 20 76 61 6c ndentation.information.for.a.val
4c80 75 65 20 64 65 66 69 6e 69 74 69 6f 6e 2e 0a 0a 28 66 6e 20 53 54 41 52 54 20 45 4e 44 20 45 4e ue.definition...(fn.START.END.EN
4ca0 44 2d 56 49 53 49 42 4c 45 20 43 55 52 52 2d 4c 49 4e 45 2d 54 59 50 45 20 49 4e 44 45 4e 54 2d D-VISIBLE.CURR-LINE-TYPE.INDENT-
4cc0 49 4e 46 4f 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 INFO)..(defalias.'haskell-indent
4ce0 2d 76 61 6c 64 65 66 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 23 5b 31 32 38 35 20 22 5c 32 31 31 -valdef-indentation.#[1285."\211
4d00 18 04 03 57 5c 32 30 33 65 00 5c 33 30 31 02 5c 33 30 32 5c 22 5c 32 30 33 18 00 5c 33 30 33 05 ...W\203e.\301.\302\"\203..\303.
4d20 05 05 04 24 5c 32 30 32 66 00 5c 33 30 31 02 5c 33 30 34 5c 22 5c 32 30 33 28 00 5c 33 30 35 05 ...$\202f.\301.\304\"\203(.\305.
4d40 05 05 04 24 5c 32 30 32 66 00 5c 33 30 31 02 5c 33 30 36 5c 22 5c 32 30 33 38 00 5c 33 30 37 05 ...$\202f.\301.\306\"\2038.\307.
4d60 05 05 04 24 5c 32 30 32 66 00 5c 33 30 31 02 5c 33 31 30 5c 22 5c 32 30 33 48 00 5c 33 31 31 05 ...$\202f.\301.\310\"\203H.\311.
4d80 05 05 04 24 5c 32 30 32 66 00 5c 33 30 31 02 5c 33 31 32 5c 22 5c 32 30 33 55 00 5c 33 31 33 5c ...$\202f.\301.\312\"\203U.\313\
4da0 33 31 34 21 5c 32 30 32 66 00 5c 33 30 31 02 5c 33 31 35 5c 22 5c 32 30 35 66 00 5c 33 31 36 05 314!\202f.\301.\315\"\205f.\316.
4dc0 05 05 04 24 5c 32 30 32 66 00 08 29 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e ...$\202f..)\207".[haskell-inden
4de0 74 2d 69 6e 66 6f 20 65 71 6c 20 65 6d 70 74 79 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d t-info.eql.empty.haskell-indent-
4e00 65 6d 70 74 79 20 69 64 65 6e 74 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 69 64 65 6e 74 empty.ident.haskell-indent-ident
4e20 20 67 75 61 72 64 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 67 75 61 72 64 20 72 68 73 20 .guard.haskell-indent-guard.rhs.
4e40 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 72 68 73 20 63 6f 6d 6d 65 6e 74 20 65 72 72 6f 72 haskell-indent-rhs.comment.error
4e60 20 22 43 6f 6d 6d 65 6e 74 20 69 6e 64 65 6e 74 20 73 68 6f 75 6c 64 20 6e 65 76 65 72 20 68 61 ."Comment.indent.should.never.ha
4e80 70 70 65 6e 22 20 6f 74 68 65 72 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 6f 74 68 65 72 ppen".other.haskell-indent-other
4ea0 5d 20 31 30 20 28 23 24 20 2e 20 31 39 35 34 36 29 5d 29 0a 23 40 32 33 33 20 43 6f 6d 70 75 74 ].10.(#$...19546)]).#@233.Comput
4ec0 65 20 69 6e 64 65 6e 74 61 74 69 6f 6e 20 69 6e 66 6f 20 62 65 74 77 65 65 6e 20 4c 49 4e 45 2d e.indentation.info.between.LINE-
4ee0 53 54 41 52 54 20 61 6e 64 20 45 4e 44 2d 56 49 53 49 42 4c 45 2e 0a 53 65 70 61 72 61 74 65 20 START.and.END-VISIBLE..Separate.
4f00 61 20 6c 69 6e 65 20 6f 66 20 70 72 6f 67 72 61 6d 20 69 6e 74 6f 20 76 61 6c 64 65 66 73 20 62 a.line.of.program.into.valdefs.b
4f20 65 74 77 65 65 6e 20 6f 66 66 73 69 64 65 20 6b 65 79 77 6f 72 64 73 0a 61 6e 64 20 66 69 6e 64 etween.offside.keywords.and.find
4f40 20 69 6e 64 65 6e 74 61 74 69 6f 6e 20 69 6e 66 6f 20 66 6f 72 20 65 61 63 68 20 70 61 72 74 2e .indentation.info.for.each.part.
4f60 0a 0a 28 66 6e 20 4c 49 4e 45 2d 53 54 41 52 54 20 4c 49 4e 45 2d 45 4e 44 20 45 4e 44 2d 56 49 ..(fn.LINE-START.LINE-END.END-VI
4f80 53 49 42 4c 45 20 43 55 52 52 2d 4c 49 4e 45 2d 54 59 50 45 20 49 4e 44 45 4e 54 2d 49 4e 46 4f SIBLE.CURR-LINE-TYPE.INDENT-INFO
4fa0 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 2d 6c 69 6e )..(defalias.'haskell-indent-lin
4fc0 65 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 23 5b 31 32 38 35 20 22 5c 32 31 32 60 05 3d 5c 32 30 e-indentation.#[1285."\212`.=\20
4fe0 34 0b 00 5c 33 30 32 5c 33 30 33 21 5c 32 31 30 5c 32 31 31 5c 33 30 34 06 06 06 06 5c 22 5c 32 4..\302\303!\210\211\304....\"\2
5000 30 36 1b 00 5c 33 30 35 06 06 06 06 5c 22 01 18 5c 32 31 31 5c 32 30 33 24 00 5c 32 31 31 5c 32 06..\305....\"..\211\203$.\211\2
5020 36 32 06 5c 33 30 36 09 06 07 5c 33 30 37 23 5c 32 30 33 70 00 5c 33 30 34 06 07 60 5c 22 5c 32 62.\306...\307#\203p.\304..`\"\2
5040 30 34 70 00 5c 33 30 35 06 07 60 5c 22 5c 32 30 34 70 00 5c 33 31 30 5c 32 32 34 5c 33 31 30 5c 04p.\305..`\"\204p.\310\224\310\
5060 32 32 35 06 08 02 57 5c 32 30 34 4f 00 01 66 5c 33 31 31 3d 5c 32 30 33 5a 00 5c 33 31 32 06 09 225...W\204O..f\311=\203Z.\312..
5080 03 06 09 06 09 08 25 10 06 07 01 55 5c 32 30 33 65 00 5c 33 31 33 02 21 5c 32 31 30 5c 32 31 31 ......%....U\203e.\313.!\210\211
50a0 5c 32 36 32 09 06 08 62 5c 32 36 36 03 5c 32 30 32 24 00 5c 33 31 32 06 07 06 07 06 07 06 07 08 \262...b\266.\202$.\312.........
50c0 25 29 5c 32 36 36 5c 32 30 32 29 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 %)\266\202)\207".[haskell-indent
50e0 2d 69 6e 66 6f 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 6f 66 66 2d 73 69 64 65 2d 6b 65 -info.haskell-indent-off-side-ke
5100 79 77 6f 72 64 73 2d 72 65 20 63 6c 2d 2d 61 73 73 65 72 74 69 6f 6e 2d 66 61 69 6c 65 64 20 28 ywords-re.cl--assertion-failed.(
5120 65 71 20 28 70 6f 69 6e 74 29 20 6c 69 6e 65 2d 73 74 61 72 74 29 20 68 61 73 6b 65 6c 6c 2d 69 eq.(point).line-start).haskell-i
5140 6e 64 65 6e 74 2d 69 6e 2d 63 6f 6d 6d 65 6e 74 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d ndent-in-comment.haskell-indent-
5160 69 6e 2d 73 74 72 69 6e 67 20 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 74 20 30 20 in-string.re-search-forward.t.0.
5180 31 30 38 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 76 61 6c 64 65 66 2d 69 6e 64 65 6e 74 108.haskell-indent-valdef-indent
51a0 61 74 69 6f 6e 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 70 75 73 68 2d 70 6f 73 5d 20 31 ation.haskell-indent-push-pos].1
51c0 35 20 28 23 24 20 2e 20 32 30 31 35 34 29 5d 29 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 5.(#$...20154)]).(defalias.'hask
51e0 65 6c 6c 2d 69 6e 64 65 6e 74 2d 6c 61 79 6f 75 74 2d 69 6e 64 65 6e 74 2d 69 6e 66 6f 20 23 5b ell-indent-layout-indent-info.#[
5200 35 31 34 20 22 5c 33 30 32 5c 33 30 33 20 5c 33 30 32 5c 32 31 31 5c 32 31 31 04 18 5c 32 31 32 514."\302\303.\302\211\211..\212
5220 03 5c 33 30 34 3d 5c 32 30 33 3f 00 5c 33 30 35 60 5c 33 30 36 20 5c 22 5c 33 30 37 5c 33 31 30 .\304=\203?.\305`\306.\"\307\310
5240 02 41 40 5c 22 5c 32 30 33 23 00 5c 32 31 31 41 40 5c 32 30 32 3d 00 5c 33 31 31 01 38 5c 32 30 .A@\"\203#.\211A@\202=.\311.8\20
5260 33 3c 00 5c 33 31 31 01 38 66 5c 33 31 32 55 5c 32 30 33 36 00 5c 33 31 33 5c 32 30 32 3d 00 5c 3<.\311.8f\312U\2036.\313\202=.\
5280 32 31 31 41 40 5c 32 30 32 3d 00 5c 33 31 34 11 5c 32 31 30 05 5c 32 30 33 5c 32 30 33 00 05 5c 211A@\202=.\314.\210.\203\203..\
52a0 32 31 31 41 5c 32 36 32 07 5c 32 34 32 5c 32 36 32 03 02 62 5c 32 31 30 5c 33 30 36 20 5c 32 36 211A\262.\242\262..b\210\306.\26
52c0 32 02 05 5c 32 30 33 64 00 5c 32 31 32 5c 33 31 35 5c 33 31 36 06 07 40 21 21 5c 32 31 30 60 29 2..\203d.\212\315\316..@!!\210`)
52e0 5c 32 30 32 65 00 01 5c 32 36 32 01 5c 33 31 37 06 07 04 5c 22 5c 32 30 34 3f 00 5c 33 32 30 06 \202e..\262.\317...\"\204?.\320.
5300 07 04 5c 22 5c 32 30 34 3f 00 5c 33 32 31 03 03 03 06 07 08 25 10 5c 32 30 32 3f 00 29 08 29 5c ..\"\204?.\321......%.\202?.).)\
5320 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 69 6e 66 6f 20 68 61 73 6b 65 6c 207".[haskell-indent-info.haskel
5340 6c 2d 69 6e 64 65 6e 74 2d 63 75 72 72 65 6e 74 2d 6c 69 6e 65 2d 66 69 72 73 74 2d 69 64 65 6e l-indent-current-line-first-iden
5360 74 20 6e 69 6c 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 74 79 70 65 2d 61 74 2d 70 6f 69 t.nil.haskell-indent-type-at-poi
5380 6e 74 20 69 64 65 6e 74 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 73 65 70 61 72 61 74 65 nt.ident.haskell-indent-separate
53a0 2d 76 61 6c 64 65 66 20 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e 20 73 74 72 69 6e 67 -valdef.line-end-position.string
53c0 2d 6d 61 74 63 68 20 22 77 68 65 72 65 5b 20 09 5d 2a 22 20 35 20 35 38 20 22 3a 3a 22 20 22 22 -match."where[..]*".5.58."::".""
53e0 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 2d 70 .move-to-column.haskell-indent-p
5400 6f 69 6e 74 2d 74 6f 2d 63 6f 6c 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 6f 70 65 6e 2d oint-to-col.haskell-indent-open-
5420 73 74 72 75 63 74 75 72 65 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 69 6e 2d 63 6f 6d 6d structure.haskell-indent-in-comm
5440 65 6e 74 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 6c 69 6e 65 2d 69 6e 64 65 6e 74 61 74 ent.haskell-indent-line-indentat
5460 69 6f 6e 5d 20 31 33 20 22 5c 6e 5c 6e 28 66 6e 20 53 54 41 52 54 20 43 4f 4e 54 4f 55 52 2d 4c ion].13."\n\n(fn.START.CONTOUR-L
5480 49 4e 45 29 22 5d 29 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 INE)"]).(defalias.'haskell-inden
54a0 74 2d 66 69 6e 64 2d 6d 61 74 63 68 69 6e 67 2d 73 74 61 72 74 20 23 5b 31 30 32 36 20 22 5c 33 t-find-matching-start.#[1026."\3
54c0 30 30 03 60 5c 22 5c 32 31 31 5c 32 30 33 5c 66 00 5c 32 31 31 54 5c 32 36 32 04 5c 32 31 30 5c 00.`\"\211\203\f.\211T\262.\210\
54e0 32 31 31 5c 32 30 34 14 00 60 5c 32 36 32 01 5c 33 30 31 04 04 5c 33 30 32 23 5c 32 30 35 71 00 211\204..`\262.\301..\302#\205q.
5500 5c 33 30 33 5c 32 32 35 5c 33 30 34 04 60 5c 22 5c 32 30 36 3e 00 5c 33 30 35 04 60 5c 22 5c 32 \303\225\304.`\"\206>.\305.`\"\2
5520 30 36 3e 00 5c 33 30 30 04 60 5c 22 5c 32 30 36 3e 00 02 5c 32 30 35 3e 00 02 02 21 5c 32 30 35 06>.\300.`\"\206>..\205>...!\205
5540 3e 00 60 5c 32 31 31 5c 32 30 33 52 00 5c 32 31 31 62 5c 32 31 30 5c 33 30 36 06 06 06 06 06 06 >.`\211\203R.\211b\210\306......
5560 06 06 24 5c 32 30 32 6f 00 01 5c 32 30 33 6e 00 5c 33 30 36 06 06 06 06 06 06 23 5c 32 30 35 6f ..$\202o..\203n.\306......#\205o
5580 00 5c 33 30 36 06 06 06 06 06 06 06 06 24 5c 32 30 32 6f 00 60 5c 32 36 36 5c 32 30 32 5c 32 30 .\306........$\202o.`\266\202\20
55a0 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 6f 70 65 6e 2d 73 74 72 75 63 74 75 72 7".[haskell-indent-open-structur
55c0 65 20 72 65 2d 73 65 61 72 63 68 2d 62 61 63 6b 77 61 72 64 20 74 20 31 20 68 61 73 6b 65 6c 6c e.re-search-backward.t.1.haskell
55e0 2d 69 6e 64 65 6e 74 2d 69 6e 2d 73 74 72 69 6e 67 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 -indent-in-string.haskell-indent
5600 2d 69 6e 2d 63 6f 6d 6d 65 6e 74 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 66 69 6e 64 2d -in-comment.haskell-indent-find-
5620 6d 61 74 63 68 69 6e 67 2d 73 74 61 72 74 5d 20 31 31 20 22 5c 6e 5c 6e 28 66 6e 20 52 45 47 45 matching-start].11."\n\n(fn.REGE
5640 58 50 20 4c 49 4d 49 54 20 26 6f 70 74 69 6f 6e 61 6c 20 50 52 45 44 20 53 54 41 52 54 29 22 5d XP.LIMIT.&optional.PRED.START)"]
5660 29 0a 23 40 31 32 32 20 52 65 74 75 72 6e 20 6e 6f 6e 2d 6e 69 6c 20 69 66 20 70 6f 69 6e 74 20 ).#@122.Return.non-nil.if.point.
5680 69 73 20 69 6e 20 66 72 6f 6e 74 20 6f 66 20 61 20 60 6c 65 74 27 20 74 68 61 74 20 68 61 73 20 is.in.front.of.a.`let'.that.has.
56a0 6e 6f 20 60 69 6e 27 2e 0a 53 54 41 52 54 20 69 73 20 74 68 65 20 70 6f 73 69 74 69 6f 6e 20 6f no.`in'..START.is.the.position.o
56c0 66 20 74 68 65 20 70 72 65 73 75 6d 65 64 20 60 69 6e 27 2e 0a 0a 28 66 6e 20 53 54 41 52 54 29 f.the.presumed.`in'...(fn.START)
56e0 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 2d 66 69 6c 74 ..(defalias.'haskell-indent-filt
5700 65 72 2d 6c 65 74 2d 6e 6f 2d 69 6e 20 23 5b 32 35 37 20 22 5c 33 30 30 5c 33 30 31 21 5c 32 30 er-let-no-in.#[257."\300\301!\20
5720 35 4b 00 5c 33 30 32 31 49 00 5c 32 31 32 5c 33 30 33 76 5c 32 31 30 5c 33 30 34 64 21 5c 32 31 5K.\3021I.\212\303v\210\304d!\21
5740 30 5c 33 30 30 5c 33 30 35 21 5c 32 30 33 26 00 5c 33 30 36 5c 33 30 33 21 5c 32 31 30 5c 33 30 0\300\305!\203&.\306\303!\210\30
5760 34 64 21 5c 32 31 30 60 01 57 5c 32 30 32 46 00 69 5c 33 30 33 79 5c 32 31 30 5c 33 30 37 20 5c 4d!\210`.W\202F.i\303y\210\307.\
5780 32 31 30 60 02 57 5c 32 30 33 42 00 69 01 57 5c 32 30 33 27 00 5c 33 31 30 5c 32 36 32 01 01 62 210`.W\203B.i.W\203'.\310\262..b
57a0 5c 32 31 30 5c 32 30 32 27 00 5c 32 31 31 3f 5c 32 36 32 01 29 30 5c 32 30 37 5c 32 31 30 5c 33 \210\202'.\211?\262.)0\207\210\3
57c0 31 30 5c 32 30 37 22 20 5b 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 6c 65 74 22 20 28 65 72 72 6f 72 10\207".[looking-at."let".(error
57e0 29 20 31 20 66 6f 72 77 61 72 64 2d 63 6f 6d 6d 65 6e 74 20 22 7b 22 20 66 6f 72 77 61 72 64 2d ).1.forward-comment."{".forward-
5800 73 65 78 70 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 62 61 63 6b 2d 74 6f 2d 69 6e 64 65 sexp.haskell-indent-back-to-inde
5820 6e 74 61 74 69 6f 6e 20 6e 69 6c 5d 20 34 20 28 23 24 20 2e 20 32 32 31 32 30 29 5d 29 0a 23 40 ntation.nil].4.(#$...22120)]).#@
5840 31 33 38 20 43 6f 6d 70 75 74 65 20 69 6e 64 65 6e 74 20 69 6e 66 6f 20 66 6f 72 20 63 6f 6d 6d 138.Compute.indent.info.for.comm
5860 65 6e 74 73 20 61 6e 64 20 74 65 78 74 20 69 6e 73 69 64 65 20 63 6f 6d 6d 65 6e 74 73 2e 0a 4f ents.and.text.inside.comments..O
5880 50 45 4e 20 69 73 20 74 68 65 20 73 74 61 72 74 20 70 6f 73 69 74 69 6f 6e 20 6f 66 20 74 68 65 PEN.is.the.start.position.of.the
58a0 20 63 6f 6d 6d 65 6e 74 20 69 6e 20 77 68 69 63 68 20 70 6f 69 6e 74 20 69 73 2e 0a 0a 28 66 6e .comment.in.which.point.is...(fn
58c0 20 4f 50 45 4e 20 53 54 41 52 54 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c .OPEN.START)..(defalias.'haskell
58e0 2d 69 6e 64 65 6e 74 2d 63 6f 6d 6d 65 6e 74 20 23 5b 35 31 34 20 22 5c 32 31 32 01 60 55 5c 32 -indent-comment.#[514."\212.`U\2
5900 30 33 50 00 5c 33 30 31 66 5c 33 30 32 3d 5c 32 30 33 12 00 5c 33 30 31 5c 32 30 32 29 00 5c 33 03P.\301f\302=\203..\301\202).\3
5920 30 33 5c 33 30 34 21 5c 32 30 33 28 00 5c 33 30 35 5c 33 30 36 21 02 56 5c 32 30 33 28 00 5c 33 03\304!\203(.\305\306!.V\203(.\3
5940 30 37 60 21 43 43 5c 32 30 32 29 00 5c 33 30 31 5c 33 30 33 64 21 5c 32 31 30 5c 33 31 30 01 5c 07`!CC\202).\301\303d!\210\310.\
5960 32 31 32 5c 33 31 31 04 21 29 69 5c 33 31 32 02 5c 33 31 33 5c 33 31 34 5c 33 31 35 5c 33 31 36 212\311.!)i\312.\313\314\315\316
5980 5c 33 31 37 06 07 21 5c 33 32 30 5c 22 5c 33 32 31 5c 33 32 32 25 5c 22 5c 32 36 32 02 01 5c 32 \317..!\320\"\321\322%\"\262..\2
59a0 36 36 5c 32 30 32 5c 22 5c 32 36 32 01 5c 32 30 32 5c 32 34 32 00 5c 33 32 33 5c 33 32 34 21 5c 66\202\"\262.\202\242.\323\324!\
59c0 32 30 33 66 00 5c 33 32 35 75 5c 32 31 30 5c 33 30 33 5c 33 30 34 21 5c 32 31 30 5c 33 30 37 60 203f.\325u\210\303\304!\210\307`
59e0 21 54 43 43 5c 32 30 32 5c 32 34 32 00 5c 33 32 33 5c 33 32 36 21 5c 32 30 35 71 00 5c 33 32 37 !TCC\202\242.\323\326!\205q.\327
5a00 5c 32 32 34 5c 33 32 37 5c 32 32 35 5a 5c 33 30 34 79 5c 32 31 30 5c 33 33 30 20 5c 32 31 30 60 \224\327\225Z\304y\210\330.\210`
5a20 02 57 5c 32 30 33 5c 32 30 30 00 01 62 5c 32 31 30 5c 33 32 33 08 21 5c 32 30 33 5c 32 33 33 00 .W\203\200..b\210\323.!\203\233.
5a40 5c 32 31 31 5c 32 30 33 5c 32 32 34 00 5c 33 33 31 5c 33 32 35 02 5c 33 30 37 60 21 23 5c 32 30 \211\203\224.\331\325.\307`!#\20
5a60 32 5c 32 33 36 00 5c 33 30 37 5c 33 32 37 5c 32 32 35 21 5c 32 30 32 5c 32 33 36 00 5c 33 30 37 2\236.\307\327\225!\202\236.\307
5a80 60 21 43 43 5c 32 36 32 01 29 5c 32 30 37 22 20 5b 63 6f 6d 6d 65 6e 74 2d 73 74 61 72 74 2d 73 `!CC\262.)\207".[comment-start-s
5aa0 6b 69 70 20 6e 69 6c 20 31 32 33 20 66 6f 72 77 61 72 64 2d 63 6f 6d 6d 65 6e 74 20 2d 31 20 6c kip.nil.123.forward-comment.-1.l
5ac0 69 6e 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 70 6f 73 69 74 69 6f 6e 20 33 20 68 61 73 6b 65 6c 6c ine-beginning-position.3.haskell
5ae0 2d 69 6e 64 65 6e 74 2d 70 6f 69 6e 74 2d 74 6f 2d 63 6f 6c 20 61 70 70 65 6e 64 20 68 61 73 6b -indent-point-to-col.append.hask
5b00 65 6c 6c 2d 69 6e 64 65 6e 74 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 69 6e 66 6f 20 73 6f 72 74 ell-indent-indentation-info.sort
5b20 20 6d 61 6b 65 2d 62 79 74 65 2d 63 6f 64 65 20 35 31 34 20 22 5c 33 30 31 5c 33 30 30 03 40 5a .make-byte-code.514."\301\300.@Z
5b40 21 5c 33 30 31 5c 33 30 30 03 40 5a 21 58 5c 32 30 37 22 20 76 63 6f 6e 63 61 74 20 76 65 63 74 !\301\300.@Z!X\207".vconcat.vect
5b60 6f 72 20 5b 61 62 73 5d 20 36 20 22 5c 6e 5c 6e 28 66 6e 20 58 20 59 29 22 20 6c 6f 6f 6b 69 6e or.[abs].6."\n\n(fn.X.Y)".lookin
5b80 67 2d 61 74 20 22 2d 7d 22 20 32 20 22 2d 2d 3f 22 20 30 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 g-at."-}".2."--?".0.haskell-inde
5ba0 6e 74 2d 62 61 63 6b 2d 74 6f 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 2b 5d 20 31 35 20 28 23 24 nt-back-to-indentation.+].15.(#$
5bc0 20 2e 20 32 32 35 39 36 29 5d 29 0a 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 30 5c 33 30 31 ...22596)]).(byte-code."\300\301
5be0 5c 33 30 32 5c 33 30 33 5c 33 30 34 44 44 5c 33 30 35 5c 33 30 36 5c 33 30 37 5c 33 31 30 5c 33 \302\303\304DD\305\306\307\310\3
5c00 31 31 5c 33 31 32 5c 33 31 33 26 09 5c 32 30 37 22 20 5b 63 75 73 74 6f 6d 2d 64 65 63 6c 61 72 11\312\313&.\207".[custom-declar
5c20 65 2d 76 61 72 69 61 62 6c 65 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 74 68 65 6e 65 6c e-variable.haskell-indent-thenel
5c40 73 65 20 66 75 6e 63 61 6c 6c 20 66 75 6e 63 74 69 6f 6e 20 23 5b 30 20 22 5c 33 30 30 5c 32 30 se.funcall.function.#[0."\300\20
5c60 37 22 20 5b 30 5d 20 31 5d 20 22 49 66 20 6e 6f 6e 2d 6e 69 6c 2c 20 5c 22 74 68 65 6e 5c 22 20 7".[0].1]."If.non-nil,.\"then\".
5c80 61 6e 64 20 5c 22 65 6c 73 65 5c 22 20 61 72 65 20 69 6e 64 65 6e 74 65 64 2e 5c 6e 54 68 69 73 and.\"else\".are.indented.\nThis
5ca0 20 69 73 20 6e 65 63 65 73 73 61 72 79 20 69 6e 20 74 68 65 20 5c 22 64 6f 5c 22 20 6c 61 79 6f .is.necessary.in.the.\"do\".layo
5cc0 75 74 20 75 6e 64 65 72 20 48 61 73 6b 65 6c 6c 2d 39 38 2e 5c 6e 53 65 65 20 68 74 74 70 3a 2f ut.under.Haskell-98.\nSee.http:/
5ce0 2f 68 61 63 6b 61 67 65 2e 68 61 73 6b 65 6c 6c 2e 6f 72 67 2f 74 72 61 63 2f 68 61 73 6b 65 6c /hackage.haskell.org/trac/haskel
5d00 6c 2d 70 72 69 6d 65 2f 77 69 6b 69 2f 44 6f 41 6e 64 49 66 54 68 65 6e 45 6c 73 65 22 20 3a 67 l-prime/wiki/DoAndIfThenElse".:g
5d20 72 6f 75 70 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 20 3a 73 61 66 65 20 62 6f 6f 6c 65 61 roup.haskell-indent.:safe.boolea
5d40 6e 70 20 3a 74 79 70 65 20 69 6e 74 65 67 65 72 5d 20 31 30 29 0a 28 64 65 66 61 6c 69 61 73 20 np.:type.integer].10).(defalias.
5d60 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 63 6c 6f 73 69 6e 67 2d 6b 65 79 77 6f 72 64 20 'haskell-indent-closing-keyword.
5d80 23 5b 32 35 37 20 22 5c 32 31 32 5c 33 30 31 5c 33 30 32 66 5c 33 30 33 01 5c 33 30 34 5c 22 5c #[257."\212\301\302f\303.\304\"\
5da0 32 30 33 0f 00 5c 33 30 35 5c 32 30 32 2d 00 5c 33 30 33 01 5c 33 30 36 5c 22 5c 32 30 33 1a 00 203..\305\202-.\303.\306\"\203..
5dc0 5c 33 30 37 5c 32 30 32 2d 00 5c 33 30 33 01 5c 33 31 30 5c 22 5c 32 30 33 25 00 5c 33 31 31 5c \307\202-.\303.\310\"\203%.\311\
5de0 32 30 32 2d 00 5c 33 30 33 01 5c 33 31 32 5c 22 5c 32 30 35 2d 00 5c 33 31 33 5c 32 36 32 01 02 202-.\303.\312\"\205-.\313\262..
5e00 5c 33 30 32 66 5c 33 30 34 3d 5c 32 30 35 38 00 5c 33 31 34 23 29 5c 32 31 32 5c 32 31 31 62 5c \302f\304=\2058.\314#)\212\211b\
5e20 32 31 30 5c 33 31 35 20 5c 32 30 33 48 00 5c 33 31 36 02 21 5c 32 36 32 01 29 5c 33 30 32 66 5c 210\315.\203H.\316.!\262.)\302f\
5e40 33 31 37 3e 5c 32 30 33 54 00 08 5c 32 30 32 55 00 5c 33 32 30 5c 33 32 31 02 21 5c 5c 43 43 5c 317>\203T..\202U.\320\321.!\\CC\
5e60 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 74 68 65 6e 65 6c 73 65 20 68 61 207".[haskell-indent-thenelse.ha
5e80 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 66 69 6e 64 2d 6d 61 74 63 68 69 6e 67 2d 73 74 61 72 74 skell-indent-find-matching-start
5ea0 20 6e 69 6c 20 65 71 6c 20 31 30 35 20 22 5c 5c 3c 5c 5c 28 3f 3a 5c 5c 28 69 6e 5c 5c 29 5c 5c .nil.eql.105."\\<\\(?:\\(in\\)\\
5ec0 7c 6c 65 74 5c 5c 29 5c 5c 3e 22 20 31 31 31 20 22 5c 5c 3c 5c 5c 28 3f 3a 5c 5c 28 6f 66 5c 5c |let\\)\\>".111."\\<\\(?:\\(of\\
5ee0 29 5c 5c 7c 63 61 73 65 5c 5c 29 5c 5c 3e 22 20 31 31 36 20 22 5c 5c 3c 5c 5c 28 3f 3a 5c 5c 28 )\\|case\\)\\>".116."\\<\\(?:\\(
5f00 74 68 65 6e 5c 5c 29 5c 5c 7c 69 66 5c 5c 29 5c 5c 3e 22 20 31 30 31 20 22 5c 5c 3c 5c 5c 28 3f then\\)\\|if\\)\\>".101."\\<\\(?
5f20 3a 5c 5c 28 65 6c 73 65 5c 5c 29 5c 5c 7c 69 66 5c 5c 29 5c 5c 3e 22 20 68 61 73 6b 65 6c 6c 2d :\\(else\\)\\|if\\)\\>".haskell-
5f40 69 6e 64 65 6e 74 2d 66 69 6c 74 65 72 2d 6c 65 74 2d 6e 6f 2d 69 6e 20 68 61 73 6b 65 6c 6c 2d indent-filter-let-no-in.haskell-
5f60 69 6e 64 65 6e 74 2d 68 61 6e 67 69 6e 67 2d 70 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d indent-hanging-p.haskell-indent-
5f80 76 69 72 74 75 61 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 28 31 31 36 20 31 30 31 29 20 30 20 virtual-indentation.(116.101).0.
5fa0 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 70 6f 69 6e 74 2d 74 6f 2d 63 6f 6c 5d 20 36 20 22 haskell-indent-point-to-col].6."
5fc0 5c 6e 5c 6e 28 66 6e 20 53 54 41 52 54 29 22 5d 29 0a 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 \n\n(fn.START)"]).(byte-code."\3
5fe0 30 30 5c 33 30 31 5c 33 30 32 5c 33 30 33 5c 33 30 34 44 44 5c 33 30 35 5c 33 30 36 5c 33 30 37 00\301\302\303\304DD\305\306\307
6000 5c 33 31 30 5c 33 31 31 26 07 5c 32 30 37 22 20 5b 63 75 73 74 6f 6d 2d 64 65 63 6c 61 72 65 2d \310\311&.\207".[custom-declare-
6020 76 61 72 69 61 62 6c 65 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 61 66 74 65 72 2d 6b 65 variable.haskell-indent-after-ke
6040 79 77 6f 72 64 73 20 66 75 6e 63 61 6c 6c 20 66 75 6e 63 74 69 6f 6e 20 23 5b 30 20 22 5c 33 30 ywords.funcall.function.#[0."\30
6060 30 5c 32 30 37 22 20 5b 28 28 22 77 68 65 72 65 22 20 32 20 30 29 20 28 22 6f 66 22 20 32 29 20 0\207".[(("where".2.0).("of".2).
6080 28 22 64 6f 22 20 32 29 20 28 22 6d 64 6f 22 20 32 29 20 28 22 72 65 63 22 20 32 29 20 28 22 69 ("do".2).("mdo".2).("rec".2).("i
60a0 6e 22 20 32 20 30 29 20 28 22 7b 22 20 32 29 20 22 69 66 22 20 22 74 68 65 6e 22 20 22 65 6c 73 n".2.0).("{".2)."if"."then"."els
60c0 65 22 20 22 6c 65 74 22 29 5d 20 31 5d 20 22 4b 65 79 77 6f 72 64 73 20 61 66 74 65 72 20 77 68 e"."let")].1]."Keywords.after.wh
60e0 69 63 68 20 69 6e 64 65 6e 74 61 74 69 6f 6e 20 73 68 6f 75 6c 64 20 62 65 20 69 6e 64 65 6e 74 ich.indentation.should.be.indent
6100 65 64 20 62 79 20 73 6f 6d 65 20 6f 66 66 73 65 74 2e 5c 6e 45 61 63 68 20 6b 65 79 77 6f 72 64 ed.by.some.offset.\nEach.keyword
6120 20 69 6e 66 6f 20 63 61 6e 20 68 61 76 65 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 66 6f 72 .info.can.have.the.following.for
6140 6d 73 3a 5c 6e 5c 6e 20 20 20 4b 45 59 57 4f 52 44 20 7c 20 28 4b 45 59 57 4f 52 44 20 4f 46 46 ms:\n\n...KEYWORD.|.(KEYWORD.OFF
6160 53 45 54 20 5b 4f 46 46 53 45 54 2d 48 41 4e 47 49 4e 47 5d 29 5c 6e 5c 6e 49 66 20 61 62 73 65 SET.[OFFSET-HANGING])\n\nIf.abse
6180 6e 74 20 4f 46 46 53 45 54 2d 48 41 4e 47 49 4e 47 20 64 65 66 61 75 6c 74 73 20 74 6f 20 4f 46 nt.OFFSET-HANGING.defaults.to.OF
61a0 46 53 45 54 2e 5c 6e 49 66 20 61 62 73 65 6e 74 20 4f 46 46 53 45 54 20 64 65 66 61 75 6c 74 73 FSET.\nIf.absent.OFFSET.defaults
61c0 20 74 6f 20 60 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 6f 66 66 73 65 74 27 2e 5c 6e 5c 6e .to.`haskell-indent-offset'.\n\n
61e0 4f 46 46 53 45 54 2d 48 41 4e 47 49 4e 47 20 69 73 20 74 68 65 20 6f 66 66 73 65 74 20 74 6f 20 OFFSET-HANGING.is.the.offset.to.
6200 75 73 65 20 69 6e 20 74 68 65 20 63 61 73 65 20 77 68 65 72 65 20 74 68 65 20 6b 65 79 77 6f 72 use.in.the.case.where.the.keywor
6220 64 5c 6e 69 73 20 61 74 20 74 68 65 20 65 6e 64 20 6f 66 20 61 6e 20 6f 74 68 65 72 77 69 73 65 d\nis.at.the.end.of.an.otherwise
6240 2d 6e 6f 6e 2d 65 6d 70 74 79 20 6c 69 6e 65 2e 22 20 3a 67 72 6f 75 70 20 68 61 73 6b 65 6c 6c -non-empty.line.".:group.haskell
6260 2d 69 6e 64 65 6e 74 20 3a 74 79 70 65 20 28 72 65 70 65 61 74 20 28 63 68 6f 69 63 65 20 73 74 -indent.:type.(repeat.(choice.st
6280 72 69 6e 67 20 28 63 6f 6e 73 20 3a 74 61 67 20 23 31 3d 22 22 20 28 73 74 72 69 6e 67 20 3a 74 ring.(cons.:tag.#1="".(string.:t
62a0 61 67 20 22 6b 65 79 77 6f 72 64 3a 22 29 20 28 63 6f 6e 73 20 3a 74 61 67 20 23 31 23 20 28 69 ag."keyword:").(cons.:tag.#1#.(i
62c0 6e 74 65 67 65 72 20 3a 74 61 67 20 22 6f 66 66 73 65 74 22 29 20 28 63 68 6f 69 63 65 20 28 63 nteger.:tag."offset").(choice.(c
62e0 6f 6e 73 74 20 6e 69 6c 29 20 28 6c 69 73 74 20 3a 74 61 67 20 23 31 23 20 28 69 6e 74 65 67 65 onst.nil).(list.:tag.#1#.(intege
6300 72 20 3a 74 61 67 20 22 6f 66 66 73 65 74 2d 70 65 6e 64 69 6e 67 22 29 29 29 29 29 29 29 5d 20 r.:tag."offset-pending")))))))].
6320 38 29 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 2d 73 6b 69 8).(defalias.'haskell-indent-ski
6340 70 2d 6c 65 78 65 6d 65 2d 66 6f 72 77 61 72 64 20 23 5b 30 20 22 5c 33 30 30 5c 33 30 31 21 5c p-lexeme-forward.#[0."\300\301!\
6360 33 30 32 55 5c 32 30 35 17 00 5c 33 30 30 5c 33 30 33 21 5c 32 30 35 17 00 5c 33 30 30 5c 33 30 302U\205..\300\303!\205..\300\30
6380 34 21 5c 32 30 35 17 00 5c 33 30 30 5c 33 30 35 21 5c 32 30 37 22 20 5b 73 6b 69 70 2d 73 79 6e 4!\205..\300\305!\207".[skip-syn
63a0 74 61 78 2d 66 6f 72 77 61 72 64 20 22 77 22 20 30 20 22 5f 22 20 22 28 22 20 22 29 22 5d 20 32 tax-forward."w".0."_"."(".")"].2
63c0 5d 29 0a 28 64 65 66 76 61 72 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 69 6e 68 69 62 69 ]).(defvar.haskell-indent-inhibi
63e0 74 2d 61 66 74 65 72 2d 6f 66 66 73 65 74 20 6e 69 6c 29 0a 23 40 37 36 20 52 65 74 75 72 6e 20 t-after-offset.nil).#@76.Return.
6400 74 68 65 20 69 6e 66 6f 20 66 72 6f 6d 20 60 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 61 66 the.info.from.`haskell-indent-af
6420 74 65 72 2d 6b 65 79 77 6f 72 64 73 27 20 66 6f 72 20 6b 65 79 77 6f 72 64 20 61 74 20 70 6f 69 ter-keywords'.for.keyword.at.poi
6440 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 2d 6f nt...(defalias.'haskell-indent-o
6460 66 66 73 65 74 2d 61 66 74 65 72 2d 69 6e 66 6f 20 23 5b 30 20 22 60 5c 32 31 32 5c 33 30 31 20 ffset-after-info.#[0."`\212\301.
6480 5c 32 31 30 60 29 7b 5c 33 30 32 01 08 5c 22 5c 32 30 36 13 00 5c 32 31 31 08 5c 32 33 35 40 5c \210`){\302..\"\206..\211.\235@\
64a0 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 61 66 74 65 72 2d 6b 65 79 77 6f 207".[haskell-indent-after-keywo
64c0 72 64 73 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 73 6b 69 70 2d 6c 65 78 65 6d 65 2d 66 rds.haskell-indent-skip-lexeme-f
64e0 6f 72 77 61 72 64 20 61 73 73 6f 63 5d 20 34 20 28 23 24 20 2e 20 32 35 35 39 33 29 5d 29 0a 28 orward.assoc].4.(#$...25593)]).(
6500 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 30 33 5c 33 30 34 44 byte-code."\300\301\302\303\304D
6520 44 5c 33 30 35 5c 33 30 36 5c 33 30 37 5c 33 31 30 5c 33 31 31 26 07 5c 32 30 37 22 20 5b 63 75 D\305\306\307\310\311&.\207".[cu
6540 73 74 6f 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 stom-declare-variable.haskell-in
6560 64 65 6e 74 2d 64 6f 6e 74 2d 68 61 6e 67 20 66 75 6e 63 61 6c 6c 20 66 75 6e 63 74 69 6f 6e 20 dent-dont-hang.funcall.function.
6580 23 5b 30 20 22 5c 33 30 30 5c 32 30 37 22 20 5b 28 22 28 22 29 5d 20 31 5d 20 22 4c 65 78 65 6d #[0."\300\207".[("(")].1]."Lexem
65a0 65 73 20 74 68 61 74 20 73 68 6f 75 6c 64 20 6e 65 76 65 72 20 62 65 20 63 6f 6e 73 69 64 65 72 es.that.should.never.be.consider
65c0 65 64 20 61 73 20 68 61 6e 67 69 6e 67 2e 22 20 3a 67 72 6f 75 70 20 68 61 73 6b 65 6c 6c 2d 69 ed.as.hanging.".:group.haskell-i
65e0 6e 64 65 6e 74 20 3a 74 79 70 65 20 28 72 65 70 65 61 74 20 73 74 72 69 6e 67 29 5d 20 38 29 0a ndent.:type.(repeat.string)].8).
6600 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 2d 68 61 6e 67 69 6e (defalias.'haskell-indent-hangin
6620 67 2d 70 20 23 5b 30 20 22 69 5c 33 30 31 20 55 5c 32 30 36 1f 00 5c 32 31 32 60 5c 33 30 32 20 g-p.#[0."i\301.U\206..\212`\302.
6640 5c 32 31 30 60 7b 5c 32 31 31 08 5c 32 33 35 5c 32 30 36 1c 00 5c 33 30 33 20 5c 33 30 34 64 21 \210`{\211.\235\206..\303.\304d!
6660 5c 32 31 30 60 56 5c 32 36 32 01 29 3f 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 \210`V\262.)?\207".[haskell-inde
6680 6e 74 2d 64 6f 6e 74 2d 68 61 6e 67 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 63 75 72 72 nt-dont-hang.haskell-indent-curr
66a0 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 2d 73 ent-indentation.haskell-indent-s
66c0 6b 69 70 2d 6c 65 78 65 6d 65 2d 66 6f 72 77 61 72 64 20 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 kip-lexeme-forward.line-end-posi
66e0 74 69 6f 6e 20 66 6f 72 77 61 72 64 2d 63 6f 6d 6d 65 6e 74 5d 20 34 5d 29 0a 28 64 65 66 61 6c tion.forward-comment].4]).(defal
6700 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 61 66 74 65 72 2d 6b 65 79 77 6f 72 ias.'haskell-indent-after-keywor
6720 64 2d 63 6f 6c 75 6d 6e 20 23 5b 37 37 30 20 22 02 5c 32 30 34 08 00 5c 33 30 32 20 5c 32 36 32 d-column.#[770.".\204..\302.\262
6740 03 5c 32 31 31 5c 32 30 34 0f 00 08 5c 32 36 32 01 09 5c 32 30 33 17 00 5c 33 30 33 5c 32 30 32 .\211\204...\262..\203..\303\202
6760 19 00 02 5c 32 34 33 5c 32 36 32 03 5c 33 30 34 20 5c 32 30 34 2a 00 5c 33 30 35 69 04 40 5c 32 ...\243\262.\304.\204*.\305i.@\2
6780 30 36 28 00 02 5c 22 5c 32 30 37 5c 33 30 35 5c 33 30 36 03 21 04 41 40 5c 32 30 36 3a 00 04 40 06(..\"\207\305\306.!.A@\206:..@
67a0 5c 32 30 36 3a 00 02 5c 22 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 6f \206:..\"\207".[haskell-indent-o
67c0 66 66 73 65 74 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 69 6e 68 69 62 69 74 2d 61 66 74 ffset.haskell-indent-inhibit-aft
67e0 65 72 2d 6f 66 66 73 65 74 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 6f 66 66 73 65 74 2d er-offset.haskell-indent-offset-
6800 61 66 74 65 72 2d 69 6e 66 6f 20 28 30 29 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 68 61 after-info.(0).haskell-indent-ha
6820 6e 67 69 6e 67 2d 70 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 63 6f 6c 75 6d 6e 2b 6f 66 nging-p.haskell-indent-column+of
6840 66 73 65 74 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 76 69 72 74 75 61 6c 2d 69 6e 64 65 fset.haskell-indent-virtual-inde
6860 6e 74 61 74 69 6f 6e 5d 20 36 20 22 5c 6e 5c 6e 28 66 6e 20 4f 46 46 53 45 54 2d 49 4e 46 4f 20 ntation].6."\n\n(fn.OFFSET-INFO.
6880 53 54 41 52 54 20 26 6f 70 74 69 6f 6e 61 6c 20 44 45 46 41 55 4c 54 29 22 5d 29 0a 28 64 65 66 START.&optional.DEFAULT)"]).(def
68a0 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 69 6e 73 69 64 65 2d 70 61 72 alias.'haskell-indent-inside-par
68c0 65 6e 20 23 5b 32 35 37 20 22 5c 33 30 30 5c 33 30 31 21 5c 32 30 33 4c 00 5c 33 30 32 66 5c 33 en.#[257."\300\301!\203L.\302f\3
68e0 30 33 3d 5c 32 30 33 14 00 5c 32 31 31 66 5c 33 30 34 3d 5c 32 30 34 5c 22 00 5c 33 30 32 66 5c 03=\203..\211f\304=\204\".\302f\
6900 33 30 35 3d 5c 32 30 33 36 00 5c 32 31 31 66 5c 33 30 36 3d 5c 32 30 33 36 00 5c 33 30 37 5c 33 305=\2036.\211f\306=\2036.\307\3
6920 31 30 5c 33 30 32 66 03 66 04 66 5c 33 30 34 3d 5c 32 30 33 33 00 5c 33 31 31 5c 32 30 32 34 00 10\302f.f.f\304=\2033.\311\2024.
6940 5c 33 31 32 24 5c 32 31 30 5c 32 31 32 5c 32 31 31 62 5c 32 31 30 5c 33 31 33 20 5c 32 30 33 45 \312$\210\212\211b\210\313.\203E
6960 00 5c 33 31 34 5c 33 30 32 21 5c 32 30 32 48 00 5c 33 31 35 01 21 29 43 43 5c 32 30 37 60 5c 33 .\314\302!\202H.\315.!)CC\207`\3
6980 30 30 5c 33 31 36 21 5c 32 30 33 59 00 5c 33 31 35 02 21 5c 32 30 32 7c 00 5c 32 31 32 01 54 62 00\316!\203Y.\315.!\202|.\212.Tb
69a0 5c 32 31 30 5c 33 31 37 01 21 5c 32 31 30 60 29 5c 32 31 31 02 55 5c 32 30 33 77 00 5c 32 31 32 \210\317.!\210`)\211.U\203w.\212
69c0 02 62 5c 32 31 30 5c 33 32 30 5c 33 30 32 5c 32 31 31 5c 33 32 31 23 29 5c 32 30 32 7a 00 5c 33 .b\210\320\302\211\321#)\202z.\3
69e0 31 35 01 21 5c 32 36 32 01 5c 33 31 35 03 21 5c 33 32 32 04 54 04 5c 22 5c 32 31 31 5c 32 30 34 15.!\262.\315.!\322.T.\"\211\204
6a00 5c 32 31 36 00 02 43 43 5c 32 30 32 5c 32 36 34 00 5c 33 32 33 05 54 02 5c 22 5c 33 32 34 03 02 \216..CC\202\264.\323.T.\"\324..
6a20 5c 22 5c 32 31 31 5c 32 30 33 5c 32 34 36 00 5c 32 31 31 05 5c 32 34 30 5c 32 31 30 5c 32 31 31 \"\211\203\246.\211.\240\210\211
6a40 5c 33 30 32 5c 32 34 31 5c 32 31 30 5c 32 30 32 5c 32 35 37 00 5c 33 32 35 02 06 06 43 43 5c 22 \302\241\210\202\257.\325...CC\"
6a60 5c 32 36 32 02 01 5c 32 36 32 01 5c 32 36 32 01 5c 32 30 37 22 20 5b 6c 6f 6f 6b 69 6e 67 2d 61 \262..\262.\262.\207".[looking-a
6a80 74 20 22 5c 5c 73 29 5c 5c 7c 5b 3b 2c 5d 22 20 6e 69 6c 20 35 39 20 34 30 20 34 34 20 31 32 33 t."\\s)\\|[;,]".nil.59.40.44.123
6aa0 20 6d 65 73 73 61 67 65 20 22 4d 69 73 6d 61 74 63 68 65 64 20 70 75 6e 63 74 75 61 74 69 6f 6e .message."Mismatched.punctuation
6ac0 3a 20 60 25 63 27 20 69 6e 20 25 63 2e 2e 2e 25 63 22 20 34 31 20 31 32 35 20 68 61 73 6b 65 6c :.`%c'.in.%c...%c".41.125.haskel
6ae0 6c 2d 69 6e 64 65 6e 74 2d 68 61 6e 67 69 6e 67 2d 70 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e l-indent-hanging-p.haskell-inden
6b00 74 2d 76 69 72 74 75 61 6c 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 68 61 73 6b 65 6c 6c 2d 69 6e t-virtual-indentation.haskell-in
6b20 64 65 6e 74 2d 70 6f 69 6e 74 2d 74 6f 2d 63 6f 6c 20 22 5c 5c 73 2e 5c 5c 7c 5c 5c 24 20 22 20 dent-point-to-col."\\s.\\|\\$.".
6b40 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 73 6b 69 70 2d 62 6c 61 6e 6b 73 2d 61 6e 64 2d 6e haskell-indent-skip-blanks-and-n
6b60 65 77 6c 69 6e 65 73 2d 66 6f 72 77 61 72 64 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 61 ewlines-forward.haskell-indent-a
6b80 66 74 65 72 2d 6b 65 79 77 6f 72 64 2d 63 6f 6c 75 6d 6e 20 31 20 68 61 73 6b 65 6c 6c 2d 69 6e fter-keyword-column.1.haskell-in
6ba0 64 65 6e 74 2d 63 6f 6e 74 6f 75 72 2d 6c 69 6e 65 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 dent-contour-line.haskell-indent
6bc0 2d 6c 61 79 6f 75 74 2d 69 6e 64 65 6e 74 2d 69 6e 66 6f 20 61 73 73 6f 63 20 61 70 70 65 6e 64 -layout-indent-info.assoc.append
6be0 5d 20 31 30 20 22 5c 6e 5c 6e 28 66 6e 20 4f 50 45 4e 29 22 5d 29 0a 23 40 31 38 34 20 43 6f 6d ].10."\n\n(fn.OPEN)"]).#@184.Com
6c00 70 75 74 65 20 74 68 65 20 22 76 69 72 74 75 61 6c 20 69 6e 64 65 6e 74 61 74 69 6f 6e 22 20 6f pute.the."virtual.indentation".o
6c20 66 20 74 65 78 74 20 61 74 20 70 6f 69 6e 74 2e 0a 54 68 65 20 22 76 69 72 74 75 61 6c 20 69 6e f.text.at.point..The."virtual.in
6c40 64 65 6e 74 61 74 69 6f 6e 22 20 69 73 20 74 68 65 20 69 6e 64 65 6e 74 61 74 69 6f 6e 20 74 68 dentation".is.the.indentation.th
6c60 61 74 20 74 65 78 74 20 61 74 20 70 6f 69 6e 74 20 77 6f 75 6c 64 20 68 61 76 65 0a 68 61 64 2c at.text.at.point.would.have.had,
6c80 20 69 66 20 69 74 20 68 61 64 20 62 65 65 6e 20 70 6c 61 63 65 64 20 6f 6e 20 69 74 73 20 6f 77 .if.it.had.been.placed.on.its.ow
6ca0 6e 20 6c 69 6e 65 2e 0a 0a 28 66 6e 20 53 54 41 52 54 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 n.line...(fn.START)..(defalias.'
6cc0 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 76 69 72 74 75 61 6c 2d 69 6e 64 65 6e 74 61 74 69 haskell-indent-virtual-indentati
6ce0 6f 6e 20 23 5b 32 35 37 20 22 69 5c 33 30 31 20 18 5c 32 31 32 5c 33 30 32 5c 33 30 33 78 5c 32 on.#[257."i\301..\212\302\303x\2
6d00 31 30 6e 29 5c 32 30 33 12 00 5c 32 31 31 5c 32 30 32 45 00 5c 33 30 34 02 21 5c 33 30 35 01 5c 10n)\203..\211\202E.\304.!\305.\
6d20 32 31 31 5c 32 30 33 37 00 5c 32 31 31 40 5c 32 31 31 40 5c 32 36 32 01 5c 32 31 31 03 56 5c 32 211\2037.\211@\211@\262.\211.V\2
6d40 30 33 30 00 5c 32 31 31 05 59 5c 32 30 34 30 00 5c 32 31 31 5c 32 36 32 03 01 41 5c 32 36 36 5c 030.\211.Y\2040.\211\262..A\266\
6d60 32 30 32 5c 32 30 32 17 00 5c 32 31 30 5c 32 31 31 5c 33 30 36 59 5c 32 30 33 42 00 5c 32 31 31 202\202..\210\211\306Y\203B.\211
6d80 5c 32 30 32 43 00 02 5c 32 36 36 5c 32 30 32 29 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 69 \202C..\266\202)\207".[haskell-i
6da0 6e 64 65 6e 74 2d 69 6e 68 69 62 69 74 2d 61 66 74 65 72 2d 6f 66 66 73 65 74 20 68 61 73 6b 65 ndent-inhibit-after-offset.haske
6dc0 6c 6c 2d 69 6e 64 65 6e 74 2d 68 61 6e 67 69 6e 67 2d 70 20 22 20 09 22 20 6e 69 6c 20 68 61 73 ll-indent-hanging-p."..".nil.has
6de0 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 69 6e 66 6f 20 2d 31 20 kell-indent-indentation-info.-1.
6e00 30 5d 20 38 20 28 23 24 20 2e 20 32 37 36 34 35 29 5d 29 0a 23 40 31 39 39 20 52 65 74 75 72 6e 0].8.(#$...27645)]).#@199.Return
6e20 20 61 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 73 .a.list.of.possible.indentations
6e40 20 66 6f 72 20 74 68 65 20 63 75 72 72 65 6e 74 20 6c 69 6e 65 2e 0a 54 68 65 73 65 20 61 72 65 .for.the.current.line..These.are
6e60 20 74 68 65 6e 20 75 73 65 64 20 62 79 20 60 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 63 79 .then.used.by.`haskell-indent-cy
6e80 63 6c 65 27 2e 0a 53 54 41 52 54 20 69 66 20 6e 6f 6e 2d 6e 69 6c 20 69 73 20 61 20 70 72 65 73 cle'..START.if.non-nil.is.a.pres
6ea0 75 6d 65 64 20 73 74 61 72 74 20 70 6f 73 20 6f 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 64 65 umed.start.pos.of.the.current.de
6ec0 66 69 6e 69 74 69 6f 6e 2e 0a 0a 28 66 6e 20 26 6f 70 74 69 6f 6e 61 6c 20 53 54 41 52 54 29 1f finition...(fn.&optional.START).
6ee0 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 2d 69 6e 64 65 6e .(defalias.'haskell-indent-inden
6f00 74 61 74 69 6f 6e 2d 69 6e 66 6f 20 23 5b 32 35 36 20 22 5c 32 31 31 5c 32 30 34 08 00 5c 33 30 tation-info.#[256."\211\204..\30
6f20 32 20 5c 32 36 32 01 5c 33 30 33 5c 32 31 31 5c 33 30 34 03 60 5c 22 5c 32 31 31 5c 32 36 32 03 2.\262.\303\211\304.`\"\211\262.
6f40 5c 32 30 33 28 00 5c 33 30 35 02 21 5c 33 30 36 5c 33 30 37 21 5c 32 30 33 21 00 5c 33 31 30 5c \203(.\305.!\306\307!\203!.\310\
6f60 32 30 32 5c 22 00 5c 33 31 31 5c 5c 43 43 5c 32 30 32 5c 32 33 37 00 5c 33 31 32 03 60 5c 22 5c 202\".\311\\CC\202\237.\312.`\"\
6f80 32 31 31 5c 32 36 32 03 5c 32 30 33 39 00 5c 33 31 33 02 04 5c 22 5c 32 30 32 5c 32 33 37 00 5c 211\262.\2039.\313..\"\202\237.\
6fa0 33 30 36 5c 33 31 34 21 5c 32 30 33 45 00 5c 33 31 35 03 21 5c 32 30 32 5c 32 33 37 00 5c 32 31 306\314!\203E.\315.!\202\237.\21
6fc0 32 5c 33 31 36 64 5b 21 5c 32 31 30 5c 33 31 37 5c 33 32 30 21 5c 33 31 30 55 3f 5c 32 30 35 62 2\316d[!\210\317\320!\310U?\205b
6fe0 00 5c 33 32 31 20 5c 32 31 31 5c 32 36 32 03 5c 32 30 35 62 00 5c 33 32 32 02 04 5c 22 43 43 29 .\321.\211\262.\205b.\322..\"CC)
7000 5c 32 30 36 5c 32 33 37 00 5c 33 32 33 03 60 5c 22 5c 32 31 31 5c 32 36 32 03 5c 32 30 33 76 00 \206\237.\323.`\"\211\262.\203v.
7020 5c 33 32 34 02 21 5c 32 30 32 5c 32 33 37 00 5c 33 32 35 03 60 5c 22 5c 32 31 31 5c 32 36 32 02 \324.!\202\237.\325.`\"\211\262.
7040 5c 32 30 33 5c 32 30 37 00 5c 33 32 36 03 02 5c 22 5c 32 30 32 5c 32 33 37 00 08 5c 33 32 37 3d \203\207.\326..\"\202\237..\327=
7060 5c 32 30 33 5c 32 33 32 00 5c 33 30 35 03 21 5c 33 31 31 3d 5c 32 30 33 5c 32 33 32 00 09 54 5c \203\232.\305.!\311=\203\232..T\
7080 32 30 32 5c 32 33 35 00 5c 33 30 35 03 21 43 43 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 6c 202\235.\305.!CC\207".[haskell-l
70a0 69 74 65 72 61 74 65 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 6c 69 74 65 72 61 74 65 2d iterate.haskell-indent-literate-
70c0 42 69 72 64 2d 64 65 66 61 75 6c 74 2d 6f 66 66 73 65 74 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 Bird-default-offset.haskell-inde
70e0 6e 74 2d 73 74 61 72 74 2d 6f 66 2d 64 65 66 20 6e 69 6c 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 nt-start-of-def.nil.haskell-inde
7100 6e 74 2d 69 6e 2d 73 74 72 69 6e 67 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 70 6f 69 6e nt-in-string.haskell-indent-poin
7120 74 2d 74 6f 2d 63 6f 6c 20 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 5c 5c 5c 5c 22 20 30 20 31 20 68 t-to-col.looking-at."\\\\".0.1.h
7140 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 69 6e 2d 63 6f 6d 6d 65 6e 74 20 68 61 73 6b 65 6c 6c askell-indent-in-comment.haskell
7160 2d 69 6e 64 65 6e 74 2d 63 6f 6d 6d 65 6e 74 20 22 5c 5c 28 3f 3a 69 6e 5c 5c 7c 6f 66 5c 5c 7c -indent-comment."\\(?:in\\|of\\|
7180 74 68 65 6e 5c 5c 7c 65 6c 73 65 5c 5c 29 5c 5c 3e 22 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e then\\|else\\)\\>".haskell-inden
71a0 74 2d 63 6c 6f 73 69 6e 67 2d 6b 65 79 77 6f 72 64 20 66 6f 72 77 61 72 64 2d 63 6f 6d 6d 65 6e t-closing-keyword.forward-commen
71c0 74 20 73 6b 69 70 2d 73 79 6e 74 61 78 2d 62 61 63 6b 77 61 72 64 20 22 77 22 20 68 61 73 6b 65 t.skip-syntax-backward."w".haske
71e0 6c 6c 2d 69 6e 64 65 6e 74 2d 6f 66 66 73 65 74 2d 61 66 74 65 72 2d 69 6e 66 6f 20 68 61 73 6b ll-indent-offset-after-info.hask
7200 65 6c 6c 2d 69 6e 64 65 6e 74 2d 61 66 74 65 72 2d 6b 65 79 77 6f 72 64 2d 63 6f 6c 75 6d 6e 20 ell-indent-after-keyword-column.
7220 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 6f 70 65 6e 2d 73 74 72 75 63 74 75 72 65 20 68 61 haskell-indent-open-structure.ha
7240 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 69 6e 73 69 64 65 2d 70 61 72 65 6e 20 68 61 73 6b 65 6c skell-indent-inside-paren.haskel
7260 6c 2d 69 6e 64 65 6e 74 2d 63 6f 6e 74 6f 75 72 2d 6c 69 6e 65 20 68 61 73 6b 65 6c 6c 2d 69 6e l-indent-contour-line.haskell-in
7280 64 65 6e 74 2d 6c 61 79 6f 75 74 2d 69 6e 64 65 6e 74 2d 69 6e 66 6f 20 62 69 72 64 5d 20 36 20 dent-layout-indent-info.bird].6.
72a0 28 23 24 20 2e 20 32 38 31 38 36 29 5d 29 0a 28 64 65 66 76 61 72 20 68 61 73 6b 65 6c 6c 2d 69 (#$...28186)]).(defvar.haskell-i
72c0 6e 64 65 6e 74 2d 6c 61 73 74 2d 69 6e 66 6f 20 6e 69 6c 29 0a 23 40 37 36 20 49 6e 64 65 6e 74 ndent-last-info.nil).#@76.Indent
72e0 61 74 69 6f 6e 20 63 79 63 6c 65 2e 0a 57 65 20 73 74 61 79 20 69 6e 20 74 68 65 20 63 79 63 6c ation.cycle..We.stay.in.the.cycl
7300 65 20 61 73 20 6c 6f 6e 67 20 61 73 20 74 68 65 20 54 41 42 20 6b 65 79 20 69 73 20 70 72 65 73 e.as.long.as.the.TAB.key.is.pres
7320 73 65 64 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 2d sed...(defalias.'haskell-indent-
7340 63 79 63 6c 65 20 23 5b 30 20 22 08 5c 32 30 33 0e 00 5c 33 30 34 20 5c 32 30 34 0e 00 5c 33 30 cycle.#[0.".\203..\304.\204..\30
7360 35 5c 33 30 36 21 20 5c 32 30 37 69 5c 33 30 37 20 56 5c 32 30 35 17 00 5c 33 31 30 20 5c 33 31 5\306!.\207i\307.V\205..\310.\31
7380 31 20 5c 32 31 30 60 5c 33 31 32 20 5c 32 31 30 09 5c 6e 3d 5c 32 30 33 2b 00 5c 32 31 31 0b 40 1.\210`\312.\210.\n=\203+.\211.@
73a0 3d 5c 32 30 34 34 00 5c 32 31 32 5c 32 31 31 5c 33 31 33 20 5c 33 31 34 5c 32 31 31 46 13 29 0b =\2044.\212\211\313.\314\211F.).
73c0 41 40 5c 33 31 35 0b 38 5c 33 31 36 0b 38 01 03 38 5c 33 31 37 01 40 21 5c 32 31 30 5c 33 32 30 A@\315.8\316.8..8\317.@!\210\320
73e0 02 21 5c 32 31 30 5c 33 31 34 5c 32 36 32 02 5c 32 31 31 41 5c 32 31 31 5c 32 30 33 59 00 5c 32 .!\210\314\262.\211A\211\203Y.\2
7400 31 31 63 5c 32 31 30 5c 32 31 31 47 5c 32 36 32 03 5c 32 31 30 04 04 04 54 06 06 47 5c 32 34 36 11c\210\211G\262.\210...T..G\246
7420 04 46 13 03 47 5c 33 32 31 55 5c 32 30 33 73 00 5c 33 32 32 5c 33 32 33 21 5c 32 31 30 5c 32 30 .F..G\321U\203s.\322\323!\210\20
7440 32 79 00 5c 33 32 32 5c 33 32 34 05 47 5c 22 5c 32 31 30 05 5c 32 30 35 5c 32 30 32 00 5c 33 32 2y.\322\324.G\"\210.\205\202.\32
7460 35 06 06 21 62 5c 32 36 36 5c 32 30 34 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 6c 69 74 65 5..!b\266\204\207".[haskell-lite
7480 72 61 74 65 20 6c 61 73 74 2d 63 6f 6d 6d 61 6e 64 20 74 68 69 73 2d 63 6f 6d 6d 61 6e 64 20 68 rate.last-command.this-command.h
74a0 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 6c 61 73 74 2d 69 6e 66 6f 20 68 61 73 6b 65 6c 6c 2d askell-indent-last-info.haskell-
74c0 69 6e 64 65 6e 74 2d 77 69 74 68 69 6e 2d 6c 69 74 65 72 61 74 65 2d 63 6f 64 65 20 64 65 66 61 indent-within-literate-code.defa
74e0 75 6c 74 2d 76 61 6c 75 65 20 69 6e 64 65 6e 74 2d 6c 69 6e 65 2d 66 75 6e 63 74 69 6f 6e 20 68 ult-value.indent-line-function.h
7500 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 63 75 72 72 65 6e 74 2d 69 6e 64 65 6e 74 61 74 69 6f askell-indent-current-indentatio
7520 6e 20 70 6f 69 6e 74 2d 6d 61 72 6b 65 72 20 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 n.point-marker.beginning-of-line
7540 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 62 61 63 6b 2d 74 6f 2d 69 6e 64 65 6e 74 61 74 .haskell-indent-back-to-indentat
7560 69 6f 6e 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 2d 69 ion.haskell-indent-indentation-i
7580 6e 66 6f 20 30 20 32 20 33 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 6c 69 6e 65 2d 74 6f nfo.0.2.3.haskell-indent-line-to
75a0 20 64 65 6c 65 74 65 2d 63 68 61 72 20 31 20 6d 65 73 73 61 67 65 20 22 53 6f 6c 65 20 69 6e 64 .delete-char.1.message."Sole.ind
75c0 65 6e 74 61 74 69 6f 6e 22 20 22 49 6e 64 65 6e 74 20 63 79 63 6c 65 20 28 25 64 29 2e 2e 2e 22 entation"."Indent.cycle.(%d)..."
75e0 20 6d 61 72 6b 65 72 2d 70 6f 73 69 74 69 6f 6e 5d 20 31 30 20 28 23 24 20 2e 20 32 39 34 30 32 .marker-position].10.(#$...29402
7600 29 20 22 2a 22 5d 29 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 )."*"]).(defalias.'haskell-inden
7620 74 2d 72 65 67 69 6f 6e 20 23 5b 35 31 34 20 22 5c 33 30 30 5c 33 30 31 21 5c 32 30 37 22 20 5b t-region.#[514."\300\301!\207".[
7640 65 72 72 6f 72 20 22 41 75 74 6f 2d 72 65 69 6e 64 65 6e 74 61 74 69 6f 6e 20 6f 66 20 61 20 72 error."Auto-reindentation.of.a.r
7660 65 67 69 6f 6e 20 69 73 20 6e 6f 74 20 73 75 70 70 6f 72 74 65 64 22 5d 20 34 20 22 5c 6e 5c 6e egion.is.not.supported"].4."\n\n
7680 28 66 6e 20 53 54 41 52 54 20 45 4e 44 29 22 5d 29 0a 23 40 31 37 35 20 53 68 69 66 74 20 63 6f (fn.START.END)"]).#@175.Shift.co
76a0 6c 75 6d 6e 73 20 69 6e 20 52 45 47 49 4f 4e 2d 53 54 41 43 4b 20 74 6f 20 67 6f 20 74 6f 20 44 lumns.in.REGION-STACK.to.go.to.D
76c0 45 53 54 2d 43 4f 4c 55 4d 4e 2e 0a 45 6c 65 6d 65 6e 74 73 20 6f 66 20 74 68 65 20 73 74 61 63 EST-COLUMN..Elements.of.the.stac
76e0 6b 20 61 72 65 20 70 61 69 72 73 20 6f 66 20 70 6f 69 6e 74 73 20 67 69 76 69 6e 67 20 74 68 65 k.are.pairs.of.points.giving.the
7700 20 73 74 61 72 74 20 61 6e 64 20 65 6e 64 0a 6f 66 20 74 68 65 20 72 65 67 69 6f 6e 73 20 74 6f .start.and.end.of.the.regions.to
7720 20 6d 6f 76 65 2e 0a 0a 28 66 6e 20 44 45 53 54 2d 43 4f 4c 55 4d 4e 20 52 45 47 49 4f 4e 2d 53 .move...(fn.DEST-COLUMN.REGION-S
7740 54 41 43 4b 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 TACK)..(defalias.'haskell-indent
7760 2d 73 68 69 66 74 2d 63 6f 6c 75 6d 6e 73 20 23 5b 35 31 34 20 22 5c 33 30 30 5c 32 31 31 5c 32 -shift-columns.#[514."\300\211\2
7780 31 31 5c 32 31 31 04 5c 32 31 31 41 5c 32 36 32 06 5c 32 34 32 5c 32 31 31 5c 32 36 32 05 5c 32 11\211.\211A\262.\242\211\262.\2
77a0 30 35 60 00 5c 33 30 31 04 41 21 5c 32 36 32 01 03 40 62 5c 32 31 30 69 5c 32 36 32 03 05 03 5a 05`.\301.A!\262..@b\210i\262...Z
77c0 5c 32 36 32 02 01 5c 33 30 32 55 5c 32 30 34 04 00 5c 33 30 33 32 5c 5c 00 60 5c 33 30 34 02 21 \262..\302U\204..\3032\\.`\304.!
77e0 58 5c 32 30 35 5b 00 01 5c 33 30 32 57 5c 32 30 33 43 00 5c 33 30 35 02 5b 5c 33 30 30 5c 22 5c X\205[..\302W\203C.\305.[\300\"\
7800 32 31 30 5c 32 30 32 48 00 5c 33 30 36 5c 33 30 37 03 5c 22 5c 32 31 30 5c 33 31 30 7f 5c 32 31 210\202H.\306\307.\"\210\310.\21
7820 30 6d 5c 32 30 33 54 00 5c 33 31 31 5c 33 30 33 5c 33 30 30 5c 22 5c 32 31 30 5c 33 31 32 03 21 0m\203T.\311\303\300\"\210\312.!
7840 5c 32 31 30 5c 32 30 32 2c 00 30 5c 32 31 30 5c 32 30 32 04 00 5c 32 30 37 22 20 5b 6e 69 6c 20 \210\202,.0\210\202..\207".[nil.
7860 63 6f 70 79 2d 6d 61 72 6b 65 72 20 30 20 65 6e 64 2d 6f 66 2d 62 75 66 66 65 72 20 6d 61 72 6b copy-marker.0.end-of-buffer.mark
7880 65 72 2d 70 6f 73 69 74 69 6f 6e 20 62 61 63 6b 77 61 72 64 2d 64 65 6c 65 74 65 2d 63 68 61 72 er-position.backward-delete-char
78a0 2d 75 6e 74 61 62 69 66 79 20 69 6e 73 65 72 74 2d 63 68 61 72 20 33 32 20 32 20 74 68 72 6f 77 -untabify.insert-char.32.2.throw
78c0 20 6d 6f 76 65 2d 74 6f 2d 63 6f 6c 75 6d 6e 5d 20 39 20 28 23 24 20 2e 20 33 30 33 36 30 29 5d .move-to-column].9.(#$...30360)]
78e0 29 0a 23 40 31 35 38 20 41 6c 69 67 6e 20 67 75 61 72 64 73 20 6f 72 20 72 68 73 20 77 69 74 68 ).#@158.Align.guards.or.rhs.with
7900 69 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 64 65 66 69 6e 69 74 69 6f 6e 20 62 65 66 6f 72 65 in.the.current.definition.before
7920 20 70 6f 69 6e 74 2e 0a 49 66 20 50 2d 41 52 47 20 69 73 20 74 20 61 6c 69 67 6e 20 61 6c 6c 20 .point..If.P-ARG.is.t.align.all.
7940 64 65 66 73 20 75 70 20 74 6f 20 74 68 65 20 6d 61 72 6b 2e 0a 54 59 50 45 20 69 73 20 65 69 74 defs.up.to.the.mark..TYPE.is.eit
7960 68 65 72 20 27 67 75 61 72 64 20 6f 72 20 27 72 68 73 2e 0a 0a 28 66 6e 20 50 2d 41 52 47 20 54 her.'guard.or.'rhs...(fn.P-ARG.T
7980 59 50 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 2d YPE)..(defalias.'haskell-indent-
79a0 61 6c 69 67 6e 2d 64 65 66 20 23 5b 35 31 34 20 22 5c 32 31 32 5c 33 30 31 5c 32 31 31 02 5c 33 align-def.#[514."\212\301\211.\3
79c0 30 32 3d 5c 32 30 33 0d 00 08 5c 32 30 32 0e 00 5c 33 30 33 5c 33 30 31 5c 32 31 31 5c 32 31 31 02=\203...\202..\303\301\211\211
79e0 5c 32 31 31 5c 32 31 31 5c 32 31 31 5c 32 31 31 5c 32 31 31 5c 32 31 31 5c 32 31 31 06 0e 5c 32 \211\211\211\211\211\211\211..\2
7a00 30 33 4d 00 5c 33 30 34 20 5c 32 30 33 46 00 5c 33 30 34 20 60 56 5c 32 30 33 2c 00 5c 33 30 35 03M.\304.\203F.\304.`V\203,.\305
7a20 20 5c 32 31 30 5c 32 31 32 5c 33 30 34 20 62 5c 32 31 30 5c 33 30 36 20 29 5c 32 36 32 0d 5c 33 .\210\212\304.b\210\306.)\262.\3
7a40 30 37 20 5c 32 30 33 3f 00 5c 33 31 30 5c 33 31 31 21 5c 32 31 30 5c 33 31 32 20 5c 32 36 32 5c 07.\203?.\310\311!\210\312.\262\
7a60 66 5c 32 30 32 55 00 5c 33 31 33 5c 33 31 34 21 5c 32 31 30 5c 32 30 32 55 00 5c 33 31 35 20 5c f\202U.\313\314!\210\202U.\315.\
7a80 32 36 32 0d 5c 33 31 32 20 5c 32 36 32 5c 66 5c 33 31 36 5c 33 31 37 06 0e 06 0e 5c 22 21 5c 32 262.\312.\262\f\316\317....\"!\2
7aa0 36 32 5c 6e 06 09 40 5c 32 36 32 05 06 07 5c 32 30 34 5c 32 33 33 00 06 09 5c 32 30 33 5c 32 33 62\n..@\262...\204\233...\203\23
7ac0 33 00 06 09 5c 32 31 31 41 5c 32 36 32 0b 5c 32 34 32 62 5c 32 31 30 5c 33 32 30 06 0d 60 5c 22 3...\211A\262.\242b\210\320..`\"
7ae0 5c 32 30 34 64 00 5c 33 32 31 60 06 0d 5c 22 5c 32 36 32 09 5c 33 32 32 06 09 38 5c 32 30 33 64 \204d.\321`..\"\262.\322..8\203d
7b00 00 06 08 40 5c 32 36 32 07 06 08 41 40 5c 32 36 32 08 5c 32 30 32 64 00 06 06 5c 32 30 35 5c 33 ...@\262...A@\262.\202d...\205\3
7b20 32 30 01 06 0e 5c 32 30 33 5c 32 35 30 00 5c 33 32 33 5c 32 36 32 08 5c 33 32 34 06 07 21 5c 32 20...\203\250.\323\262.\324..!\2
7b40 36 32 06 04 62 5c 32 31 30 5c 33 31 32 20 5c 32 36 32 5c 66 5c 33 32 35 32 1e 01 5c 32 31 31 3f 62..b\210\312.\262\f\3252..\211?
7b60 5c 32 30 35 1d 01 60 06 0d 59 5c 32 30 35 1d 01 5c 33 32 36 20 06 06 58 5c 32 30 33 5c 33 36 31 \205..`..Y\205..\326...X\203\361
7b80 00 5c 33 32 37 06 06 21 5c 32 31 30 5c 33 33 30 06 08 21 5c 32 30 33 5c 33 35 33 00 5c 33 32 30 .\327..!\210\330..!\203\353.\320
7ba0 06 0d 60 5c 22 5c 32 30 34 5c 33 35 33 00 60 5c 33 33 31 42 02 42 5c 32 36 32 02 5c 32 30 32 5c ..`\"\204\353.`\331B.B\262.\202\
7bc0 6e 01 5c 33 33 32 5c 32 36 32 01 5c 32 30 32 5c 6e 01 5c 33 33 33 20 5c 32 31 30 5c 33 33 34 20 n.\332\262.\202\n.\333.\210\334.
7be0 5c 33 33 35 3d 5c 32 30 33 5c 6e 01 5c 33 32 30 06 0d 60 5c 22 5c 32 30 34 5c 6e 01 60 5c 33 33 \335=\203\n.\320..`\"\204\n.`\33
7c00 36 42 02 42 5c 32 36 32 02 6f 5c 32 30 33 16 01 5c 33 33 37 5c 33 32 35 5c 33 30 31 5c 22 5c 32 6B.B\262.o\203..\337\325\301\"\2
7c20 31 30 5c 32 30 32 5c 32 37 31 00 5c 33 34 30 5c 33 34 31 21 5c 32 31 30 5c 32 30 32 5c 32 37 31 10\202\271.\340\341!\210\202\271
7c40 00 30 5c 32 31 30 01 5c 32 30 33 34 01 01 40 41 5c 33 33 36 3d 5c 32 30 33 34 01 01 5c 32 31 31 .0\210.\2034..@A\336=\2034..\211
7c60 41 5c 32 36 32 03 5c 32 31 30 5c 32 30 32 1f 01 01 5c 32 30 33 5c 33 30 37 01 01 40 40 02 41 5c A\262.\210\202...\203\307..@@.A\
7c80 32 30 33 51 01 5c 32 31 32 02 41 40 40 62 5c 32 31 30 5c 33 31 30 5c 33 31 31 21 5c 32 31 30 5c 203Q.\212.A@@b\210\310\311!\210\
7ca0 33 31 32 20 29 5c 32 30 32 53 01 06 5c 66 5c 32 36 32 05 5c 33 32 31 01 06 06 5c 22 5c 32 36 32 312.)\202S..\f\262.\321...\"\262
7cc0 5c 6e 5c 32 31 30 06 0d 5c 33 33 35 3d 5c 32 30 33 6d 01 5c 33 34 32 06 09 38 5c 32 36 32 05 5c \n\210..\335=\203m.\342..8\262.\
7ce0 32 30 32 5c 32 32 32 01 5c 33 32 32 06 09 38 5c 33 34 33 06 5c 6e 38 01 5c 32 30 33 5c 32 31 35 202\222.\322..8\343.\n8.\203\215
7d00 01 5c 32 31 31 5c 32 30 33 5c 32 31 35 01 5c 33 32 34 02 21 5c 33 32 34 02 21 56 5c 32 30 33 5c .\211\203\215.\324.!\324.!V\203\
7d20 32 31 35 01 5c 32 31 31 5c 32 36 32 07 5c 32 30 32 5c 32 32 30 01 01 5c 32 36 32 07 5c 32 36 36 215.\211\262.\202\220..\262.\266
7d40 02 04 5c 32 30 33 5c 32 37 36 01 04 04 5c 32 30 36 5c 32 33 34 01 05 42 03 42 5c 32 36 32 03 06 ..\203\276...\206\234..B.B\262..
7d60 5c 6e 05 62 5c 32 31 30 5c 33 34 34 5c 33 30 36 20 78 5c 32 31 30 5c 33 30 37 20 5c 32 30 33 5c \n.b\210\344\306.x\210\307.\203\
7d80 32 36 37 01 5c 33 32 34 06 06 21 5c 32 30 32 5c 32 37 33 01 5c 33 32 34 60 21 54 5d 5c 32 36 32 267.\324..!\202\273.\324`!T]\262
7da0 0b 01 5c 32 31 31 41 5c 32 36 32 03 5c 32 31 30 5c 32 30 32 34 01 02 5c 32 30 35 5c 33 32 30 01 ..\211A\262.\210\2024..\205\320.
7dc0 5c 33 34 35 06 0b 04 5c 22 5c 32 36 36 5c 32 31 35 29 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c \345...\"\266\215)\207".[haskell
7de0 2d 69 6e 64 65 6e 74 2d 72 68 73 2d 61 6c 69 67 6e 2d 63 6f 6c 75 6d 6e 20 6e 69 6c 20 72 68 73 -indent-rhs-align-column.nil.rhs
7e00 20 30 20 6d 61 72 6b 20 65 78 63 68 61 6e 67 65 2d 70 6f 69 6e 74 2d 61 6e 64 2d 6d 61 72 6b 20 .0.mark.exchange-point-and-mark.
7e20 6c 69 6e 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 70 6f 73 69 74 69 6f 6e 20 68 61 73 6b 65 6c 6c 2d line-beginning-position.haskell-
7e40 69 6e 64 65 6e 74 2d 62 6f 6c 70 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 66 6f 72 77 61 indent-bolp.haskell-indent-forwa
7e60 72 64 2d 6c 69 6e 65 20 2d 31 20 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e 20 65 72 72 rd-line.-1.line-end-position.err
7e80 6f 72 20 22 54 68 65 20 6d 61 72 6b 20 69 73 20 6e 6f 74 20 73 65 74 20 66 6f 72 20 61 6c 69 67 or."The.mark.is.not.set.for.alig
7ea0 6e 69 6e 67 20 64 65 66 69 6e 69 74 69 6f 6e 73 22 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 ning.definitions".haskell-indent
7ec0 2d 73 74 61 72 74 2d 6f 66 2d 64 65 66 20 72 65 76 65 72 73 65 20 68 61 73 6b 65 6c 6c 2d 69 6e -start-of-def.reverse.haskell-in
7ee0 64 65 6e 74 2d 63 6f 6e 74 6f 75 72 2d 6c 69 6e 65 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 dent-contour-line.haskell-indent
7f00 2d 6f 70 65 6e 2d 73 74 72 75 63 74 75 72 65 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 73 -open-structure.haskell-indent-s
7f20 65 70 61 72 61 74 65 2d 76 61 6c 64 65 66 20 35 20 22 5c 5c 3c 5c 5c 7c 28 22 20 68 61 73 6b 65 eparate-valdef.5."\\<\\|(".haske
7f40 6c 6c 2d 69 6e 64 65 6e 74 2d 70 6f 69 6e 74 2d 74 6f 2d 63 6f 6c 20 74 6f 70 2d 6f 66 2d 62 75 ll-indent-point-to-col.top-of-bu
7f60 66 66 65 72 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 63 75 72 72 65 6e 74 2d 69 6e 64 65 ffer.haskell-indent-current-inde
7f80 6e 74 61 74 69 6f 6e 20 6d 6f 76 65 2d 74 6f 2d 63 6f 6c 75 6d 6e 20 6c 6f 6f 6b 69 6e 67 2d 61 ntation.move-to-column.looking-a
7fa0 74 20 65 71 6e 20 74 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 62 61 63 6b 2d 74 6f 2d 69 t.eqn.t.haskell-indent-back-to-i
7fc0 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 2d 74 79 70 65 2d 61 ndentation.haskell-indent-type-a
7fe0 74 2d 70 6f 69 6e 74 20 67 75 61 72 64 20 67 64 20 74 68 72 6f 77 20 68 61 73 6b 65 6c 6c 2d 69 t-point.guard.gd.throw.haskell-i
8000 6e 64 65 6e 74 2d 62 61 63 6b 77 61 72 64 2d 74 6f 2d 69 6e 64 65 6e 74 61 74 69 6f 6e 20 31 20 ndent-backward-to-indentation.1.
8020 33 20 36 20 22 20 09 22 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 73 68 69 66 74 2d 63 6f 3.6."..".haskell-indent-shift-co
8040 6c 75 6d 6e 73 5d 20 32 30 20 28 23 24 20 2e 20 33 30 39 35 32 29 5d 29 0a 23 40 39 32 20 41 6c lumns].20.(#$...30952)]).#@92.Al
8060 69 67 6e 20 74 68 65 20 67 75 61 72 64 73 20 61 6e 64 20 72 68 73 20 6f 66 20 66 75 6e 63 74 69 ign.the.guards.and.rhs.of.functi
8080 6f 6e 73 20 69 6e 20 74 68 65 20 72 65 67 69 6f 6e 2c 20 77 68 69 63 68 20 6d 75 73 74 20 62 65 ons.in.the.region,.which.must.be
80a0 20 61 63 74 69 76 65 2e 0a 0a 28 66 6e 20 53 54 41 52 54 20 45 4e 44 29 1f 0a 28 64 65 66 61 6c .active...(fn.START.END)..(defal
80c0 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 61 6c 69 67 6e 2d 67 75 61 72 64 73 ias.'haskell-indent-align-guards
80e0 2d 61 6e 64 2d 72 68 73 20 23 5b 35 31 34 20 22 5c 33 30 30 5c 33 30 31 5c 33 30 32 5c 22 5c 32 -and-rhs.#[514."\300\301\302\"\2
8100 31 30 5c 33 30 30 5c 33 30 31 5c 33 30 33 5c 22 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 69 10\300\301\303\"\207".[haskell-i
8120 6e 64 65 6e 74 2d 61 6c 69 67 6e 2d 64 65 66 20 74 20 67 75 61 72 64 20 72 68 73 5d 20 35 20 28 ndent-align-def.t.guard.rhs].5.(
8140 23 24 20 2e 20 33 32 38 36 32 29 20 22 2a 72 22 5d 29 0a 23 40 37 30 20 49 6e 73 65 72 74 20 61 #$...32862)."*r"]).#@70.Insert.a
8160 6e 20 3d 20 73 69 67 6e 20 61 6e 64 20 61 6c 69 67 6e 20 74 68 65 20 70 72 65 76 69 6f 75 73 20 n.=.sign.and.align.the.previous.
8180 72 68 73 20 6f 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 66 75 6e 63 74 69 6f 6e 2e 1f 0a 28 64 rhs.of.the.current.function...(d
81a0 65 66 61 6c 69 61 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 69 6e 73 65 72 74 2d 65 efalias.'haskell-indent-insert-e
81c0 71 75 61 6c 20 23 5b 30 20 22 5c 33 30 30 20 5c 32 30 34 0b 00 68 5c 33 30 31 55 5c 32 30 34 0e qual.#[0."\300.\204..h\301U\204.
81e0 00 5c 33 30 31 63 5c 32 31 30 5c 33 30 32 63 5c 32 31 30 5c 33 30 33 5c 33 30 34 20 5c 33 30 35 .\301c\210\302c\210\303\304.\305
8200 5c 22 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 62 6f 6c 70 20 33 32 20 \"\207".[haskell-indent-bolp.32.
8220 22 3d 20 22 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 61 6c 69 67 6e 2d 64 65 66 20 68 61 "=.".haskell-indent-align-def.ha
8240 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 6d 61 72 6b 2d 61 63 74 69 76 65 20 72 68 73 5d 20 33 20 skell-indent-mark-active.rhs].3.
8260 28 23 24 20 2e 20 33 33 31 31 32 29 20 22 2a 22 5d 29 0a 23 40 31 35 32 20 49 6e 73 65 72 74 20 (#$...33112)."*"]).#@152.Insert.
8280 61 6e 64 20 61 6c 69 67 6e 20 61 20 67 75 61 72 64 20 73 69 67 6e 20 28 7c 29 20 66 6f 6c 6c 6f and.align.a.guard.sign.(|).follo
82a0 77 65 64 20 62 79 20 6f 70 74 69 6f 6e 61 6c 20 54 45 58 54 2e 0a 41 6c 69 67 6e 6d 65 6e 74 20 wed.by.optional.TEXT..Alignment.
82c0 77 6f 72 6b 73 20 6f 6e 6c 79 20 69 66 20 61 6c 6c 20 67 75 61 72 64 73 20 61 72 65 20 74 6f 20 works.only.if.all.guards.are.to.
82e0 74 68 65 20 73 6f 75 74 68 2d 65 61 73 74 20 6f 66 20 74 68 65 69 72 20 7c 2e 0a 0a 28 66 6e 20 the.south-east.of.their.|...(fn.
8300 26 6f 70 74 69 6f 6e 61 6c 20 54 45 58 54 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 68 61 73 6b &optional.TEXT)..(defalias.'hask
8320 65 6c 6c 2d 69 6e 64 65 6e 74 2d 69 6e 73 65 72 74 2d 67 75 61 72 64 20 23 5b 32 35 36 20 22 5c ell-indent-insert-guard.#[256."\
8340 33 30 30 20 5c 32 30 33 09 00 5c 33 30 31 5c 32 30 32 5c 6e 00 68 60 5c 33 30 32 5a 66 5c 32 30 300.\203..\301\202\n.h`\302Zf\20
8360 36 12 00 5c 33 30 33 01 5c 33 30 34 55 5c 32 30 33 24 00 5c 32 31 31 5c 33 30 35 55 5c 32 30 34 6..\303.\304U\203$.\211\305U\204
8380 3f 00 5c 33 30 36 63 5c 32 31 30 5c 32 30 32 3f 00 01 5c 33 30 35 55 5c 32 30 33 3c 00 5c 32 31 ?.\306c\210\202?..\305U\203<.\21
83a0 31 5c 33 30 35 55 5c 32 30 33 36 00 5c 33 30 37 63 5c 32 31 30 5c 32 30 32 3f 00 5c 33 31 30 63 1\305U\2036.\307c\210\202?.\310c
83c0 5c 32 31 30 5c 32 30 32 3f 00 5c 33 30 37 63 5c 32 31 30 02 5c 32 30 33 46 00 02 63 5c 32 31 30 \210\202?.\307c\210.\203F..c\210
83e0 5c 33 31 31 5c 33 31 32 20 5c 33 31 33 5c 22 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 69 6e \311\312.\313\"\207".[haskell-in
8400 64 65 6e 74 2d 62 6f 6c 70 20 31 30 20 32 20 30 20 33 32 20 31 32 34 20 22 7c 20 22 20 22 20 7c dent-bolp.10.2.0.32.124."|.".".|
8420 20 22 20 22 20 22 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 61 6c 69 67 6e 2d 64 65 66 20 .".".".haskell-indent-align-def.
8440 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 6d 61 72 6b 2d 61 63 74 69 76 65 20 67 75 61 72 64 haskell-indent-mark-active.guard
8460 5d 20 36 20 28 23 24 20 2e 20 33 33 34 30 31 29 20 22 2a 22 5d 29 0a 23 40 31 30 36 20 49 6e 73 ].6.(#$...33401)."*"]).#@106.Ins
8480 65 72 74 20 61 20 67 75 61 72 64 20 73 69 67 6e 20 28 7c 29 20 66 6f 6c 6c 6f 77 65 64 20 62 79 ert.a.guard.sign.(|).followed.by
84a0 20 60 6f 74 68 65 72 77 69 73 65 27 2e 0a 41 6c 73 6f 20 61 6c 69 67 6e 20 74 68 65 20 70 72 65 .`otherwise'..Also.align.the.pre
84c0 76 69 6f 75 73 20 67 75 61 72 64 73 20 6f 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 66 75 6e 63 vious.guards.of.the.current.func
84e0 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
8500 2d 69 6e 73 65 72 74 2d 6f 74 68 65 72 77 69 73 65 20 23 5b 30 20 22 5c 33 30 30 5c 33 30 31 21 -insert-otherwise.#[0."\300\301!
8520 5c 32 31 30 5c 33 30 32 20 5c 32 30 37 22 20 5b 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 69 \210\302.\207".[haskell-indent-i
8540 6e 73 65 72 74 2d 67 75 61 72 64 20 22 6f 74 68 65 72 77 69 73 65 22 20 68 61 73 6b 65 6c 6c 2d nsert-guard."otherwise".haskell-
8560 69 6e 64 65 6e 74 2d 69 6e 73 65 72 74 2d 65 71 75 61 6c 5d 20 32 20 28 23 24 20 2e 20 33 33 39 indent-insert-equal].2.(#$...339
8580 31 37 29 20 22 2a 22 5d 29 0a 23 40 39 31 20 49 6e 73 65 72 74 20 61 20 77 68 65 72 65 20 6b 65 17)."*"]).#@91.Insert.a.where.ke
85a0 79 77 6f 72 64 20 61 74 20 70 6f 69 6e 74 20 61 6e 64 20 69 6e 64 65 6e 74 20 72 65 73 75 6c 74 yword.at.point.and.indent.result
85c0 69 6e 67 20 6c 69 6e 65 2e 0a 4f 6e 65 20 69 6e 64 65 6e 74 61 74 69 6f 6e 20 63 79 63 6c 65 20 ing.line..One.indentation.cycle.
85e0 69 73 20 75 73 65 64 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 is.used...(defalias.'haskell-ind
8600 65 6e 74 2d 69 6e 73 65 72 74 2d 77 68 65 72 65 20 23 5b 30 20 22 5c 33 30 30 63 5c 32 31 30 5c ent-insert-where.#[0."\300c\210\
8620 33 30 31 20 5c 32 30 37 22 20 5b 22 77 68 65 72 65 20 22 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 301.\207".["where.".haskell-inde
8640 6e 74 2d 63 79 63 6c 65 5d 20 31 20 28 23 24 20 2e 20 33 34 31 39 31 29 20 22 2a 22 5d 29 0a 23 nt-cycle].1.(#$...34191)."*"]).#
8660 40 37 32 20 4e 6f 6e 2d 6e 69 6c 20 69 66 20 74 68 65 20 73 65 6d 69 2d 69 6e 74 65 6c 6c 69 67 @72.Non-nil.if.the.semi-intellig
8680 65 6e 74 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 69 73 20 ent.Haskell.indentation.mode.is.
86a0 69 6e 20 65 66 66 65 63 74 2e 1f 0a 28 64 65 66 76 61 72 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 in.effect...(defvar.haskell-inde
86c0 6e 74 2d 6d 6f 64 65 20 6e 69 6c 20 28 23 24 20 2e 20 33 34 34 30 34 29 29 0a 28 6d 61 6b 65 2d nt-mode.nil.(#$...34404)).(make-
86e0 76 61 72 69 61 62 6c 65 2d 62 75 66 66 65 72 2d 6c 6f 63 61 6c 20 27 68 61 73 6b 65 6c 6c 2d 69 variable-buffer-local.'haskell-i
8700 6e 64 65 6e 74 2d 6d 6f 64 65 29 0a 28 64 65 66 76 61 72 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 ndent-mode).(defvar.haskell-inde
8720 6e 74 2d 6d 61 70 20 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 30 20 5c 33 30 31 01 5c 33 30 nt-map.(byte-code."\300.\301.\30
8740 32 5c 33 30 33 23 5c 32 31 30 5c 33 30 31 01 5c 33 30 34 5c 33 30 35 23 5c 32 31 30 5c 33 30 31 2\303#\210\301.\304\305#\210\301
8760 01 5c 33 30 36 5c 33 30 37 23 5c 32 31 30 5c 33 30 31 01 5c 33 31 30 5c 33 31 31 23 5c 32 31 30 .\306\307#\210\301.\310\311#\210
8780 5c 33 30 31 01 5c 33 31 32 5c 33 31 33 23 5c 32 31 30 5c 33 30 31 01 5c 33 31 34 5c 33 31 35 23 \301.\312\313#\210\301.\314\315#
87a0 5c 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 \210\211\207".[make-sparse-keyma
87c0 70 20 64 65 66 69 6e 65 2d 6b 65 79 20 5b 33 20 36 37 31 30 38 39 32 35 5d 20 68 61 73 6b 65 6c p.define-key.[3.67108925].haskel
87e0 6c 2d 69 6e 64 65 6e 74 2d 69 6e 73 65 72 74 2d 65 71 75 61 6c 20 5b 33 20 36 37 31 30 38 39 38 l-indent-insert-equal.[3.6710898
8800 38 5d 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 69 6e 73 65 72 74 2d 67 75 61 72 64 20 22 8].haskell-indent-insert-guard."
8820 03 0f 22 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 69 6e 73 65 72 74 2d 6f 74 68 65 72 77 ..".haskell-indent-insert-otherw
8840 69 73 65 20 22 03 17 22 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 69 6e 73 65 72 74 2d 77 ise."..".haskell-indent-insert-w
8860 68 65 72 65 20 5b 33 20 36 37 31 30 38 39 31 30 5d 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 here.[3.67108910].haskell-indent
8880 2d 61 6c 69 67 6e 2d 67 75 61 72 64 73 2d 61 6e 64 2d 72 68 73 20 5b 33 20 36 37 31 30 38 39 32 -align-guards-and-rhs.[3.6710892
88a0 36 5d 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 70 75 74 2d 72 65 67 69 6f 6e 2d 69 6e 2d 6].haskell-indent-put-region-in-
88c0 6c 69 74 65 72 61 74 65 5d 20 35 29 29 0a 23 40 35 31 20 54 75 72 6e 20 6f 6e 20 60 60 69 6e 74 literate].5)).#@51.Turn.on.``int
88e0 65 6c 6c 69 67 65 6e 74 27 27 20 48 61 73 6b 65 6c 6c 20 69 6e 64 65 6e 74 61 74 69 6f 6e 20 6d elligent''.Haskell.indentation.m
8900 6f 64 65 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 74 75 72 6e 2d 6f 6e 2d 68 61 73 6b 65 6c 6c ode...(defalias.'turn-on-haskell
8920 2d 69 6e 64 65 6e 74 20 23 5b 30 20 22 5c 33 30 35 5c 33 30 30 21 5c 32 30 33 14 00 08 5c 32 30 -indent.#[0."\305\300!\203...\20
8940 33 14 00 5c 33 30 36 5c 33 30 30 21 5c 32 30 33 14 00 5c 33 30 30 5c 33 30 37 21 5c 32 31 30 5c 3..\306\300!\203..\300\307!\210\
8960 33 31 30 5c 33 30 31 21 5c 32 31 30 5c 33 31 31 11 5c 33 31 30 5c 33 30 32 21 5c 32 31 30 5c 33 310\301!\210\311.\310\302!\210\3
8980 31 32 12 5c 33 31 33 13 5c 33 31 34 20 5c 32 31 31 5c 32 30 33 36 00 5c 32 31 31 5c 66 3d 5c 32 12.\313.\314.\211\2036.\211\f=\2
89a0 30 34 36 00 5c 33 31 35 01 21 5c 32 36 32 01 5c 32 30 32 24 00 5c 32 31 31 5c 32 30 34 4d 00 5c 046.\315.!\262.\202$.\211\204M.\
89c0 33 31 36 5c 66 5c 33 31 34 20 5c 22 5c 32 31 30 5c 33 31 37 20 5c 32 36 32 01 5c 33 31 36 01 5c 316\f\314.\"\210\317.\262.\316.\
89e0 66 5c 22 5c 32 31 30 5c 33 32 30 01 21 5c 32 31 30 5c 32 31 30 5c 33 32 31 5c 33 32 32 21 5c 32 f\"\210\320.!\210\210\321\322!\2
8a00 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 64 65 20 69 6e 07".[haskell-indentation-mode.in
8a20 64 65 6e 74 2d 6c 69 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 dent-line-function.indent-region
8a40 2d 66 75 6e 63 74 69 6f 6e 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 6d 6f 64 65 20 68 61 -function.haskell-indent-mode.ha
8a60 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 6d 61 70 20 62 6f 75 6e 64 70 20 66 62 6f 75 6e 64 70 20 skell-indent-map.boundp.fboundp.
8a80 30 20 6d 61 6b 65 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 20 68 61 73 6b 65 6c 6c 2d 69 6e 0.make-local-variable.haskell-in
8aa0 64 65 6e 74 2d 63 79 63 6c 65 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 72 65 67 69 6f 6e dent-cycle.haskell-indent-region
8ac0 20 74 20 63 75 72 72 65 6e 74 2d 6c 6f 63 61 6c 2d 6d 61 70 20 6b 65 79 6d 61 70 2d 70 61 72 65 .t.current-local-map.keymap-pare
8ae0 6e 74 20 73 65 74 2d 6b 65 79 6d 61 70 2d 70 61 72 65 6e 74 20 6d 61 6b 65 2d 73 70 61 72 73 65 nt.set-keymap-parent.make-sparse
8b00 2d 6b 65 79 6d 61 70 20 75 73 65 2d 6c 6f 63 61 6c 2d 6d 61 70 20 72 75 6e 2d 68 6f 6f 6b 73 20 -keymap.use-local-map.run-hooks.
8b20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 68 6f 6f 6b 5d 20 34 20 28 23 24 20 2e 20 33 35 30 haskell-indent-hook].4.(#$...350
8b40 32 37 29 5d 29 0a 23 40 35 32 20 54 75 72 6e 20 6f 66 66 20 60 60 69 6e 74 65 6c 6c 69 67 65 6e 27)]).#@52.Turn.off.``intelligen
8b60 74 27 27 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 2e 1f 0a 28 t''.Haskell.indentation.mode...(
8b80 64 65 66 61 6c 69 61 73 20 27 74 75 72 6e 2d 6f 66 66 2d 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e defalias.'turn-off-haskell-inden
8ba0 74 20 23 5b 30 20 22 5c 33 30 32 5c 33 30 33 21 5c 32 31 30 5c 33 30 32 5c 33 30 34 21 5c 32 31 t.#[0."\302\303!\210\302\304!\21
8bc0 30 5c 33 30 35 20 5c 32 31 31 5c 32 30 33 28 00 5c 33 30 36 01 21 08 01 3d 5c 32 30 33 21 00 5c 0\305.\211\203(.\306.!..=\203!.\
8be0 33 30 37 02 5c 33 30 36 03 21 5c 22 5c 32 31 30 5c 32 30 32 24 00 5c 32 31 31 5c 32 36 32 02 5c 307.\306.!\"\210\202$.\211\262.\
8c00 32 31 30 5c 32 30 32 5c 6e 00 5c 32 31 30 5c 33 31 30 5c 32 31 31 11 5c 32 30 37 22 20 5b 68 61 210\202\n.\210\310\211.\207".[ha
8c20 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 6d 61 70 20 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d skell-indent-map.haskell-indent-
8c40 6d 6f 64 65 20 6b 69 6c 6c 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 20 69 6e 64 65 6e 74 2d mode.kill-local-variable.indent-
8c60 6c 69 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 line-function.indent-region-func
8c80 74 69 6f 6e 20 63 75 72 72 65 6e 74 2d 6c 6f 63 61 6c 2d 6d 61 70 20 6b 65 79 6d 61 70 2d 70 61 tion.current-local-map.keymap-pa
8ca0 72 65 6e 74 20 73 65 74 2d 6b 65 79 6d 61 70 2d 70 61 72 65 6e 74 20 6e 69 6c 5d 20 36 20 28 23 rent.set-keymap-parent.nil].6.(#
8cc0 24 20 2e 20 33 35 36 35 39 29 5d 29 0a 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 30 5c 33 30 $...35659)]).(byte-code."\300\30
8ce0 31 5c 33 30 32 21 5c 32 33 36 5c 32 30 34 12 00 5c 33 30 33 5c 33 30 32 5c 33 30 34 5c 33 30 31 1\302!\236\204..\303\302\304\301
8d00 5c 33 30 32 21 5c 33 30 35 5c 22 5c 22 5c 32 31 30 5c 33 30 30 5c 32 30 37 22 20 5b 68 61 73 6b \302!\305\"\"\210\300\207".[hask
8d20 65 6c 6c 2d 69 6e 64 65 6e 74 2d 6d 6f 64 65 20 64 65 66 61 75 6c 74 2d 76 61 6c 75 65 20 6d 69 ell-indent-mode.default-value.mi
8d40 6e 6f 72 2d 6d 6f 64 65 2d 61 6c 69 73 74 20 73 65 74 2d 64 65 66 61 75 6c 74 20 61 70 70 65 6e nor-mode-alist.set-default.appen
8d60 64 20 28 28 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 6d 6f 64 65 20 22 20 49 6e 64 22 29 29 d.((haskell-indent-mode.".Ind"))
8d80 5d 20 35 29 0a 23 40 31 30 33 36 20 60 60 49 6e 74 65 6c 6c 69 67 65 6e 74 27 27 20 48 61 73 6b ].5).#@1036.``Intelligent''.Hask
8da0 65 6c 6c 20 69 6e 64 65 6e 74 61 74 69 6f 6e 20 6d 6f 64 65 2e 0a 54 68 69 73 20 64 65 61 6c 73 ell.indentation.mode..This.deals
8dc0 20 77 69 74 68 20 74 68 65 20 6c 61 79 6f 75 74 20 72 75 6c 65 20 6f 66 20 48 61 73 6b 65 6c 6c .with.the.layout.rule.of.Haskell
8de0 2e 0a 5c 5b 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 63 79 63 6c 65 5d 20 73 74 61 72 74 73 ..\[haskell-indent-cycle].starts
8e00 20 74 68 65 20 63 79 63 6c 65 20 77 68 69 63 68 20 70 72 6f 70 6f 73 65 73 20 6e 65 77 0a 70 6f .the.cycle.which.proposes.new.po
8e20 73 73 69 62 69 6c 69 74 69 65 73 20 61 73 20 6c 6f 6e 67 20 61 73 20 74 68 65 20 54 41 42 20 6b ssibilities.as.long.as.the.TAB.k
8e40 65 79 20 69 73 20 70 72 65 73 73 65 64 2e 20 20 41 6e 79 20 6f 74 68 65 72 20 6b 65 79 0a 6f 72 ey.is.pressed...Any.other.key.or
8e60 20 6d 6f 75 73 65 20 63 6c 69 63 6b 20 74 65 72 6d 69 6e 61 74 65 73 20 74 68 65 20 63 79 63 6c .mouse.click.terminates.the.cycl
8e80 65 20 61 6e 64 20 69 73 20 69 6e 74 65 72 70 72 65 74 65 64 20 65 78 63 65 70 74 20 66 6f 72 0a e.and.is.interpreted.except.for.
8ea0 52 45 54 20 77 68 69 63 68 20 6d 65 72 65 6c 79 20 65 78 69 74 73 20 74 68 65 20 63 79 63 6c 65 RET.which.merely.exits.the.cycle
8ec0 2e 0a 4f 74 68 65 72 20 73 70 65 63 69 61 6c 20 6b 65 79 73 20 61 72 65 3a 0a 20 20 20 20 5c 5b ..Other.special.keys.are:.....\[
8ee0 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 69 6e 73 65 72 74 2d 65 71 75 61 6c 5d 0a 20 20 20 haskell-indent-insert-equal]....
8f00 20 20 20 69 6e 73 65 72 74 73 20 61 6e 20 3d 0a 20 20 20 20 5c 5b 68 61 73 6b 65 6c 6c 2d 69 6e ...inserts.an.=.....\[haskell-in
8f20 64 65 6e 74 2d 69 6e 73 65 72 74 2d 67 75 61 72 64 5d 0a 20 20 20 20 20 20 69 6e 73 65 72 74 73 dent-insert-guard].......inserts
8f40 20 61 6e 20 7c 0a 20 20 20 20 5c 5b 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 69 6e 73 65 72 .an.|.....\[haskell-indent-inser
8f60 74 2d 6f 74 68 65 72 77 69 73 65 5d 0a 20 20 20 20 20 20 69 6e 73 65 72 74 73 20 61 6e 20 7c 20 t-otherwise].......inserts.an.|.
8f80 6f 74 68 65 72 77 69 73 65 20 3d 0a 74 68 65 73 65 20 66 75 6e 63 74 69 6f 6e 73 20 61 6c 73 6f otherwise.=.these.functions.also
8fa0 20 61 6c 69 67 6e 20 74 68 65 20 67 75 61 72 64 73 20 61 6e 64 20 72 68 73 20 6f 66 20 74 68 65 .align.the.guards.and.rhs.of.the
8fc0 20 63 75 72 72 65 6e 74 20 64 65 66 69 6e 69 74 69 6f 6e 0a 20 20 20 20 5c 5b 68 61 73 6b 65 6c .current.definition.....\[haskel
8fe0 6c 2d 69 6e 64 65 6e 74 2d 69 6e 73 65 72 74 2d 77 68 65 72 65 5d 0a 20 20 20 20 20 20 69 6e 73 l-indent-insert-where].......ins
9000 65 72 74 73 20 61 20 77 68 65 72 65 20 6b 65 79 77 6f 72 64 0a 20 20 20 20 5c 5b 68 61 73 6b 65 erts.a.where.keyword.....\[haske
9020 6c 6c 2d 69 6e 64 65 6e 74 2d 61 6c 69 67 6e 2d 67 75 61 72 64 73 2d 61 6e 64 2d 72 68 73 5d 0a ll-indent-align-guards-and-rhs].
9040 20 20 20 20 20 20 61 6c 69 67 6e 73 20 74 68 65 20 67 75 61 72 64 73 20 61 6e 64 20 72 68 73 20 ......aligns.the.guards.and.rhs.
9060 6f 66 20 74 68 65 20 72 65 67 69 6f 6e 0a 20 20 20 20 5c 5b 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 of.the.region.....\[haskell-inde
9080 6e 74 2d 70 75 74 2d 72 65 67 69 6f 6e 2d 69 6e 2d 6c 69 74 65 72 61 74 65 5d 0a 20 20 20 20 20 nt-put-region-in-literate]......
90a0 20 6d 61 6b 65 73 20 74 68 65 20 72 65 67 69 6f 6e 20 61 20 70 69 65 63 65 20 6f 66 20 6c 69 74 .makes.the.region.a.piece.of.lit
90c0 65 72 61 74 65 20 63 6f 64 65 20 69 6e 20 61 20 6c 69 74 65 72 61 74 65 20 73 63 72 69 70 74 0a erate.code.in.a.literate.script.
90e0 0a 49 66 20 60 41 52 47 27 20 69 73 20 66 61 6c 73 65 79 2c 20 74 6f 67 67 6c 65 20 60 68 61 73 .If.`ARG'.is.falsey,.toggle.`has
9100 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 6d 6f 64 65 27 2e 20 20 45 6c 73 65 20 73 65 74 73 0a 60 68 kell-indent-mode'...Else.sets.`h
9120 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 6d 6f 64 65 27 20 74 6f 20 77 68 65 74 68 65 72 20 60 askell-indent-mode'.to.whether.`
9140 41 52 47 27 20 69 73 20 67 72 65 61 74 65 72 20 74 68 61 6e 20 30 2e 0a 0a 49 6e 76 6f 6b 65 73 ARG'.is.greater.than.0...Invokes
9160 20 60 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 68 6f 6f 6b 27 20 69 66 20 6e 6f 74 20 6e 69 .`haskell-indent-hook'.if.not.ni
9180 6c 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 69 61 l...(fn.&optional.ARG)..(defalia
91a0 73 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 2d 6d 6f 64 65 20 23 5b 32 35 36 20 22 5c 32 s.'haskell-indent-mode.#[256."\2
91c0 31 31 5c 32 30 34 09 00 08 3f 5c 32 30 32 0e 00 5c 33 30 31 01 21 5c 33 30 32 56 5c 32 31 31 10 11\204...?\202..\301.!\302V\211.
91e0 5c 32 30 33 16 00 5c 33 30 33 20 5c 32 30 37 5c 33 30 34 20 5c 32 30 37 22 20 5b 68 61 73 6b 65 \203..\303.\207\304.\207".[haske
9200 6c 6c 2d 69 6e 64 65 6e 74 2d 6d 6f 64 65 20 70 72 65 66 69 78 2d 6e 75 6d 65 72 69 63 2d 76 61 ll-indent-mode.prefix-numeric-va
9220 6c 75 65 20 30 20 74 75 72 6e 2d 6f 6e 2d 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 20 74 75 72 lue.0.turn-on-haskell-indent.tur
9240 6e 2d 6f 66 66 2d 68 61 73 6b 65 6c 6c 2d 69 6e 64 65 6e 74 5d 20 34 20 28 23 24 20 2e 20 33 36 n-off-haskell-indent].4.(#$...36
9260 32 33 36 29 20 22 50 22 5d 29 0a 28 70 72 6f 76 69 64 65 20 27 68 61 73 6b 65 6c 6c 2d 69 6e 64 236)."P"]).(provide.'haskell-ind
9280 65 6e 74 29 0a ent).