ofs | hex dump | ascii |
---|
0000 | 3b 45 4c 43 17 00 00 00 0a 3b 3b 3b 20 43 6f 6d 70 69 6c 65 64 0a 3b 3b 3b 20 69 6e 20 45 6d 61 | ;ELC.....;;;.Compiled.;;;.in.Ema |
0020 | 63 73 20 76 65 72 73 69 6f 6e 20 32 35 2e 33 2e 31 0a 3b 3b 3b 20 77 69 74 68 20 61 6c 6c 20 6f | cs.version.25.3.1.;;;.with.all.o |
0040 | 70 74 69 6d 69 7a 61 74 69 6f 6e 73 2e 0a 0a 3b 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 63 6f 6e | ptimizations...;;;.This.file.con |
0060 | 74 61 69 6e 73 20 75 74 66 2d 38 20 6e 6f 6e 2d 41 53 43 49 49 20 63 68 61 72 61 63 74 65 72 73 | tains.utf-8.non-ASCII.characters |
0080 | 2c 0a 3b 3b 3b 20 61 6e 64 20 73 6f 20 63 61 6e 6e 6f 74 20 62 65 20 6c 6f 61 64 65 64 20 69 6e | ,.;;;.and.so.cannot.be.loaded.in |
00a0 | 74 6f 20 45 6d 61 63 73 20 32 32 20 6f 72 20 65 61 72 6c 69 65 72 2e 0a 28 61 6e 64 20 28 62 6f | to.Emacs.22.or.earlier..(and.(bo |
00c0 | 75 6e 64 70 20 27 65 6d 61 63 73 2d 76 65 72 73 69 6f 6e 29 0a 20 20 20 20 20 28 3c 20 28 61 72 | undp.'emacs-version)......(<.(ar |
00e0 | 65 66 20 65 6d 61 63 73 2d 76 65 72 73 69 6f 6e 20 28 31 2d 20 28 6c 65 6e 67 74 68 20 65 6d 61 | ef.emacs-version.(1-.(length.ema |
0100 | 63 73 2d 76 65 72 73 69 6f 6e 29 29 29 20 3f 41 29 0a 20 20 20 20 20 28 73 74 72 69 6e 67 2d 6c | cs-version))).?A)......(string-l |
0120 | 65 73 73 70 20 65 6d 61 63 73 2d 76 65 72 73 69 6f 6e 20 22 32 33 22 29 0a 20 20 20 20 20 28 65 | essp.emacs-version."23")......(e |
0140 | 72 72 6f 72 20 22 60 25 73 27 20 77 61 73 20 63 6f 6d 70 69 6c 65 64 20 66 6f 72 20 45 6d 61 63 | rror."`%s'.was.compiled.for.Emac |
0160 | 73 20 32 33 20 6f 72 20 6c 61 74 65 72 22 20 23 24 29 29 0a 0a 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b | s.23.or.later".#$))..;;;;;;;;;;; |
0180 | 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 0a 0a 0a 28 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). |