about summary refs log tree commit diff
path: root/configs/shared/emacs/.emacs.d/elpa/clojure-mode-20180827.1827/clojure-mode.elc
blob: f43c7ec1bca1a09c7fdad07c0c5f02ebe88860ac (plain)
ofshex dumpascii
0000 3b 45 4c 43 17 00 00 00 0a 3b 3b 3b 20 43 6f 6d 70 69 6c 65 64 0a 3b 3b 3b 20 69 6e 20 45 6d 61 ;ELC.....;;;.Compiled.;;;.in.Ema
0020 63 73 20 76 65 72 73 69 6f 6e 20 32 35 2e 33 2e 31 0a 3b 3b 3b 20 77 69 74 68 20 61 6c 6c 20 6f cs.version.25.3.1.;;;.with.all.o
0040 70 74 69 6d 69 7a 61 74 69 6f 6e 73 2e 0a 0a 3b 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 75 73 65 ptimizations...;;;.This.file.use
0060 73 20 64 79 6e 61 6d 69 63 20 64 6f 63 73 74 72 69 6e 67 73 2c 20 66 69 72 73 74 20 61 64 64 65 s.dynamic.docstrings,.first.adde
0080 64 20 69 6e 20 45 6d 61 63 73 20 31 39 2e 32 39 2e 0a 0a 3b 3b 3b 20 54 68 69 73 20 66 69 6c 65 d.in.Emacs.19.29...;;;.This.file
00a0 20 64 6f 65 73 20 6e 6f 74 20 63 6f 6e 74 61 69 6e 20 75 74 66 2d 38 20 6e 6f 6e 2d 41 53 43 49 .does.not.contain.utf-8.non-ASCI
00c0 49 20 63 68 61 72 61 63 74 65 72 73 2c 0a 3b 3b 3b 20 61 6e 64 20 73 6f 20 63 61 6e 20 62 65 20 I.characters,.;;;.and.so.can.be.
00e0 6c 6f 61 64 65 64 20 69 6e 20 45 6d 61 63 73 20 76 65 72 73 69 6f 6e 73 20 65 61 72 6c 69 65 72 loaded.in.Emacs.versions.earlier
0100 20 74 68 61 6e 20 32 33 2e 0a 0a 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b .than.23...;;;;;;;;;;;;;;;;;;;;;
0120 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
0140 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 0a 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b ;;;;;;;;;;;;;;.;;;;;;;;;;;;;;;;;
0160 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
0180 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 0a 0a 0a 28 62 79 74 65 2d 63 6f 64 65 20 ;;;;;;;;;;;;;;;;;;...(byte-code.
01a0 22 5c 33 30 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 30 5c "\300\301!\210\300\302!\210\300\
01c0 33 30 33 21 5c 32 31 30 5c 33 30 30 5c 33 30 34 21 5c 32 31 30 5c 33 30 30 5c 33 30 35 21 5c 32 303!\210\300\304!\210\300\305!\2
01e0 31 30 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 33 31 34 5c 33 10\306\307\310\311\312\313\314\3
0200 31 35 5c 33 31 36 5c 33 31 37 5c 33 31 36 5c 33 32 30 26 0b 5c 32 30 37 22 20 5b 72 65 71 75 69 15\316\317\316\320&.\207".[requi
0220 72 65 20 63 6c 2d 6c 69 62 20 69 6d 65 6e 75 20 6e 65 77 63 6f 6d 6d 65 6e 74 20 61 6c 69 67 6e re.cl-lib.imenu.newcomment.align
0240 20 73 75 62 72 2d 78 20 63 75 73 74 6f 6d 2d 64 65 63 6c 61 72 65 2d 67 72 6f 75 70 20 63 6c 6f .subr-x.custom-declare-group.clo
0260 6a 75 72 65 20 6e 69 6c 20 22 4d 61 6a 6f 72 20 6d 6f 64 65 20 66 6f 72 20 65 64 69 74 69 6e 67 jure.nil."Major.mode.for.editing
0280 20 43 6c 6f 6a 75 72 65 20 63 6f 64 65 2e 22 20 3a 70 72 65 66 69 78 20 22 63 6c 6f 6a 75 72 65 .Clojure.code.".:prefix."clojure
02a0 2d 22 20 3a 67 72 6f 75 70 20 6c 61 6e 67 75 61 67 65 73 20 3a 6c 69 6e 6b 20 28 75 72 6c 2d 6c -".:group.languages.:link.(url-l
02c0 69 6e 6b 20 3a 74 61 67 20 22 47 69 74 48 75 62 22 20 22 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 ink.:tag."GitHub"."https://githu
02e0 62 2e 63 6f 6d 2f 63 6c 6f 6a 75 72 65 2d 65 6d 61 63 73 2f 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 b.com/clojure-emacs/clojure-mode
0300 22 29 20 28 65 6d 61 63 73 2d 63 6f 6d 6d 65 6e 74 61 72 79 2d 6c 69 6e 6b 20 3a 74 61 67 20 22 ").(emacs-commentary-link.:tag."
0320 43 6f 6d 6d 65 6e 74 61 72 79 22 20 22 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 22 29 5d 20 31 32 29 Commentary"."clojure-mode")].12)
0340 0a 23 40 34 30 20 54 68 65 20 63 75 72 72 65 6e 74 20 76 65 72 73 69 6f 6e 20 6f 66 20 60 63 6c .#@40.The.current.version.of.`cl
0360 6f 6a 75 72 65 2d 6d 6f 64 65 27 2e 1f 0a 28 64 65 66 63 6f 6e 73 74 20 63 6c 6f 6a 75 72 65 2d ojure-mode'...(defconst.clojure-
0380 6d 6f 64 65 2d 76 65 72 73 69 6f 6e 20 22 35 2e 38 2e 32 22 20 28 23 24 20 2e 20 38 33 38 29 29 mode-version."5.8.2".(#$...838))
03a0 0a 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 30 5c 33 30 31 5c 33 30 32 5c 33 30 33 5c 33 30 .(byte-code."\300\301\302\303\30
03c0 34 5c 33 30 35 25 5c 32 31 30 5c 33 30 30 5c 33 30 36 5c 33 30 37 5c 33 31 30 5c 33 30 34 5c 33 4\305%\210\300\306\307\310\304\3
03e0 31 31 25 5c 32 31 30 5c 33 31 32 5c 33 31 33 5c 33 31 34 5c 33 31 35 5c 33 31 36 44 44 5c 33 31 11%\210\312\313\314\315\316DD\31
0400 37 5c 33 32 30 5c 33 32 31 5c 33 32 32 5c 33 32 33 5c 33 30 34 5c 33 32 34 26 09 5c 32 31 30 5c 7\320\321\322\323\304\324&.\210\
0420 33 32 35 5c 33 32 36 5c 33 31 33 5c 33 32 37 23 5c 32 31 30 5c 33 33 30 5c 32 31 31 5c 32 30 33 325\326\313\327#\210\330\211\203
0440 49 00 5c 32 31 31 40 5c 33 32 36 01 4e 5c 32 30 33 42 00 5c 33 31 33 01 4e 5c 32 30 34 42 00 5c I.\211@\326.N\203B.\313.N\204B.\
0460 33 33 31 5c 33 31 33 02 5c 33 32 36 04 4e 23 5c 32 31 30 01 41 5c 32 36 36 5c 32 30 32 5c 32 30 331\313.\326.N#\210.A\266\202\20
0480 32 28 00 5c 32 31 30 5c 33 33 32 5c 33 32 36 5c 33 31 33 5c 33 33 33 23 5c 32 31 30 5c 33 31 32 2(.\210\332\326\313\333#\210\312
04a0 5c 33 33 34 5c 33 31 34 5c 33 31 35 5c 33 33 35 44 44 5c 33 33 36 5c 33 32 32 5c 33 33 37 5c 33 \334\314\315\335DD\336\322\337\3
04c0 32 30 5c 33 34 30 26 07 5c 32 31 30 5c 33 31 32 5c 33 34 31 5c 33 31 34 5c 33 31 35 5c 33 34 32 20\340&.\210\312\341\314\315\342
04e0 44 44 5c 33 34 33 5c 33 32 32 5c 33 34 34 5c 33 32 30 5c 33 34 35 26 07 5c 32 31 30 5c 33 31 32 DD\343\322\344\320\345&.\210\312
0500 5c 33 34 36 5c 33 31 34 5c 33 31 35 5c 33 34 37 44 44 5c 33 35 30 5c 33 32 32 5c 33 34 34 5c 33 \346\314\315\347DD\350\322\344\3
0520 32 30 5c 33 34 35 26 07 5c 32 31 30 5c 33 31 32 5c 33 35 31 5c 33 31 34 5c 33 31 35 5c 33 35 32 20\345&.\210\312\351\314\315\352
0540 44 44 5c 33 35 33 5c 33 32 32 5c 33 34 34 5c 33 32 30 5c 33 34 35 26 07 5c 32 31 30 5c 33 31 32 DD\353\322\344\320\345&.\210\312
0560 5c 33 35 34 5c 33 31 34 5c 33 31 35 5c 33 35 35 44 44 5c 33 35 36 5c 33 32 32 5c 33 35 37 5c 33 \354\314\315\355DD\356\322\357\3
0580 32 30 5c 33 36 30 26 07 5c 32 31 30 5c 33 31 32 5c 33 36 31 5c 33 31 34 5c 33 31 35 5c 33 36 32 20\360&.\210\312\361\314\315\362
05a0 44 44 5c 33 36 33 5c 33 32 32 5c 33 36 34 5c 33 30 34 5c 33 36 35 5c 33 32 30 5c 33 36 36 26 09 DD\363\322\364\304\365\320\366&.
05c0 5c 32 31 30 5c 33 31 32 5c 33 36 37 5c 33 31 34 5c 33 31 35 5c 33 37 30 44 44 5c 33 37 31 5c 33 \210\312\367\314\315\370DD\371\3
05e0 32 32 5c 33 31 35 5c 33 37 32 5c 33 37 33 5c 33 30 34 5c 33 37 34 26 09 5c 32 31 30 5c 33 31 32 22\315\372\373\304\374&.\210\312
0600 5c 33 37 35 5c 33 31 34 5c 33 31 35 5c 33 37 36 44 44 5c 33 37 37 5c 33 32 32 5c 32 30 31 40 00 \375\314\315\376DD\377\322\201@.
0620 5c 33 30 34 5c 32 30 31 41 00 26 07 5c 32 30 37 22 20 5b 63 75 73 74 6f 6d 2d 64 65 63 6c 61 72 \304\201A.&.\207".[custom-declar
0640 65 2d 66 61 63 65 20 63 6c 6f 6a 75 72 65 2d 6b 65 79 77 6f 72 64 2d 66 61 63 65 20 28 28 74 20 e-face.clojure-keyword-face.((t.
0660 28 3a 69 6e 68 65 72 69 74 20 66 6f 6e 74 2d 6c 6f 63 6b 2d 63 6f 6e 73 74 61 6e 74 2d 66 61 63 (:inherit.font-lock-constant-fac
0680 65 29 29 29 20 22 46 61 63 65 20 75 73 65 64 20 74 6f 20 66 6f 6e 74 2d 6c 6f 63 6b 20 43 6c 6f e)))."Face.used.to.font-lock.Clo
06a0 6a 75 72 65 20 6b 65 79 77 6f 72 64 73 20 28 3a 73 6f 6d 65 74 68 69 6e 67 29 2e 22 20 3a 70 61 jure.keywords.(:something).".:pa
06c0 63 6b 61 67 65 2d 76 65 72 73 69 6f 6e 20 28 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 20 2e 20 22 33 ckage-version.(clojure-mode..."3
06e0 2e 30 2e 30 22 29 20 63 6c 6f 6a 75 72 65 2d 63 68 61 72 61 63 74 65 72 2d 66 61 63 65 20 28 28 .0.0").clojure-character-face.((
0700 74 20 28 3a 69 6e 68 65 72 69 74 20 66 6f 6e 74 2d 6c 6f 63 6b 2d 73 74 72 69 6e 67 2d 66 61 63 t.(:inherit.font-lock-string-fac
0720 65 29 29 29 20 22 46 61 63 65 20 75 73 65 64 20 74 6f 20 66 6f 6e 74 2d 6c 6f 63 6b 20 43 6c 6f e)))."Face.used.to.font-lock.Clo
0740 6a 75 72 65 20 63 68 61 72 61 63 74 65 72 20 6c 69 74 65 72 61 6c 73 2e 22 20 28 63 6c 6f 6a 75 jure.character.literals.".(cloju
0760 72 65 2d 6d 6f 64 65 20 2e 20 22 33 2e 30 2e 30 22 29 20 63 75 73 74 6f 6d 2d 64 65 63 6c 61 72 re-mode..."3.0.0").custom-declar
0780 65 2d 76 61 72 69 61 62 6c 65 20 63 6c 6f 6a 75 72 65 2d 69 6e 64 65 6e 74 2d 73 74 79 6c 65 20 e-variable.clojure-indent-style.
07a0 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 37 22 20 funcall.function.#[0."\300\207".
07c0 5b 3a 61 6c 77 61 79 73 2d 61 6c 69 67 6e 5d 20 31 5d 20 22 49 6e 64 65 6e 74 61 74 69 6f 6e 20 [:always-align].1]."Indentation.
07e0 73 74 79 6c 65 20 74 6f 20 75 73 65 20 66 6f 72 20 66 75 6e 63 74 69 6f 6e 20 66 6f 72 6d 73 20 style.to.use.for.function.forms.
0800 61 6e 64 20 6d 61 63 72 6f 20 66 6f 72 6d 73 2e 5c 6e 54 68 65 72 65 20 61 72 65 20 74 77 6f 20 and.macro.forms.\nThere.are.two.
0820 63 61 73 65 73 20 6f 66 20 69 6e 74 65 72 65 73 74 20 63 6f 6e 66 69 67 75 72 65 64 20 62 79 20 cases.of.interest.configured.by.
0840 74 68 69 73 20 76 61 72 69 61 62 6c 65 2e 5c 6e 5c 6e 2d 20 43 61 73 65 20 28 41 29 20 69 73 20 this.variable.\n\n-.Case.(A).is.
0860 77 68 65 6e 20 61 74 20 6c 65 61 73 74 20 6f 6e 65 20 66 75 6e 63 74 69 6f 6e 20 61 72 67 75 6d when.at.least.one.function.argum
0880 65 6e 74 20 69 73 20 6f 6e 20 74 68 65 20 73 61 6d 65 5c 6e 20 20 6c 69 6e 65 20 61 73 20 74 68 ent.is.on.the.same\n..line.as.th
08a0 65 20 66 75 6e 63 74 69 6f 6e 20 6e 61 6d 65 2e 5c 6e 2d 20 43 61 73 65 20 28 42 29 20 69 73 20 e.function.name.\n-.Case.(B).is.
08c0 74 68 65 20 6f 70 70 6f 73 69 74 65 20 28 6e 6f 20 61 72 67 75 6d 65 6e 74 73 20 61 72 65 20 6f the.opposite.(no.arguments.are.o
08e0 6e 20 74 68 65 20 73 61 6d 65 20 6c 69 6e 65 20 61 73 5c 6e 20 20 74 68 65 20 66 75 6e 63 74 69 n.the.same.line.as\n..the.functi
0900 6f 6e 20 6e 61 6d 65 29 2e 20 20 4e 6f 74 65 20 74 68 61 74 20 74 68 65 20 62 6f 64 79 20 6f 66 on.name)...Note.that.the.body.of
0920 20 6d 61 63 72 6f 73 20 69 73 20 6e 6f 74 5c 6e 20 20 61 66 66 65 63 74 65 64 20 62 79 20 74 68 .macros.is.not\n..affected.by.th
0940 69 73 20 76 61 72 69 61 62 6c 65 2c 20 69 74 20 69 73 20 61 6c 77 61 79 73 20 69 6e 64 65 6e 74 is.variable,.it.is.always.indent
0960 65 64 20 62 79 5c 6e 20 20 60 6c 69 73 70 2d 62 6f 64 79 2d 69 6e 64 65 6e 74 27 20 28 64 65 66 ed.by\n..`lisp-body-indent'.(def
0980 61 75 6c 74 20 32 29 20 73 70 61 63 65 73 2e 5c 6e 5c 6e 4e 6f 74 65 20 74 68 61 74 20 74 68 69 ault.2).spaces.\n\nNote.that.thi
09a0 73 20 76 61 72 69 61 62 6c 65 20 63 6f 6e 66 69 67 75 72 65 73 20 74 68 65 20 69 6e 64 65 6e 74 s.variable.configures.the.indent
09c0 61 74 69 6f 6e 20 6f 66 20 66 75 6e 63 74 69 6f 6e 5c 6e 66 6f 72 6d 73 20 28 61 6e 64 20 66 75 ation.of.function\nforms.(and.fu
09e0 6e 63 74 69 6f 6e 2d 6c 69 6b 65 20 6d 61 63 72 6f 73 29 2c 20 69 74 20 64 6f 65 73 20 6e 6f 74 nction-like.macros),.it.does.not
0a00 20 61 66 66 65 63 74 20 6d 61 63 72 6f 73 20 74 68 61 74 5c 6e 61 6c 72 65 61 64 79 20 75 73 65 .affect.macros.that\nalready.use
0a20 20 73 70 65 63 69 61 6c 20 69 6e 64 65 6e 74 61 74 69 6f 6e 20 72 75 6c 65 73 2e 5c 6e 5c 6e 54 .special.indentation.rules.\n\nT
0a40 68 65 20 70 6f 73 73 69 62 6c 65 20 76 61 6c 75 65 73 20 66 6f 72 20 74 68 69 73 20 76 61 72 69 he.possible.values.for.this.vari
0a60 61 62 6c 65 20 61 72 65 20 6b 65 79 77 6f 72 64 73 20 69 6e 64 69 63 61 74 69 6e 67 20 68 6f 77 able.are.keywords.indicating.how
0a80 5c 6e 74 6f 20 69 6e 64 65 6e 74 20 66 75 6e 63 74 69 6f 6e 20 66 6f 72 6d 73 2e 5c 6e 5c 6e 20 \nto.indent.function.forms.\n\n.
0aa0 20 20 20 60 3a 61 6c 77 61 79 73 2d 61 6c 69 67 6e 27 20 2d 20 46 6f 6c 6c 6f 77 20 74 68 65 20 ...`:always-align'.-.Follow.the.
0ac0 73 61 6d 65 20 72 75 6c 65 73 20 61 73 20 60 6c 69 73 70 2d 6d 6f 64 65 27 2e 20 20 41 6c 6c 5c same.rules.as.`lisp-mode'...All\
0ae0 6e 20 20 20 20 61 72 67 73 20 61 72 65 20 76 65 72 74 69 63 61 6c 6c 79 20 61 6c 69 67 6e 65 64 n....args.are.vertically.aligned
0b00 20 77 69 74 68 20 74 68 65 20 66 69 72 73 74 20 61 72 67 20 69 6e 20 63 61 73 65 20 28 41 29 2c .with.the.first.arg.in.case.(A),
0b20 5c 6e 20 20 20 20 61 6e 64 20 76 65 72 74 69 63 61 6c 6c 79 20 61 6c 69 67 6e 65 64 20 77 69 74 \n....and.vertically.aligned.wit
0b40 68 20 74 68 65 20 66 75 6e 63 74 69 6f 6e 20 6e 61 6d 65 20 69 6e 20 63 61 73 65 20 28 42 29 2e h.the.function.name.in.case.(B).
0b60 5c 6e 20 20 20 20 46 6f 72 20 69 6e 73 74 61 6e 63 65 3a 5c 6e 20 20 20 20 20 20 20 20 28 72 65 \n....For.instance:\n........(re
0b80 64 75 63 65 20 6d 65 72 67 65 5c 6e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 6f 6d 65 duce.merge\n................some
0ba0 2d 63 6f 6c 6c 29 5c 6e 20 20 20 20 20 20 20 20 28 72 65 64 75 63 65 5c 6e 20 20 20 20 20 20 20 -coll)\n........(reduce\n.......
0bc0 20 20 6d 65 72 67 65 5c 6e 20 20 20 20 20 20 20 20 20 73 6f 6d 65 2d 63 6f 6c 6c 29 5c 6e 5c 6e ..merge\n.........some-coll)\n\n
0be0 20 20 20 20 60 3a 61 6c 77 61 79 73 2d 69 6e 64 65 6e 74 27 20 2d 20 41 6c 6c 20 61 72 67 73 20 ....`:always-indent'.-.All.args.
0c00 61 72 65 20 69 6e 64 65 6e 74 65 64 20 6c 69 6b 65 20 61 20 6d 61 63 72 6f 20 62 6f 64 79 2e 5c are.indented.like.a.macro.body.\
0c20 6e 20 20 20 20 20 20 20 20 28 72 65 64 75 63 65 20 6d 65 72 67 65 5c 6e 20 20 20 20 20 20 20 20 n........(reduce.merge\n........
0c40 20 20 73 6f 6d 65 2d 63 6f 6c 6c 29 5c 6e 20 20 20 20 20 20 20 20 28 72 65 64 75 63 65 5c 6e 20 ..some-coll)\n........(reduce\n.
0c60 20 20 20 20 20 20 20 20 20 6d 65 72 67 65 5c 6e 20 20 20 20 20 20 20 20 20 20 73 6f 6d 65 2d 63 .........merge\n..........some-c
0c80 6f 6c 6c 29 5c 6e 5c 6e 20 20 20 20 60 3a 61 6c 69 67 6e 2d 61 72 67 75 6d 65 6e 74 73 27 20 2d oll)\n\n....`:align-arguments'.-
0ca0 20 43 61 73 65 20 28 41 29 20 69 73 20 69 6e 64 65 6e 74 65 64 20 6c 69 6b 65 20 60 6c 69 73 70 .Case.(A).is.indented.like.`lisp
0cc0 27 2c 20 61 6e 64 5c 6e 20 20 20 20 63 61 73 65 20 28 42 29 20 69 73 20 69 6e 64 65 6e 74 65 64 ',.and\n....case.(B).is.indented
0ce0 20 6c 69 6b 65 20 61 20 6d 61 63 72 6f 20 62 6f 64 79 2e 5c 6e 20 20 20 20 20 20 20 20 28 72 65 .like.a.macro.body.\n........(re
0d00 64 75 63 65 20 6d 65 72 67 65 5c 6e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 6f 6d 65 duce.merge\n................some
0d20 2d 63 6f 6c 6c 29 5c 6e 20 20 20 20 20 20 20 20 28 72 65 64 75 63 65 5c 6e 20 20 20 20 20 20 20 -coll)\n........(reduce\n.......
0d40 20 20 20 6d 65 72 67 65 5c 6e 20 20 20 20 20 20 20 20 20 20 73 6f 6d 65 2d 63 6f 6c 6c 29 22 20 ...merge\n..........some-coll)".
0d60 3a 73 61 66 65 20 6b 65 79 77 6f 72 64 70 20 3a 74 79 70 65 20 28 63 68 6f 69 63 65 20 28 63 6f :safe.keywordp.:type.(choice.(co
0d80 6e 73 74 20 3a 74 61 67 20 22 53 61 6d 65 20 61 73 20 60 6c 69 73 70 2d 6d 6f 64 65 27 22 20 3a nst.:tag."Same.as.`lisp-mode'".:
0da0 61 6c 77 61 79 73 2d 61 6c 69 67 6e 29 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 49 6e 64 65 6e always-align).(const.:tag."Inden
0dc0 74 20 6c 69 6b 65 20 61 20 6d 61 63 72 6f 20 62 6f 64 79 22 20 3a 61 6c 77 61 79 73 2d 69 6e 64 t.like.a.macro.body".:always-ind
0de0 65 6e 74 29 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 49 6e 64 65 6e 74 20 6c 69 6b 65 20 61 20 ent).(const.:tag."Indent.like.a.
0e00 6d 61 63 72 6f 20 62 6f 64 79 20 75 6e 6c 65 73 73 20 66 69 72 73 74 20 61 72 67 20 69 73 20 6f macro.body.unless.first.arg.is.o
0e20 6e 20 74 68 65 20 73 61 6d 65 20 6c 69 6e 65 22 20 3a 61 6c 69 67 6e 2d 61 72 67 75 6d 65 6e 74 n.the.same.line".:align-argument
0e40 73 29 29 20 28 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 20 2e 20 22 35 2e 32 2e 30 22 29 20 64 65 66 s)).(clojure-mode..."5.2.0").def
0e60 76 61 72 61 6c 69 61 73 20 63 6c 6f 6a 75 72 65 2d 64 65 66 75 6e 2d 73 74 79 6c 65 2d 64 65 66 varalias.clojure-defun-style-def
0e80 61 75 6c 74 2d 69 6e 64 65 6e 74 20 6e 69 6c 20 28 73 61 76 65 64 2d 76 61 6c 75 65 20 73 61 76 ault-indent.nil.(saved-value.sav
0ea0 65 64 2d 76 61 72 69 61 62 6c 65 2d 63 6f 6d 6d 65 6e 74 29 20 70 75 74 20 6d 61 6b 65 2d 6f 62 ed-variable-comment).put.make-ob
0ec0 73 6f 6c 65 74 65 2d 76 61 72 69 61 62 6c 65 20 22 35 2e 32 2e 30 22 20 63 6c 6f 6a 75 72 65 2d solete-variable."5.2.0".clojure-
0ee0 75 73 65 2d 62 61 63 6b 74 72 61 63 6b 69 6e 67 2d 69 6e 64 65 6e 74 20 23 5b 30 20 22 5c 33 30 use-backtracking-indent.#[0."\30
0f00 30 5c 32 30 37 22 20 5b 74 5d 20 31 5d 20 22 57 68 65 6e 20 6e 6f 6e 2d 6e 69 6c 2c 20 65 6e 61 0\207".[t].1]."When.non-nil,.ena
0f20 62 6c 65 20 63 6f 6e 74 65 78 74 20 73 65 6e 73 69 74 69 76 65 20 69 6e 64 65 6e 74 61 74 69 6f ble.context.sensitive.indentatio
0f40 6e 2e 22 20 62 6f 6f 6c 65 61 6e 20 62 6f 6f 6c 65 61 6e 70 20 63 6c 6f 6a 75 72 65 2d 6d 61 78 n.".boolean.booleanp.clojure-max
0f60 2d 62 61 63 6b 74 72 61 63 6b 69 6e 67 20 23 5b 30 20 22 5c 33 30 30 5c 32 30 37 22 20 5b 33 5d -backtracking.#[0."\300\207".[3]
0f80 20 31 5d 20 22 4d 61 78 69 6d 75 6d 20 61 6d 6f 75 6e 74 20 74 6f 20 62 61 63 6b 74 72 61 63 6b .1]."Maximum.amount.to.backtrack
0fa0 20 75 70 20 61 20 6c 69 73 74 20 74 6f 20 63 68 65 63 6b 20 66 6f 72 20 63 6f 6e 74 65 78 74 2e .up.a.list.to.check.for.context.
0fc0 22 20 69 6e 74 65 67 65 72 20 69 6e 74 65 67 65 72 70 20 63 6c 6f 6a 75 72 65 2d 64 6f 63 73 74 ".integer.integerp.clojure-docst
0fe0 72 69 6e 67 2d 66 69 6c 6c 2d 63 6f 6c 75 6d 6e 20 23 5b 30 20 22 08 5c 32 30 37 22 20 5b 66 69 ring-fill-column.#[0.".\207".[fi
1000 6c 6c 2d 63 6f 6c 75 6d 6e 5d 20 31 5d 20 22 56 61 6c 75 65 20 6f 66 20 60 66 69 6c 6c 2d 63 6f ll-column].1]."Value.of.`fill-co
1020 6c 75 6d 6e 27 20 74 6f 20 75 73 65 20 77 68 65 6e 20 66 69 6c 6c 69 6e 67 20 61 20 64 6f 63 73 lumn'.to.use.when.filling.a.docs
1040 74 72 69 6e 67 2e 22 20 63 6c 6f 6a 75 72 65 2d 64 6f 63 73 74 72 69 6e 67 2d 66 69 6c 6c 2d 70 tring.".clojure-docstring-fill-p
1060 72 65 66 69 78 2d 77 69 64 74 68 20 23 5b 30 20 22 5c 33 30 30 5c 32 30 37 22 20 5b 32 5d 20 31 refix-width.#[0."\300\207".[2].1
1080 5d 20 22 57 69 64 74 68 20 6f 66 20 60 66 69 6c 6c 2d 70 72 65 66 69 78 27 20 77 68 65 6e 20 66 ]."Width.of.`fill-prefix'.when.f
10a0 69 6c 6c 69 6e 67 20 61 20 64 6f 63 73 74 72 69 6e 67 2e 5c 6e 54 68 65 20 64 65 66 61 75 6c 74 illing.a.docstring.\nThe.default
10c0 20 76 61 6c 75 65 20 63 6f 6e 66 6f 72 6d 73 20 77 69 74 68 20 74 68 65 20 64 65 20 66 61 63 74 .value.conforms.with.the.de.fact
10e0 6f 20 63 6f 6e 76 65 6e 74 69 6f 6e 20 66 6f 72 5c 6e 43 6c 6f 6a 75 72 65 20 64 6f 63 73 74 72 o.convention.for\nClojure.docstr
1100 69 6e 67 73 2c 20 61 6c 69 67 6e 69 6e 67 20 74 68 65 20 73 65 63 6f 6e 64 20 6c 69 6e 65 20 77 ings,.aligning.the.second.line.w
1120 69 74 68 20 74 68 65 20 6f 70 65 6e 69 6e 67 5c 6e 64 6f 75 62 6c 65 20 71 75 6f 74 65 73 20 6f ith.the.opening\ndouble.quotes.o
1140 6e 20 74 68 65 20 74 68 69 72 64 20 63 6f 6c 75 6d 6e 2e 22 20 63 6c 6f 6a 75 72 65 2d 6f 6d 69 n.the.third.column.".clojure-omi
1160 74 2d 73 70 61 63 65 2d 62 65 74 77 65 65 6e 2d 74 61 67 2d 61 6e 64 2d 64 65 6c 69 6d 69 74 65 t-space-between-tag-and-delimite
1180 72 73 20 23 5b 30 20 22 5c 33 30 30 5c 32 30 37 22 20 5b 28 39 31 20 31 32 33 20 34 30 29 5d 20 rs.#[0."\300\207".[(91.123.40)].
11a0 31 5d 20 22 41 6c 6c 6f 77 65 64 20 6f 70 65 6e 69 6e 67 20 64 65 6c 69 6d 69 74 65 72 20 63 68 1]."Allowed.opening.delimiter.ch
11c0 61 72 61 63 74 65 72 73 20 61 66 74 65 72 20 61 20 72 65 61 64 65 72 20 6c 69 74 65 72 61 6c 20 aracters.after.a.reader.literal.
11e0 74 61 67 2e 5c 6e 46 6f 72 20 65 78 61 6d 70 6c 65 2c 20 5b 20 69 73 20 61 6c 6c 6f 77 65 64 20 tag.\nFor.example,.[.is.allowed.
1200 69 6e 20 3a 64 62 2f 69 64 5b 3a 64 62 2e 70 61 72 74 2f 75 73 65 72 5d 2e 22 20 28 73 65 74 20 in.:db/id[:db.part/user].".(set.
1220 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 5b 22 20 39 31 29 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 (const.:tag."[".91).(const.:tag.
1240 22 7b 22 20 31 32 33 29 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 28 22 20 34 30 29 20 28 63 6f "{".123).(const.:tag."(".40).(co
1260 6e 73 74 20 3a 74 61 67 20 22 5c 22 22 20 33 34 29 29 20 23 5b 32 35 37 20 22 5c 32 31 31 3c 5c nst.:tag."\"".34)).#[257."\211<\
1280 32 30 35 09 00 5c 33 30 30 5c 33 30 31 02 5c 22 5c 32 30 37 22 20 5b 63 6c 2d 65 76 65 72 79 20 205..\300\301.\"\207".[cl-every.
12a0 63 68 61 72 61 63 74 65 72 70 5d 20 34 20 22 5c 6e 5c 6e 28 66 6e 20 56 41 4c 55 45 29 22 5d 20 characterp].4."\n\n(fn.VALUE)"].
12c0 63 6c 6f 6a 75 72 65 2d 62 75 69 6c 64 2d 74 6f 6f 6c 2d 66 69 6c 65 73 20 23 5b 30 20 22 5c 33 clojure-build-tool-files.#[0."\3
12e0 30 30 5c 32 30 37 22 20 5b 28 22 70 72 6f 6a 65 63 74 2e 63 6c 6a 22 20 22 62 75 69 6c 64 2e 62 00\207".[("project.clj"."build.b
1300 6f 6f 74 22 20 22 62 75 69 6c 64 2e 67 72 61 64 6c 65 22 20 22 64 65 70 73 2e 65 64 6e 22 20 22 oot"."build.gradle"."deps.edn"."
1320 73 68 61 64 6f 77 2d 63 6c 6a 73 2e 65 64 6e 22 29 5d 20 31 5d 20 22 41 20 6c 69 73 74 20 6f 66 shadow-cljs.edn")].1]."A.list.of
1340 20 66 69 6c 65 73 2c 20 77 68 69 63 68 20 69 64 65 6e 74 69 66 79 20 61 20 43 6c 6f 6a 75 72 65 .files,.which.identify.a.Clojure
1360 20 70 72 6f 6a 65 63 74 27 73 20 72 6f 6f 74 2e 5c 6e 4f 75 74 2d 6f 66 2d 74 68 65 20 62 6f 78 .project's.root.\nOut-of-the.box
1380 20 60 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 27 20 75 6e 64 65 72 73 74 61 6e 64 73 20 6c 65 69 6e .`clojure-mode'.understands.lein
13a0 2c 20 62 6f 6f 74 2c 20 67 72 61 64 6c 65 2c 5c 6e 20 73 68 61 64 6f 77 2d 63 6c 6a 73 20 61 6e ,.boot,.gradle,\n.shadow-cljs.an
13c0 64 20 74 6f 6f 6c 73 2e 64 65 70 73 2e 22 20 28 72 65 70 65 61 74 20 73 74 72 69 6e 67 29 20 28 d.tools.deps.".(repeat.string).(
13e0 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 20 2e 20 22 35 2e 30 2e 30 22 29 20 23 5b 32 35 37 20 22 5c clojure-mode..."5.0.0").#[257."\
1400 32 31 31 3c 5c 32 30 35 09 00 5c 33 30 30 5c 33 30 31 02 5c 22 5c 32 30 37 22 20 5b 63 6c 2d 65 211<\205..\300\301.\"\207".[cl-e
1420 76 65 72 79 20 73 74 72 69 6e 67 70 5d 20 34 20 22 5c 6e 5c 6e 28 66 6e 20 56 41 4c 55 45 29 22 very.stringp].4."\n\n(fn.VALUE)"
1440 5d 20 63 6c 6f 6a 75 72 65 2d 70 72 6f 6a 65 63 74 2d 72 6f 6f 74 2d 66 75 6e 63 74 69 6f 6e 20 ].clojure-project-root-function.
1460 23 5b 30 20 22 5c 33 30 30 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 70 72 6f 6a 65 63 74 2d #[0."\300\207".[clojure-project-
1480 72 6f 6f 74 2d 70 61 74 68 5d 20 31 5d 20 22 46 75 6e 63 74 69 6f 6e 20 74 6f 20 6c 6f 63 61 74 root-path].1]."Function.to.locat
14a0 65 20 63 6c 6f 6a 75 72 65 20 70 72 6f 6a 65 63 74 20 72 6f 6f 74 20 64 69 72 65 63 74 6f 72 79 e.clojure.project.root.directory
14c0 2e 22 20 3a 72 69 73 6b 79 20 74 20 28 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 20 2e 20 22 35 2e 37 .".:risky.t.(clojure-mode..."5.7
14e0 2e 30 22 29 20 63 6c 6f 6a 75 72 65 2d 72 65 66 61 63 74 6f 72 2d 6d 61 70 2d 70 72 65 66 69 78 .0").clojure-refactor-map-prefix
1500 20 23 5b 30 20 22 5c 33 30 30 5c 32 30 37 22 20 5b 22 03 12 22 5d 20 31 5d 20 22 43 6c 6f 6a 75 .#[0."\300\207".[".."].1]."Cloju
1520 72 65 20 72 65 66 61 63 74 6f 72 20 6b 65 79 6d 61 70 20 70 72 65 66 69 78 2e 22 20 73 74 72 69 re.refactor.keymap.prefix.".stri
1540 6e 67 20 28 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 20 2e 20 22 35 2e 36 2e 30 22 29 5d 20 31 30 29 ng.(clojure-mode..."5.6.0")].10)
1560 0a 23 40 34 32 20 4b 65 79 6d 61 70 20 66 6f 72 20 43 6c 6f 6a 75 72 65 20 72 65 66 61 63 74 6f .#@42.Keymap.for.Clojure.refacto
1580 72 69 6e 67 20 63 6f 6d 6d 61 6e 64 73 2e 1f 0a 28 64 65 66 76 61 72 20 63 6c 6f 6a 75 72 65 2d ring.commands...(defvar.clojure-
15a0 72 65 66 61 63 74 6f 72 2d 6d 61 70 20 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 30 20 5c 33 refactor-map.(byte-code."\300.\3
15c0 30 31 01 5c 33 30 32 5c 33 30 33 23 5c 32 31 30 5c 33 30 31 01 5c 33 30 34 5c 33 30 33 23 5c 32 01.\302\303#\210\301.\304\303#\2
15e0 31 30 5c 33 30 31 01 5c 33 30 35 5c 33 30 36 23 5c 32 31 30 5c 33 30 31 01 5c 33 30 37 5c 33 30 10\301.\305\306#\210\301.\307\30
1600 36 23 5c 32 31 30 5c 33 30 31 01 5c 33 31 30 5c 33 31 31 23 5c 32 31 30 5c 33 30 31 01 5c 33 31 6#\210\301.\310\311#\210\301.\31
1620 32 5c 33 31 31 23 5c 32 31 30 5c 33 30 31 01 5c 33 31 33 5c 33 31 34 23 5c 32 31 30 5c 33 30 31 2\311#\210\301.\313\314#\210\301
1640 01 5c 33 31 35 5c 33 31 34 23 5c 32 31 30 5c 33 30 31 01 5c 33 31 36 5c 33 31 37 23 5c 32 31 30 .\315\314#\210\301.\316\317#\210
1660 5c 33 30 31 01 5c 33 32 30 5c 33 31 37 23 5c 32 31 30 5c 33 30 31 01 5c 33 32 31 5c 33 32 32 23 \301.\320\317#\210\301.\321\322#
1680 5c 32 31 30 5c 33 30 31 01 5c 33 32 33 5c 33 32 32 23 5c 32 31 30 5c 33 30 31 01 5c 33 32 34 5c \210\301.\323\322#\210\301.\324\
16a0 33 32 35 23 5c 32 31 30 5c 33 30 31 01 5c 33 32 36 5c 33 32 35 23 5c 32 31 30 5c 33 30 31 01 5c 325#\210\301.\326\325#\210\301.\
16c0 33 32 37 5c 33 33 30 23 5c 32 31 30 5c 33 30 31 01 5c 33 33 31 5c 33 33 30 23 5c 32 31 30 5c 33 327\330#\210\301.\331\330#\210\3
16e0 30 31 01 5c 33 33 32 5c 33 33 33 23 5c 32 31 30 5c 33 30 31 01 5c 33 33 34 5c 33 33 33 23 5c 32 01.\332\333#\210\301.\334\333#\2
1700 31 30 5c 33 30 31 01 5c 33 33 35 5c 33 33 36 23 5c 32 31 30 5c 33 30 31 01 5c 33 33 37 5c 33 33 10\301.\335\336#\210\301.\337\33
1720 36 23 5c 32 31 30 5c 33 30 31 01 5c 33 34 30 5c 33 34 31 23 5c 32 31 30 5c 33 30 31 01 5c 33 34 6#\210\301.\340\341#\210\301.\34
1740 32 5c 33 34 31 23 5c 32 31 30 5c 33 30 31 01 5c 33 34 33 5c 33 34 34 23 5c 32 31 30 5c 33 30 31 2\341#\210\301.\343\344#\210\301
1760 01 5c 33 34 35 5c 33 34 34 23 5c 32 31 30 5c 33 30 31 01 5c 33 34 36 5c 33 34 37 23 5c 32 31 30 .\345\344#\210\301.\346\347#\210
1780 5c 33 30 31 01 5c 33 35 30 5c 33 34 37 23 5c 32 31 30 5c 33 30 31 01 5c 33 35 31 5c 33 35 32 23 \301.\350\347#\210\301.\351\352#
17a0 5c 32 31 30 5c 33 30 31 01 5c 33 35 33 5c 33 35 32 23 5c 32 31 30 5c 33 30 31 01 5c 33 35 34 5c \210\301.\353\352#\210\301.\354\
17c0 33 35 35 23 5c 32 31 30 5c 33 30 31 01 5c 33 35 36 5c 33 35 37 23 5c 32 31 30 5c 33 30 31 01 5c 355#\210\301.\356\357#\210\301.\
17e0 33 36 30 5c 33 36 31 23 5c 32 31 30 5c 33 30 31 01 5c 33 36 32 5c 33 36 33 23 5c 32 31 30 5c 33 360\361#\210\301.\362\363#\210\3
1800 30 31 01 5c 33 36 34 5c 33 36 35 23 5c 32 31 30 5c 33 30 31 01 5c 33 36 36 5c 33 36 37 23 5c 32 01.\364\365#\210\301.\366\367#\2
1820 31 30 5c 33 30 31 01 5c 33 37 30 5c 33 37 31 23 5c 32 31 30 5c 33 30 31 01 5c 33 37 32 5c 33 37 10\301.\370\371#\210\301.\372\37
1840 33 23 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 3#\210\211\207".[make-sparse-key
1860 6d 61 70 20 64 65 66 69 6e 65 2d 6b 65 79 20 22 14 22 20 63 6c 6f 6a 75 72 65 2d 74 68 72 65 61 map.define-key.".".clojure-threa
1880 64 20 22 74 22 20 22 15 22 20 63 6c 6f 6a 75 72 65 2d 75 6e 77 69 6e 64 20 22 75 22 20 22 06 22 d."t".".".clojure-unwind."u"."."
18a0 20 63 6c 6f 6a 75 72 65 2d 74 68 72 65 61 64 2d 66 69 72 73 74 2d 61 6c 6c 20 22 66 22 20 22 5c .clojure-thread-first-all."f"."\
18c0 66 22 20 63 6c 6f 6a 75 72 65 2d 74 68 72 65 61 64 2d 6c 61 73 74 2d 61 6c 6c 20 22 6c 22 20 22 f".clojure-thread-last-all."l"."
18e0 01 22 20 63 6c 6f 6a 75 72 65 2d 75 6e 77 69 6e 64 2d 61 6c 6c 20 22 61 22 20 22 10 22 20 63 6c .".clojure-unwind-all."a".".".cl
1900 6f 6a 75 72 65 2d 63 79 63 6c 65 2d 70 72 69 76 61 63 79 20 22 70 22 20 5b 36 37 31 30 38 39 30 ojure-cycle-privacy."p".[6710890
1920 34 5d 20 63 6c 6f 6a 75 72 65 2d 63 6f 6e 76 65 72 74 2d 63 6f 6c 6c 65 63 74 69 6f 6e 2d 74 6f 4].clojure-convert-collection-to
1940 2d 6c 69 73 74 20 22 28 22 20 5b 36 37 31 30 38 39 30 33 5d 20 63 6c 6f 6a 75 72 65 2d 63 6f 6e -list."(".[67108903].clojure-con
1960 76 65 72 74 2d 63 6f 6c 6c 65 63 74 69 6f 6e 2d 74 6f 2d 71 75 6f 74 65 64 2d 6c 69 73 74 20 22 vert-collection-to-quoted-list."
1980 27 22 20 5b 36 37 31 30 38 39 38 37 5d 20 63 6c 6f 6a 75 72 65 2d 63 6f 6e 76 65 72 74 2d 63 6f '".[67108987].clojure-convert-co
19a0 6c 6c 65 63 74 69 6f 6e 2d 74 6f 2d 6d 61 70 20 22 7b 22 20 22 1b 22 20 63 6c 6f 6a 75 72 65 2d llection-to-map."{".".".clojure-
19c0 63 6f 6e 76 65 72 74 2d 63 6f 6c 6c 65 63 74 69 6f 6e 2d 74 6f 2d 76 65 63 74 6f 72 20 22 5b 22 convert-collection-to-vector."["
19e0 20 5b 36 37 31 30 38 38 39 39 5d 20 63 6c 6f 6a 75 72 65 2d 63 6f 6e 76 65 72 74 2d 63 6f 6c 6c .[67108899].clojure-convert-coll
1a00 65 63 74 69 6f 6e 2d 74 6f 2d 73 65 74 20 22 23 22 20 22 09 22 20 63 6c 6f 6a 75 72 65 2d 63 79 ection-to-set."#".".".clojure-cy
1a20 63 6c 65 2d 69 66 20 22 69 22 20 22 17 22 20 63 6c 6f 6a 75 72 65 2d 63 79 63 6c 65 2d 77 68 65 cle-if."i".".".clojure-cycle-whe
1a40 6e 20 22 77 22 20 22 0f 22 20 63 6c 6f 6a 75 72 65 2d 63 79 63 6c 65 2d 6e 6f 74 20 22 6f 22 20 n."w".".".clojure-cycle-not."o".
1a60 22 6e 69 22 20 63 6c 6f 6a 75 72 65 2d 69 6e 73 65 72 74 2d 6e 73 2d 66 6f 72 6d 20 22 6e 68 22 "ni".clojure-insert-ns-form."nh"
1a80 20 63 6c 6f 6a 75 72 65 2d 69 6e 73 65 72 74 2d 6e 73 2d 66 6f 72 6d 2d 61 74 2d 70 6f 69 6e 74 .clojure-insert-ns-form-at-point
1aa0 20 22 6e 75 22 20 63 6c 6f 6a 75 72 65 2d 75 70 64 61 74 65 2d 6e 73 20 22 6e 73 22 20 63 6c 6f ."nu".clojure-update-ns."ns".clo
1ac0 6a 75 72 65 2d 73 6f 72 74 2d 6e 73 20 22 73 69 22 20 63 6c 6f 6a 75 72 65 2d 69 6e 74 72 6f 64 jure-sort-ns."si".clojure-introd
1ae0 75 63 65 2d 6c 65 74 20 22 73 6d 22 20 63 6c 6f 6a 75 72 65 2d 6d 6f 76 65 2d 74 6f 2d 6c 65 74 uce-let."sm".clojure-move-to-let
1b00 20 22 73 66 22 20 63 6c 6f 6a 75 72 65 2d 6c 65 74 2d 66 6f 72 77 61 72 64 2d 73 6c 75 72 70 2d ."sf".clojure-let-forward-slurp-
1b20 73 65 78 70 20 22 73 62 22 20 63 6c 6f 6a 75 72 65 2d 6c 65 74 2d 62 61 63 6b 77 61 72 64 2d 73 sexp."sb".clojure-let-backward-s
1b40 6c 75 72 70 2d 73 65 78 70 5d 20 35 29 20 28 23 24 20 2e 20 35 34 37 38 29 29 0a 28 66 73 65 74 lurp-sexp].5).(#$...5478)).(fset
1b60 20 27 63 6c 6f 6a 75 72 65 2d 72 65 66 61 63 74 6f 72 2d 6d 61 70 20 63 6c 6f 6a 75 72 65 2d 72 .'clojure-refactor-map.clojure-r
1b80 65 66 61 63 74 6f 72 2d 6d 61 70 29 0a 23 40 32 36 20 4b 65 79 6d 61 70 20 66 6f 72 20 43 6c 6f efactor-map).#@26.Keymap.for.Clo
1ba0 6a 75 72 65 20 6d 6f 64 65 2e 1f 0a 28 64 65 66 76 61 72 20 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 jure.mode...(defvar.clojure-mode
1bc0 2d 6d 61 70 20 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 32 20 5c 33 30 33 01 08 5c 22 5c 32 -map.(byte-code."\302.\303..\"\2
1be0 31 30 5c 33 30 34 01 5c 33 30 35 5c 33 30 36 23 5c 32 31 30 5c 33 30 34 01 5c 33 30 37 5c 33 31 10\304.\305\306#\210\304.\307\31
1c00 30 23 5c 32 31 30 5c 33 30 34 01 09 5c 33 31 31 23 5c 32 31 30 5c 33 31 32 5c 33 31 33 21 5c 32 0#\210\304..\311#\210\312\313!\2
1c20 31 30 5c 33 31 34 5c 33 31 35 02 5c 33 31 36 5c 33 31 37 24 5c 32 31 30 5c 32 31 31 5c 32 30 37 10\314\315.\316\317$\210\211\207
1c40 22 20 5b 70 72 6f 67 2d 6d 6f 64 65 2d 6d 61 70 20 63 6c 6f 6a 75 72 65 2d 72 65 66 61 63 74 6f ".[prog-mode-map.clojure-refacto
1c60 72 2d 6d 61 70 2d 70 72 65 66 69 78 20 6d 61 6b 65 2d 73 70 61 72 73 65 2d 6b 65 79 6d 61 70 20 r-map-prefix.make-sparse-keymap.
1c80 73 65 74 2d 6b 65 79 6d 61 70 2d 70 61 72 65 6e 74 20 64 65 66 69 6e 65 2d 6b 65 79 20 5b 36 37 set-keymap-parent.define-key.[67
1ca0 31 30 38 39 32 32 5d 20 63 6c 6f 6a 75 72 65 2d 74 6f 67 67 6c 65 2d 6b 65 79 77 6f 72 64 2d 73 108922].clojure-toggle-keyword-s
1cc0 74 72 69 6e 67 20 22 03 20 22 20 63 6c 6f 6a 75 72 65 2d 61 6c 69 67 6e 20 63 6c 6f 6a 75 72 65 tring."..".clojure-align.clojure
1ce0 2d 72 65 66 61 63 74 6f 72 2d 6d 61 70 20 28 6c 61 6d 62 64 61 20 28 23 31 3d 23 3a 64 65 66 2d -refactor-map.(lambda.(#1=#:def-
1d00 74 6d 70 2d 76 61 72 29 20 28 64 65 66 76 61 72 20 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 2d 6d 65 tmp-var).(defvar.clojure-mode-me
1d20 6e 75 20 23 31 23 20 23 32 3d 22 43 6c 6f 6a 75 72 65 20 4d 6f 64 65 20 4d 65 6e 75 22 29 29 20 nu.#1#.#2="Clojure.Mode.Menu")).
1d40 6e 69 6c 20 65 61 73 79 2d 6d 65 6e 75 2d 64 6f 2d 64 65 66 69 6e 65 20 63 6c 6f 6a 75 72 65 2d nil.easy-menu-do-define.clojure-
1d60 6d 6f 64 65 2d 6d 65 6e 75 20 23 32 23 20 28 22 43 6c 6f 6a 75 72 65 22 20 5b 22 54 6f 67 67 6c mode-menu.#2#.("Clojure".["Toggl
1d80 65 20 62 65 74 77 65 65 6e 20 73 74 72 69 6e 67 20 26 20 6b 65 79 77 6f 72 64 22 20 63 6c 6f 6a e.between.string.&.keyword".cloj
1da0 75 72 65 2d 74 6f 67 67 6c 65 2d 6b 65 79 77 6f 72 64 2d 73 74 72 69 6e 67 5d 20 5b 22 41 6c 69 ure-toggle-keyword-string].["Ali
1dc0 67 6e 20 65 78 70 72 65 73 73 69 6f 6e 22 20 63 6c 6f 6a 75 72 65 2d 61 6c 69 67 6e 5d 20 5b 22 gn.expression".clojure-align].["
1de0 43 79 63 6c 65 20 70 72 69 76 61 63 79 22 20 63 6c 6f 6a 75 72 65 2d 63 79 63 6c 65 2d 70 72 69 Cycle.privacy".clojure-cycle-pri
1e00 76 61 63 79 5d 20 5b 22 43 79 63 6c 65 20 69 66 2c 20 69 66 2d 6e 6f 74 22 20 63 6c 6f 6a 75 72 vacy].["Cycle.if,.if-not".clojur
1e20 65 2d 63 79 63 6c 65 2d 69 66 5d 20 5b 22 43 79 63 6c 65 20 77 68 65 6e 2c 20 77 68 65 6e 2d 6e e-cycle-if].["Cycle.when,.when-n
1e40 6f 74 22 20 63 6c 6f 6a 75 72 65 2d 63 79 63 6c 65 2d 77 68 65 6e 5d 20 5b 22 43 79 63 6c 65 20 ot".clojure-cycle-when].["Cycle.
1e60 6e 6f 74 22 20 63 6c 6f 6a 75 72 65 2d 63 79 63 6c 65 2d 6e 6f 74 5d 20 28 22 6e 73 20 66 6f 72 not".clojure-cycle-not].("ns.for
1e80 6d 73 22 20 5b 22 49 6e 73 65 72 74 20 6e 73 20 66 6f 72 6d 20 61 74 20 74 68 65 20 74 6f 70 22 ms".["Insert.ns.form.at.the.top"
1ea0 20 63 6c 6f 6a 75 72 65 2d 69 6e 73 65 72 74 2d 6e 73 2d 66 6f 72 6d 5d 20 5b 22 49 6e 73 65 72 .clojure-insert-ns-form].["Inser
1ec0 74 20 6e 73 20 66 6f 72 6d 20 68 65 72 65 22 20 63 6c 6f 6a 75 72 65 2d 69 6e 73 65 72 74 2d 6e t.ns.form.here".clojure-insert-n
1ee0 73 2d 66 6f 72 6d 2d 61 74 2d 70 6f 69 6e 74 5d 20 5b 22 55 70 64 61 74 65 20 6e 73 20 66 6f 72 s-form-at-point].["Update.ns.for
1f00 6d 22 20 63 6c 6f 6a 75 72 65 2d 75 70 64 61 74 65 2d 6e 73 5d 20 5b 22 53 6f 72 74 20 6e 73 20 m".clojure-update-ns].["Sort.ns.
1f20 66 6f 72 6d 22 20 63 6c 6f 6a 75 72 65 2d 73 6f 72 74 2d 6e 73 5d 29 20 28 22 43 6f 6e 76 65 72 form".clojure-sort-ns]).("Conver
1f40 74 20 63 6f 6c 6c 65 63 74 69 6f 6e 22 20 5b 22 43 6f 6e 76 65 72 74 20 74 6f 20 6c 69 73 74 22 t.collection".["Convert.to.list"
1f60 20 63 6c 6f 6a 75 72 65 2d 63 6f 6e 76 65 72 74 2d 63 6f 6c 6c 65 63 74 69 6f 6e 2d 74 6f 2d 6c .clojure-convert-collection-to-l
1f80 69 73 74 5d 20 5b 22 43 6f 6e 76 65 72 74 20 74 6f 20 71 75 6f 74 65 64 20 6c 69 73 74 22 20 63 ist].["Convert.to.quoted.list".c
1fa0 6c 6f 6a 75 72 65 2d 63 6f 6e 76 65 72 74 2d 63 6f 6c 6c 65 63 74 69 6f 6e 2d 74 6f 2d 71 75 6f lojure-convert-collection-to-quo
1fc0 74 65 64 2d 6c 69 73 74 5d 20 5b 22 43 6f 6e 76 65 72 74 20 74 6f 20 6d 61 70 22 20 63 6c 6f 6a ted-list].["Convert.to.map".cloj
1fe0 75 72 65 2d 63 6f 6e 76 65 72 74 2d 63 6f 6c 6c 65 63 74 69 6f 6e 2d 74 6f 2d 6d 61 70 5d 20 5b ure-convert-collection-to-map].[
2000 22 43 6f 6e 76 65 72 74 20 74 6f 20 76 65 63 74 6f 72 22 20 63 6c 6f 6a 75 72 65 2d 63 6f 6e 76 "Convert.to.vector".clojure-conv
2020 65 72 74 2d 63 6f 6c 6c 65 63 74 69 6f 6e 2d 74 6f 2d 76 65 63 74 6f 72 5d 20 5b 22 43 6f 6e 76 ert-collection-to-vector].["Conv
2040 65 72 74 20 74 6f 20 73 65 74 22 20 63 6c 6f 6a 75 72 65 2d 63 6f 6e 76 65 72 74 2d 63 6f 6c 6c ert.to.set".clojure-convert-coll
2060 65 63 74 69 6f 6e 2d 74 6f 2d 73 65 74 5d 29 20 28 22 52 65 66 61 63 74 6f 72 20 2d 3e 20 61 6e ection-to-set]).("Refactor.->.an
2080 64 20 2d 3e 3e 22 20 5b 22 54 68 72 65 61 64 20 6f 6e 63 65 20 6d 6f 72 65 22 20 63 6c 6f 6a 75 d.->>".["Thread.once.more".cloju
20a0 72 65 2d 74 68 72 65 61 64 5d 20 5b 22 46 75 6c 6c 79 20 74 68 72 65 61 64 20 61 20 66 6f 72 6d re-thread].["Fully.thread.a.form
20c0 20 77 69 74 68 20 2d 3e 22 20 63 6c 6f 6a 75 72 65 2d 74 68 72 65 61 64 2d 66 69 72 73 74 2d 61 .with.->".clojure-thread-first-a
20e0 6c 6c 5d 20 5b 22 46 75 6c 6c 79 20 74 68 72 65 61 64 20 61 20 66 6f 72 6d 20 77 69 74 68 20 2d ll].["Fully.thread.a.form.with.-
2100 3e 3e 22 20 63 6c 6f 6a 75 72 65 2d 74 68 72 65 61 64 2d 6c 61 73 74 2d 61 6c 6c 5d 20 22 2d 2d >>".clojure-thread-last-all]."--
2120 22 20 5b 22 55 6e 77 69 6e 64 20 6f 6e 63 65 22 20 63 6c 6f 6a 75 72 65 2d 75 6e 77 69 6e 64 5d ".["Unwind.once".clojure-unwind]
2140 20 5b 22 46 75 6c 6c 79 20 75 6e 77 69 6e 64 20 61 20 74 68 72 65 61 64 69 6e 67 20 6d 61 63 72 .["Fully.unwind.a.threading.macr
2160 6f 22 20 63 6c 6f 6a 75 72 65 2d 75 6e 77 69 6e 64 2d 61 6c 6c 5d 29 20 28 22 4c 65 74 20 65 78 o".clojure-unwind-all]).("Let.ex
2180 70 72 65 73 73 69 6f 6e 22 20 5b 22 49 6e 74 72 6f 64 75 63 65 20 6c 65 74 22 20 63 6c 6f 6a 75 pression".["Introduce.let".cloju
21a0 72 65 2d 69 6e 74 72 6f 64 75 63 65 2d 6c 65 74 5d 20 5b 22 4d 6f 76 65 20 74 6f 20 6c 65 74 22 re-introduce-let].["Move.to.let"
21c0 20 63 6c 6f 6a 75 72 65 2d 6d 6f 76 65 2d 74 6f 2d 6c 65 74 5d 20 5b 22 46 6f 72 77 61 72 64 20 .clojure-move-to-let].["Forward.
21e0 73 6c 75 72 70 20 66 6f 72 6d 20 69 6e 74 6f 20 6c 65 74 22 20 63 6c 6f 6a 75 72 65 2d 6c 65 74 slurp.form.into.let".clojure-let
2200 2d 66 6f 72 77 61 72 64 2d 73 6c 75 72 70 2d 73 65 78 70 5d 20 5b 22 42 61 63 6b 77 61 72 64 20 -forward-slurp-sexp].["Backward.
2220 73 6c 75 72 70 20 66 6f 72 6d 20 69 6e 74 6f 20 6c 65 74 22 20 63 6c 6f 6a 75 72 65 2d 6c 65 74 slurp.form.into.let".clojure-let
2240 2d 62 61 63 6b 77 61 72 64 2d 73 6c 75 72 70 2d 73 65 78 70 5d 29 20 28 22 44 6f 63 75 6d 65 6e -backward-slurp-sexp]).("Documen
2260 74 61 74 69 6f 6e 22 20 5b 22 56 69 65 77 20 61 20 43 6c 6f 6a 75 72 65 20 67 75 69 64 65 22 20 tation".["View.a.Clojure.guide".
2280 63 6c 6f 6a 75 72 65 2d 76 69 65 77 2d 67 75 69 64 65 5d 20 5b 22 56 69 65 77 20 61 20 43 6c 6f clojure-view-guide].["View.a.Clo
22a0 6a 75 72 65 20 72 65 66 65 72 65 6e 63 65 20 73 65 63 74 69 6f 6e 22 20 63 6c 6f 6a 75 72 65 2d jure.reference.section".clojure-
22c0 76 69 65 77 2d 72 65 66 65 72 65 6e 63 65 2d 73 65 63 74 69 6f 6e 5d 20 5b 22 56 69 65 77 20 74 view-reference-section].["View.t
22e0 68 65 20 43 6c 6f 6a 75 72 65 20 63 68 65 61 74 73 68 65 65 74 22 20 63 6c 6f 6a 75 72 65 2d 76 he.Clojure.cheatsheet".clojure-v
2300 69 65 77 2d 63 68 65 61 74 73 68 65 65 74 5d 20 5b 22 56 69 65 77 20 74 68 65 20 43 6c 6f 6a 75 iew-cheatsheet].["View.the.Cloju
2320 72 65 20 47 72 69 6d 6f 69 72 65 22 20 63 6c 6f 6a 75 72 65 2d 76 69 65 77 2d 67 72 69 6d 6f 69 re.Grimoire".clojure-view-grimoi
2340 72 65 5d 20 5b 22 56 69 65 77 20 74 68 65 20 43 6c 6f 6a 75 72 65 20 73 74 79 6c 65 20 67 75 69 re].["View.the.Clojure.style.gui
2360 64 65 22 20 63 6c 6f 6a 75 72 65 2d 76 69 65 77 2d 73 74 79 6c 65 2d 67 75 69 64 65 5d 29 20 22 de".clojure-view-style-guide])."
2380 2d 2d 22 20 5b 22 52 65 70 6f 72 74 20 61 20 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 20 62 75 67 22 --".["Report.a.clojure-mode.bug"
23a0 20 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 2d 72 65 70 6f 72 74 2d 62 75 67 5d 20 5b 22 43 6c 6f 6a .clojure-mode-report-bug].["Cloj
23c0 75 72 65 2d 6d 6f 64 65 20 76 65 72 73 69 6f 6e 22 20 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 2d 64 ure-mode.version".clojure-mode-d
23e0 69 73 70 6c 61 79 2d 76 65 72 73 69 6f 6e 5d 29 5d 20 36 29 20 28 23 24 20 2e 20 37 30 35 38 29 isplay-version])].6).(#$...7058)
2400 29 0a 23 40 37 38 20 53 79 6e 74 61 78 20 74 61 62 6c 65 20 66 6f 72 20 43 6c 6f 6a 75 72 65 20 ).#@78.Syntax.table.for.Clojure.
2420 6d 6f 64 65 2e 0a 49 6e 68 65 72 69 74 73 20 66 72 6f 6d 20 60 65 6d 61 63 73 2d 6c 69 73 70 2d mode..Inherits.from.`emacs-lisp-
2440 6d 6f 64 65 2d 73 79 6e 74 61 78 2d 74 61 62 6c 65 27 2e 1f 0a 28 64 65 66 76 61 72 20 63 6c 6f mode-syntax-table'...(defvar.clo
2460 6a 75 72 65 2d 6d 6f 64 65 2d 73 79 6e 74 61 78 2d 74 61 62 6c 65 20 28 62 79 74 65 2d 63 6f 64 jure-mode-syntax-table.(byte-cod
2480 65 20 22 5c 33 30 31 08 21 5c 33 30 32 5c 33 30 33 5c 33 30 34 03 23 5c 32 31 30 5c 33 30 32 5c e."\301.!\302\303\304.#\210\302\
24a0 33 30 35 5c 33 30 36 03 23 5c 32 31 30 5c 33 30 32 5c 33 30 37 5c 33 31 30 03 23 5c 32 31 30 5c 305\306.#\210\302\307\310.#\210\
24c0 33 30 32 5c 33 31 31 5c 33 31 32 03 23 5c 32 31 30 5c 33 30 32 5c 33 31 33 5c 33 31 34 03 23 5c 302\311\312.#\210\302\313\314.#\
24e0 32 31 30 5c 33 30 32 5c 33 31 35 5c 33 31 34 03 23 5c 32 31 30 5c 33 30 32 5c 33 31 36 5c 33 31 210\302\315\314.#\210\302\316\31
2500 37 03 23 5c 32 31 30 5c 33 30 32 5c 33 32 30 5c 33 31 37 03 23 5c 32 31 30 5c 33 30 32 5c 33 32 7.#\210\302\320\317.#\210\302\32
2520 31 5c 33 31 37 03 23 5c 32 31 30 5c 32 31 31 5c 32 30 37 22 20 5b 65 6d 61 63 73 2d 6c 69 73 70 1\317.#\210\211\207".[emacs-lisp
2540 2d 6d 6f 64 65 2d 73 79 6e 74 61 78 2d 74 61 62 6c 65 20 63 6f 70 79 2d 73 79 6e 74 61 78 2d 74 -mode-syntax-table.copy-syntax-t
2560 61 62 6c 65 20 6d 6f 64 69 66 79 2d 73 79 6e 74 61 78 2d 65 6e 74 72 79 20 31 32 33 20 22 28 7d able.modify-syntax-entry.123."(}
2580 22 20 31 32 35 20 22 29 7b 22 20 39 31 20 22 28 5d 22 20 39 33 20 22 29 5b 22 20 36 33 20 22 5f ".125."){".91."(]".93.")[".63."_
25a0 20 70 22 20 33 35 20 31 32 36 20 22 27 22 20 39 34 20 36 34 5d 20 35 29 20 28 23 24 20 2e 20 39 .p".35.126."'".94.64].5).(#$...9
25c0 32 32 33 29 29 0a 28 64 65 66 63 6f 6e 73 74 20 63 6c 6f 6a 75 72 65 2d 2d 70 72 65 74 74 69 66 223)).(defconst.clojure--prettif
25e0 79 2d 73 79 6d 62 6f 6c 73 2d 61 6c 69 73 74 20 27 28 28 22 66 6e 22 20 2e 20 39 35 35 29 29 29 y-symbols-alist.'(("fn"...955)))
2600 0a 23 40 32 34 38 20 54 68 65 20 66 75 6e 63 74 69 6f 6e 20 75 73 65 64 20 74 6f 20 64 65 74 65 .#@248.The.function.used.to.dete
2620 72 6d 69 6e 65 20 74 68 65 20 65 78 70 65 63 74 65 64 20 6e 61 6d 65 73 70 61 63 65 20 6f 66 20 rmine.the.expected.namespace.of.
2640 61 20 66 69 6c 65 2e 0a 60 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 27 20 73 68 69 70 73 20 61 20 62 a.file..`clojure-mode'.ships.a.b
2660 61 73 69 63 20 66 75 6e 63 74 69 6f 6e 20 6e 61 6d 65 64 20 60 63 6c 6f 6a 75 72 65 2d 65 78 70 asic.function.named.`clojure-exp
2680 65 63 74 65 64 2d 6e 73 27 0a 74 68 61 74 20 64 6f 65 73 20 62 61 73 69 63 20 68 65 75 72 69 73 ected-ns'.that.does.basic.heuris
26a0 74 69 63 73 20 74 6f 20 66 69 67 75 72 65 20 74 68 69 73 20 6f 75 74 2e 0a 43 49 44 45 52 20 70 tics.to.figure.this.out..CIDER.p
26c0 72 6f 76 69 64 65 73 20 61 20 6d 6f 72 65 20 63 6f 6d 70 6c 65 78 20 76 65 72 73 69 6f 6e 20 77 rovides.a.more.complex.version.w
26e0 68 69 63 68 20 64 6f 65 73 20 63 6c 61 73 73 70 61 74 68 20 61 6e 61 6c 79 73 69 73 2e 1f 0a 28 hich.does.classpath.analysis...(
2700 64 65 66 76 61 72 20 63 6c 6f 6a 75 72 65 2d 65 78 70 65 63 74 65 64 2d 6e 73 2d 66 75 6e 63 74 defvar.clojure-expected-ns-funct
2720 69 6f 6e 20 6e 69 6c 20 28 23 24 20 2e 20 39 37 33 35 29 29 0a 28 6d 61 6b 65 2d 76 61 72 69 61 ion.nil.(#$...9735)).(make-varia
2740 62 6c 65 2d 62 75 66 66 65 72 2d 6c 6f 63 61 6c 20 27 63 6c 6f 6a 75 72 65 2d 65 78 70 65 63 74 ble-buffer-local.'clojure-expect
2760 65 64 2d 6e 73 2d 66 75 6e 63 74 69 6f 6e 29 0a 23 40 36 33 20 44 69 73 70 6c 61 79 20 74 68 65 ed-ns-function).#@63.Display.the
2780 20 63 75 72 72 65 6e 74 20 60 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 2d 76 65 72 73 69 6f 6e 27 20 .current.`clojure-mode-version'.
27a0 69 6e 20 74 68 65 20 6d 69 6e 69 62 75 66 66 65 72 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 in.the.minibuffer...(defalias.'c
27c0 6c 6f 6a 75 72 65 2d 6d 6f 64 65 2d 64 69 73 70 6c 61 79 2d 76 65 72 73 69 6f 6e 20 23 5b 30 20 lojure-mode-display-version.#[0.
27e0 22 5c 33 30 31 5c 33 30 32 08 5c 22 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 2d "\301\302.\"\207".[clojure-mode-
2800 76 65 72 73 69 6f 6e 20 6d 65 73 73 61 67 65 20 22 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 20 28 76 version.message."clojure-mode.(v
2820 65 72 73 69 6f 6e 20 25 73 29 22 5d 20 33 20 28 23 24 20 2e 20 31 30 31 30 31 29 20 6e 69 6c 5d ersion.%s)"].3.(#$...10101).nil]
2840 29 0a 23 40 34 33 20 54 68 65 20 55 52 4c 20 74 6f 20 72 65 70 6f 72 74 20 61 20 60 63 6c 6f 6a ).#@43.The.URL.to.report.a.`cloj
2860 75 72 65 2d 6d 6f 64 65 27 20 69 73 73 75 65 2e 1f 0a 28 64 65 66 63 6f 6e 73 74 20 63 6c 6f 6a ure-mode'.issue...(defconst.cloj
2880 75 72 65 2d 6d 6f 64 65 2d 72 65 70 6f 72 74 2d 62 75 67 2d 75 72 6c 20 22 68 74 74 70 73 3a 2f ure-mode-report-bug-url."https:/
28a0 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 63 6c 6f 6a 75 72 65 2d 65 6d 61 63 73 2f 63 6c 6f 6a 75 72 /github.com/clojure-emacs/clojur
28c0 65 2d 6d 6f 64 65 2f 69 73 73 75 65 73 2f 6e 65 77 22 20 28 23 24 20 2e 20 31 30 33 31 31 29 29 e-mode/issues/new".(#$...10311))
28e0 0a 23 40 33 39 20 52 65 70 6f 72 74 20 61 20 62 75 67 20 69 6e 20 79 6f 75 72 20 64 65 66 61 75 .#@39.Report.a.bug.in.your.defau
2900 6c 74 20 62 72 6f 77 73 65 72 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d lt.browser...(defalias.'clojure-
2920 6d 6f 64 65 2d 72 65 70 6f 72 74 2d 62 75 67 20 23 5b 30 20 22 5c 33 30 31 08 21 5c 32 30 37 22 mode-report-bug.#[0."\301.!\207"
2940 20 5b 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 2d 72 65 70 6f 72 74 2d 62 75 67 2d 75 72 6c 20 62 72 .[clojure-mode-report-bug-url.br
2960 6f 77 73 65 2d 75 72 6c 5d 20 32 20 28 23 24 20 2e 20 31 30 34 37 30 29 20 6e 69 6c 5d 29 0a 23 owse-url].2.(#$...10470).nil]).#
2980 40 34 33 20 54 68 65 20 62 61 73 65 20 55 52 4c 20 66 6f 72 20 6f 66 66 69 63 69 61 6c 20 43 6c @43.The.base.URL.for.official.Cl
29a0 6f 6a 75 72 65 20 67 75 69 64 65 73 2e 1f 0a 28 64 65 66 63 6f 6e 73 74 20 63 6c 6f 6a 75 72 65 ojure.guides...(defconst.clojure
29c0 2d 67 75 69 64 65 73 2d 62 61 73 65 2d 75 72 6c 20 22 68 74 74 70 73 3a 2f 2f 63 6c 6f 6a 75 72 -guides-base-url."https://clojur
29e0 65 2e 6f 72 67 2f 67 75 69 64 65 73 2f 22 20 28 23 24 20 2e 20 31 30 36 32 38 29 29 0a 23 40 34 e.org/guides/".(#$...10628)).#@4
2a00 30 20 41 20 6c 69 73 74 20 6f 66 20 61 6c 6c 20 6f 66 66 69 63 69 61 6c 20 43 6c 6f 6a 75 72 65 0.A.list.of.all.official.Clojure
2a20 20 67 75 69 64 65 73 2e 1f 0a 28 64 65 66 63 6f 6e 73 74 20 63 6c 6f 6a 75 72 65 2d 67 75 69 64 .guides...(defconst.clojure-guid
2a40 65 73 20 27 28 28 22 47 65 74 74 69 6e 67 20 53 74 61 72 74 65 64 22 20 2e 20 22 67 65 74 74 69 es.'(("Getting.Started"..."getti
2a60 6e 67 5f 73 74 61 72 74 65 64 22 29 20 28 22 46 41 51 22 20 2e 20 22 66 61 71 22 29 20 28 22 73 ng_started").("FAQ"..."faq").("s
2a80 70 65 63 22 20 2e 20 22 73 70 65 63 22 29 20 28 22 44 65 73 74 72 75 63 74 75 72 69 6e 67 22 20 pec"..."spec").("Destructuring".
2aa0 2e 20 22 64 65 73 74 72 75 63 74 75 72 69 6e 67 22 29 20 28 22 54 68 72 65 61 64 69 6e 67 20 4d .."destructuring").("Threading.M
2ac0 61 63 72 6f 73 22 20 2e 20 22 74 68 72 65 61 64 69 6e 67 5f 6d 61 63 72 6f 73 22 29 20 28 22 43 acros"..."threading_macros").("C
2ae0 6f 6d 70 61 72 61 74 6f 72 73 22 20 2e 20 22 63 6f 6d 70 61 72 61 74 6f 72 73 22 29 20 28 22 52 omparators"..."comparators").("R
2b00 65 61 64 65 72 20 43 6f 6e 64 69 74 69 6f 6e 61 6c 73 22 20 2e 20 22 72 65 61 64 65 72 5f 63 6f eader.Conditionals"..."reader_co
2b20 6e 64 69 74 69 6f 6e 61 6c 73 22 29 29 20 28 23 24 20 2e 20 31 30 37 35 34 29 29 0a 23 40 31 31 nditionals")).(#$...10754)).#@11
2b40 35 20 4f 70 65 6e 20 61 20 43 6c 6f 6a 75 72 65 20 67 75 69 64 65 20 69 6e 20 79 6f 75 72 20 64 5.Open.a.Clojure.guide.in.your.d
2b60 65 66 61 75 6c 74 20 62 72 6f 77 73 65 72 2e 0a 0a 54 68 65 20 63 6f 6d 6d 61 6e 64 20 77 69 6c efault.browser...The.command.wil
2b80 6c 20 70 72 6f 6d 70 74 20 79 6f 75 20 74 6f 20 73 65 6c 65 63 74 20 6f 6e 65 20 6f 66 20 74 68 l.prompt.you.to.select.one.of.th
2ba0 65 20 61 76 61 69 6c 61 62 6c 65 20 67 75 69 64 65 73 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 e.available.guides...(defalias.'
2bc0 63 6c 6f 6a 75 72 65 2d 76 69 65 77 2d 67 75 69 64 65 20 23 5b 30 20 22 5c 33 30 32 5c 33 30 33 clojure-view-guide.#[0."\302\303
2be0 5c 33 30 34 5c 33 30 35 08 5c 22 5c 22 5c 32 31 31 5c 32 30 35 17 00 09 5c 33 30 36 02 08 5c 22 \304\305.\"\"\211\205...\306..\"
2c00 41 50 5c 33 30 37 01 21 5c 32 36 32 01 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 67 75 69 64 AP\307.!\262.\207".[clojure-guid
2c20 65 73 20 63 6c 6f 6a 75 72 65 2d 67 75 69 64 65 73 2d 62 61 73 65 2d 75 72 6c 20 63 6f 6d 70 6c es.clojure-guides-base-url.compl
2c40 65 74 69 6e 67 2d 72 65 61 64 20 22 53 65 6c 65 63 74 20 61 20 67 75 69 64 65 3a 20 22 20 6d 61 eting-read."Select.a.guide:.".ma
2c60 70 63 61 72 20 63 61 72 20 61 73 73 6f 63 20 62 72 6f 77 73 65 2d 75 72 6c 5d 20 35 20 28 23 24 pcar.car.assoc.browse-url].5.(#$
2c80 20 2e 20 31 31 30 37 34 29 20 6e 69 6c 5d 29 0a 23 40 35 30 20 54 68 65 20 62 61 73 65 20 55 52 ...11074).nil]).#@50.The.base.UR
2ca0 4c 20 66 6f 72 20 74 68 65 20 6f 66 66 69 63 69 61 6c 20 43 6c 6f 6a 75 72 65 20 72 65 66 65 72 L.for.the.official.Clojure.refer
2cc0 65 6e 63 65 2e 1f 0a 28 64 65 66 63 6f 6e 73 74 20 63 6c 6f 6a 75 72 65 2d 72 65 66 65 72 65 6e ence...(defconst.clojure-referen
2ce0 63 65 2d 62 61 73 65 2d 75 72 6c 20 22 68 74 74 70 73 3a 2f 2f 63 6c 6f 6a 75 72 65 2e 6f 72 67 ce-base-url."https://clojure.org
2d00 2f 72 65 66 65 72 65 6e 63 65 2f 22 20 28 23 24 20 2e 20 31 31 34 31 33 29 29 0a 28 64 65 66 63 /reference/".(#$...11413)).(defc
2d20 6f 6e 73 74 20 63 6c 6f 6a 75 72 65 2d 72 65 66 65 72 65 6e 63 65 2d 73 65 63 74 69 6f 6e 73 20 onst.clojure-reference-sections.
2d40 27 28 28 22 54 68 65 20 52 65 61 64 65 72 22 20 2e 20 22 72 65 61 64 65 72 22 29 20 28 22 54 68 '(("The.Reader"..."reader").("Th
2d60 65 20 52 45 50 4c 20 61 6e 64 20 6d 61 69 6e 22 20 2e 20 22 72 65 70 6c 5f 61 6e 64 5f 6d 61 69 e.REPL.and.main"..."repl_and_mai
2d80 6e 22 29 20 28 22 45 76 61 6c 75 61 74 69 6f 6e 22 20 2e 20 22 65 76 61 6c 75 61 74 69 6f 6e 22 n").("Evaluation"..."evaluation"
2da0 29 20 28 22 53 70 65 63 69 61 6c 20 46 6f 72 6d 73 22 20 2e 20 22 73 70 65 63 69 61 6c 5f 66 6f ).("Special.Forms"..."special_fo
2dc0 72 6d 73 22 29 20 28 22 4d 61 63 72 6f 73 22 20 2e 20 22 6d 61 63 72 6f 73 22 29 20 28 22 4f 74 rms").("Macros"..."macros").("Ot
2de0 68 65 72 20 46 75 6e 63 74 69 6f 6e 73 22 20 2e 20 22 6f 74 68 65 72 5f 66 75 6e 63 74 69 6f 6e her.Functions"..."other_function
2e00 73 22 29 20 28 22 44 61 74 61 20 53 74 72 75 63 74 75 72 65 73 22 20 2e 20 22 64 61 74 61 5f 73 s").("Data.Structures"..."data_s
2e20 74 72 75 63 74 75 72 65 73 22 29 20 28 22 44 61 74 61 74 79 70 65 73 22 20 2e 20 22 64 61 74 61 tructures").("Datatypes"..."data
2e40 74 79 70 65 73 22 29 20 28 22 53 65 71 75 65 6e 63 65 73 22 20 2e 20 22 73 65 71 75 65 6e 63 65 types").("Sequences"..."sequence
2e60 73 22 29 20 28 22 54 72 61 6e 73 69 65 6e 74 73 22 20 2e 20 22 74 72 61 6e 73 69 65 6e 74 73 22 s").("Transients"..."transients"
2e80 29 20 28 22 54 72 61 6e 73 64 75 63 65 72 73 22 20 2e 20 22 74 72 61 6e 73 64 75 63 65 72 73 22 ).("Transducers"..."transducers"
2ea0 29 20 28 22 4d 75 6c 74 69 6d 65 74 68 6f 64 73 20 61 6e 64 20 48 69 65 72 61 72 63 68 69 65 73 ).("Multimethods.and.Hierarchies
2ec0 22 20 2e 20 22 6d 75 6c 74 69 6d 65 74 68 6f 64 73 22 29 20 28 22 50 72 6f 74 6f 63 6f 6c 73 22 "..."multimethods").("Protocols"
2ee0 20 2e 20 22 70 72 6f 74 6f 63 6f 6c 73 22 29 20 28 22 4d 65 74 61 64 61 74 61 22 20 2e 20 22 6d ..."protocols").("Metadata"..."m
2f00 65 74 61 64 61 74 61 22 29 20 28 22 4e 61 6d 65 73 70 61 63 65 73 22 20 2e 20 22 6e 61 6d 65 73 etadata").("Namespaces"..."names
2f20 70 61 63 65 73 22 29 20 28 22 4c 69 62 73 22 20 2e 20 22 6c 69 62 73 22 29 20 28 22 56 61 72 73 paces").("Libs"..."libs").("Vars
2f40 20 61 6e 64 20 45 6e 76 69 72 6f 6e 6d 65 6e 74 73 22 20 2e 20 22 76 61 72 73 22 29 20 28 22 52 .and.Environments"..."vars").("R
2f60 65 66 73 20 61 6e 64 20 54 72 61 6e 73 61 63 74 69 6f 6e 73 22 20 2e 20 22 72 65 66 73 22 29 20 efs.and.Transactions"..."refs").
2f80 28 22 41 67 65 6e 74 73 22 20 2e 20 22 61 67 65 6e 74 73 22 29 20 28 22 41 74 6f 6d 73 22 20 2e ("Agents"..."agents").("Atoms"..
2fa0 20 22 61 74 6f 6d 73 22 29 20 28 22 52 65 64 75 63 65 72 73 22 20 2e 20 22 72 65 64 75 63 65 72 ."atoms").("Reducers"..."reducer
2fc0 73 22 29 20 28 22 4a 61 76 61 20 49 6e 74 65 72 6f 70 22 20 2e 20 22 6a 61 76 61 5f 69 6e 74 65 s").("Java.Interop"..."java_inte
2fe0 72 6f 70 22 29 20 28 22 43 6f 6d 70 69 6c 61 74 69 6f 6e 20 61 6e 64 20 43 6c 61 73 73 20 47 65 rop").("Compilation.and.Class.Ge
3000 6e 65 72 61 74 69 6f 6e 22 20 2e 20 22 63 6f 6d 70 69 6c 61 74 69 6f 6e 22 29 20 28 22 4f 74 68 neration"..."compilation").("Oth
3020 65 72 20 4c 69 62 72 61 72 69 65 73 22 20 2e 20 22 6f 74 68 65 72 5f 6c 69 62 72 61 72 69 65 73 er.Libraries"..."other_libraries
3040 22 29 20 28 22 44 69 66 66 65 72 65 6e 63 65 73 20 77 69 74 68 20 4c 69 73 70 73 22 20 2e 20 22 ").("Differences.with.Lisps"..."
3060 6c 69 73 70 73 22 29 29 29 0a 23 40 31 32 39 20 4f 70 65 6e 20 61 20 43 6c 6f 6a 75 72 65 20 72 lisps"))).#@129.Open.a.Clojure.r
3080 65 66 65 72 65 6e 63 65 20 73 65 63 74 69 6f 6e 20 69 6e 20 79 6f 75 72 20 64 65 66 61 75 6c 74 eference.section.in.your.default
30a0 20 62 72 6f 77 73 65 72 2e 0a 0a 54 68 65 20 63 6f 6d 6d 61 6e 64 20 77 69 6c 6c 20 70 72 6f 6d .browser...The.command.will.prom
30c0 70 74 20 79 6f 75 20 74 6f 20 73 65 6c 65 63 74 20 6f 6e 65 20 6f 66 20 74 68 65 20 61 76 61 69 pt.you.to.select.one.of.the.avai
30e0 6c 61 62 6c 65 20 73 65 63 74 69 6f 6e 73 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a lable.sections...(defalias.'cloj
3100 75 72 65 2d 76 69 65 77 2d 72 65 66 65 72 65 6e 63 65 2d 73 65 63 74 69 6f 6e 20 23 5b 30 20 22 ure-view-reference-section.#[0."
3120 5c 33 30 32 5c 33 30 33 5c 33 30 34 5c 33 30 35 08 5c 22 5c 22 5c 32 31 31 5c 32 30 35 17 00 09 \302\303\304\305.\"\"\211\205...
3140 5c 33 30 36 02 08 5c 22 41 50 5c 33 30 37 01 21 5c 32 36 32 01 5c 32 30 37 22 20 5b 63 6c 6f 6a \306..\"AP\307.!\262.\207".[cloj
3160 75 72 65 2d 72 65 66 65 72 65 6e 63 65 2d 73 65 63 74 69 6f 6e 73 20 63 6c 6f 6a 75 72 65 2d 72 ure-reference-sections.clojure-r
3180 65 66 65 72 65 6e 63 65 2d 62 61 73 65 2d 75 72 6c 20 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 eference-base-url.completing-rea
31a0 64 20 22 53 65 6c 65 63 74 20 61 20 72 65 66 65 72 65 6e 63 65 20 73 65 63 74 69 6f 6e 3a 20 22 d."Select.a.reference.section:."
31c0 20 6d 61 70 63 61 72 20 63 61 72 20 61 73 73 6f 63 20 62 72 6f 77 73 65 2d 75 72 6c 5d 20 35 20 .mapcar.car.assoc.browse-url].5.
31e0 28 23 24 20 2e 20 31 32 34 30 30 29 20 6e 69 6c 5d 29 0a 23 40 34 35 20 54 68 65 20 55 52 4c 20 (#$...12400).nil]).#@45.The.URL.
3200 6f 66 20 74 68 65 20 6f 66 66 69 63 69 61 6c 20 43 6c 6f 6a 75 72 65 20 63 68 65 61 74 73 68 65 of.the.official.Clojure.cheatshe
3220 65 74 2e 1f 0a 28 64 65 66 63 6f 6e 73 74 20 63 6c 6f 6a 75 72 65 2d 63 68 65 61 74 73 68 65 65 et...(defconst.clojure-cheatshee
3240 74 2d 75 72 6c 20 22 68 74 74 70 3a 2f 2f 63 6c 6f 6a 75 72 65 2e 6f 72 67 2f 61 70 69 2f 63 68 t-url."http://clojure.org/api/ch
3260 65 61 74 73 68 65 65 74 22 20 28 23 24 20 2e 20 31 32 37 39 32 29 29 0a 23 40 35 34 20 4f 70 65 eatsheet".(#$...12792)).#@54.Ope
3280 6e 20 74 68 65 20 43 6c 6f 6a 75 72 65 20 63 68 65 61 74 73 68 65 65 74 20 69 6e 20 79 6f 75 72 n.the.Clojure.cheatsheet.in.your
32a0 20 64 65 66 61 75 6c 74 20 62 72 6f 77 73 65 72 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c .default.browser...(defalias.'cl
32c0 6f 6a 75 72 65 2d 76 69 65 77 2d 63 68 65 61 74 73 68 65 65 74 20 23 5b 30 20 22 5c 33 30 31 08 ojure-view-cheatsheet.#[0."\301.
32e0 21 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 63 68 65 61 74 73 68 65 65 74 2d 75 72 6c 20 62 !\207".[clojure-cheatsheet-url.b
3300 72 6f 77 73 65 2d 75 72 6c 5d 20 32 20 28 23 24 20 2e 20 31 32 39 32 35 29 20 6e 69 6c 5d 29 0a rowse-url].2.(#$...12925).nil]).
3320 23 40 35 35 20 54 68 65 20 55 52 4c 20 6f 66 20 74 68 65 20 47 72 69 6d 6f 69 72 65 20 63 6f 6d #@55.The.URL.of.the.Grimoire.com
3340 6d 75 6e 69 74 79 20 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 73 69 74 65 2e 1f 0a 28 64 65 66 munity.documentation.site...(def
3360 63 6f 6e 73 74 20 63 6c 6f 6a 75 72 65 2d 67 72 69 6d 6f 69 72 65 2d 75 72 6c 20 22 68 74 74 70 const.clojure-grimoire-url."http
3380 73 3a 2f 2f 77 77 77 2e 63 6f 6e 6a 2e 69 6f 2f 22 20 28 23 24 20 2e 20 31 33 30 39 33 29 29 0a s://www.conj.io/".(#$...13093)).
33a0 23 40 35 32 20 4f 70 65 6e 20 74 68 65 20 43 6c 6f 6a 75 72 65 20 47 72 69 6d 6f 69 72 65 20 69 #@52.Open.the.Clojure.Grimoire.i
33c0 6e 20 79 6f 75 72 20 64 65 66 61 75 6c 74 20 62 72 6f 77 73 65 72 2e 1f 0a 28 64 65 66 61 6c 69 n.your.default.browser...(defali
33e0 61 73 20 27 63 6c 6f 6a 75 72 65 2d 76 69 65 77 2d 67 72 69 6d 6f 69 72 65 20 23 5b 30 20 22 5c as.'clojure-view-grimoire.#[0."\
3400 33 30 31 08 21 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 67 72 69 6d 6f 69 72 65 2d 75 72 6c 301.!\207".[clojure-grimoire-url
3420 20 62 72 6f 77 73 65 2d 75 72 6c 5d 20 32 20 28 23 24 20 2e 20 31 33 32 32 31 29 20 6e 69 6c 5d .browse-url].2.(#$...13221).nil]
3440 29 0a 23 40 33 37 20 54 68 65 20 55 52 4c 20 6f 66 20 74 68 65 20 43 6c 6f 6a 75 72 65 20 73 74 ).#@37.The.URL.of.the.Clojure.st
3460 79 6c 65 20 67 75 69 64 65 2e 1f 0a 28 64 65 66 63 6f 6e 73 74 20 63 6c 6f 6a 75 72 65 2d 73 74 yle.guide...(defconst.clojure-st
3480 79 6c 65 2d 67 75 69 64 65 2d 75 72 6c 20 22 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f yle-guide-url."https://github.co
34a0 6d 2f 62 62 61 74 73 6f 76 2f 63 6c 6f 6a 75 72 65 2d 73 74 79 6c 65 2d 67 75 69 64 65 22 20 28 m/bbatsov/clojure-style-guide".(
34c0 23 24 20 2e 20 31 33 33 38 33 29 29 0a 23 40 35 35 20 4f 70 65 6e 20 74 68 65 20 43 6c 6f 6a 75 #$...13383)).#@55.Open.the.Cloju
34e0 72 65 20 73 74 79 6c 65 20 67 75 69 64 65 20 69 6e 20 79 6f 75 72 20 64 65 66 61 75 6c 74 20 62 re.style.guide.in.your.default.b
3500 72 6f 77 73 65 72 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 76 69 65 77 rowser...(defalias.'clojure-view
3520 2d 73 74 79 6c 65 2d 67 75 69 64 65 20 23 5b 30 20 22 5c 33 30 31 08 21 5c 32 30 37 22 20 5b 63 -style-guide.#[0."\301.!\207".[c
3540 6c 6f 6a 75 72 65 2d 73 74 79 6c 65 2d 67 75 69 64 65 2d 75 72 6c 20 62 72 6f 77 73 65 2d 75 72 lojure-style-guide-url.browse-ur
3560 6c 5d 20 32 20 28 23 24 20 2e 20 31 33 35 32 32 29 20 6e 69 6c 5d 29 0a 23 40 31 34 35 20 50 72 l].2.(#$...13522).nil]).#@145.Pr
3580 65 76 65 6e 74 20 70 61 72 65 64 69 74 20 66 72 6f 6d 20 69 6e 73 65 72 74 69 6e 67 20 75 73 65 event.paredit.from.inserting.use
35a0 6c 65 73 73 20 73 70 61 63 65 73 2e 0a 53 65 65 20 60 70 61 72 65 64 69 74 2d 73 70 61 63 65 2d less.spaces..See.`paredit-space-
35c0 66 6f 72 2d 64 65 6c 69 6d 69 74 65 72 2d 70 72 65 64 69 63 61 74 65 73 27 20 66 6f 72 20 74 68 for-delimiter-predicates'.for.th
35e0 65 20 6d 65 61 6e 69 6e 67 20 6f 66 0a 45 4e 44 50 20 61 6e 64 20 44 45 4c 49 4d 2e 0a 0a 28 66 e.meaning.of.ENDP.and.DELIM...(f
3600 6e 20 45 4e 44 50 20 44 45 4c 49 4d 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 n.ENDP.DELIM)..(defalias.'clojur
3620 65 2d 73 70 61 63 65 2d 66 6f 72 2d 64 65 6c 69 6d 69 74 65 72 2d 70 20 23 5b 35 31 34 20 22 01 e-space-for-delimiter-p.#[514.".
3640 5c 32 30 36 57 00 5c 32 31 31 5c 33 30 30 3e 3f 5c 32 30 36 57 00 5c 33 30 31 5c 33 30 32 21 5c \206W.\211\300>?\206W.\301\302!\
3660 32 30 36 14 00 5c 33 30 31 5c 33 30 33 21 3f 5c 32 30 36 57 00 5c 32 31 32 5c 33 30 34 75 5c 32 206..\301\303!?\206W.\212\304u\2
3680 31 30 5c 33 30 35 66 5c 33 30 36 3d 5c 32 30 33 3c 00 6f 3f 5c 32 30 35 56 00 5c 33 30 37 5c 33 10\305f\306=\203<.o?\205V.\307\3
36a0 31 30 60 53 66 7a 5c 22 5c 32 30 36 56 00 5c 33 30 37 5c 33 31 31 60 53 66 7a 5c 22 5c 32 30 32 10`Sfz\"\206V.\307\311`Sfz\"\202
36c0 56 00 5c 32 31 31 5c 33 31 32 3d 5c 32 30 33 55 00 5c 33 30 35 66 5c 33 31 33 3d 5c 32 30 33 55 V.\211\312=\203U.\305f\313=\203U
36e0 00 60 53 66 5c 33 30 36 3d 5c 32 30 33 55 00 5c 33 30 35 5c 32 30 32 56 00 5c 33 31 34 29 5c 32 .`Sf\306=\203U.\305\202V.\314)\2
3700 30 37 22 20 5b 28 33 34 20 31 32 33 20 34 30 29 20 64 65 72 69 76 65 64 2d 6d 6f 64 65 2d 70 20 07".[(34.123.40).derived-mode-p.
3720 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 20 63 69 64 65 72 2d 72 65 70 6c 2d 6d 6f 64 65 20 2d 31 20 clojure-mode.cider-repl-mode.-1.
3740 6e 69 6c 20 33 35 20 63 68 61 72 2d 65 71 75 61 6c 20 31 31 39 20 39 35 20 34 30 20 36 33 20 74 nil.35.char-equal.119.95.40.63.t
3760 5d 20 35 20 28 23 24 20 2e 20 31 33 36 39 34 29 5d 29 0a 23 40 32 35 33 20 43 6f 6c 6c 65 63 74 ].5.(#$...13694)]).#@253.Collect
3780 69 6f 6e 20 72 65 61 64 65 72 20 6d 61 63 72 6f 20 74 61 67 20 72 65 67 65 78 70 2e 0a 49 74 20 ion.reader.macro.tag.regexp..It.
37a0 69 73 20 69 6e 74 65 6e 64 65 64 20 74 6f 20 63 68 65 63 6b 20 66 6f 72 20 61 6c 6c 6f 77 65 64 is.intended.to.check.for.allowed
37c0 20 73 74 72 69 6e 67 73 20 74 68 61 74 20 63 61 6e 20 63 6f 6d 65 20 62 65 66 6f 72 65 20 61 0a .strings.that.can.come.before.a.
37e0 63 6f 6c 6c 65 63 74 69 6f 6e 20 6c 69 74 65 72 61 6c 20 28 65 2e 67 2e 20 27 5b 5d 27 20 6f 72 collection.literal.(e.g..'[]'.or
3800 20 27 7b 7d 27 29 2c 20 61 73 20 72 65 61 64 65 72 20 6d 61 63 72 6f 20 74 61 67 73 2e 0a 54 68 .'{}'),.as.reader.macro.tags..Th
3820 69 73 20 69 6e 63 6c 75 64 65 73 20 23 66 75 6c 6c 79 2e 71 75 61 6c 69 66 69 65 64 2f 6d 79 2d is.includes.#fully.qualified/my-
3840 6e 73 5b 3a 6b 77 20 76 61 6c 5d 20 61 6e 64 20 23 3a 3a 6d 79 2d 6e 73 7b 3a 6b 77 0a 76 61 6c ns[:kw.val].and.#::my-ns{:kw.val
3860 7d 20 61 73 20 6f 66 20 43 6c 6f 6a 75 72 65 20 31 2e 39 2e 1f 0a 28 64 65 66 63 6f 6e 73 74 20 }.as.of.Clojure.1.9...(defconst.
3880 63 6c 6f 6a 75 72 65 2d 2d 63 6f 6c 6c 65 63 74 69 6f 6e 2d 74 61 67 2d 72 65 67 65 78 70 20 22 clojure--collection-tag-regexp."
38a0 23 5c 5c 28 3a 3a 5b 61 2d 7a 41 2d 5a 30 2d 39 2e 5f 2d 5d 2a 5c 5c 7c 3a 3f 5c 5c 28 5b 61 2d #\\(::[a-zA-Z0-9._-]*\\|:?\\([a-
38c0 7a 41 2d 5a 30 2d 39 2e 5f 2d 5d 2b 2f 5c 5c 29 3f 5b 61 2d 7a 41 2d 5a 30 2d 39 2e 5f 2d 5d 2b zA-Z0-9._-]+/\\)?[a-zA-Z0-9._-]+
38e0 5c 5c 29 22 20 28 23 24 20 2e 20 31 34 32 30 31 29 29 0a 23 40 34 36 31 20 50 72 65 76 65 6e 74 \\)".(#$...14201)).#@461.Prevent
3900 20 69 6e 73 65 72 74 69 6e 67 20 61 20 73 70 61 63 65 20 61 66 74 65 72 20 61 20 72 65 61 64 65 .inserting.a.space.after.a.reade
3920 72 2d 6c 69 74 65 72 61 6c 20 74 61 67 2e 0a 0a 57 68 65 6e 20 61 20 72 65 61 64 65 72 2d 6c 69 r-literal.tag...When.a.reader-li
3940 74 65 72 61 6c 20 74 61 67 20 69 73 20 66 6f 6c 6c 6f 77 65 64 20 62 65 20 61 6e 20 6f 70 65 6e teral.tag.is.followed.be.an.open
3960 69 6e 67 20 64 65 6c 69 6d 69 74 65 72 0a 6c 69 73 74 65 64 20 69 6e 20 60 63 6c 6f 6a 75 72 65 ing.delimiter.listed.in.`clojure
3980 2d 6f 6d 69 74 2d 73 70 61 63 65 2d 62 65 74 77 65 65 6e 2d 74 61 67 2d 61 6e 64 2d 64 65 6c 69 -omit-space-between-tag-and-deli
39a0 6d 69 74 65 72 73 27 2c 20 74 68 69 73 0a 66 75 6e 63 74 69 6f 6e 20 72 65 74 75 72 6e 73 20 74 miters',.this.function.returns.t
39c0 2e 0a 0a 54 68 69 73 20 61 6c 6c 6f 77 73 20 79 6f 75 20 74 6f 20 77 72 69 74 65 20 74 68 69 6e ...This.allows.you.to.write.thin
39e0 67 73 20 6c 69 6b 65 20 23 64 62 2f 69 64 5b 3a 64 62 2e 70 61 72 74 2f 75 73 65 72 5d 0a 61 6e gs.like.#db/id[:db.part/user].an
3a00 64 20 23 3a 3a 6d 79 2d 6e 73 7b 3a 73 6f 6d 65 20 22 6d 61 70 22 7d 20 77 69 74 68 6f 75 74 20 d.#::my-ns{:some."map"}.without.
3a20 69 6e 73 65 72 74 69 6e 67 20 61 20 73 70 61 63 65 20 62 65 74 77 65 65 6e 0a 74 68 65 20 74 61 inserting.a.space.between.the.ta
3a40 67 20 61 6e 64 20 74 68 65 20 6f 70 65 6e 69 6e 67 20 62 72 61 63 6b 65 74 2e 0a 0a 53 65 65 20 g.and.the.opening.bracket...See.
3a60 60 70 61 72 65 64 69 74 2d 73 70 61 63 65 2d 66 6f 72 2d 64 65 6c 69 6d 69 74 65 72 2d 70 72 65 `paredit-space-for-delimiter-pre
3a80 64 69 63 61 74 65 73 27 20 66 6f 72 20 74 68 65 20 6d 65 61 6e 69 6e 67 20 6f 66 0a 45 4e 44 50 dicates'.for.the.meaning.of.ENDP
3aa0 20 61 6e 64 20 44 45 4c 49 4d 49 54 45 52 2e 0a 0a 28 66 6e 20 45 4e 44 50 20 44 45 4c 49 4d 49 .and.DELIMITER...(fn.ENDP.DELIMI
3ac0 54 45 52 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 6e 6f 2d 73 70 61 63 TER)..(defalias.'clojure-no-spac
3ae0 65 2d 61 66 74 65 72 2d 74 61 67 20 23 5b 35 31 34 20 22 01 5c 32 30 33 06 00 5c 33 30 32 5c 32 e-after-tag.#[514.".\203..\302\2
3b00 30 37 5c 32 31 31 08 5c 32 33 35 3f 5c 32 30 36 20 00 5c 32 31 32 60 5c 33 30 33 09 5c 33 30 34 07\211.\235?\206..\212`\303.\304
3b20 20 5c 33 30 32 23 5c 32 30 35 1c 00 5c 32 31 31 5c 33 30 35 5c 32 32 35 55 3f 5c 32 36 32 01 29 .\302#\205..\211\305\225U?\262.)
3b40 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 6f 6d 69 74 2d 73 70 61 63 65 2d 62 65 74 77 65 65 \207".[clojure-omit-space-betwee
3b60 6e 2d 74 61 67 2d 61 6e 64 2d 64 65 6c 69 6d 69 74 65 72 73 20 63 6c 6f 6a 75 72 65 2d 2d 63 6f n-tag-and-delimiters.clojure--co
3b80 6c 6c 65 63 74 69 6f 6e 2d 74 61 67 2d 72 65 67 65 78 70 20 74 20 72 65 2d 73 65 61 72 63 68 2d llection-tag-regexp.t.re-search-
3ba0 62 61 63 6b 77 61 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 backward.line-beginning-position
3bc0 20 30 5d 20 37 20 28 23 24 20 2e 20 31 34 35 38 35 29 5d 29 0a 23 40 32 33 33 20 41 64 76 69 73 .0].7.(#$...14585)]).#@233.Advis
3be0 65 20 4f 52 49 47 2d 46 55 4e 20 74 6f 20 72 65 70 6c 61 63 65 20 6c 65 74 20 62 69 6e 64 69 6e e.ORIG-FUN.to.replace.let.bindin
3c00 67 73 2e 0a 0a 53 65 78 70 73 20 61 72 65 20 72 65 70 6c 61 63 65 20 62 79 20 74 68 65 69 72 20 gs...Sexps.are.replace.by.their.
3c20 62 6f 75 6e 64 20 6e 61 6d 65 20 69 66 20 61 20 6c 65 74 20 66 6f 72 6d 20 77 61 73 0a 63 6f 6e bound.name.if.a.let.form.was.con
3c40 76 6f 6c 75 74 65 64 2e 0a 0a 4f 52 49 47 2d 46 55 4e 20 73 68 6f 75 6c 64 20 62 65 20 60 70 61 voluted...ORIG-FUN.should.be.`pa
3c60 72 65 64 69 74 2d 63 6f 6e 76 6f 6c 75 74 65 2d 73 65 78 70 27 2e 0a 0a 41 52 47 53 20 61 72 65 redit-convolute-sexp'...ARGS.are
3c80 20 70 61 73 73 65 64 20 74 6f 20 4f 52 49 47 2d 46 55 4e 2c 20 61 73 20 77 69 74 68 20 61 6c 6c .passed.to.ORIG-FUN,.as.with.all
3ca0 20 61 64 76 69 63 65 2e 0a 0a 28 66 6e 20 4f 52 49 47 2d 46 55 4e 20 26 72 65 73 74 20 41 52 47 .advice...(fn.ORIG-FUN.&rest.ARG
3cc0 53 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 2d 72 65 70 6c 61 63 65 2d S)..(defalias.'clojure--replace-
3ce0 6c 65 74 2d 62 69 6e 64 69 6e 67 73 2d 61 6e 64 2d 69 6e 64 65 6e 74 20 23 5b 33 38 35 20 22 5c let-bindings-and-indent.#[385."\
3d00 32 31 32 5c 33 30 31 20 5c 32 31 30 5c 33 30 32 08 21 5c 32 30 35 5c 66 00 5c 33 30 33 20 29 5c 212\301.\210\302.!\205\f.\303.)\
3d20 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 2d 6c 65 74 2d 72 65 67 65 78 70 20 62 61 63 6b 77 61 207".[clojure--let-regexp.backwa
3d40 72 64 2d 73 65 78 70 20 6c 6f 6f 6b 69 6e 67 2d 62 61 63 6b 20 63 6c 6f 6a 75 72 65 2d 2d 72 65 rd-sexp.looking-back.clojure--re
3d60 70 6c 61 63 65 2d 73 65 78 70 73 2d 77 69 74 68 2d 62 69 6e 64 69 6e 67 73 2d 61 6e 64 2d 69 6e place-sexps-with-bindings-and-in
3d80 64 65 6e 74 5d 20 34 20 28 23 24 20 2e 20 31 35 33 32 33 29 5d 29 0a 23 40 32 38 30 20 4d 61 6b dent].4.(#$...15323)]).#@280.Mak
3da0 65 20 22 70 61 72 65 64 69 74 2d 6d 6f 64 65 22 20 70 6c 61 79 20 6e 69 63 65 20 77 69 74 68 20 e."paredit-mode".play.nice.with.
3dc0 60 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 27 2e 0a 0a 49 66 20 61 6e 20 6f 70 74 69 6f 6e 61 6c 20 `clojure-mode'...If.an.optional.
3de0 4b 45 59 4d 41 50 20 69 73 20 70 61 73 73 65 64 20 74 68 65 20 63 68 61 6e 67 65 73 20 61 72 65 KEYMAP.is.passed.the.changes.are
3e00 20 61 70 70 6c 69 65 64 20 74 6f 20 69 74 2c 0a 69 6e 73 74 65 61 64 20 6f 66 20 74 6f 20 60 63 .applied.to.it,.instead.of.to.`c
3e20 6c 6f 6a 75 72 65 2d 6d 6f 64 65 2d 6d 61 70 27 2e 0a 41 6c 73 6f 20 61 64 76 69 63 65 20 60 70 lojure-mode-map'..Also.advice.`p
3e40 61 72 65 64 69 74 2d 63 6f 6e 76 6f 6c 75 74 65 2d 73 65 78 70 27 20 77 68 65 6e 20 75 73 65 64 aredit-convolute-sexp'.when.used
3e60 20 6f 6e 20 61 20 6c 65 74 20 66 6f 72 6d 20 61 73 20 64 72 6f 70 20 69 6e 0a 72 65 70 6c 61 63 .on.a.let.form.as.drop.in.replac
3e80 65 6d 65 6e 74 20 66 6f 72 20 60 63 6c 6a 72 2d 65 78 70 61 6e 64 2d 6c 65 74 60 2e 0a 0a 28 66 ement.for.`cljr-expand-let`...(f
3ea0 6e 20 26 6f 70 74 69 6f 6e 61 6c 20 4b 45 59 4d 41 50 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 n.&optional.KEYMAP)..(defalias.'
3ec0 63 6c 6f 6a 75 72 65 2d 70 61 72 65 64 69 74 2d 73 65 74 75 70 20 23 5b 32 35 36 20 22 08 5c 33 clojure-paredit-setup.#[256.".\3
3ee0 30 32 59 5c 32 30 35 27 00 5c 32 31 31 5c 32 30 36 0b 00 09 5c 33 30 33 01 5c 33 30 34 5c 33 30 02Y\205'.\211\206...\303.\304\30
3f00 35 23 5c 32 31 30 5c 33 30 33 01 5c 33 30 36 5c 33 30 37 23 5c 32 36 36 02 5c 33 31 30 5c 33 31 5#\210\303.\306\307#\266.\310\31
3f20 31 5c 33 31 32 5c 22 5c 32 31 30 5c 33 31 30 5c 33 31 31 5c 33 31 33 5c 22 5c 32 31 30 5c 33 31 1\312\"\210\310\311\313\"\210\31
3f40 34 5c 33 31 35 5c 33 31 36 5c 33 31 37 23 5c 32 30 37 22 20 5b 70 61 72 65 64 69 74 2d 76 65 72 4\315\316\317#\207".[paredit-ver
3f60 73 69 6f 6e 20 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 2d 6d 61 70 20 32 31 20 64 65 66 69 6e 65 2d sion.clojure-mode-map.21.define-
3f80 6b 65 79 20 22 7b 22 20 70 61 72 65 64 69 74 2d 6f 70 65 6e 2d 63 75 72 6c 79 20 22 7d 22 20 70 key."{".paredit-open-curly."}".p
3fa0 61 72 65 64 69 74 2d 63 6c 6f 73 65 2d 63 75 72 6c 79 20 61 64 64 2d 74 6f 2d 6c 69 73 74 20 70 aredit-close-curly.add-to-list.p
3fc0 61 72 65 64 69 74 2d 73 70 61 63 65 2d 66 6f 72 2d 64 65 6c 69 6d 69 74 65 72 2d 70 72 65 64 69 aredit-space-for-delimiter-predi
3fe0 63 61 74 65 73 20 63 6c 6f 6a 75 72 65 2d 73 70 61 63 65 2d 66 6f 72 2d 64 65 6c 69 6d 69 74 65 cates.clojure-space-for-delimite
4000 72 2d 70 20 63 6c 6f 6a 75 72 65 2d 6e 6f 2d 73 70 61 63 65 2d 61 66 74 65 72 2d 74 61 67 20 61 r-p.clojure-no-space-after-tag.a
4020 64 76 69 63 65 2d 61 64 64 20 70 61 72 65 64 69 74 2d 63 6f 6e 76 6f 6c 75 74 65 2d 73 65 78 70 dvice-add.paredit-convolute-sexp
4040 20 3a 61 66 74 65 72 20 63 6c 6f 6a 75 72 65 2d 2d 72 65 70 6c 61 63 65 2d 6c 65 74 2d 62 69 6e .:after.clojure--replace-let-bin
4060 64 69 6e 67 73 2d 61 6e 64 2d 69 6e 64 65 6e 74 5d 20 36 20 28 23 24 20 2e 20 31 35 37 37 33 29 dings-and-indent].6.(#$...15773)
4080 5d 29 0a 23 40 35 37 20 53 65 74 20 75 70 20 69 6e 69 74 69 61 6c 20 62 75 66 66 65 72 2d 6c 6f ]).#@57.Set.up.initial.buffer-lo
40a0 63 61 6c 20 76 61 72 69 61 62 6c 65 73 20 66 6f 72 20 43 6c 6f 6a 75 72 65 20 6d 6f 64 65 2e 1f cal.variables.for.Clojure.mode..
40c0 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 2d 76 61 72 69 61 62 6c .(defalias.'clojure-mode-variabl
40e0 65 73 20 23 5b 30 20 22 5c 33 30 36 5c 33 30 37 5c 33 31 30 5c 22 5c 32 31 30 5c 33 31 31 5c 33 es.#[0."\306\307\310\"\210\311\3
4100 30 30 21 5c 32 31 30 5c 33 31 32 10 5c 33 31 31 5c 33 30 31 21 5c 32 31 30 5c 33 31 33 11 5c 33 00!\210\312.\311\301!\210\313.\3
4120 31 31 5c 33 30 32 21 5c 32 31 30 5c 33 31 34 12 5c 33 31 31 5c 33 30 33 21 5c 32 31 30 5c 33 31 11\302!\210\314.\311\303!\210\31
4140 35 13 5c 33 31 31 5c 33 30 34 21 5c 32 31 30 5c 33 31 36 14 5c 33 31 31 5c 33 30 35 21 5c 32 31 5.\311\304!\210\316.\311\305!\21
4160 30 5c 33 31 37 15 5c 33 31 31 5c 33 32 30 21 5c 32 31 30 5c 33 32 31 16 10 5c 33 31 31 5c 33 32 0\317.\311\320!\210\321..\311\32
4180 32 21 5c 32 31 30 5c 33 32 33 16 12 5c 33 31 31 5c 33 32 34 21 5c 32 31 30 5c 33 31 33 16 14 5c 2!\210\323..\311\324!\210\313..\
41a0 33 31 31 5c 33 32 35 21 5c 32 31 30 5c 33 31 33 16 15 5c 33 31 31 5c 33 32 36 21 5c 32 31 30 5c 311\325!\210\313..\311\326!\210\
41c0 33 32 37 16 16 5c 33 31 31 5c 33 33 30 21 5c 32 31 30 5c 33 31 32 16 18 5c 33 31 31 5c 33 33 31 327..\311\330!\210\312..\311\331
41e0 21 5c 32 31 30 5c 33 33 32 16 19 5c 33 31 31 5c 33 33 33 21 5c 32 31 30 5c 33 33 34 16 1b 5c 33 !\210\332..\311\333!\210\334..\3
4200 31 31 5c 33 33 35 21 5c 32 31 30 5c 33 33 36 16 1d 5c 33 31 31 5c 33 30 35 21 5c 32 31 30 5c 33 11\335!\210\336..\311\305!\210\3
4220 33 37 15 5c 33 31 31 5c 33 34 30 21 5c 32 31 30 5c 33 34 31 16 20 5c 33 31 31 5c 33 34 32 21 5c 37.\311\340!\210\341..\311\342!\
4240 32 31 30 5c 33 34 33 16 5c 22 5c 33 31 31 5c 33 34 34 21 5c 32 31 30 5c 33 34 35 16 24 5c 33 31 210\343.\"\311\344!\210\345.$\31
4260 31 5c 33 34 36 21 5c 32 31 30 5c 33 34 37 16 26 5c 33 31 31 5c 33 35 30 21 5c 32 31 30 5c 33 35 1\346!\210\347.&\311\350!\210\35
4280 31 16 28 5c 33 31 31 5c 33 35 32 21 5c 32 31 30 5c 33 31 33 16 2a 5c 33 31 31 5c 33 35 33 21 5c 1.(\311\352!\210\313.*\311\353!\
42a0 32 31 30 0e 2f 16 2b 5c 33 31 31 5c 33 35 34 21 5c 32 31 30 5c 33 31 32 16 2c 5c 33 31 31 5c 33 210./.+\311\354!\210\312.,\311\3
42c0 35 35 21 5c 32 31 30 5c 33 35 36 5c 32 31 31 16 2d 5c 32 30 37 22 20 5b 69 6e 64 65 6e 74 2d 74 55!\210\356\211.-\207".[indent-t
42e0 61 62 73 2d 6d 6f 64 65 20 70 61 72 61 67 72 61 70 68 2d 69 67 6e 6f 72 65 2d 66 69 6c 6c 2d 70 abs-mode.paragraph-ignore-fill-p
4300 72 65 66 69 78 20 6f 75 74 6c 69 6e 65 2d 72 65 67 65 78 70 20 6f 75 74 6c 69 6e 65 2d 6c 65 76 refix.outline-regexp.outline-lev
4320 65 6c 20 63 6f 6d 6d 65 6e 74 2d 73 74 61 72 74 20 63 6f 6d 6d 65 6e 74 2d 73 74 61 72 74 2d 73 el.comment-start.comment-start-s
4340 6b 69 70 20 61 64 64 2d 74 6f 2d 6c 69 73 74 20 69 6d 65 6e 75 2d 67 65 6e 65 72 69 63 2d 65 78 kip.add-to-list.imenu-generic-ex
4360 70 72 65 73 73 69 6f 6e 20 28 6e 69 6c 20 63 6c 6f 6a 75 72 65 2d 6d 61 74 63 68 2d 6e 65 78 74 pression.(nil.clojure-match-next
4380 2d 64 65 66 20 30 29 20 6d 61 6b 65 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 20 6e 69 6c 20 -def.0).make-local-variable.nil.
43a0 74 20 22 3b 3b 3b 5c 5c 28 3b 2a 20 5b 5e 20 09 5c 6e 5d 5c 5c 29 5c 5c 7c 28 22 20 6c 69 73 70 t.";;;\\(;*.[^..\n]\\)\\|(".lisp
43c0 2d 6f 75 74 6c 69 6e 65 2d 6c 65 76 65 6c 20 22 3b 22 20 22 3b 2b 20 2a 22 20 63 6f 6d 6d 65 6e -outline-level.";".";+.*".commen
43e0 74 2d 61 64 64 20 31 20 63 6f 6d 6d 65 6e 74 2d 63 6f 6c 75 6d 6e 20 34 30 20 63 6f 6d 6d 65 6e t-add.1.comment-column.40.commen
4400 74 2d 75 73 65 2d 73 79 6e 74 61 78 20 6d 75 6c 74 69 62 79 74 65 2d 73 79 6e 74 61 78 2d 61 73 t-use-syntax.multibyte-syntax-as
4420 2d 73 79 6d 62 6f 6c 20 65 6c 65 63 74 72 69 63 2d 70 61 69 72 2d 73 6b 69 70 2d 77 68 69 74 65 -symbol.electric-pair-skip-white
4440 73 70 61 63 65 20 63 68 6f 6d 70 20 65 6c 65 63 74 72 69 63 2d 70 61 69 72 2d 6f 70 65 6e 2d 6e space.chomp.electric-pair-open-n
4460 65 77 6c 69 6e 65 2d 62 65 74 77 65 65 6e 2d 70 61 69 72 73 20 66 69 6c 6c 2d 70 61 72 61 67 72 ewline-between-pairs.fill-paragr
4480 61 70 68 2d 66 75 6e 63 74 69 6f 6e 20 63 6c 6f 6a 75 72 65 2d 66 69 6c 6c 2d 70 61 72 61 67 72 aph-function.clojure-fill-paragr
44a0 61 70 68 20 61 64 61 70 74 69 76 65 2d 66 69 6c 6c 2d 66 75 6e 63 74 69 6f 6e 20 63 6c 6f 6a 75 aph.adaptive-fill-function.cloju
44c0 72 65 2d 61 64 61 70 74 69 76 65 2d 66 69 6c 6c 2d 66 75 6e 63 74 69 6f 6e 20 6e 6f 72 6d 61 6c re-adaptive-fill-function.normal
44e0 2d 61 75 74 6f 2d 66 69 6c 6c 2d 66 75 6e 63 74 69 6f 6e 20 63 6c 6f 6a 75 72 65 2d 61 75 74 6f -auto-fill-function.clojure-auto
4500 2d 66 69 6c 6c 2d 66 75 6e 63 74 69 6f 6e 20 22 5c 5c 28 5c 5c 28 5e 5c 5c 7c 5b 5e 5c 5c 5c 5c -fill-function."\\(\\(^\\|[^\\\\
4520 5c 6e 5d 5c 5c 29 5c 5c 28 5c 5c 5c 5c 5c 5c 5c 5c 5c 5c 29 2a 5c 5c 29 5c 5c 28 3b 2b 5c 5c 7c \n]\\)\\(\\\\\\\\\\)*\\)\\(;+\\|
4540 23 7c 5c 5c 29 20 2a 22 20 69 6e 64 65 6e 74 2d 6c 69 6e 65 2d 66 75 6e 63 74 69 6f 6e 20 63 6c #|\\).*".indent-line-function.cl
4560 6f 6a 75 72 65 2d 69 6e 64 65 6e 74 2d 6c 69 6e 65 20 69 6e 64 65 6e 74 2d 72 65 67 69 6f 6e 2d ojure-indent-line.indent-region-
4580 66 75 6e 63 74 69 6f 6e 20 63 6c 6f 6a 75 72 65 2d 69 6e 64 65 6e 74 2d 72 65 67 69 6f 6e 20 6c function.clojure-indent-region.l
45a0 69 73 70 2d 69 6e 64 65 6e 74 2d 66 75 6e 63 74 69 6f 6e 20 63 6c 6f 6a 75 72 65 2d 69 6e 64 65 isp-indent-function.clojure-inde
45c0 6e 74 2d 66 75 6e 63 74 69 6f 6e 20 6c 69 73 70 2d 64 6f 63 2d 73 74 72 69 6e 67 2d 65 6c 74 2d nt-function.lisp-doc-string-elt-
45e0 70 72 6f 70 65 72 74 79 20 63 6c 6f 6a 75 72 65 2d 64 6f 63 2d 73 74 72 69 6e 67 2d 65 6c 74 20 property.clojure-doc-string-elt.
4600 63 6c 6f 6a 75 72 65 2d 65 78 70 65 63 74 65 64 2d 6e 73 2d 66 75 6e 63 74 69 6f 6e 20 63 6c 6f clojure-expected-ns-function.clo
4620 6a 75 72 65 2d 65 78 70 65 63 74 65 64 2d 6e 73 20 70 61 72 73 65 2d 73 65 78 70 2d 69 67 6e 6f jure-expected-ns.parse-sexp-igno
4640 72 65 2d 63 6f 6d 6d 65 6e 74 73 20 70 72 65 74 74 69 66 79 2d 73 79 6d 62 6f 6c 73 2d 61 6c 69 re-comments.prettify-symbols-ali
4660 73 74 20 6f 70 65 6e 2d 70 61 72 65 6e 2d 69 6e 2d 63 6f 6c 75 6d 6e 2d 30 2d 69 73 2d 64 65 66 st.open-paren-in-column-0-is-def
4680 75 6e 2d 73 74 61 72 74 20 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 64 65 66 75 6e 2d 66 75 6e 63 un-start.beginning-of-defun-func
46a0 74 69 6f 6e 20 63 6c 6f 6a 75 72 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 64 65 66 75 6e 2d tion.clojure-beginning-of-defun-
46c0 66 75 6e 63 74 69 6f 6e 20 63 6c 6f 6a 75 72 65 2d 2d 70 72 65 74 74 69 66 79 2d 73 79 6d 62 6f function.clojure--prettify-symbo
46e0 6c 73 2d 61 6c 69 73 74 5d 20 33 20 28 23 24 20 2e 20 31 36 35 32 30 29 5d 29 0a 23 40 34 30 20 ls-alist].3.(#$...16520)]).#@40.
4700 43 68 65 63 6b 20 77 68 65 74 68 65 72 20 70 6f 69 6e 74 20 69 73 20 69 6e 20 61 20 64 6f 63 73 Check.whether.point.is.in.a.docs
4720 74 72 69 6e 67 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 69 6e 2d 64 6f tring...(defalias.'clojure-in-do
4740 63 73 74 72 69 6e 67 2d 70 20 23 5b 30 20 22 5c 33 30 30 20 5c 33 30 31 01 38 5c 32 30 35 10 00 cstring-p.#[0."\300.\301.8\205..
4760 5c 33 30 32 5c 33 30 33 02 38 5c 33 30 34 5c 22 5c 33 30 35 3d 5c 32 30 37 22 20 5b 73 79 6e 74 \302\303.8\304\"\305=\207".[synt
4780 61 78 2d 70 70 73 73 20 33 20 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 38 20 66 61 ax-ppss.3.get-text-property.8.fa
47a0 63 65 20 66 6f 6e 74 2d 6c 6f 63 6b 2d 64 6f 63 2d 66 61 63 65 5d 20 34 20 28 23 24 20 2e 20 31 ce.font-lock-doc-face].4.(#$...1
47c0 38 31 37 36 29 5d 29 0a 28 70 75 74 20 27 63 6c 6f 6a 75 72 65 2d 69 6e 2d 64 6f 63 73 74 72 69 8176)]).(put.'clojure-in-docstri
47e0 6e 67 2d 70 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 ng-p.'byte-optimizer.'byte-compi
4800 6c 65 2d 69 6e 6c 69 6e 65 2d 65 78 70 61 6e 64 29 0a 23 40 31 36 34 20 48 6f 6f 6b 20 72 75 6e le-inline-expand).#@164.Hook.run
4820 20 61 66 74 65 72 20 65 6e 74 65 72 69 6e 67 20 43 6c 6f 6a 75 72 65 20 6d 6f 64 65 2e 0a 4e 6f .after.entering.Clojure.mode..No
4840 20 70 72 6f 62 6c 65 6d 73 20 72 65 73 75 6c 74 20 69 66 20 74 68 69 73 20 76 61 72 69 61 62 6c .problems.result.if.this.variabl
4860 65 20 69 73 20 6e 6f 74 20 62 6f 75 6e 64 2e 0a 60 61 64 64 2d 68 6f 6f 6b 27 20 61 75 74 6f 6d e.is.not.bound..`add-hook'.autom
4880 61 74 69 63 61 6c 6c 79 20 62 69 6e 64 73 20 69 74 2e 20 20 28 54 68 69 73 20 69 73 20 74 72 75 atically.binds.it...(This.is.tru
48a0 65 20 66 6f 72 20 61 6c 6c 20 68 6f 6f 6b 20 76 61 72 69 61 62 6c 65 73 2e 29 1f 0a 28 64 65 66 e.for.all.hook.variables.)..(def
48c0 76 61 72 20 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 2d 68 6f 6f 6b 20 6e 69 6c 20 28 23 24 20 2e 20 var.clojure-mode-hook.nil.(#$...
48e0 31 38 34 35 36 29 29 0a 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 30 5c 33 30 31 21 5c 32 30 18456)).(byte-code."\300\301!\20
4900 34 5c 66 00 5c 33 30 32 5c 33 30 31 5c 33 30 33 5c 33 30 34 23 5c 32 31 30 5c 33 30 30 5c 32 30 4\f.\302\301\303\304#\210\300\20
4920 37 22 20 5b 62 6f 75 6e 64 70 20 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 2d 6d 61 70 20 70 75 74 20 7".[boundp.clojure-mode-map.put.
4940 64 65 66 69 6e 69 74 69 6f 6e 2d 6e 61 6d 65 20 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 5d 20 34 29 definition-name.clojure-mode].4)
4960 0a 28 64 65 66 76 61 72 20 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 2d 6d 61 70 20 28 6d 61 6b 65 2d .(defvar.clojure-mode-map.(make-
4980 73 70 61 72 73 65 2d 6b 65 79 6d 61 70 29 29 0a 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 30 sparse-keymap)).(byte-code."\300
49a0 5c 33 30 31 4e 5c 32 30 34 0e 00 5c 33 30 32 5c 33 30 30 5c 33 30 31 5c 33 30 33 5c 33 30 34 21 \301N\204..\302\300\301\303\304!
49c0 23 5c 32 31 30 5c 33 30 35 5c 33 30 36 21 5c 32 30 34 1a 00 5c 33 30 32 5c 33 30 36 5c 33 30 37 #\210\305\306!\204..\302\306\307
49e0 5c 33 31 30 23 5c 32 31 30 5c 33 30 30 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 \310#\210\300\207".[clojure-mode
4a00 2d 6d 61 70 20 76 61 72 69 61 62 6c 65 2d 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 70 75 74 20 -map.variable-documentation.put.
4a20 70 75 72 65 63 6f 70 79 20 22 4b 65 79 6d 61 70 20 66 6f 72 20 60 63 6c 6f 6a 75 72 65 2d 6d 6f purecopy."Keymap.for.`clojure-mo
4a40 64 65 27 2e 22 20 62 6f 75 6e 64 70 20 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 2d 73 79 6e 74 61 78 de'.".boundp.clojure-mode-syntax
4a60 2d 74 61 62 6c 65 20 64 65 66 69 6e 69 74 69 6f 6e 2d 6e 61 6d 65 20 63 6c 6f 6a 75 72 65 2d 6d -table.definition-name.clojure-m
4a80 6f 64 65 5d 20 35 29 0a 28 64 65 66 76 61 72 20 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 2d 73 79 6e ode].5).(defvar.clojure-mode-syn
4aa0 74 61 78 2d 74 61 62 6c 65 20 28 6d 61 6b 65 2d 73 79 6e 74 61 78 2d 74 61 62 6c 65 29 29 0a 28 tax-table.(make-syntax-table)).(
4ac0 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 30 5c 33 30 31 4e 5c 32 30 34 0e 00 5c 33 30 32 5c 33 byte-code."\300\301N\204..\302\3
4ae0 30 30 5c 33 30 31 5c 33 30 33 5c 33 30 34 21 23 5c 32 31 30 5c 33 30 32 5c 33 30 35 5c 33 30 36 00\301\303\304!#\210\302\305\306
4b00 5c 33 30 37 23 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 2d 73 79 6e 74 61 78 2d \307#\207".[clojure-mode-syntax-
4b20 74 61 62 6c 65 20 76 61 72 69 61 62 6c 65 2d 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 70 75 74 table.variable-documentation.put
4b40 20 70 75 72 65 63 6f 70 79 20 22 53 79 6e 74 61 78 20 74 61 62 6c 65 20 66 6f 72 20 60 63 6c 6f .purecopy."Syntax.table.for.`clo
4b60 6a 75 72 65 2d 6d 6f 64 65 27 2e 22 20 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 2d 61 62 62 72 65 76 jure-mode'.".clojure-mode-abbrev
4b80 2d 74 61 62 6c 65 20 64 65 66 69 6e 69 74 69 6f 6e 2d 6e 61 6d 65 20 63 6c 6f 6a 75 72 65 2d 6d -table.definition-name.clojure-m
4ba0 6f 64 65 5d 20 35 29 0a 28 64 65 66 76 61 72 20 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 2d 61 62 62 ode].5).(defvar.clojure-mode-abb
4bc0 72 65 76 2d 74 61 62 6c 65 20 28 70 72 6f 67 6e 20 28 64 65 66 69 6e 65 2d 61 62 62 72 65 76 2d rev-table.(progn.(define-abbrev-
4be0 74 61 62 6c 65 20 27 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 2d 61 62 62 72 65 76 2d 74 61 62 6c 65 table.'clojure-mode-abbrev-table
4c00 20 6e 69 6c 29 20 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 2d 61 62 62 72 65 76 2d 74 61 62 6c 65 29 .nil).clojure-mode-abbrev-table)
4c20 29 0a 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 30 5c 33 30 31 4e 5c 32 30 34 0e 00 5c 33 30 ).(byte-code."\300\301N\204..\30
4c40 32 5c 33 30 30 5c 33 30 31 5c 33 30 33 5c 33 30 34 21 23 5c 32 31 30 5c 33 30 32 5c 33 30 35 5c 2\300\301\303\304!#\210\302\305\
4c60 33 30 36 5c 33 30 37 23 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 2d 61 62 62 72 306\307#\207".[clojure-mode-abbr
4c80 65 76 2d 74 61 62 6c 65 20 76 61 72 69 61 62 6c 65 2d 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 ev-table.variable-documentation.
4ca0 70 75 74 20 70 75 72 65 63 6f 70 79 20 22 41 62 62 72 65 76 20 74 61 62 6c 65 20 66 6f 72 20 60 put.purecopy."Abbrev.table.for.`
4cc0 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 27 2e 22 20 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 20 64 65 72 clojure-mode'.".clojure-mode.der
4ce0 69 76 65 64 2d 6d 6f 64 65 2d 70 61 72 65 6e 74 20 70 72 6f 67 2d 6d 6f 64 65 5d 20 35 29 0a 23 ived-mode-parent.prog-mode].5).#
4d00 40 32 31 35 20 4d 61 6a 6f 72 20 6d 6f 64 65 20 66 6f 72 20 65 64 69 74 69 6e 67 20 43 6c 6f 6a @215.Major.mode.for.editing.Cloj
4d20 75 72 65 20 63 6f 64 65 2e 0a 0a 5c 7b 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 2d 6d 61 70 7d 0a 0a ure.code...\{clojure-mode-map}..
4d40 49 6e 20 61 64 64 69 74 69 6f 6e 20 74 6f 20 61 6e 79 20 68 6f 6f 6b 73 20 69 74 73 20 70 61 72 In.addition.to.any.hooks.its.par
4d60 65 6e 74 20 6d 6f 64 65 20 60 70 72 6f 67 2d 6d 6f 64 65 27 20 6d 69 67 68 74 20 68 61 76 65 20 ent.mode.`prog-mode'.might.have.
4d80 72 75 6e 2c 0a 74 68 69 73 20 6d 6f 64 65 20 72 75 6e 73 20 74 68 65 20 68 6f 6f 6b 20 60 63 6c run,.this.mode.runs.the.hook.`cl
4da0 6f 6a 75 72 65 2d 6d 6f 64 65 2d 68 6f 6f 6b 27 2c 20 61 73 20 74 68 65 20 66 69 6e 61 6c 20 73 ojure-mode-hook',.as.the.final.s
4dc0 74 65 70 0a 64 75 72 69 6e 67 20 69 6e 69 74 69 61 6c 69 7a 61 74 69 6f 6e 2e 1f 0a 28 64 65 66 tep.during.initialization...(def
4de0 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 20 23 5b 30 20 22 5c 33 30 36 5c 33 30 alias.'clojure-mode.#[0."\306\30
4e00 30 21 5c 32 31 30 5c 33 30 37 18 5c 33 31 30 20 5c 32 31 30 5c 33 31 31 11 5c 33 31 32 12 5c 33 0!\210\307.\310.\210\311.\312.\3
4e20 31 30 5c 33 31 33 4e 5c 32 30 33 1b 00 5c 33 31 34 5c 33 31 31 5c 33 31 33 5c 33 31 30 5c 33 31 10\313N\203..\314\311\313\310\31
4e40 33 4e 23 5c 32 31 30 5c 33 31 35 0b 21 5c 32 30 34 27 00 5c 33 31 36 0b 5c 33 31 37 20 5c 22 5c 3N#\210\315.!\204'.\316.\317.\"\
4e60 32 31 30 5c 33 32 30 5c 66 21 5c 32 31 31 5c 32 30 33 35 00 5c 32 31 31 5c 33 32 31 20 3d 5c 32 210\320\f!\211\2035.\211\321.=\2
4e80 30 33 3b 00 5c 33 32 32 5c 66 5c 33 32 33 20 5c 22 5c 32 31 30 5c 32 31 30 5c 33 32 34 0d 5c 33 03;.\322\f\323.\"\210\210\324.\3
4ea0 32 35 5c 22 5c 32 30 34 52 00 0d 0e 24 3d 5c 32 30 34 52 00 5c 33 32 36 0d 5c 33 32 35 0e 24 43 25\"\204R...$=\204R.\326.\325.$C
4ec0 23 5c 32 31 30 5c 33 32 37 0b 21 5c 32 31 30 5c 33 33 30 5c 66 21 5c 32 31 30 0d 16 24 5c 33 33 #\210\327.!\210\330\f!\210..$\33
4ee0 31 20 5c 32 31 30 5c 33 33 32 20 5c 32 31 30 5c 33 33 33 5c 33 33 34 5c 33 33 35 5c 22 5c 32 31 1.\210\332.\210\333\334\335\"\21
4f00 30 5c 33 33 33 5c 33 33 36 5c 33 33 37 5c 22 5c 32 31 30 5c 33 33 33 5c 33 34 30 5c 33 34 31 5c 0\333\336\337\"\210\333\340\341\
4f20 22 5c 32 31 30 29 5c 33 34 32 5c 33 34 33 21 5c 32 30 37 22 20 5b 64 65 6c 61 79 2d 6d 6f 64 65 "\210)\342\343!\207".[delay-mode
4f40 2d 68 6f 6f 6b 73 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 6d 6f 64 65 2d 6e 61 6d 65 20 63 6c 6f 6a -hooks.major-mode.mode-name.cloj
4f60 75 72 65 2d 6d 6f 64 65 2d 6d 61 70 20 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 2d 73 79 6e 74 61 78 ure-mode-map.clojure-mode-syntax
4f80 2d 74 61 62 6c 65 20 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 2d 61 62 62 72 65 76 2d 74 61 62 6c 65 -table.clojure-mode-abbrev-table
4fa0 20 6d 61 6b 65 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 20 74 20 70 72 6f 67 2d 6d 6f 64 65 .make-local-variable.t.prog-mode
4fc0 20 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 20 22 43 6c 6f 6a 75 72 65 22 20 6d 6f 64 65 2d 63 6c 61 .clojure-mode."Clojure".mode-cla
4fe0 73 73 20 70 75 74 20 6b 65 79 6d 61 70 2d 70 61 72 65 6e 74 20 73 65 74 2d 6b 65 79 6d 61 70 2d ss.put.keymap-parent.set-keymap-
5000 70 61 72 65 6e 74 20 63 75 72 72 65 6e 74 2d 6c 6f 63 61 6c 2d 6d 61 70 20 63 68 61 72 2d 74 61 parent.current-local-map.char-ta
5020 62 6c 65 2d 70 61 72 65 6e 74 20 73 74 61 6e 64 61 72 64 2d 73 79 6e 74 61 78 2d 74 61 62 6c 65 ble-parent.standard-syntax-table
5040 20 73 65 74 2d 63 68 61 72 2d 74 61 62 6c 65 2d 70 61 72 65 6e 74 20 73 79 6e 74 61 78 2d 74 61 .set-char-table-parent.syntax-ta
5060 62 6c 65 20 61 62 62 72 65 76 2d 74 61 62 6c 65 2d 67 65 74 20 3a 70 61 72 65 6e 74 73 20 61 62 ble.abbrev-table-get.:parents.ab
5080 62 72 65 76 2d 74 61 62 6c 65 2d 70 75 74 20 75 73 65 2d 6c 6f 63 61 6c 2d 6d 61 70 20 73 65 74 brev-table-put.use-local-map.set
50a0 2d 73 79 6e 74 61 78 2d 74 61 62 6c 65 20 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 2d 76 61 72 69 61 -syntax-table.clojure-mode-varia
50c0 62 6c 65 73 20 63 6c 6f 6a 75 72 65 2d 66 6f 6e 74 2d 6c 6f 63 6b 2d 73 65 74 75 70 20 61 64 64 bles.clojure-font-lock-setup.add
50e0 2d 68 6f 6f 6b 20 70 61 72 65 64 69 74 2d 6d 6f 64 65 2d 68 6f 6f 6b 20 63 6c 6f 6a 75 72 65 2d -hook.paredit-mode-hook.clojure-
5100 70 61 72 65 64 69 74 2d 73 65 74 75 70 20 65 6c 65 63 74 72 69 63 2d 69 6e 64 65 6e 74 2d 66 75 paredit-setup.electric-indent-fu
5120 6e 63 74 69 6f 6e 73 20 23 5b 32 35 37 20 22 5c 33 30 30 20 5c 33 30 31 01 38 5c 32 30 35 10 00 nctions.#[257."\300.\301.8\205..
5140 5c 33 30 32 5c 33 30 33 02 38 5c 33 30 34 5c 22 5c 33 30 35 3d 5c 32 36 32 01 5c 32 30 35 16 00 \302\303.8\304\"\305=\262.\205..
5160 5c 33 30 36 5c 32 30 37 22 20 5b 73 79 6e 74 61 78 2d 70 70 73 73 20 33 20 67 65 74 2d 74 65 78 \306\207".[syntax-ppss.3.get-tex
5180 74 2d 70 72 6f 70 65 72 74 79 20 38 20 66 61 63 65 20 66 6f 6e 74 2d 6c 6f 63 6b 2d 64 6f 63 2d t-property.8.face.font-lock-doc-
51a0 66 61 63 65 20 64 6f 2d 69 6e 64 65 6e 74 5d 20 35 20 22 5c 6e 5c 6e 28 66 6e 20 43 48 41 52 29 face.do-indent].5."\n\n(fn.CHAR)
51c0 22 5d 20 70 72 6f 6a 65 63 74 2d 66 69 6e 64 2d 66 75 6e 63 74 69 6f 6e 73 20 63 6c 6f 6a 75 72 "].project-find-functions.clojur
51e0 65 2d 63 75 72 72 65 6e 74 2d 70 72 6f 6a 65 63 74 20 72 75 6e 2d 6d 6f 64 65 2d 68 6f 6f 6b 73 e-current-project.run-mode-hooks
5200 20 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 2d 68 6f 6f 6b 20 6c 6f 63 61 6c 2d 61 62 62 72 65 76 2d .clojure-mode-hook.local-abbrev-
5220 74 61 62 6c 65 5d 20 35 20 28 23 24 20 2e 20 31 39 37 31 37 29 20 6e 69 6c 5d 29 0a 28 62 79 74 table].5.(#$...19717).nil]).(byt
5240 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 44 5c 33 e-code."\300\301\302\303\304DD\3
5260 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 26 09 5c 32 30 37 05\306\307\310\311\312\313&.\207
5280 22 20 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 63 6c 6f 6a 75 ".[custom-declare-variable.cloju
52a0 72 65 2d 76 65 72 69 66 79 2d 6d 61 6a 6f 72 2d 6d 6f 64 65 20 66 75 6e 63 61 6c 6c 20 66 75 6e re-verify-major-mode.funcall.fun
52c0 63 74 69 6f 6e 20 23 5b 30 20 22 5c 33 30 30 5c 32 30 37 22 20 5b 74 5d 20 31 5d 20 22 49 66 20 ction.#[0."\300\207".[t].1]."If.
52e0 6e 6f 6e 2d 6e 69 6c 2c 20 77 61 72 6e 20 77 68 65 6e 20 61 63 74 69 76 61 74 69 6e 67 20 74 68 non-nil,.warn.when.activating.th
5300 65 20 77 72 6f 6e 67 20 60 6d 61 6a 6f 72 2d 6d 6f 64 65 27 2e 22 20 3a 74 79 70 65 20 62 6f 6f e.wrong.`major-mode'.".:type.boo
5320 6c 65 61 6e 20 3a 73 61 66 65 20 62 6f 6f 6c 65 61 6e 70 20 3a 70 61 63 6b 61 67 65 2d 76 65 72 lean.:safe.booleanp.:package-ver
5340 73 69 6f 6e 20 28 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 20 22 35 2e 33 2e 30 22 29 5d 20 31 30 29 sion.(clojure-mode."5.3.0")].10)
5360 0a 23 40 31 33 38 20 43 68 65 63 6b 20 69 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 60 6d 61 6a .#@138.Check.if.the.current.`maj
5380 6f 72 2d 6d 6f 64 65 27 20 6d 61 74 63 68 65 73 20 74 68 65 20 66 69 6c 65 20 65 78 74 65 6e 73 or-mode'.matches.the.file.extens
53a0 69 6f 6e 2e 0a 0a 49 66 20 69 74 20 64 6f 65 73 6e 27 74 2c 20 69 73 73 75 65 20 61 20 77 61 72 ion...If.it.doesn't,.issue.a.war
53c0 6e 69 6e 67 20 69 66 20 60 63 6c 6f 6a 75 72 65 2d 76 65 72 69 66 79 2d 6d 61 6a 6f 72 2d 6d 6f ning.if.`clojure-verify-major-mo
53e0 64 65 27 20 69 73 0a 6e 6f 6e 2d 6e 69 6c 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a de'.is.non-nil...(defalias.'cloj
5400 75 72 65 2d 2d 63 68 65 63 6b 2d 77 72 6f 6e 67 2d 6d 61 6a 6f 72 2d 6d 6f 64 65 20 23 5b 30 20 ure--check-wrong-major-mode.#[0.
5420 22 08 5c 32 30 35 57 00 5c 33 30 34 20 3b 5c 32 30 35 57 00 5c 33 30 35 19 5c 33 30 36 5c 33 30 ".\205W.\304.;\205W.\305.\306\30
5440 37 5c 33 30 34 20 5c 22 5c 32 30 33 1e 00 5c 6e 5c 33 31 30 3d 5c 32 30 34 1e 00 5c 33 31 30 5c 7\304.\"\203..\n\310=\204..\310\
5460 32 30 32 40 00 5c 33 30 36 5c 33 31 31 5c 33 30 34 20 5c 22 5c 32 30 33 30 00 5c 6e 5c 33 31 32 202@.\306\311\304.\"\2030.\n\312
5480 3d 5c 32 30 34 30 00 5c 33 31 32 5c 32 30 32 40 00 5c 33 30 36 5c 33 31 33 5c 33 30 34 20 5c 22 =\2040.\312\202@.\306\313\304.\"
54a0 5c 32 30 35 40 00 5c 6e 5c 33 31 34 3d 3f 5c 32 30 35 40 00 5c 33 31 34 5c 32 31 31 5c 32 30 35 \205@.\n\314=?\205@.\314\211\205
54c0 54 00 5c 33 31 35 5c 33 31 36 5c 6e 0b 3d 5c 32 30 33 50 00 5c 33 31 37 5c 32 30 32 51 00 5c 33 T.\315\316\n.=\203P.\317\202Q.\3
54e0 32 30 5c 6e 04 24 29 5c 32 36 32 01 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 76 65 72 69 66 20\n.$)\262.\207".[clojure-verif
5500 79 2d 6d 61 6a 6f 72 2d 6d 6f 64 65 20 63 61 73 65 2d 66 6f 6c 64 2d 73 65 61 72 63 68 20 6d 61 y-major-mode.case-fold-search.ma
5520 6a 6f 72 2d 6d 6f 64 65 20 72 65 61 6c 2d 74 68 69 73 2d 63 6f 6d 6d 61 6e 64 20 62 75 66 66 65 jor-mode.real-this-command.buffe
5540 72 2d 66 69 6c 65 2d 6e 61 6d 65 20 74 20 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 5c 5c 2e 63 r-file-name.t.string-match."\\.c
5560 6c 6a 5c 5c 27 22 20 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 20 22 5c 5c 2e 63 6c 6a 73 5c 5c 27 22 lj\\'".clojure-mode."\\.cljs\\'"
5580 20 63 6c 6f 6a 75 72 65 73 63 72 69 70 74 2d 6d 6f 64 65 20 22 5c 5c 2e 63 6c 6a 63 5c 5c 27 22 .clojurescript-mode."\\.cljc\\'"
55a0 20 63 6c 6f 6a 75 72 65 63 2d 6d 6f 64 65 20 6d 65 73 73 61 67 65 20 22 5b 57 41 52 4e 49 4e 47 .clojurec-mode.message."[WARNING
55c0 5d 20 25 73 20 61 63 74 69 76 61 74 65 64 20 60 25 73 27 20 69 6e 73 74 65 61 64 20 6f 66 20 60 ].%s.activated.`%s'.instead.of.`
55e0 25 73 27 20 69 6e 20 74 68 69 73 20 62 75 66 66 65 72 2e 5c 6e 54 68 69 73 20 63 6f 75 6c 64 20 %s'.in.this.buffer.\nThis.could.
5600 63 61 75 73 65 20 70 72 6f 62 6c 65 6d 73 2e 5c 6e 28 53 65 65 20 60 63 6c 6f 6a 75 72 65 2d 76 cause.problems.\n(See.`clojure-v
5620 65 72 69 66 79 2d 6d 61 6a 6f 72 2d 6d 6f 64 65 27 20 74 6f 20 64 69 73 61 62 6c 65 20 74 68 69 erify-major-mode'.to.disable.thi
5640 73 20 6d 65 73 73 61 67 65 2e 29 22 20 22 59 6f 75 20 68 61 76 65 22 20 22 53 6f 6d 65 74 68 69 s.message.)"."You.have"."Somethi
5660 6e 67 20 69 6e 20 79 6f 75 72 20 63 6f 6e 66 69 67 75 72 61 74 69 6f 6e 22 5d 20 36 20 28 23 24 ng.in.your.configuration"].6.(#$
5680 20 2e 20 32 31 33 35 31 29 5d 29 0a 28 61 64 64 2d 68 6f 6f 6b 20 27 63 6c 6f 6a 75 72 65 2d 6d ...21351)]).(add-hook.'clojure-m
56a0 6f 64 65 2d 68 6f 6f 6b 20 27 63 6c 6f 6a 75 72 65 2d 2d 63 68 65 63 6b 2d 77 72 6f 6e 67 2d 6d ode-hook.'clojure--check-wrong-m
56c0 61 6a 6f 72 2d 6d 6f 64 65 29 0a 23 40 31 32 32 20 54 68 65 20 70 72 65 66 69 78 20 73 74 72 69 ajor-mode).#@122.The.prefix.stri
56e0 6e 67 20 75 73 65 64 20 62 79 20 60 63 6c 6f 6a 75 72 65 2d 66 69 6c 6c 2d 70 61 72 61 67 72 61 ng.used.by.`clojure-fill-paragra
5700 70 68 27 2e 0a 49 74 20 69 73 20 73 69 6d 70 6c 79 20 60 63 6c 6f 6a 75 72 65 2d 64 6f 63 73 74 ph'..It.is.simply.`clojure-docst
5720 72 69 6e 67 2d 66 69 6c 6c 2d 70 72 65 66 69 78 2d 77 69 64 74 68 27 20 6e 75 6d 62 65 72 20 6f ring-fill-prefix-width'.number.o
5740 66 20 73 70 61 63 65 73 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 64 6f f.spaces...(defalias.'clojure-do
5760 63 73 74 72 69 6e 67 2d 66 69 6c 6c 2d 70 72 65 66 69 78 20 23 5b 30 20 22 5c 33 30 31 08 5c 33 cstring-fill-prefix.#[0."\301.\3
5780 30 32 5c 22 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 64 6f 63 73 74 72 69 6e 67 2d 66 69 6c 02\"\207".[clojure-docstring-fil
57a0 6c 2d 70 72 65 66 69 78 2d 77 69 64 74 68 20 6d 61 6b 65 2d 73 74 72 69 6e 67 20 33 32 5d 20 33 l-prefix-width.make-string.32].3
57c0 20 28 23 24 20 2e 20 32 32 32 32 35 29 5d 29 0a 28 70 75 74 20 27 63 6c 6f 6a 75 72 65 2d 64 6f .(#$...22225)]).(put.'clojure-do
57e0 63 73 74 72 69 6e 67 2d 66 69 6c 6c 2d 70 72 65 66 69 78 20 27 62 79 74 65 2d 6f 70 74 69 6d 69 cstring-fill-prefix.'byte-optimi
5800 7a 65 72 20 27 62 79 74 65 2d 63 6f 6d 70 69 6c 65 2d 69 6e 6c 69 6e 65 2d 65 78 70 61 6e 64 29 zer.'byte-compile-inline-expand)
5820 0a 23 40 38 36 20 43 6c 6f 6a 75 72 65 20 61 64 61 70 74 69 76 65 20 66 69 6c 6c 20 66 75 6e 63 .#@86.Clojure.adaptive.fill.func
5840 74 69 6f 6e 2e 0a 54 68 69 73 20 6f 6e 6c 79 20 74 61 6b 65 73 20 63 61 72 65 20 6f 66 20 66 69 tion..This.only.takes.care.of.fi
5860 6c 6c 69 6e 67 20 64 6f 63 73 74 72 69 6e 67 20 63 6f 72 72 65 63 74 6c 79 2e 1f 0a 28 64 65 66 lling.docstring.correctly...(def
5880 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 61 64 61 70 74 69 76 65 2d 66 69 6c 6c 2d 66 75 6e alias.'clojure-adaptive-fill-fun
58a0 63 74 69 6f 6e 20 23 5b 30 20 22 5c 33 30 31 20 5c 33 30 32 01 38 5c 32 30 35 10 00 5c 33 30 33 ction.#[0."\301.\302.8\205..\303
58c0 5c 33 30 34 02 38 5c 33 30 35 5c 22 5c 33 30 36 3d 5c 32 36 32 01 5c 32 30 35 19 00 5c 33 30 37 \304.8\305\"\306=\262.\205..\307
58e0 08 5c 33 31 30 5c 22 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 64 6f 63 73 74 72 69 6e 67 2d .\310\"\207".[clojure-docstring-
5900 66 69 6c 6c 2d 70 72 65 66 69 78 2d 77 69 64 74 68 20 73 79 6e 74 61 78 2d 70 70 73 73 20 33 20 fill-prefix-width.syntax-ppss.3.
5920 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 38 20 66 61 63 65 20 66 6f 6e 74 2d 6c 6f get-text-property.8.face.font-lo
5940 63 6b 2d 64 6f 63 2d 66 61 63 65 20 6d 61 6b 65 2d 73 74 72 69 6e 67 20 33 32 5d 20 34 20 28 23 ck-doc-face.make-string.32].4.(#
5960 24 20 2e 20 32 32 35 36 36 29 5d 29 0a 23 40 31 34 35 20 4c 69 6b 65 20 60 66 69 6c 6c 2d 70 61 $...22566)]).#@145.Like.`fill-pa
5980 72 61 67 72 61 70 68 27 2c 20 62 75 74 20 63 61 6e 20 68 61 6e 64 6c 65 20 43 6c 6f 6a 75 72 65 ragraph',.but.can.handle.Clojure
59a0 20 64 6f 63 73 74 72 69 6e 67 73 2e 0a 49 66 20 4a 55 53 54 49 46 59 20 69 73 20 6e 6f 6e 2d 6e .docstrings..If.JUSTIFY.is.non-n
59c0 69 6c 2c 20 6a 75 73 74 69 66 79 20 61 73 20 77 65 6c 6c 20 61 73 20 66 69 6c 6c 20 74 68 65 20 il,.justify.as.well.as.fill.the.
59e0 70 61 72 61 67 72 61 70 68 2e 0a 0a 28 66 6e 20 26 6f 70 74 69 6f 6e 61 6c 20 4a 55 53 54 49 46 paragraph...(fn.&optional.JUSTIF
5a00 59 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 66 69 6c 6c 2d 70 61 72 61 Y)..(defalias.'clojure-fill-para
5a20 67 72 61 70 68 20 23 5b 32 35 36 20 22 5c 33 30 36 20 5c 33 30 37 01 38 5c 32 30 35 10 00 5c 33 graph.#[256."\306.\307.8\205..\3
5a40 31 30 5c 33 31 31 02 38 5c 33 31 32 5c 22 5c 33 31 33 3d 5c 32 36 32 01 5c 32 30 33 52 00 08 5c 10\311.8\312\"\313=\262.\203R..\
5a60 33 31 34 50 09 5c 33 31 35 50 5c 6e 5c 32 30 36 20 00 0b 5c 33 31 36 5c 66 5c 33 31 37 5c 22 1d 314P.\315P\n\206...\316\f\317\".
5a80 1b 19 18 5c 33 31 31 5c 33 30 36 20 38 5c 32 31 32 5c 32 31 31 62 5c 32 31 30 5c 33 32 30 31 3c ...\311\306.8\212\211b\210\3201<
5aa0 00 5c 33 32 31 20 5c 32 31 30 60 30 5c 32 30 32 40 00 5c 32 31 30 5c 32 30 32 43 00 5c 32 30 36 .\321.\210`0\202@.\210\202C.\206
5ac0 44 00 64 29 5c 32 31 34 01 01 7d 5c 32 31 30 5c 33 32 32 03 21 29 5c 32 36 36 5c 32 30 32 2c 5c D.d)\214..}\210\322.!)\266\202,\
5ae0 32 30 37 08 5c 33 32 33 50 09 5c 33 32 34 50 19 18 5c 33 32 35 01 21 5c 32 30 34 64 00 5c 33 32 207.\323P.\324P..\325.!\204d.\32
5b00 32 01 21 5c 32 31 30 2a 5c 33 32 36 5c 32 30 37 22 20 5b 70 61 72 61 67 72 61 70 68 2d 73 74 61 2.!\210*\326\207".[paragraph-sta
5b20 72 74 20 70 61 72 61 67 72 61 70 68 2d 73 65 70 61 72 61 74 65 20 63 6c 6f 6a 75 72 65 2d 64 6f rt.paragraph-separate.clojure-do
5b40 63 73 74 72 69 6e 67 2d 66 69 6c 6c 2d 63 6f 6c 75 6d 6e 20 66 69 6c 6c 2d 63 6f 6c 75 6d 6e 20 cstring-fill-column.fill-column.
5b60 63 6c 6f 6a 75 72 65 2d 64 6f 63 73 74 72 69 6e 67 2d 66 69 6c 6c 2d 70 72 65 66 69 78 2d 77 69 clojure-docstring-fill-prefix-wi
5b80 64 74 68 20 66 69 6c 6c 2d 70 72 65 66 69 78 20 73 79 6e 74 61 78 2d 70 70 73 73 20 33 20 67 65 dth.fill-prefix.syntax-ppss.3.ge
5ba0 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 38 20 66 61 63 65 20 66 6f 6e 74 2d 6c 6f 63 6b t-text-property.8.face.font-lock
5bc0 2d 64 6f 63 2d 66 61 63 65 20 22 5c 5c 7c 5c 5c 73 2d 2a 5c 5c 28 5b 28 3a 5c 22 5b 5d 5c 5c 7c -doc-face."\\|\\s-*\\([(:\"[]\\|
5be0 7e 40 5c 5c 7c 60 28 5c 5c 7c 23 27 28 5c 5c 29 22 20 22 5c 5c 7c 5c 5c 73 2d 2a 5c 22 2e 2a 5b ~@\\|`(\\|#'(\\)"."\\|\\s-*\".*[
5c00 2c 5c 5c 2e 5d 24 22 20 6d 61 6b 65 2d 73 74 72 69 6e 67 20 33 32 20 28 65 72 72 6f 72 29 20 66 ,\\.]$".make-string.32.(error).f
5c20 6f 72 77 61 72 64 2d 73 65 78 70 20 66 69 6c 6c 2d 70 61 72 61 67 72 61 70 68 20 22 5c 5c 7c 5c orward-sexp.fill-paragraph."\\|\
5c40 5c 73 2d 2a 5c 5c 28 5b 28 3a 5c 22 5b 5d 5c 5c 7c 60 28 5c 5c 7c 23 27 28 5c 5c 29 22 20 22 5c \s-*\\([(:\"[]\\|`(\\|#'(\\)"."\
5c60 5c 7c 5c 5c 73 2d 2a 5c 22 2e 2a 5b 2c 5c 5c 2e 5b 5d 24 22 20 66 69 6c 6c 2d 63 6f 6d 6d 65 6e \|\\s-*\".*[,\\.[]$".fill-commen
5c80 74 2d 70 61 72 61 67 72 61 70 68 20 74 5d 20 37 20 28 23 24 20 2e 20 32 32 38 39 39 29 5d 29 0a t-paragraph.t].7.(#$...22899)]).
5ca0 23 40 32 39 20 43 6c 6f 6a 75 72 65 20 61 75 74 6f 2d 66 69 6c 6c 20 66 75 6e 63 74 69 6f 6e 2e #@29.Clojure.auto-fill.function.
5cc0 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 61 75 74 6f 2d 66 69 6c 6c 2d 66 ..(defalias.'clojure-auto-fill-f
5ce0 75 6e 63 74 69 6f 6e 20 23 5b 30 20 22 5c 33 30 33 20 5c 32 31 31 5c 32 30 35 2d 00 69 01 56 5c unction.#[0."\303.\211\205-.i.V\
5d00 32 30 35 2d 00 5c 33 30 34 20 5c 33 30 35 01 38 5c 32 30 35 1c 00 5c 33 30 36 5c 33 30 37 02 38 205-.\304.\305.8\205..\306\307.8
5d20 5c 33 31 30 5c 22 5c 33 31 31 3d 5c 32 36 32 01 5c 32 30 33 25 00 08 5c 32 30 32 26 00 09 5c 33 \310\"\311=\262.\203%..\202&..\3
5d40 31 32 20 1a 19 5c 33 31 33 20 2a 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 64 6f 63 73 74 72 12...\313.*\207".[clojure-docstr
5d60 69 6e 67 2d 66 69 6c 6c 2d 63 6f 6c 75 6d 6e 20 66 69 6c 6c 2d 63 6f 6c 75 6d 6e 20 66 69 6c 6c ing-fill-column.fill-column.fill
5d80 2d 70 72 65 66 69 78 20 63 75 72 72 65 6e 74 2d 66 69 6c 6c 2d 63 6f 6c 75 6d 6e 20 73 79 6e 74 -prefix.current-fill-column.synt
5da0 61 78 2d 70 70 73 73 20 33 20 67 65 74 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 79 20 38 20 66 61 ax-ppss.3.get-text-property.8.fa
5dc0 63 65 20 66 6f 6e 74 2d 6c 6f 63 6b 2d 64 6f 63 2d 66 61 63 65 20 63 6c 6f 6a 75 72 65 2d 61 64 ce.font-lock-doc-face.clojure-ad
5de0 61 70 74 69 76 65 2d 66 69 6c 6c 2d 66 75 6e 63 74 69 6f 6e 20 64 6f 2d 61 75 74 6f 2d 66 69 6c aptive-fill-function.do-auto-fil
5e00 6c 5d 20 35 20 28 23 24 20 2e 20 32 33 37 31 37 29 5d 29 0a 23 40 31 39 33 20 52 65 67 65 78 70 l].5.(#$...23717)]).#@193.Regexp
5e20 20 6d 61 74 63 68 69 6e 67 20 74 68 65 20 73 74 61 72 74 20 6f 66 20 61 20 63 6f 6d 6d 65 6e 74 .matching.the.start.of.a.comment
5e40 20 73 65 78 70 2e 0a 54 68 65 20 62 65 67 69 6e 6e 69 6e 67 20 6f 66 20 6d 61 74 63 68 2d 67 72 .sexp..The.beginning.of.match-gr
5e60 6f 75 70 20 31 20 73 68 6f 75 6c 64 20 62 65 20 62 65 66 6f 72 65 20 74 68 65 20 73 65 78 70 20 oup.1.should.be.before.the.sexp.
5e80 74 6f 20 62 65 0a 6d 61 72 6b 65 64 20 61 73 20 61 20 63 6f 6d 6d 65 6e 74 2e 20 20 54 68 65 20 to.be.marked.as.a.comment...The.
5ea0 65 6e 64 20 6f 66 20 73 65 78 70 20 69 73 20 66 6f 75 6e 64 20 77 69 74 68 0a 60 63 6c 6f 6a 75 end.of.sexp.is.found.with.`cloju
5ec0 72 65 2d 66 6f 72 77 61 72 64 2d 6c 6f 67 69 63 61 6c 2d 73 65 78 70 27 2e 1f 0a 28 64 65 66 76 re-forward-logical-sexp'...(defv
5ee0 61 72 20 63 6c 6f 6a 75 72 65 2d 2d 63 6f 6d 6d 65 6e 74 2d 6d 61 63 72 6f 2d 72 65 67 65 78 70 ar.clojure--comment-macro-regexp
5f00 20 22 23 5f 20 2a 5c 5c 28 3f 31 3a 5b 5e 20 5d 5c 5c 29 22 20 28 23 24 20 2e 20 32 34 30 39 30 ."#_.*\\(?1:[^.]\\)".(#$...24090
5f20 29 29 0a 23 40 35 33 20 52 65 67 65 78 70 20 6d 61 74 63 68 69 6e 67 20 62 6f 74 68 20 60 23 5f )).#@53.Regexp.matching.both.`#_
5f40 27 20 6d 61 63 72 6f 20 61 6e 64 20 61 20 63 6f 6d 6d 65 6e 74 20 73 65 78 70 2e 1f 0a 28 64 65 '.macro.and.a.comment.sexp...(de
5f60 66 76 61 72 20 63 6c 6f 6a 75 72 65 2d 2d 72 65 61 64 65 72 2d 61 6e 64 2d 63 6f 6d 6d 65 6e 74 fvar.clojure--reader-and-comment
5f80 2d 72 65 67 65 78 70 20 22 23 5f 20 2a 5c 5c 28 3f 31 3a 5b 5e 20 5d 5c 5c 29 5c 5c 7c 5c 5c 28 -regexp."#_.*\\(?1:[^.]\\)\\|\\(
5fa0 3f 31 3a 28 63 6f 6d 6d 65 6e 74 5c 5c 5f 3e 5c 5c 29 22 20 28 23 24 20 2e 20 32 34 33 36 30 29 ?1:(comment\\_>\\)".(#$...24360)
5fc0 29 0a 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 30 5c 33 30 31 5c 33 30 32 5c 33 30 33 5c 33 ).(byte-code."\300\301\302\303\3
5fe0 30 34 44 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 04DD\305\306\307\310\311&.\207".
6000 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 63 6c 6f 6a 75 72 65 [custom-declare-variable.clojure
6020 2d 63 6f 6d 6d 65 6e 74 2d 72 65 67 65 78 70 20 66 75 6e 63 61 6c 6c 20 66 75 6e 63 74 69 6f 6e -comment-regexp.funcall.function
6040 20 23 5b 30 20 22 08 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 2d 63 6f 6d 6d 65 6e 74 2d 6d .#[0.".\207".[clojure--comment-m
6060 61 63 72 6f 2d 72 65 67 65 78 70 5d 20 31 5d 20 22 43 6f 6d 6d 65 6e 74 20 6d 6f 64 65 2e 5c 6e acro-regexp].1]."Comment.mode.\n
6080 5c 6e 54 68 65 20 70 6f 73 73 69 62 6c 65 20 76 61 6c 75 65 73 20 66 6f 72 20 74 68 69 73 20 76 \nThe.possible.values.for.this.v
60a0 61 72 69 61 62 6c 65 20 61 72 65 20 6b 65 79 77 6f 72 64 73 20 69 6e 64 69 63 61 74 69 6e 67 5c ariable.are.keywords.indicating\
60c0 6e 77 68 61 74 20 69 73 20 63 6f 6e 73 69 64 65 72 65 64 20 61 20 63 6f 6d 6d 65 6e 74 20 28 61 nwhat.is.considered.a.comment.(a
60e0 66 66 65 63 74 69 6e 67 20 66 6f 6e 74 20 6c 6f 63 6b 69 6e 67 29 2e 5c 6e 5c 6e 20 20 20 20 2d ffecting.font.locking).\n\n....-
6100 20 52 65 61 64 65 72 20 6d 61 63 72 6f 20 60 23 5f 27 20 6f 6e 6c 79 20 2d 20 74 68 65 20 64 65 .Reader.macro.`#_'.only.-.the.de
6120 66 61 75 6c 74 5c 6e 20 20 20 20 2d 20 52 65 61 64 65 72 20 6d 61 63 72 6f 20 60 23 5f 27 20 61 fault\n....-.Reader.macro.`#_'.a
6140 6e 64 20 60 28 63 6f 6d 6d 65 6e 74 29 27 22 20 3a 74 79 70 65 20 28 63 68 6f 69 63 65 20 28 63 nd.`(comment)'".:type.(choice.(c
6160 6f 6e 73 74 20 3a 74 61 67 20 22 52 65 61 64 65 72 20 6d 61 63 72 6f 20 60 23 5f 27 20 61 6e 64 onst.:tag."Reader.macro.`#_'.and
6180 20 60 28 63 6f 6d 6d 65 6e 74 29 27 22 20 63 6c 6f 6a 75 72 65 2d 2d 72 65 61 64 65 72 2d 61 6e .`(comment)'".clojure--reader-an
61a0 64 2d 63 6f 6d 6d 65 6e 74 2d 72 65 67 65 78 70 29 20 28 6f 74 68 65 72 20 3a 74 61 67 20 22 52 d-comment-regexp).(other.:tag."R
61c0 65 61 64 65 72 20 6d 61 63 72 6f 20 60 23 5f 27 20 6f 6e 6c 79 22 20 63 6c 6f 6a 75 72 65 2d 2d eader.macro.`#_'.only".clojure--
61e0 63 6f 6d 6d 65 6e 74 2d 6d 61 63 72 6f 2d 72 65 67 65 78 70 29 29 20 3a 70 61 63 6b 61 67 65 2d comment-macro-regexp)).:package-
6200 76 65 72 73 69 6f 6e 20 28 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 20 2e 20 22 35 2e 37 2e 30 22 29 version.(clojure-mode..."5.7.0")
6220 5d 20 38 29 0a 23 40 36 31 20 53 65 61 72 63 68 20 66 6f 72 20 61 20 63 6f 6d 6d 65 6e 74 20 66 ].8).#@61.Search.for.a.comment.f
6240 6f 72 77 61 72 64 20 73 74 6f 70 70 69 6e 67 20 61 74 20 4c 49 4d 49 54 2e 0a 0a 28 66 6e 20 4c orward.stopping.at.LIMIT...(fn.L
6260 49 4d 49 54 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 2d 73 65 61 72 63 IMIT)..(defalias.'clojure--searc
6280 68 2d 63 6f 6d 6d 65 6e 74 2d 6d 61 63 72 6f 2d 69 6e 74 65 72 6e 61 6c 20 23 5b 32 35 37 20 22 h-comment-macro-internal.#[257."
62a0 5c 33 30 31 08 02 5c 33 30 32 23 5c 32 30 35 44 00 5c 33 30 33 20 5c 33 30 34 5c 32 32 34 5c 33 \301..\302#\205D.\303.\304\224\3
62c0 30 35 01 21 5c 33 30 36 01 38 5c 32 30 34 1b 00 5c 33 30 37 01 38 5c 32 30 33 21 00 5c 33 31 30 05.!\306.8\204..\307.8\203!.\310
62e0 04 21 5c 32 30 32 42 00 01 62 5c 32 31 30 5c 33 31 31 5c 33 30 34 21 5c 32 31 30 02 5c 32 31 31 .!\202B..b\210\311\304!\210.\211
6300 3c 5c 32 30 33 37 00 5c 33 30 36 01 5c 32 33 33 60 5c 32 34 30 5c 32 31 30 5c 32 30 32 3c 00 5c <\2037.\306.\233`\240\210\202<.\
6320 32 31 31 5c 33 30 36 60 49 5c 32 31 30 5c 32 31 30 5c 33 31 32 03 21 5c 32 31 30 5c 33 30 32 5c 211\306`I\210\210\312.!\210\302\
6340 32 36 36 5c 32 30 33 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 63 6f 6d 6d 65 6e 74 2d 72 65 266\203\207".[clojure-comment-re
6360 67 65 78 70 20 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 2d 72 65 67 65 78 70 20 74 20 6d 61 74 gexp.search-forward-regexp.t.mat
6380 63 68 2d 64 61 74 61 20 31 20 73 79 6e 74 61 78 2d 70 70 73 73 20 33 20 34 20 63 6c 6f 6a 75 72 ch-data.1.syntax-ppss.3.4.clojur
63a0 65 2d 2d 73 65 61 72 63 68 2d 63 6f 6d 6d 65 6e 74 2d 6d 61 63 72 6f 2d 69 6e 74 65 72 6e 61 6c e--search-comment-macro-internal
63c0 20 63 6c 6f 6a 75 72 65 2d 66 6f 72 77 61 72 64 2d 6c 6f 67 69 63 61 6c 2d 73 65 78 70 20 73 65 .clojure-forward-logical-sexp.se
63e0 74 2d 6d 61 74 63 68 2d 64 61 74 61 5d 20 38 20 28 23 24 20 2e 20 32 35 31 33 30 29 5d 29 0a 23 t-match-data].8.(#$...25130)]).#
6400 40 31 39 30 20 46 69 6e 64 20 63 6f 6d 6d 65 6e 74 20 6d 61 63 72 6f 73 20 61 6e 64 20 73 65 74 @190.Find.comment.macros.and.set
6420 20 74 68 65 20 6d 61 74 63 68 20 64 61 74 61 2e 0a 53 65 61 72 63 68 20 66 72 6f 6d 20 70 6f 69 .the.match.data..Search.from.poi
6440 6e 74 20 75 70 20 74 6f 20 4c 49 4d 49 54 2e 20 20 54 68 65 20 72 65 67 69 6f 6e 20 74 68 61 74 nt.up.to.LIMIT...The.region.that
6460 20 73 68 6f 75 6c 64 20 62 65 0a 63 6f 6e 73 69 64 65 72 65 64 20 61 20 63 6f 6d 6d 65 6e 74 20 .should.be.considered.a.comment.
6480 69 73 20 62 65 74 77 65 65 6e 20 60 28 6d 61 74 63 68 2d 62 65 67 69 6e 6e 69 6e 67 20 31 29 27 is.between.`(match-beginning.1)'
64a0 0a 61 6e 64 20 60 28 6d 61 74 63 68 2d 65 6e 64 20 31 29 27 2e 0a 0a 28 66 6e 20 4c 49 4d 49 54 .and.`(match-end.1)'...(fn.LIMIT
64c0 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 2d 73 65 61 72 63 68 2d 63 6f )..(defalias.'clojure--search-co
64e0 6d 6d 65 6e 74 2d 6d 61 63 72 6f 20 23 5b 32 35 37 20 22 5c 33 30 30 5c 32 31 31 5c 33 30 30 3d mment-macro.#[257."\300\211\300=
6500 5c 32 30 33 32 00 60 02 58 5c 32 30 33 32 00 5c 33 30 31 31 29 00 5c 33 30 32 31 20 00 5c 33 30 \2032.`.X\2032.\3011).\3021..\30
6520 33 02 21 5c 32 31 31 5c 32 36 32 02 30 30 5c 32 30 32 2e 00 30 5c 32 31 30 5c 33 30 34 5c 32 31 3.!\211\262.00\202..0\210\304\21
6540 31 5c 32 36 32 02 5c 32 30 32 2e 00 5c 32 31 30 5c 33 30 30 5c 32 31 31 5c 32 36 32 02 5c 32 31 1\262.\202..\210\300\211\262.\21
6560 30 5c 32 30 32 01 00 5c 32 31 31 5c 32 30 37 22 20 5b 72 65 74 72 79 20 28 73 63 61 6e 2d 65 72 0\202..\211\207".[retry.(scan-er
6580 72 6f 72 29 20 28 65 6e 64 2d 6f 66 2d 66 69 6c 65 29 20 63 6c 6f 6a 75 72 65 2d 2d 73 65 61 72 ror).(end-of-file).clojure--sear
65a0 63 68 2d 63 6f 6d 6d 65 6e 74 2d 6d 61 63 72 6f 2d 69 6e 74 65 72 6e 61 6c 20 6e 69 6c 5d 20 34 ch-comment-macro-internal.nil].4
65c0 20 28 23 24 20 2e 20 32 35 36 30 35 29 5d 29 0a 23 40 31 30 32 20 53 63 61 6e 73 20 74 68 65 20 .(#$...25605)]).#@102.Scans.the.
65e0 62 75 66 66 65 72 20 62 61 63 6b 77 61 72 64 73 20 66 6f 72 20 74 68 65 20 6e 65 78 74 20 22 74 buffer.backwards.for.the.next."t
6600 6f 70 2d 6c 65 76 65 6c 22 20 64 65 66 69 6e 69 74 69 6f 6e 2e 0a 43 61 6c 6c 65 64 20 62 79 20 op-level".definition..Called.by.
6620 60 69 6d 65 6e 75 2d 2d 67 65 6e 65 72 69 63 2d 66 75 6e 63 74 69 6f 6e 27 2e 1f 0a 28 64 65 66 `imenu--generic-function'...(def
6640 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 6d 61 74 63 68 2d 6e 65 78 74 2d 64 65 66 20 23 5b alias.'clojure-match-next-def.#[
6660 30 20 22 5c 33 30 30 5c 33 30 31 5c 33 30 32 5c 33 30 33 23 5c 32 30 35 5c 32 31 31 00 5c 32 31 0."\300\301\302\303#\205\211.\21
6680 32 5c 33 30 32 5c 33 30 34 5c 33 30 35 21 60 5c 33 30 36 20 5c 32 31 30 5c 33 30 37 20 5c 32 31 2\302\304\305!`\306.\210\307.\21
66a0 30 02 5c 32 30 34 5c 32 30 34 00 5c 33 31 30 31 5c 22 00 5c 33 30 37 20 30 5c 32 30 32 26 00 5c 0.\204\204.\3101\".\307.0\202&.\
66c0 32 31 30 5c 32 30 32 27 00 5c 32 31 30 5c 33 31 31 5c 33 31 32 60 66 5c 22 5c 32 30 33 34 00 5c 210\202'.\210\311\312`f\"\2034.\
66e0 33 31 33 20 5c 32 30 34 3f 00 5c 33 31 31 5c 33 31 34 60 66 5c 22 5c 32 30 33 3f 00 5c 33 31 33 313.\204?.\311\314`f\"\203?.\313
6700 20 5c 32 31 30 5c 33 31 35 5c 33 31 36 21 5c 32 31 31 5c 32 30 33 4f 00 5c 32 31 31 01 41 5c 32 .\210\315\316!\211\203O.\211.A\2
6720 36 32 02 5c 32 34 32 5c 32 30 32 56 00 5c 33 31 37 5c 33 32 30 5c 33 30 32 03 47 44 5c 22 5c 33 62.\242\202V.\317\320\302.GD\"\3
6740 31 31 5c 33 32 31 02 66 5c 22 5c 32 30 33 67 00 5c 33 30 37 20 5c 32 31 30 5c 33 31 33 20 5c 32 11\321.f\"\203g.\307.\210\313.\2
6760 31 30 5c 32 30 32 7f 00 5c 33 30 33 5c 32 36 32 05 03 5c 33 32 32 5c 32 33 30 5c 32 30 33 79 00 10\202..\303\262..\322\230\203y.
6780 01 62 5c 32 31 30 5c 33 30 37 20 5c 32 31 30 60 5c 32 36 32 02 5c 33 32 33 01 03 44 21 5c 32 31 .b\210\307.\210`\262.\323..D!\21
67a0 30 5c 32 36 36 02 5c 32 30 32 14 00 5c 32 31 31 62 5c 32 36 36 5c 32 30 33 29 5c 32 30 37 22 20 0\266.\202..\211b\266\203)\207".
67c0 5b 72 65 2d 73 65 61 72 63 68 2d 62 61 63 6b 77 61 72 64 20 22 5e 5b 20 09 5d 2a 28 5c 5c 28 5b [re-search-backward."^[..]*(\\([
67e0 61 2d 7a 30 2d 39 2e 2d 5d 2b 2f 5c 5c 29 3f 5c 5c 28 64 65 66 5c 5c 73 77 2a 5c 5c 29 22 20 6e a-z0-9.-]+/\\)?\\(def\\sw*\\)".n
6800 69 6c 20 74 20 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 32 20 64 6f 77 6e 2d 6c 69 73 74 20 66 6f il.t.match-string.2.down-list.fo
6820 72 77 61 72 64 2d 73 65 78 70 20 28 65 72 72 6f 72 29 20 63 68 61 72 2d 65 71 75 61 6c 20 39 31 rward-sexp.(error).char-equal.91
6840 20 62 61 63 6b 77 61 72 64 2d 73 65 78 70 20 34 31 20 62 6f 75 6e 64 73 2d 6f 66 2d 74 68 69 6e .backward-sexp.41.bounds-of-thin
6860 67 2d 61 74 2d 70 6f 69 6e 74 20 73 65 78 70 20 73 69 67 6e 61 6c 20 77 72 6f 6e 67 2d 6e 75 6d g-at-point.sexp.signal.wrong-num
6880 62 65 72 2d 6f 66 2d 61 72 67 75 6d 65 6e 74 73 20 39 34 20 22 64 65 66 6d 65 74 68 6f 64 22 20 ber-of-arguments.94."defmethod".
68a0 73 65 74 2d 6d 61 74 63 68 2d 64 61 74 61 5d 20 38 20 28 23 24 20 2e 20 32 36 30 37 30 29 5d 29 set-match-data].8.(#$...26070)])
68c0 0a 23 40 31 31 30 20 41 20 6c 69 73 74 20 6f 66 20 63 68 61 72 73 20 74 68 61 74 20 61 20 43 6c .#@110.A.list.of.chars.that.a.Cl
68e0 6f 6a 75 72 65 20 73 79 6d 62 6f 6c 20 63 61 6e 6e 6f 74 20 63 6f 6e 74 61 69 6e 2e 0a 53 65 65 ojure.symbol.cannot.contain..See
6900 20 64 65 66 69 6e 69 74 69 6f 6e 20 6f 66 20 27 6d 61 63 72 6f 73 27 3a 20 55 52 4c 20 60 68 74 .definition.of.'macros':.URL.`ht
6920 74 70 3a 2f 2f 67 69 74 2e 69 6f 2f 76 52 47 4c 44 27 2e 1f 0a 28 64 65 66 63 6f 6e 73 74 20 63 tp://git.io/vRGLD'...(defconst.c
6940 6c 6f 6a 75 72 65 2d 2d 73 79 6d 2d 66 6f 72 62 69 64 64 65 6e 2d 72 65 73 74 2d 63 68 61 72 73 lojure--sym-forbidden-rest-chars
6960 20 22 5d 5b 5c 22 3b 27 40 5c 5c 5e 60 7e 28 29 7b 7d 5c 5c 2c 20 09 5c 6e 0d 22 20 28 23 24 20 ."][\";'@\\^`~(){}\\,..\n.".(#$.
6980 2e 20 32 36 38 32 33 29 29 0a 23 40 32 32 33 20 41 20 6c 69 73 74 20 6f 66 20 63 68 61 72 73 20 ..26823)).#@223.A.list.of.chars.
69a0 74 68 61 74 20 61 20 43 6c 6f 6a 75 72 65 20 73 79 6d 62 6f 6c 20 63 61 6e 6e 6f 74 20 73 74 61 that.a.Clojure.symbol.cannot.sta
69c0 72 74 20 77 69 74 68 2e 0a 53 65 65 20 74 68 65 20 66 6f 72 2d 6c 6f 6f 70 3a 20 55 52 4c 20 60 rt.with..See.the.for-loop:.URL.`
69e0 68 74 74 70 3a 2f 2f 67 69 74 2e 69 6f 2f 76 52 47 54 6a 27 20 6c 69 6e 65 73 3a 20 55 52 4c 0a http://git.io/vRGTj'.lines:.URL.
6a00 60 68 74 74 70 3a 2f 2f 67 69 74 2e 69 6f 2f 76 52 47 49 68 27 2c 20 55 52 4c 20 60 68 74 74 70 `http://git.io/vRGIh',.URL.`http
6a20 3a 2f 2f 67 69 74 2e 69 6f 2f 76 52 47 4c 45 27 20 61 6e 64 20 76 61 6c 75 65 0a 64 65 66 69 6e ://git.io/vRGLE'.and.value.defin
6a40 69 74 69 6f 6e 20 6f 66 20 27 6d 61 63 72 6f 73 27 3a 20 55 52 4c 20 60 68 74 74 70 3a 2f 2f 67 ition.of.'macros':.URL.`http://g
6a60 69 74 2e 69 6f 2f 76 52 47 4c 44 27 2e 1f 0a 28 64 65 66 63 6f 6e 73 74 20 63 6c 6f 6a 75 72 65 it.io/vRGLD'...(defconst.clojure
6a80 2d 2d 73 79 6d 2d 66 6f 72 62 69 64 64 65 6e 2d 31 73 74 2d 63 68 61 72 73 20 28 63 6f 6e 63 61 --sym-forbidden-1st-chars.(conca
6aa0 74 20 63 6c 6f 6a 75 72 65 2d 2d 73 79 6d 2d 66 6f 72 62 69 64 64 65 6e 2d 72 65 73 74 2d 63 68 t.clojure--sym-forbidden-rest-ch
6ac0 61 72 73 20 22 30 2d 39 3a 22 29 20 28 23 24 20 2e 20 32 37 30 32 34 29 29 0a 23 40 31 38 32 20 ars."0-9:").(#$...27024)).#@182.
6ae0 41 20 72 65 67 65 78 70 20 6d 61 74 63 68 69 6e 67 20 61 20 43 6c 6f 6a 75 72 65 20 73 79 6d 62 A.regexp.matching.a.Clojure.symb
6b00 6f 6c 20 6f 72 20 6e 61 6d 65 73 70 61 63 65 20 61 6c 69 61 73 2e 0a 4d 61 74 63 68 65 73 20 74 ol.or.namespace.alias..Matches.t
6b20 68 65 20 72 75 6c 65 20 60 63 6c 6f 6a 75 72 65 2d 2d 73 79 6d 2d 66 6f 72 62 69 64 64 65 6e 2d he.rule.`clojure--sym-forbidden-
6b40 31 73 74 2d 63 68 61 72 73 27 20 66 6f 6c 6c 6f 77 65 64 20 62 79 0a 61 6e 79 20 6e 75 6d 62 65 1st-chars'.followed.by.any.numbe
6b60 72 20 6f 66 20 6d 61 74 63 68 65 73 20 6f 66 20 60 63 6c 6f 6a 75 72 65 2d 2d 73 79 6d 2d 66 6f r.of.matches.of.`clojure--sym-fo
6b80 72 62 69 64 64 65 6e 2d 72 65 73 74 2d 63 68 61 72 73 27 2e 1f 0a 28 64 65 66 63 6f 6e 73 74 20 rbidden-rest-chars'...(defconst.
6ba0 63 6c 6f 6a 75 72 65 2d 2d 73 79 6d 2d 72 65 67 65 78 70 20 28 63 6f 6e 63 61 74 20 22 5b 5e 22 clojure--sym-regexp.(concat."[^"
6bc0 20 63 6c 6f 6a 75 72 65 2d 2d 73 79 6d 2d 66 6f 72 62 69 64 64 65 6e 2d 31 73 74 2d 63 68 61 72 .clojure--sym-forbidden-1st-char
6be0 73 20 22 5d 5b 5e 22 20 63 6c 6f 6a 75 72 65 2d 2d 73 79 6d 2d 66 6f 72 62 69 64 64 65 6e 2d 72 s."][^".clojure--sym-forbidden-r
6c00 65 73 74 2d 63 68 61 72 73 20 22 5d 2a 22 29 20 28 23 24 20 2e 20 32 37 33 36 30 29 29 0a 23 40 est-chars."]*").(#$...27360)).#@
6c20 35 31 20 44 65 66 61 75 6c 74 20 65 78 70 72 65 73 73 69 6f 6e 73 20 74 6f 20 68 69 67 68 6c 69 51.Default.expressions.to.highli
6c40 67 68 74 20 69 6e 20 43 6c 6f 6a 75 72 65 20 6d 6f 64 65 2e 1f 0a 28 64 65 66 63 6f 6e 73 74 20 ght.in.Clojure.mode...(defconst.
6c60 63 6c 6f 6a 75 72 65 2d 66 6f 6e 74 2d 6c 6f 63 6b 2d 6b 65 79 77 6f 72 64 73 20 27 28 28 22 28 clojure-font-lock-keywords.'(("(
6c80 5c 5c 28 3f 3a 63 6c 6f 6a 75 72 65 2e 63 6f 72 65 2f 5c 5c 29 3f 5c 5c 28 5c 5c 28 3f 3a 64 65 \\(?:clojure.core/\\)?\\(\\(?:de
6ca0 66 5c 5c 28 3f 3a 6f 6e 63 65 5c 5c 29 3f 5c 5c 29 5c 5c 29 5c 5c 3e 5b 20 0d 5c 6e 09 5d 2a 5c f\\(?:once\\)?\\)\\)\\>[..\n.]*\
6cc0 5c 28 3f 3a 23 3f 5e 5c 5c 28 3f 3a 7b 5b 5e 7d 5d 2a 7d 5c 5c 7c 5c 5c 73 77 2b 5c 5c 29 5b 20 \(?:#?^\\(?:{[^}]*}\\|\\sw+\\)[.
6ce0 0d 5c 6e 09 5d 2a 5c 5c 29 2a 5c 5c 28 5c 5c 73 77 2b 5c 5c 29 3f 22 20 28 31 20 66 6f 6e 74 2d .\n.]*\\)*\\(\\sw+\\)?".(1.font-
6d00 6c 6f 63 6b 2d 6b 65 79 77 6f 72 64 2d 66 61 63 65 29 20 28 32 20 66 6f 6e 74 2d 6c 6f 63 6b 2d lock-keyword-face).(2.font-lock-
6d20 76 61 72 69 61 62 6c 65 2d 6e 61 6d 65 2d 66 61 63 65 20 6e 69 6c 20 74 29 29 20 28 22 28 5c 5c variable-name-face.nil.t)).("(\\
6d40 28 3f 3a 63 6c 6f 6a 75 72 65 2e 63 6f 72 65 2f 5c 5c 29 3f 5c 5c 28 5c 5c 28 3f 3a 64 65 66 5c (?:clojure.core/\\)?\\(\\(?:def\
6d60 5c 28 3f 3a 70 72 6f 74 6f 63 6f 6c 5c 5c 7c 72 65 63 6f 72 64 5c 5c 7c 73 74 72 75 63 74 5c 5c \(?:protocol\\|record\\|struct\\
6d80 7c 74 79 70 65 5c 5c 29 5c 5c 29 5c 5c 29 5c 5c 3e 5b 20 0d 5c 6e 09 5d 2a 5c 5c 28 3f 3a 23 3f |type\\)\\)\\)\\>[..\n.]*\\(?:#?
6da0 5e 5c 5c 28 3f 3a 7b 5b 5e 7d 5d 2a 7d 5c 5c 7c 5c 5c 73 77 2b 5c 5c 29 5b 20 0d 5c 6e 09 5d 2a ^\\(?:{[^}]*}\\|\\sw+\\)[..\n.]*
6dc0 5c 5c 29 2a 5c 5c 28 5c 5c 73 77 2b 5c 5c 29 3f 22 20 28 31 20 66 6f 6e 74 2d 6c 6f 63 6b 2d 6b \\)*\\(\\sw+\\)?".(1.font-lock-k
6de0 65 79 77 6f 72 64 2d 66 61 63 65 29 20 28 32 20 66 6f 6e 74 2d 6c 6f 63 6b 2d 74 79 70 65 2d 66 eyword-face).(2.font-lock-type-f
6e00 61 63 65 20 6e 69 6c 20 74 29 29 20 28 22 28 5c 5c 28 3f 3a 5b 5e 5d 5b 5c 22 3b 27 40 5c 5c 5e ace.nil.t)).("(\\(?:[^][\";'@\\^
6e20 60 7e 28 29 7b 7d 5c 5c 2c 20 09 5c 6e 0d 30 2d 39 3a 5d 5b 5e 5d 5b 5c 22 3b 27 40 5c 5c 5e 60 `~(){}\\,..\n.0-9:][^][\";'@\\^`
6e40 7e 28 29 7b 7d 5c 5c 2c 20 09 5c 6e 0d 5d 2a 2f 5c 5c 29 3f 5c 5c 28 64 65 66 5b 5e 20 0d 5c 6e ~(){}\\,..\n.]*/\\)?\\(def[^..\n
6e60 09 5d 2a 5c 5c 29 5c 5c 3e 5b 20 0d 5c 6e 09 5d 2a 5c 5c 28 3f 3a 23 3f 5e 5c 5c 28 3f 3a 7b 5b .]*\\)\\>[..\n.]*\\(?:#?^\\(?:{[
6e80 5e 7d 5d 2a 7d 5c 5c 7c 5c 5c 73 77 2b 5c 5c 29 5b 20 0d 5c 6e 09 5d 2a 5c 5c 29 2a 5c 5c 28 5c ^}]*}\\|\\sw+\\)[..\n.]*\\)*\\(\
6ea0 5c 73 77 2b 5c 5c 29 3f 22 20 28 31 20 66 6f 6e 74 2d 6c 6f 63 6b 2d 6b 65 79 77 6f 72 64 2d 66 \sw+\\)?".(1.font-lock-keyword-f
6ec0 61 63 65 29 20 28 32 20 66 6f 6e 74 2d 6c 6f 63 6b 2d 66 75 6e 63 74 69 6f 6e 2d 6e 61 6d 65 2d ace).(2.font-lock-function-name-
6ee0 66 61 63 65 20 6e 69 6c 20 74 29 29 20 28 22 28 5c 5c 28 3f 3a 63 6c 6f 6a 75 72 65 2e 63 6f 72 face.nil.t)).("(\\(?:clojure.cor
6f00 65 2f 5c 5c 29 3f 5c 5c 28 66 6e 5c 5c 29 5b 20 09 5d 2b 5c 5c 28 3f 3a 23 3f 5e 5c 5c 73 77 2b e/\\)?\\(fn\\)[..]+\\(?:#?^\\sw+
6f20 5b 20 09 5d 2a 5c 5c 29 3f 5c 5c 28 5c 5c 73 77 2b 5c 5c 29 3f 22 20 28 31 20 66 6f 6e 74 2d 6c [..]*\\)?\\(\\sw+\\)?".(1.font-l
6f40 6f 63 6b 2d 6b 65 79 77 6f 72 64 2d 66 61 63 65 29 20 28 32 20 66 6f 6e 74 2d 6c 6f 63 6b 2d 66 ock-keyword-face).(2.font-lock-f
6f60 75 6e 63 74 69 6f 6e 2d 6e 61 6d 65 2d 66 61 63 65 20 6e 69 6c 20 74 29 29 20 28 22 5c 5c 3c 25 unction-name-face.nil.t)).("\\<%
6f80 5b 26 31 2d 39 5d 3f 22 20 28 30 20 66 6f 6e 74 2d 6c 6f 63 6b 2d 76 61 72 69 61 62 6c 65 2d 6e [&1-9]?".(0.font-lock-variable-n
6fa0 61 6d 65 2d 66 61 63 65 29 29 20 28 22 28 5c 5c 28 5c 5c 2e 5c 5c 7c 63 61 74 63 68 5c 5c 7c 64 ame-face)).("(\\(\\.\\|catch\\|d
6fc0 5c 5c 28 3f 3a 65 66 5c 5c 7c 6f 5c 5c 29 5c 5c 7c 66 5c 5c 28 3f 3a 69 6e 61 6c 6c 79 5c 5c 7c \\(?:ef\\|o\\)\\|f\\(?:inally\\|
6fe0 6e 5c 5c 2a 3f 5c 5c 29 5c 5c 7c 69 66 5c 5c 7c 6c 5c 5c 28 3f 3a 65 74 5c 5c 2a 3f 5c 5c 7c 6f n\\*?\\)\\|if\\|l\\(?:et\\*?\\|o
7000 6f 70 5c 5c 2a 3f 5c 5c 29 5c 5c 7c 6d 6f 6e 69 74 6f 72 2d 65 5c 5c 28 3f 3a 6e 74 65 72 5c 5c op\\*?\\)\\|monitor-e\\(?:nter\\
7020 7c 78 69 74 5c 5c 29 5c 5c 7c 6e 65 77 5c 5c 7c 71 75 6f 74 65 5c 5c 7c 72 65 63 75 72 5c 5c 7c |xit\\)\\|new\\|quote\\|recur\\|
7040 73 65 74 21 5c 5c 7c 74 5c 5c 28 3f 3a 68 72 6f 77 5c 5c 7c 72 79 5c 5c 29 5c 5c 7c 76 61 72 5c set!\\|t\\(?:hrow\\|ry\\)\\|var\
7060 5c 29 5c 5c 3e 22 20 31 20 66 6f 6e 74 2d 6c 6f 63 6b 2d 6b 65 79 77 6f 72 64 2d 66 61 63 65 29 \)\\>".1.font-lock-keyword-face)
7080 20 28 22 28 5c 5c 28 3f 3a 63 6c 6f 6a 75 72 65 2e 63 6f 72 65 2f 5c 5c 29 3f 5c 5c 28 2d 3e 3e .("(\\(?:clojure.core/\\)?\\(->>
70a0 3f 5c 5c 7c 5c 5c 2e 5c 5c 2e 5c 5c 7c 61 5c 5c 28 3f 3a 6e 64 5c 5c 7c 73 2d 3e 5c 5c 29 5c 5c ?\\|\\.\\.\\|a\\(?:nd\\|s->\\)\\
70c0 7c 62 69 6e 64 69 6e 67 5c 5c 7c 63 5c 5c 28 3f 3a 61 73 65 5c 5c 7c 6f 6e 64 5c 5c 28 3f 3a 2d |binding\\|c\\(?:ase\\|ond\\(?:-
70e0 3e 3e 3f 5c 5c 7c 70 5c 5c 29 3f 5c 5c 29 5c 5c 7c 64 5c 5c 28 3f 3a 65 63 6c 61 72 65 5c 5c 7c >>?\\|p\\)?\\)\\|d\\(?:eclare\\|
7100 6f 5c 5c 28 3f 3a 61 6c 6c 5c 5c 7c 72 75 6e 5c 5c 7c 73 5c 5c 28 3f 3a 65 71 5c 5c 7c 79 6e 63 o\\(?:all\\|run\\|s\\(?:eq\\|ync
7120 5c 5c 29 5c 5c 7c 74 5c 5c 28 3f 3a 69 6d 65 73 5c 5c 7c 6f 5c 5c 29 5c 5c 29 5c 5c 29 5c 5c 7c \\)\\|t\\(?:imes\\|o\\)\\)\\)\\|
7140 66 6f 72 5c 5c 7c 69 5c 5c 28 3f 3a 66 2d 5c 5c 28 3f 3a 6c 65 74 5c 5c 7c 6e 6f 74 5c 5c 7c 73 for\\|i\\(?:f-\\(?:let\\|not\\|s
7160 6f 6d 65 5c 5c 29 5c 5c 7c 6e 2d 6e 73 5c 5c 29 5c 5c 7c 6c 65 74 66 6e 5c 5c 7c 6e 73 5c 5c 7c ome\\)\\|n-ns\\)\\|letfn\\|ns\\|
7180 6f 72 5c 5c 7c 77 5c 5c 28 3f 3a 68 65 6e 5c 5c 28 3f 3a 2d 5c 5c 28 3f 3a 66 69 72 73 74 5c 5c or\\|w\\(?:hen\\(?:-\\(?:first\\
71a0 7c 6c 65 74 5c 5c 7c 6e 6f 74 5c 5c 7c 73 6f 6d 65 5c 5c 29 5c 5c 29 3f 5c 5c 7c 69 74 68 2d 5c |let\\|not\\|some\\)\\)?\\|ith-\
71c0 5c 28 3f 3a 6c 6f 63 61 6c 2d 76 61 72 73 5c 5c 7c 6f 70 65 6e 5c 5c 7c 72 65 64 65 66 73 5c 5c \(?:local-vars\\|open\\|redefs\\
71e0 28 3f 3a 2d 66 6e 5c 5c 29 3f 5c 5c 29 5c 5c 29 5c 5c 29 5c 5c 3e 22 20 31 20 66 6f 6e 74 2d 6c (?:-fn\\)?\\)\\)\\)\\>".1.font-l
7200 6f 63 6b 2d 6b 65 79 77 6f 72 64 2d 66 61 63 65 29 20 28 22 5c 5c 5f 3c 5c 5c 28 3f 3a 5c 5c 28 ock-keyword-face).("\\_<\\(?:\\(
7220 3f 3a 6c 65 74 5c 5c 7c 77 68 5c 5c 28 3f 3a 65 6e 5c 5c 7c 69 6c 65 5c 5c 29 5c 5c 29 5c 5c 29 ?:let\\|wh\\(?:en\\|ile\\)\\)\\)
7240 2d 5c 5c 28 3f 3a 5c 5c 73 77 5c 5c 7c 5c 5c 73 5f 5c 5c 29 2b 5c 5c 5f 3e 22 20 30 20 66 6f 6e -\\(?:\\sw\\|\\s_\\)+\\_>".0.fon
7260 74 2d 6c 6f 63 6b 2d 6b 65 79 77 6f 72 64 2d 66 61 63 65 29 20 28 22 5c 5c 3c 5c 5c 28 5c 5c 2a t-lock-keyword-face).("\\<\\(\\*
7280 5c 5c 28 3f 3a 5c 5c 28 3f 3a 61 5c 5c 28 3f 3a 67 65 6e 74 5c 5c 7c 6c 6c 6f 77 2d 75 6e 72 65 \\(?:\\(?:a\\(?:gent\\|llow-unre
72a0 73 6f 6c 76 65 64 2d 76 61 72 73 5c 5c 7c 73 73 65 72 74 5c 5c 29 5c 5c 7c 63 5c 5c 28 3f 3a 6c solved-vars\\|ssert\\)\\|c\\(?:l
72c0 6f 6a 75 72 65 2d 76 65 72 73 69 6f 6e 5c 5c 7c 6f 6d 5c 5c 28 3f 3a 6d 61 6e 64 2d 6c 69 6e 65 ojure-version\\|om\\(?:mand-line
72e0 2d 61 72 67 73 5c 5c 7c 70 69 6c 65 2d 5c 5c 28 3f 3a 66 69 6c 65 73 5c 5c 7c 70 61 74 68 5c 5c -args\\|pile-\\(?:files\\|path\\
7300 29 5c 5c 29 5c 5c 29 5c 5c 7c 64 5c 5c 28 3f 3a 61 74 61 2d 72 65 61 64 65 72 73 5c 5c 7c 65 66 )\\)\\)\\|d\\(?:ata-readers\\|ef
7320 61 75 6c 74 2d 64 61 74 61 2d 72 65 61 64 65 72 2d 66 6e 5c 5c 29 5c 5c 7c 65 72 72 5c 5c 7c 66 ault-data-reader-fn\\)\\|err\\|f
7340 5c 5c 28 3f 3a 5c 5c 28 3f 3a 69 6c 5c 5c 7c 6c 75 73 68 2d 6f 6e 2d 6e 65 77 6c 69 6e 5c 5c 29 \\(?:\\(?:il\\|lush-on-newlin\\)
7360 65 5c 5c 29 5c 5c 7c 69 6e 5c 5c 7c 6d 61 5c 5c 28 3f 3a 63 72 6f 2d 6d 65 74 61 5c 5c 7c 74 68 e\\)\\|in\\|ma\\(?:cro-meta\\|th
7380 2d 63 6f 6e 74 65 78 74 5c 5c 29 5c 5c 7c 6e 73 5c 5c 7c 6f 75 74 5c 5c 7c 70 72 69 6e 74 2d 5c -context\\)\\|ns\\|out\\|print-\
73a0 5c 28 3f 3a 64 75 70 5c 5c 7c 6c 65 5c 5c 28 3f 3a 6e 67 74 68 5c 5c 7c 76 65 6c 5c 5c 29 5c 5c \(?:dup\\|le\\(?:ngth\\|vel\\)\\
73c0 7c 6d 65 74 61 5c 5c 7c 72 65 61 64 61 62 6c 79 5c 5c 29 5c 5c 7c 72 65 61 64 2d 65 76 61 6c 5c |meta\\|readably\\)\\|read-eval\
73e0 5c 7c 73 6f 75 72 63 65 2d 70 61 74 68 5c 5c 7c 75 5c 5c 28 3f 3a 6e 63 68 65 63 6b 65 64 2d 6d \|source-path\\|u\\(?:nchecked-m
7400 61 74 68 5c 5c 7c 73 65 2d 63 6f 6e 74 65 78 74 2d 63 6c 61 73 73 6c 6f 61 64 65 72 5c 5c 29 5c ath\\|se-context-classloader\\)\
7420 5c 7c 77 61 72 6e 2d 6f 6e 2d 72 65 66 6c 65 63 74 69 6f 6e 5c 5c 29 5c 5c 2a 5c 5c 7c 5b 31 32 \|warn-on-reflection\\)\\*\\|[12
7440 33 65 5d 5c 5c 29 5c 5c 29 5c 5c 3e 22 20 30 20 66 6f 6e 74 2d 6c 6f 63 6b 2d 62 75 69 6c 74 69 3e]\\)\\)\\>".0.font-lock-builti
7460 6e 2d 66 61 63 65 29 20 28 22 5c 5c 28 3f 3a 5c 5c 3c 5c 5c 7c 2f 5c 5c 29 40 3f 5c 5c 28 5c 5c n-face).("\\(?:\\<\\|/\\)@?\\(\\
7480 2a 5b 61 2d 7a 2d 5d 2a 5c 5c 2a 5c 5c 29 5c 5c 3e 22 20 31 20 66 6f 6e 74 2d 6c 6f 63 6b 2d 76 *[a-z-]*\\*\\)\\>".1.font-lock-v
74a0 61 72 69 61 62 6c 65 2d 6e 61 6d 65 2d 66 61 63 65 29 20 28 22 5c 5c 3c 5c 5c 28 66 61 6c 73 65 ariable-name-face).("\\<\\(false
74c0 5c 5c 7c 6e 69 6c 5c 5c 7c 74 72 75 65 5c 5c 29 5c 5c 3e 22 20 30 20 66 6f 6e 74 2d 6c 6f 63 6b \\|nil\\|true\\)\\>".0.font-lock
74e0 2d 63 6f 6e 73 74 61 6e 74 2d 66 61 63 65 29 20 28 22 5c 5c 5c 5c 5c 5c 28 5b 5b 3a 70 75 6e 63 -constant-face).("\\\\\\([[:punc
7500 74 3a 5d 5d 5c 5c 7c 5b 61 2d 7a 30 2d 39 5d 2b 5c 5c 3e 5c 5c 29 22 20 30 20 27 63 6c 6f 6a 75 t:]]\\|[a-z0-9]+\\>\\)".0.'cloju
7520 72 65 2d 63 68 61 72 61 63 74 65 72 2d 66 61 63 65 29 20 28 22 28 5c 5c 3c 6e 73 5c 5c 3e 5b 20 re-character-face).("(\\<ns\\>[.
7540 0d 5c 6e 09 5d 2a 5c 5c 28 3f 3a 5c 5c 5e 3f 7b 5b 5e 7d 5d 2b 7d 5b 20 0d 5c 6e 09 5d 2a 5c 5c .\n.]*\\(?:\\^?{[^}]+}[..\n.]*\\
7560 29 2a 5c 5c 28 5b 5e 5d 5b 5c 22 3b 27 40 5c 5c 5e 60 7e 28 29 7b 7d 5c 5c 2c 20 09 5c 6e 0d 30 )*\\([^][\";'@\\^`~(){}\\,..\n.0
7580 2d 39 3a 5d 5b 5e 5d 5b 5c 22 3b 27 40 5c 5c 5e 60 7e 28 29 7b 7d 5c 5c 2c 20 09 5c 6e 0d 5d 2a -9:][^][\";'@\\^`~(){}\\,..\n.]*
75a0 5c 5c 29 22 20 28 31 20 66 6f 6e 74 2d 6c 6f 63 6b 2d 74 79 70 65 2d 66 61 63 65 29 29 20 28 22 \\)".(1.font-lock-type-face)).("
75c0 5c 5c 28 3a 5c 5c 7b 31 2c 32 5c 5c 7d 5c 5c 29 5c 5c 28 5b 5e 5d 5b 5c 22 3b 27 40 5c 5c 5e 60 \\(:\\{1,2\\}\\)\\([^][\";'@\\^`
75e0 7e 28 29 7b 7d 5c 5c 2c 20 09 5c 6e 0d 30 2d 39 3a 5d 5b 5e 5d 5b 5c 22 3b 27 40 5c 5c 5e 60 7e ~(){}\\,..\n.0-9:][^][\";'@\\^`~
7600 28 29 7b 7d 5c 5c 2c 20 09 5c 6e 0d 5d 2a 3f 5c 5c 29 5c 5c 28 2f 5c 5c 29 5c 5c 28 5b 5e 5d 5b (){}\\,..\n.]*?\\)\\(/\\)\\([^][
7620 5c 22 3b 27 40 5c 5c 5e 60 7e 28 29 7b 7d 5c 5c 2c 20 09 5c 6e 0d 30 2d 39 3a 5d 5b 5e 5d 5b 5c \";'@\\^`~(){}\\,..\n.0-9:][^][\
7640 22 3b 27 40 5c 5c 5e 60 7e 28 29 7b 7d 5c 5c 2c 20 09 5c 6e 0d 5d 2a 5c 5c 29 22 20 28 31 20 27 ";'@\\^`~(){}\\,..\n.]*\\)".(1.'
7660 63 6c 6f 6a 75 72 65 2d 6b 65 79 77 6f 72 64 2d 66 61 63 65 29 20 28 32 20 66 6f 6e 74 2d 6c 6f clojure-keyword-face).(2.font-lo
7680 63 6b 2d 74 79 70 65 2d 66 61 63 65 29 20 28 33 20 27 64 65 66 61 75 6c 74 29 20 28 34 20 27 63 ck-type-face).(3.'default).(4.'c
76a0 6c 6f 6a 75 72 65 2d 6b 65 79 77 6f 72 64 2d 66 61 63 65 29 29 20 28 22 5c 5c 28 3a 5c 5c 7b 31 lojure-keyword-face)).("\\(:\\{1
76c0 2c 32 5c 5c 7d 5c 5c 29 5c 5c 28 5b 5e 5d 5b 5c 22 3b 27 40 5c 5c 5e 60 7e 28 29 7b 7d 5c 5c 2c ,2\\}\\)\\([^][\";'@\\^`~(){}\\,
76e0 20 09 5c 6e 0d 30 2d 39 3a 5d 5b 5e 5d 5b 5c 22 3b 27 40 5c 5c 5e 60 7e 28 29 7b 7d 5c 5c 2c 20 ..\n.0-9:][^][\";'@\\^`~(){}\\,.
7700 09 5c 6e 0d 5d 2a 5c 5c 29 22 20 28 31 20 27 63 6c 6f 6a 75 72 65 2d 6b 65 79 77 6f 72 64 2d 66 .\n.]*\\)".(1.'clojure-keyword-f
7720 61 63 65 29 20 28 32 20 27 63 6c 6f 6a 75 72 65 2d 6b 65 79 77 6f 72 64 2d 66 61 63 65 29 29 20 ace).(2.'clojure-keyword-face)).
7740 28 22 5c 5c 28 23 5e 5c 5c 29 5c 5c 28 5b 5e 5d 5b 5c 22 3b 27 40 5c 5c 5e 60 7e 28 29 7b 7d 5c ("\\(#^\\)\\([^][\";'@\\^`~(){}\
7760 5c 2c 20 09 5c 6e 0d 30 2d 39 3a 5d 5b 5e 5d 5b 5c 22 3b 27 40 5c 5c 5e 60 7e 28 29 7b 7d 5c 5c \,..\n.0-9:][^][\";'@\\^`~(){}\\
7780 2c 20 09 5c 6e 0d 5d 2a 3f 5c 5c 29 5c 5c 28 2f 5c 5c 29 5c 5c 28 5b 5e 5d 5b 5c 22 3b 27 40 5c ,..\n.]*?\\)\\(/\\)\\([^][\";'@\
77a0 5c 5e 60 7e 28 29 7b 7d 5c 5c 2c 20 09 5c 6e 0d 30 2d 39 3a 5d 5b 5e 5d 5b 5c 22 3b 27 40 5c 5c \^`~(){}\\,..\n.0-9:][^][\";'@\\
77c0 5e 60 7e 28 29 7b 7d 5c 5c 2c 20 09 5c 6e 0d 5d 2a 5c 5c 29 22 20 28 31 20 27 64 65 66 61 75 6c ^`~(){}\\,..\n.]*\\)".(1.'defaul
77e0 74 29 20 28 32 20 66 6f 6e 74 2d 6c 6f 63 6b 2d 74 79 70 65 2d 66 61 63 65 29 20 28 33 20 27 64 t).(2.font-lock-type-face).(3.'d
7800 65 66 61 75 6c 74 29 20 28 34 20 27 64 65 66 61 75 6c 74 29 29 20 28 22 5c 5c 28 23 5e 5c 5c 29 efault).(4.'default)).("\\(#^\\)
7820 5c 5c 28 5b 5e 5d 5b 5c 22 3b 27 40 5c 5c 5e 60 7e 28 29 7b 7d 5c 5c 2c 20 09 5c 6e 0d 30 2d 39 \\([^][\";'@\\^`~(){}\\,..\n.0-9
7840 3a 5d 5b 5e 5d 5b 5c 22 3b 27 40 5c 5c 5e 60 7e 28 29 7b 7d 5c 5c 2c 20 09 5c 6e 0d 5d 2a 5c 5c :][^][\";'@\\^`~(){}\\,..\n.]*\\
7860 29 22 20 28 31 20 27 64 65 66 61 75 6c 74 29 20 28 32 20 66 6f 6e 74 2d 6c 6f 63 6b 2d 74 79 70 )".(1.'default).(2.font-lock-typ
7880 65 2d 66 61 63 65 29 29 20 28 22 5c 5c 28 5b 5e 5d 5b 5c 22 3b 27 40 5c 5c 5e 60 7e 28 29 7b 7d e-face)).("\\([^][\";'@\\^`~(){}
78a0 5c 5c 2c 20 09 5c 6e 0d 30 2d 39 3a 5d 5b 5e 5d 5b 5c 22 3b 27 40 5c 5c 5e 60 7e 28 29 7b 7d 5c \\,..\n.0-9:][^][\";'@\\^`~(){}\
78c0 5c 2c 20 09 5c 6e 0d 5d 2a 3f 5c 5c 29 5c 5c 28 2f 5c 5c 29 5c 5c 28 5b 5e 5d 5b 5c 22 3b 27 40 \,..\n.]*?\\)\\(/\\)\\([^][\";'@
78e0 5c 5c 5e 60 7e 28 29 7b 7d 5c 5c 2c 20 09 5c 6e 0d 30 2d 39 3a 5d 5b 5e 5d 5b 5c 22 3b 27 40 5c \\^`~(){}\\,..\n.0-9:][^][\";'@\
7900 5c 5e 60 7e 28 29 7b 7d 5c 5c 2c 20 09 5c 6e 0d 5d 2a 5c 5c 29 22 20 28 31 20 66 6f 6e 74 2d 6c \^`~(){}\\,..\n.]*\\)".(1.font-l
7920 6f 63 6b 2d 74 79 70 65 2d 66 61 63 65 29 20 28 32 20 6e 69 6c 29 20 28 33 20 6e 69 6c 29 29 20 ock-type-face).(2.nil).(3.nil)).
7940 28 22 5c 5c 28 5b 5e 5d 5b 5c 22 3b 27 40 5c 5c 5e 60 7e 28 29 7b 7d 5c 5c 2c 20 09 5c 6e 0d 30 ("\\([^][\";'@\\^`~(){}\\,..\n.0
7960 2d 39 3a 5d 5b 5e 5d 5b 5c 22 3b 27 40 5c 5c 5e 60 7e 28 29 7b 7d 5c 5c 2c 20 09 5c 6e 0d 5d 2a -9:][^][\";'@\\^`~(){}\\,..\n.]*
7980 5c 5c 29 22 20 28 31 20 6e 69 6c 29 29 20 28 63 6c 6f 6a 75 72 65 2d 2d 73 65 61 72 63 68 2d 63 \\)".(1.nil)).(clojure--search-c
79a0 6f 6d 6d 65 6e 74 2d 6d 61 63 72 6f 20 31 20 66 6f 6e 74 2d 6c 6f 63 6b 2d 63 6f 6d 6d 65 6e 74 omment-macro.1.font-lock-comment
79c0 2d 66 61 63 65 20 74 29 20 28 22 60 5c 5c 28 3f 31 3a 5c 5c 28 3f 3a 23 27 5c 5c 29 3f 5c 5c 28 -face.t).("`\\(?1:\\(?:#'\\)?\\(
79e0 3f 3a 5c 5c 73 5f 5c 5c 7c 5c 5c 73 77 5c 5c 29 2b 5c 5c 29 60 22 20 28 31 20 27 66 6f 6e 74 2d ?:\\s_\\|\\sw\\)+\\)`".(1.'font-
7a00 6c 6f 63 6b 2d 63 6f 6e 73 74 61 6e 74 2d 66 61 63 65 20 70 72 65 70 65 6e 64 29 29 20 28 63 6c lock-constant-face.prepend)).(cl
7a20 6f 6a 75 72 65 2d 66 6f 6e 74 2d 6c 6f 63 6b 2d 65 73 63 61 70 65 64 2d 63 68 61 72 73 20 30 20 ojure-font-lock-escaped-chars.0.
7a40 27 62 6f 6c 64 20 70 72 65 70 65 6e 64 29 20 28 63 6c 6f 6a 75 72 65 2d 66 6f 6e 74 2d 6c 6f 63 'bold.prepend).(clojure-font-loc
7a60 6b 2d 72 65 67 65 78 70 2d 67 72 6f 75 70 73 20 28 31 20 27 66 6f 6e 74 2d 6c 6f 63 6b 2d 72 65 k-regexp-groups.(1.'font-lock-re
7a80 67 65 78 70 2d 67 72 6f 75 70 69 6e 67 2d 63 6f 6e 73 74 72 75 63 74 20 70 72 65 70 65 6e 64 29 gexp-grouping-construct.prepend)
7aa0 29 29 20 28 23 24 20 2e 20 32 37 36 38 33 29 29 0a 23 40 32 38 35 20 46 69 6e 64 20 61 6e 64 20 )).(#$...27683)).#@285.Find.and.
7ac0 68 69 67 68 6c 69 67 68 74 20 74 65 78 74 20 77 69 74 68 20 61 20 43 6c 6f 6a 75 72 65 2d 66 72 highlight.text.with.a.Clojure-fr
7ae0 69 65 6e 64 6c 79 20 73 79 6e 74 61 78 20 74 61 62 6c 65 2e 0a 0a 54 68 69 73 20 66 75 6e 63 74 iendly.syntax.table...This.funct
7b00 69 6f 6e 20 69 73 20 70 61 73 73 65 64 20 74 6f 20 60 66 6f 6e 74 2d 6c 6f 63 6b 2d 73 79 6e 74 ion.is.passed.to.`font-lock-synt
7b20 61 63 74 69 63 2d 66 61 63 65 2d 66 75 6e 63 74 69 6f 6e 27 2c 0a 77 68 69 63 68 20 69 73 20 63 actic-face-function',.which.is.c
7b40 61 6c 6c 65 64 20 77 69 74 68 20 61 20 73 69 6e 67 6c 65 20 70 61 72 61 6d 65 74 65 72 2c 20 53 alled.with.a.single.parameter,.S
7b60 54 41 54 45 20 28 77 68 69 63 68 20 69 73 2c 20 69 6e 0a 74 75 72 6e 2c 20 72 65 74 75 72 6e 65 TATE.(which.is,.in.turn,.returne
7b80 64 20 62 79 20 60 70 61 72 73 65 2d 70 61 72 74 69 61 6c 2d 73 65 78 70 27 20 61 74 20 74 68 65 d.by.`parse-partial-sexp'.at.the
7ba0 20 62 65 67 69 6e 6e 69 6e 67 20 6f 66 20 74 68 65 0a 68 69 67 68 6c 69 67 68 74 65 64 20 72 65 .beginning.of.the.highlighted.re
7bc0 67 69 6f 6e 29 2e 0a 0a 28 66 6e 20 53 54 41 54 45 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 gion)...(fn.STATE)..(defalias.'c
7be0 6c 6f 6a 75 72 65 2d 66 6f 6e 74 2d 6c 6f 63 6b 2d 73 79 6e 74 61 63 74 69 63 2d 66 61 63 65 2d lojure-font-lock-syntactic-face-
7c00 66 75 6e 63 74 69 6f 6e 20 23 5b 32 35 37 20 22 5c 33 30 34 01 38 5c 32 30 33 5c 32 32 35 00 5c function.#[257."\304.8\203\225.\
7c20 33 30 35 01 38 5c 32 31 31 66 5c 33 30 36 3d 3f 5c 32 30 35 5c 32 32 34 00 01 41 40 5c 32 31 31 305.8\211f\306=?\205\224..A@\211
7c40 5c 32 30 35 26 00 5c 32 31 32 5c 32 31 31 62 5c 32 31 30 5c 33 30 37 5c 33 31 30 21 5c 32 30 35 \205&.\212\211b\210\307\310!\205
7c60 25 00 5c 33 31 31 5c 33 31 32 21 29 5c 32 31 31 5c 32 30 35 30 00 5c 33 31 33 5c 33 31 34 02 21 %.\311\312!)\211\2050.\313\314.!
7c80 08 5c 22 5c 32 31 31 5c 32 30 33 5c 32 32 31 00 5c 32 31 32 5c 33 31 35 01 21 5c 32 30 33 43 00 .\"\211\203\221.\212\315.!\203C.
7ca0 5c 33 31 32 5c 32 32 35 62 5c 32 31 30 5c 32 31 31 20 5c 32 36 32 01 02 62 5c 32 31 30 5c 33 31 \312\225b\210\211.\262..b\210\31
7cc0 32 75 5c 32 31 30 5c 33 31 36 31 6e 00 5c 32 31 31 5c 33 31 37 56 5c 32 30 35 6a 00 60 04 57 5c 2u\210\3161n.\211\317V\205j.`.W\
7ce0 32 30 35 6a 00 5c 33 32 30 5c 33 31 32 21 5c 32 31 30 5c 33 30 37 5c 33 32 31 21 5c 32 30 34 4d 205j.\320\312!\210\307\321!\204M
7d00 00 5c 32 31 31 53 5c 32 36 32 01 5c 32 30 32 4d 00 30 5c 32 30 32 72 00 5c 32 31 30 5c 32 30 32 .\211S\262.\202M.0\202r.\210\202
7d20 73 00 5c 32 31 30 5c 32 31 31 5c 33 31 37 55 5c 32 30 35 5c 32 31 31 00 60 04 58 5c 32 30 35 5c s.\210\211\317U\205\211.`.X\205\
7d40 32 31 31 00 5c 33 32 32 64 21 5c 32 31 30 60 5c 33 30 35 06 06 38 55 29 5c 32 30 33 5c 32 32 31 211.\322d!\210`\305..8U)\203\221
7d60 00 09 5c 32 30 32 5c 32 32 32 00 5c 6e 5c 32 36 36 5c 32 30 33 5c 32 30 37 0b 5c 32 30 37 22 20 ..\202\222.\n\266\203\207.\207".
7d80 5b 6c 69 73 70 2d 64 6f 63 2d 73 74 72 69 6e 67 2d 65 6c 74 2d 70 72 6f 70 65 72 74 79 20 66 6f [lisp-doc-string-elt-property.fo
7da0 6e 74 2d 6c 6f 63 6b 2d 64 6f 63 2d 66 61 63 65 20 66 6f 6e 74 2d 6c 6f 63 6b 2d 73 74 72 69 6e nt-lock-doc-face.font-lock-strin
7dc0 67 2d 66 61 63 65 20 66 6f 6e 74 2d 6c 6f 63 6b 2d 63 6f 6d 6d 65 6e 74 2d 66 61 63 65 20 33 20 g-face.font-lock-comment-face.3.
7de0 38 20 31 32 34 20 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 28 5b 20 09 5c 6e 5d 2a 5c 5c 28 5c 5c 28 8.124.looking-at."([..\n]*\\(\\(
7e00 5c 5c 73 77 5c 5c 7c 5c 5c 73 5f 5c 5c 29 2b 5c 5c 29 22 20 6d 61 74 63 68 2d 73 74 72 69 6e 67 \\sw\\|\\s_\\)+\\)".match-string
7e20 20 31 20 66 75 6e 63 74 69 6f 6e 2d 67 65 74 20 69 6e 74 65 72 6e 2d 73 6f 66 74 20 66 75 6e 63 .1.function-get.intern-soft.func
7e40 74 69 6f 6e 70 20 28 65 72 72 6f 72 29 20 30 20 66 6f 72 77 61 72 64 2d 73 65 78 70 20 22 5b 20 tionp.(error).0.forward-sexp."[.
7e60 5c 6e 09 5d 2a 5c 5c 28 5c 5c 5e 5b 41 2d 5a 3a 5d 2e 2b 5c 5c 7c 5c 5c 5e 3f 7b 2e 2b 5c 5c 29 \n.]*\\(\\^[A-Z:].+\\|\\^?{.+\\)
7e80 22 20 66 6f 72 77 61 72 64 2d 63 6f 6d 6d 65 6e 74 5d 20 38 20 28 23 24 20 2e 20 33 31 34 31 35 ".forward-comment].8.(#$...31415
7ea0 29 5d 29 0a 23 40 34 38 20 43 6f 6e 66 69 67 75 72 65 73 20 66 6f 6e 74 2d 6c 6f 63 6b 20 66 6f )]).#@48.Configures.font-lock.fo
7ec0 72 20 65 64 69 74 69 6e 67 20 43 6c 6f 6a 75 72 65 20 63 6f 64 65 2e 1f 0a 28 64 65 66 61 6c 69 r.editing.Clojure.code...(defali
7ee0 61 73 20 27 63 6c 6f 6a 75 72 65 2d 66 6f 6e 74 2d 6c 6f 63 6b 2d 73 65 74 75 70 20 23 5b 30 20 as.'clojure-font-lock-setup.#[0.
7f00 22 5c 33 30 32 5c 33 30 30 21 5c 32 31 30 5c 33 30 33 10 5c 33 30 34 5c 33 30 35 5c 33 30 36 5c "\302\300!\210\303.\304\305\306\
7f20 33 30 33 23 5c 32 31 30 5c 33 30 37 5c 32 31 31 11 5c 32 30 37 22 20 5b 66 6f 6e 74 2d 6c 6f 63 303#\210\307\211.\207".[font-loc
7f40 6b 2d 6d 75 6c 74 69 6c 69 6e 65 20 66 6f 6e 74 2d 6c 6f 63 6b 2d 64 65 66 61 75 6c 74 73 20 6d k-multiline.font-lock-defaults.m
7f60 61 6b 65 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 20 74 20 61 64 64 2d 74 6f 2d 6c 69 73 74 ake-local-variable.t.add-to-list
7f80 20 66 6f 6e 74 2d 6c 6f 63 6b 2d 65 78 74 65 6e 64 2d 72 65 67 69 6f 6e 2d 66 75 6e 63 74 69 6f .font-lock-extend-region-functio
7fa0 6e 73 20 63 6c 6f 6a 75 72 65 2d 66 6f 6e 74 2d 6c 6f 63 6b 2d 65 78 74 65 6e 64 2d 72 65 67 69 ns.clojure-font-lock-extend-regi
7fc0 6f 6e 2d 64 65 66 20 28 63 6c 6f 6a 75 72 65 2d 66 6f 6e 74 2d 6c 6f 63 6b 2d 6b 65 79 77 6f 72 on-def.(clojure-font-lock-keywor
7fe0 64 73 20 6e 69 6c 20 6e 69 6c 20 28 28 22 2b 2d 2a 2f 2e 3c 3e 3d 21 3f 24 25 5f 26 3a 22 20 2e ds.nil.nil.(("+-*/.<>=!?$%_&:"..
8000 20 22 77 22 29 29 20 6e 69 6c 20 28 66 6f 6e 74 2d 6c 6f 63 6b 2d 6d 61 72 6b 2d 62 6c 6f 63 6b ."w")).nil.(font-lock-mark-block
8020 2d 66 75 6e 63 74 69 6f 6e 20 2e 20 6d 61 72 6b 2d 64 65 66 75 6e 29 20 28 66 6f 6e 74 2d 6c 6f -function...mark-defun).(font-lo
8040 63 6b 2d 73 79 6e 74 61 63 74 69 63 2d 66 61 63 65 2d 66 75 6e 63 74 69 6f 6e 20 2e 20 63 6c 6f ck-syntactic-face-function...clo
8060 6a 75 72 65 2d 66 6f 6e 74 2d 6c 6f 63 6b 2d 73 79 6e 74 61 63 74 69 63 2d 66 61 63 65 2d 66 75 jure-font-lock-syntactic-face-fu
8080 6e 63 74 69 6f 6e 29 29 5d 20 34 20 28 23 24 20 2e 20 33 32 34 32 35 29 5d 29 0a 23 40 31 39 33 nction))].4.(#$...32425)]).#@193
80a0 20 52 61 6e 67 65 20 62 65 74 77 65 65 6e 20 74 68 65 20 74 6f 70 2d 6d 6f 73 74 20 64 65 66 2a .Range.between.the.top-most.def*
80c0 20 61 6e 64 20 74 68 65 20 66 6f 75 72 74 68 20 65 6c 65 6d 65 6e 74 20 61 66 74 65 72 20 50 4f .and.the.fourth.element.after.PO
80e0 49 4e 54 2e 0a 4e 6f 74 65 20 74 68 61 74 20 74 68 69 73 20 6d 65 61 6e 73 20 74 68 61 74 20 74 INT..Note.that.this.means.that.t
8100 68 65 72 65 20 69 73 20 6e 6f 20 67 75 61 72 61 6e 74 65 65 20 6f 66 20 70 72 6f 70 65 72 20 66 here.is.no.guarantee.of.proper.f
8120 6f 6e 74 0a 6c 6f 63 6b 69 6e 67 20 69 6e 20 64 65 66 2a 20 66 6f 72 6d 73 20 74 68 61 74 20 61 ont.locking.in.def*.forms.that.a
8140 72 65 20 6e 6f 74 20 61 74 20 74 6f 70 20 6c 65 76 65 6c 2e 0a 0a 28 66 6e 20 50 4f 49 4e 54 29 re.not.at.top.level...(fn.POINT)
8160 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 66 6f 6e 74 2d 6c 6f 63 6b 2d 64 ..(defalias.'clojure-font-lock-d
8180 65 66 2d 61 74 2d 70 6f 69 6e 74 20 23 5b 32 35 37 20 22 5c 32 31 31 62 5c 32 31 30 5c 33 30 30 ef-at-point.#[257."\211b\210\300
81a0 31 0d 00 5c 33 30 31 20 30 5c 32 30 32 11 00 5c 32 31 30 5c 32 30 32 12 00 5c 32 31 30 60 01 01 1..\301.0\202..\210\202..\210`..
81c0 55 3f 5c 32 30 35 49 00 5c 33 30 32 5c 33 30 33 21 5c 32 30 35 49 00 5c 33 30 34 31 41 00 5c 33 U?\205I.\302\303!\205I.\3041A.\3
81e0 30 35 75 5c 32 31 30 5c 33 30 36 5c 33 30 37 5c 32 31 31 02 57 5c 32 30 35 3b 00 5c 32 31 31 5c 05u\210\306\307\211.W\205;.\211\
8200 33 31 30 20 5c 32 36 36 02 5c 32 31 31 54 5c 32 36 32 01 5c 32 30 32 29 00 5c 32 36 36 5c 32 30 310.\266.\211T\262.\202).\266\20
8220 32 30 5c 32 30 32 45 00 5c 32 31 30 5c 32 30 32 46 00 5c 32 31 30 5c 32 31 31 60 42 5c 32 30 37 20\202E.\210\202F.\210\211`B\207
8240 22 20 5b 28 65 72 72 6f 72 29 20 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 64 65 66 75 6e 20 6c 6f ".[(error).beginning-of-defun.lo
8260 6f 6b 69 6e 67 2d 61 74 20 22 28 64 65 66 22 20 28 65 72 72 6f 72 29 20 6e 69 6c 20 34 20 30 20 oking-at."(def".(error).nil.4.0.
8280 66 6f 72 77 61 72 64 2d 73 65 78 70 5d 20 36 20 28 23 24 20 2e 20 33 32 39 32 39 29 5d 29 0a 23 forward-sexp].6.(#$...32929)]).#
82a0 40 37 33 20 53 65 74 20 72 65 67 69 6f 6e 20 62 6f 75 6e 64 61 72 69 65 73 20 74 6f 20 69 6e 63 @73.Set.region.boundaries.to.inc
82c0 6c 75 64 65 20 74 68 65 20 66 69 72 73 74 20 66 6f 75 72 20 65 6c 65 6d 65 6e 74 73 20 6f 66 20 lude.the.first.four.elements.of.
82e0 64 65 66 2a 20 66 6f 72 6d 73 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d def*.forms...(defalias.'clojure-
8300 66 6f 6e 74 2d 6c 6f 63 6b 2d 65 78 74 65 6e 64 2d 72 65 67 69 6f 6e 2d 64 65 66 20 23 5b 30 20 font-lock-extend-region-def.#[0.
8320 22 5c 33 30 32 5c 33 30 33 08 21 5c 32 31 31 5c 32 30 33 30 00 5c 32 31 31 5c 32 31 31 5c 32 30 "\302\303.!\211\2030.\211\211\20
8340 33 16 00 5c 32 31 31 01 41 5c 32 36 32 02 5c 32 34 32 5c 32 30 32 1d 00 5c 33 30 34 5c 33 30 35 3..\211.A\262.\242\202..\304\305
8360 5c 33 30 32 03 47 44 5c 22 5c 32 31 31 08 57 5c 32 30 33 2e 00 08 02 57 5c 32 30 33 2e 00 5c 32 \302.GD\"\211.W\203....W\203..\2
8380 31 31 10 5c 33 30 36 5c 32 36 32 04 5c 32 36 36 02 5c 32 31 30 5c 33 30 33 09 21 5c 32 31 31 5c 11.\306\262.\266.\210\303.!\211\
83a0 32 30 33 60 00 5c 32 31 31 5c 32 31 31 5c 32 30 33 46 00 5c 32 31 31 01 41 5c 32 36 32 02 5c 32 203`.\211\211\203F.\211.A\262.\2
83c0 34 32 5c 32 30 32 4d 00 5c 33 30 34 5c 33 30 35 5c 33 30 32 03 47 44 5c 22 5c 32 31 31 09 57 5c 42\202M.\304\305\302.GD\"\211.W\
83e0 32 30 33 5e 00 09 02 57 5c 32 30 33 5e 00 01 11 5c 33 30 36 5c 32 36 32 04 5c 32 36 36 02 5c 32 203^...W\203^...\306\262.\266.\2
8400 31 30 5c 32 31 31 5c 32 30 37 22 20 5b 66 6f 6e 74 2d 6c 6f 63 6b 2d 62 65 67 20 66 6f 6e 74 2d 10\211\207".[font-lock-beg.font-
8420 6c 6f 63 6b 2d 65 6e 64 20 6e 69 6c 20 63 6c 6f 6a 75 72 65 2d 66 6f 6e 74 2d 6c 6f 63 6b 2d 64 lock-end.nil.clojure-font-lock-d
8440 65 66 2d 61 74 2d 70 6f 69 6e 74 20 73 69 67 6e 61 6c 20 77 72 6f 6e 67 2d 6e 75 6d 62 65 72 2d ef-at-point.signal.wrong-number-
8460 6f 66 2d 61 72 67 75 6d 65 6e 74 73 20 74 5d 20 37 20 28 23 24 20 2e 20 33 33 34 34 34 29 5d 29 of-arguments.t].7.(#$...33444)])
8480 0a 23 40 31 36 32 20 4e 6f 6e 2d 6e 69 6c 20 69 66 20 74 68 65 20 63 68 61 72 20 62 65 66 6f 72 .#@162.Non-nil.if.the.char.befor
84a0 65 20 70 6f 69 6e 74 20 69 73 20 66 6f 6e 74 2d 6c 6f 63 6b 65 64 20 61 73 20 61 20 73 74 72 69 e.point.is.font-locked.as.a.stri
84c0 6e 67 2e 0a 49 66 20 52 45 47 45 58 50 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 61 6c 73 6f 20 63 ng..If.REGEXP.is.non-nil,.also.c
84e0 68 65 63 6b 20 77 68 65 74 68 65 72 20 63 75 72 72 65 6e 74 20 73 74 72 69 6e 67 20 69 73 0a 70 heck.whether.current.string.is.p
8500 72 65 63 65 65 64 65 64 20 62 79 20 61 20 23 2e 0a 0a 28 66 6e 20 26 6f 70 74 69 6f 6e 61 6c 20 receeded.by.a.#...(fn.&optional.
8520 52 45 47 45 58 50 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 2d 66 6f 6e REGEXP)..(defalias.'clojure--fon
8540 74 2d 6c 6f 63 6b 65 64 2d 61 73 2d 73 74 72 69 6e 67 2d 70 20 23 5b 32 35 36 20 22 5c 33 30 30 t-locked-as-string-p.#[256."\300
8560 60 53 5c 33 30 31 5c 22 5c 32 31 31 3c 5c 32 30 33 10 00 5c 33 30 32 01 3e 5c 32 30 34 16 00 5c `S\301\"\211<\203..\302.>\204..\
8580 32 31 31 5c 33 30 32 3d 5c 32 30 35 24 00 5c 33 30 33 5c 33 30 34 21 5c 32 30 36 24 00 01 3f 5c 211\302=\205$.\303\304!\206$..?\
85a0 32 30 35 24 00 5c 33 30 33 5c 33 30 35 21 5c 32 30 37 22 20 5b 67 65 74 2d 74 65 78 74 2d 70 72 205$.\303\305!\207".[get-text-pr
85c0 6f 70 65 72 74 79 20 66 61 63 65 20 66 6f 6e 74 2d 6c 6f 63 6b 2d 73 74 72 69 6e 67 2d 66 61 63 operty.face.font-lock-string-fac
85e0 65 20 63 6c 6f 6a 75 72 65 2d 73 74 72 69 6e 67 2d 73 74 61 72 74 20 74 20 6e 69 6c 5d 20 34 20 e.clojure-string-start.t.nil].4.
8600 28 23 24 20 2e 20 33 33 39 32 37 29 5d 29 0a 23 40 31 30 32 20 48 69 67 68 6c 69 67 68 74 20 1b (#$...33927)]).#@102.Highlight..
8620 73 63 61 70 65 64 20 63 68 61 72 73 20 69 6e 20 73 74 72 69 6e 67 73 2e 0a 42 4f 55 4e 44 20 64 scaped.chars.in.strings..BOUND.d
8640 65 6e 6f 74 65 73 20 61 20 62 75 66 66 65 72 20 70 6f 73 69 74 69 6f 6e 20 74 6f 20 6c 69 6d 69 enotes.a.buffer.position.to.limi
8660 74 20 74 68 65 20 73 65 61 72 63 68 2e 0a 0a 28 66 6e 20 42 4f 55 4e 44 29 1f 0a 28 64 65 66 61 t.the.search...(fn.BOUND)..(defa
8680 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 66 6f 6e 74 2d 6c 6f 63 6b 2d 65 73 63 61 70 65 64 2d lias.'clojure-font-lock-escaped-
86a0 63 68 61 72 73 20 23 5b 32 35 37 20 22 5c 33 30 30 5c 32 31 31 5c 32 30 34 14 00 5c 33 30 31 5c chars.#[257."\300\211\204..\301\
86c0 33 30 32 03 5c 33 30 33 23 5c 32 30 33 14 00 5c 33 30 34 20 5c 32 36 32 01 5c 32 30 32 01 00 5c 302.\303#\203..\304.\262.\202..\
86e0 32 31 31 5c 32 30 37 22 20 5b 6e 69 6c 20 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 211\207".[nil.re-search-forward.
8700 22 5c 5c 5c 5c 2e 22 20 74 20 63 6c 6f 6a 75 72 65 2d 2d 66 6f 6e 74 2d 6c 6f 63 6b 65 64 2d 61 "\\\\.".t.clojure--font-locked-a
8720 73 2d 73 74 72 69 6e 67 2d 70 5d 20 36 20 28 23 24 20 2e 20 33 34 33 32 35 29 5d 29 0a 23 40 31 s-string-p].6.(#$...34325)]).#@1
8740 34 38 20 48 69 67 68 6c 69 67 68 74 20 67 72 6f 75 70 69 6e 67 20 63 6f 6e 73 74 72 75 63 74 73 48.Highlight.grouping.constructs
8760 20 69 6e 20 72 65 67 75 6c 61 72 20 65 78 70 72 65 73 73 69 6f 6e 2e 0a 0a 42 4f 55 4e 44 20 64 .in.regular.expression...BOUND.d
8780 65 6e 6f 74 65 73 20 74 68 65 20 6d 61 78 69 6d 75 6d 20 6e 75 6d 62 65 72 20 6f 66 20 63 68 61 enotes.the.maximum.number.of.cha
87a0 72 61 63 74 65 72 73 20 28 72 65 6c 61 74 69 76 65 20 74 6f 20 74 68 65 0a 70 6f 69 6e 74 29 20 racters.(relative.to.the.point).
87c0 74 6f 20 63 68 65 63 6b 2e 0a 0a 28 66 6e 20 42 4f 55 4e 44 29 1f 0a 28 64 65 66 61 6c 69 61 73 to.check...(fn.BOUND)..(defalias
87e0 20 27 63 6c 6f 6a 75 72 65 2d 66 6f 6e 74 2d 6c 6f 63 6b 2d 72 65 67 65 78 70 2d 67 72 6f 75 70 .'clojure-font-lock-regexp-group
8800 73 20 23 5b 32 35 37 20 22 5c 33 30 30 5c 32 31 31 5c 32 30 34 15 00 5c 33 30 31 5c 33 30 32 03 s.#[257."\300\211\204..\301\302.
8820 5c 33 30 33 23 5c 32 30 33 15 00 5c 33 30 34 5c 33 30 35 21 5c 32 36 32 01 5c 32 30 32 01 00 5c \303#\203..\304\305!\262.\202..\
8840 32 31 31 5c 32 30 37 22 20 5b 6e 69 6c 20 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 211\207".[nil.re-search-forward.
8860 22 5c 5c 28 5c 5c 28 3f 3a 28 5c 5c 3f 5c 5c 28 3f 3a 5b 3a 3d 21 3e 5d 5c 5c 7c 3c 5b 3d 21 5d "\\(\\(?:(\\?\\(?:[:=!>]\\|<[=!]
8880 5c 5c 7c 3c 5b 5b 3a 61 6c 6e 75 6d 3a 5d 5d 2b 3e 5c 5c 29 5c 5c 7c 5b 7c 28 29 5d 5c 5c 29 5c \\|<[[:alnum:]]+>\\)\\|[|()]\\)\
88a0 5c 29 22 20 74 20 63 6c 6f 6a 75 72 65 2d 2d 66 6f 6e 74 2d 6c 6f 63 6b 65 64 2d 61 73 2d 73 74 \)".t.clojure--font-locked-as-st
88c0 72 69 6e 67 2d 70 20 72 65 67 65 78 70 5d 20 36 20 28 23 24 20 2e 20 33 34 36 32 37 29 5d 29 0a ring-p.regexp].6.(#$...34627)]).
88e0 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 30 5c 33 30 31 5c 33 30 32 5c 33 30 33 23 5c 32 31 (byte-code."\300\301\302\303#\21
8900 30 5c 33 30 30 5c 33 30 34 5c 33 30 32 5c 33 30 33 23 5c 32 31 30 5c 33 30 30 5c 33 30 35 5c 33 0\300\304\302\303#\210\300\305\3
8920 30 32 5c 33 30 33 23 5c 32 31 30 5c 33 30 30 5c 33 30 36 5c 33 30 32 5c 33 30 33 23 5c 32 31 30 02\303#\210\300\306\302\303#\210
8940 5c 33 30 30 5c 33 30 37 5c 33 30 32 5c 33 30 33 23 5c 32 31 30 5c 33 30 30 5c 33 31 30 5c 33 30 \300\307\302\303#\210\300\310\30
8960 32 5c 33 30 33 23 5c 32 31 30 5c 33 30 30 5c 33 31 31 5c 33 30 32 5c 33 30 33 23 5c 32 31 30 5c 2\303#\210\300\311\302\303#\210\
8980 33 30 30 5c 33 31 32 5c 33 30 32 5c 33 30 33 23 5c 32 31 30 5c 33 30 30 5c 33 31 33 5c 33 31 34 300\312\302\303#\210\300\313\314
89a0 5c 33 30 33 23 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 \303#\210\315\316\317\320\321DD\
89c0 33 32 32 5c 33 32 33 5c 33 32 34 5c 33 32 35 5c 33 32 36 5c 33 32 37 5c 33 33 30 26 09 5c 32 31 322\323\324\325\326\327\330&.\21
89e0 30 5c 33 31 35 5c 33 33 31 5c 33 31 37 5c 33 32 30 5c 33 33 32 44 44 5c 33 33 33 5c 33 32 33 5c 0\315\331\317\320\332DD\333\323\
8a00 33 33 34 5c 33 32 35 5c 33 32 36 5c 33 32 37 5c 33 33 30 26 09 5c 32 31 30 5c 33 31 35 5c 33 33 334\325\326\327\330&.\210\315\33
8a20 35 5c 33 31 37 5c 33 32 30 5c 33 33 36 44 44 5c 33 33 37 5c 33 32 33 5c 33 34 30 5c 33 32 35 5c 5\317\320\336DD\337\323\340\325\
8a40 33 34 31 5c 33 32 37 5c 33 34 32 26 09 5c 32 31 30 5c 33 31 35 5c 33 34 33 5c 33 31 37 5c 33 32 341\327\342&.\210\315\343\317\32
8a60 30 5c 33 34 34 44 44 5c 33 34 35 5c 33 32 33 5c 33 34 36 5c 33 32 35 5c 33 34 31 5c 33 32 37 5c 0\344DD\345\323\346\325\341\327\
8a80 33 34 37 26 09 5c 32 30 37 22 20 5b 70 75 74 20 6e 73 20 63 6c 6f 6a 75 72 65 2d 64 6f 63 2d 73 347&.\207".[put.ns.clojure-doc-s
8aa0 74 72 69 6e 67 2d 65 6c 74 20 32 20 64 65 66 20 64 65 66 6e 20 64 65 66 6e 2d 20 64 65 66 6d 75 tring-elt.2.def.defn.defn-.defmu
8ac0 6c 74 69 20 64 65 66 6d 61 63 72 6f 20 64 65 66 69 6e 6c 69 6e 65 20 64 65 66 70 72 6f 74 6f 63 lti.defmacro.definline.defprotoc
8ae0 6f 6c 20 64 65 66 74 61 73 6b 20 63 6c 6f 6a 75 72 65 2d 64 6f 63 2d 73 74 72 69 6e 67 2d 65 6c ol.deftask.clojure-doc-string-el
8b00 64 20 63 75 73 74 6f 6d 2d 64 65 63 6c 61 72 65 2d 76 61 72 69 61 62 6c 65 20 63 6c 6f 6a 75 72 d.custom-declare-variable.clojur
8b20 65 2d 61 6c 69 67 6e 2d 66 6f 72 6d 73 2d 61 75 74 6f 6d 61 74 69 63 61 6c 6c 79 20 66 75 6e 63 e-align-forms-automatically.func
8b40 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 6e 69 6c all.function.#[0."\300\207".[nil
8b60 5d 20 31 5d 20 22 49 66 20 6e 6f 6e 2d 6e 69 6c 2c 20 76 65 72 74 69 63 61 6c 6c 79 20 61 6c 69 ].1]."If.non-nil,.vertically.ali
8b80 67 6e 20 73 6f 6d 65 20 66 6f 72 6d 73 20 61 75 74 6f 6d 61 74 69 63 61 6c 6c 79 2e 5c 6e 41 75 gn.some.forms.automatically.\nAu
8ba0 74 6f 6d 61 74 69 63 61 6c 6c 79 20 6d 65 61 6e 73 20 69 74 20 69 73 20 64 6f 6e 65 20 61 73 20 tomatically.means.it.is.done.as.
8bc0 70 61 72 74 20 6f 66 20 69 6e 64 65 6e 74 69 6e 67 20 63 6f 64 65 2e 20 20 54 68 69 73 5c 6e 61 part.of.indenting.code...This\na
8be0 70 70 6c 69 65 73 20 74 6f 20 62 69 6e 64 69 6e 67 20 66 6f 72 6d 73 20 28 60 63 6c 6f 6a 75 72 pplies.to.binding.forms.(`clojur
8c00 65 2d 61 6c 69 67 6e 2d 62 69 6e 64 69 6e 67 2d 66 6f 72 6d 73 27 29 2c 20 74 6f 20 63 6f 6e 64 e-align-binding-forms'),.to.cond
8c20 5c 6e 66 6f 72 6d 73 20 28 60 63 6c 6f 6a 75 72 65 2d 61 6c 69 67 6e 2d 63 6f 6e 64 2d 66 6f 72 \nforms.(`clojure-align-cond-for
8c40 6d 73 27 29 20 61 6e 64 20 74 6f 20 6d 61 70 20 6c 69 74 65 72 61 6c 73 2e 20 20 46 6f 72 5c 6e ms').and.to.map.literals...For\n
8c60 69 6e 73 74 61 6e 63 65 2c 20 73 65 6c 65 63 74 69 6e 67 20 61 20 6d 61 70 20 61 20 68 69 74 74 instance,.selecting.a.map.a.hitt
8c80 69 6e 67 20 5c 5c 3c 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 2d 6d 61 70 3e 60 5c 5c 5b 69 6e 64 65 ing.\\<clojure-mode-map>`\\[inde
8ca0 6e 74 2d 66 6f 72 2d 74 61 62 2d 63 6f 6d 6d 61 6e 64 5d 27 5c 6e 77 69 6c 6c 20 61 6c 69 67 6e nt-for-tab-command]'\nwill.align
8cc0 20 74 68 65 20 76 61 6c 75 65 73 20 6c 69 6b 65 20 74 68 69 73 3a 5c 6e 20 20 20 20 7b 3a 73 6f .the.values.like.this:\n....{:so
8ce0 6d 65 2d 6b 65 79 20 31 30 5c 6e 20 20 20 20 20 3a 6b 65 79 32 20 20 20 20 20 32 30 7d 22 20 3a me-key.10\n.....:key2.....20}".:
8d00 70 61 63 6b 61 67 65 2d 76 65 72 73 69 6f 6e 20 28 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 20 2e 20 package-version.(clojure-mode...
8d20 22 35 2e 31 22 29 20 3a 73 61 66 65 20 62 6f 6f 6c 65 61 6e 70 20 3a 74 79 70 65 20 62 6f 6f 6c "5.1").:safe.booleanp.:type.bool
8d40 65 61 6e 20 63 6c 6f 6a 75 72 65 2d 61 6c 69 67 6e 2d 72 65 61 64 65 72 2d 63 6f 6e 64 69 74 69 ean.clojure-align-reader-conditi
8d60 6f 6e 61 6c 73 20 23 5b 30 20 22 5c 33 30 30 5c 32 30 37 22 20 5b 6e 69 6c 5d 20 31 5d 20 22 57 onals.#[0."\300\207".[nil].1]."W
8d80 68 65 74 68 65 72 20 74 6f 20 61 6c 69 67 6e 20 72 65 61 64 65 72 20 63 6f 6e 64 69 74 69 6f 6e hether.to.align.reader.condition
8da0 61 6c 73 2c 20 61 73 20 69 66 20 74 68 65 79 20 77 65 72 65 20 6d 61 70 73 2e 22 20 28 63 6c 6f als,.as.if.they.were.maps.".(clo
8dc0 6a 75 72 65 2d 6d 6f 64 65 20 2e 20 22 35 2e 31 30 22 29 20 63 6c 6f 6a 75 72 65 2d 61 6c 69 67 jure-mode..."5.10").clojure-alig
8de0 6e 2d 62 69 6e 64 69 6e 67 2d 66 6f 72 6d 73 20 23 5b 30 20 22 5c 33 30 30 5c 32 30 37 22 20 5b n-binding-forms.#[0."\300\207".[
8e00 28 22 6c 65 74 22 20 22 77 68 65 6e 2d 6c 65 74 22 20 22 77 68 65 6e 2d 73 6f 6d 65 22 20 22 69 ("let"."when-let"."when-some"."i
8e20 66 2d 6c 65 74 22 20 22 69 66 2d 73 6f 6d 65 22 20 22 62 69 6e 64 69 6e 67 22 20 22 6c 6f 6f 70 f-let"."if-some"."binding"."loop
8e40 22 20 22 64 6f 73 65 71 22 20 22 66 6f 72 22 20 22 77 69 74 68 2d 6f 70 65 6e 22 20 22 77 69 74 "."doseq"."for"."with-open"."wit
8e60 68 2d 6c 6f 63 61 6c 2d 76 61 72 73 22 20 22 77 69 74 68 2d 72 65 64 65 66 73 22 29 5d 20 31 5d h-local-vars"."with-redefs")].1]
8e80 20 22 4c 69 73 74 20 6f 66 20 73 74 72 69 6e 67 73 20 6d 61 74 63 68 69 6e 67 20 66 6f 72 6d 73 ."List.of.strings.matching.forms
8ea0 20 74 68 61 74 20 68 61 76 65 20 62 69 6e 64 69 6e 67 20 66 6f 72 6d 73 2e 22 20 28 63 6c 6f 6a .that.have.binding.forms.".(cloj
8ec0 75 72 65 2d 6d 6f 64 65 20 2e 20 22 35 2e 31 22 29 20 6c 69 73 74 70 20 28 72 65 70 65 61 74 20 ure-mode..."5.1").listp.(repeat.
8ee0 73 74 72 69 6e 67 29 20 63 6c 6f 6a 75 72 65 2d 61 6c 69 67 6e 2d 63 6f 6e 64 2d 66 6f 72 6d 73 string).clojure-align-cond-forms
8f00 20 23 5b 30 20 22 5c 33 30 30 5c 32 30 37 22 20 5b 28 22 63 6f 6e 64 70 22 20 22 63 6f 6e 64 22 .#[0."\300\207".[("condp"."cond"
8f20 20 22 63 6f 6e 64 2d 3e 22 20 22 63 6f 6e 64 2d 3e 3e 22 20 22 63 61 73 65 22 20 22 61 72 65 22 ."cond->"."cond->>"."case"."are"
8f40 29 5d 20 31 5d 20 22 4c 69 73 74 20 6f 66 20 73 74 72 69 6e 67 73 20 69 64 65 6e 74 69 66 79 69 )].1]."List.of.strings.identifyi
8f60 6e 67 20 63 6f 6e 64 2d 6c 69 6b 65 20 66 6f 72 6d 73 2e 22 20 28 63 6c 6f 6a 75 72 65 2d 6d 6f ng.cond-like.forms.".(clojure-mo
8f80 64 65 20 2e 20 22 35 2e 31 22 29 20 28 72 65 70 65 61 74 20 73 74 72 69 6e 67 29 5d 20 31 30 29 de..."5.1").(repeat.string)].10)
8fa0 0a 23 40 35 36 20 52 65 67 65 78 70 20 64 65 6e 6f 74 69 6e 67 20 74 68 65 20 62 65 67 69 6e 6e .#@56.Regexp.denoting.the.beginn
8fc0 69 6e 67 20 6f 66 20 61 20 72 65 61 64 65 72 20 63 6f 6e 64 69 74 69 6f 6e 61 6c 2e 1f 0a 28 64 ing.of.a.reader.conditional...(d
8fe0 65 66 76 61 72 20 63 6c 6f 6a 75 72 65 2d 2d 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 72 65 61 64 efvar.clojure--beginning-of-read
9000 65 72 2d 63 6f 6e 64 69 74 69 6f 6e 61 6c 2d 72 65 67 65 78 70 20 22 23 5c 5c 3f 40 28 5c 5c 7c er-conditional-regexp."#\\?@(\\|
9020 23 5c 5c 3f 28 22 20 28 23 24 20 2e 20 33 36 37 37 34 29 29 0a 23 40 36 32 37 20 4e 6f 6e 2d 6e #\\?(".(#$...36774)).#@627.Non-n
9040 69 6c 20 69 66 20 74 68 65 20 73 65 78 70 20 61 72 6f 75 6e 64 20 70 6f 69 6e 74 20 73 68 6f 75 il.if.the.sexp.around.point.shou
9060 6c 64 20 62 65 20 61 75 74 6f 6d 61 74 69 63 61 6c 6c 79 20 61 6c 69 67 6e 65 64 2e 0a 54 68 69 ld.be.automatically.aligned..Thi
9080 73 20 66 75 6e 63 74 69 6f 6e 20 65 78 70 65 63 74 73 20 74 6f 20 62 65 20 63 61 6c 6c 65 64 20 s.function.expects.to.be.called.
90a0 69 6d 6d 65 64 69 61 74 65 6c 79 20 61 66 74 65 72 20 61 6e 0a 6f 70 65 6e 2d 62 72 61 63 65 20 immediately.after.an.open-brace.
90c0 6f 72 20 61 66 74 65 72 20 74 68 65 20 66 75 6e 63 74 69 6f 6e 20 73 79 6d 62 6f 6c 20 69 6e 20 or.after.the.function.symbol.in.
90e0 61 20 66 75 6e 63 74 69 6f 6e 20 63 61 6c 6c 2e 0a 0a 46 69 72 73 74 20 63 68 65 63 6b 20 69 66 a.function.call...First.check.if
9100 20 74 68 65 20 73 65 78 70 20 61 72 6f 75 6e 64 20 70 6f 69 6e 74 20 69 73 20 61 20 6d 61 70 20 .the.sexp.around.point.is.a.map.
9120 6c 69 74 65 72 61 6c 2c 20 6f 72 20 69 73 20 61 0a 63 61 6c 6c 20 74 6f 20 6f 6e 65 20 6f 66 20 literal,.or.is.a.call.to.one.of.
9140 74 68 65 20 76 61 72 73 20 6c 69 73 74 65 64 20 69 6e 20 60 63 6c 6f 6a 75 72 65 2d 61 6c 69 67 the.vars.listed.in.`clojure-alig
9160 6e 2d 63 6f 6e 64 2d 66 6f 72 6d 73 27 2e 20 20 49 66 0a 69 74 20 69 73 6e 27 74 2c 20 72 65 74 n-cond-forms'...If.it.isn't,.ret
9180 75 72 6e 20 6e 69 6c 2e 20 20 49 66 20 69 74 20 69 73 2c 20 72 65 74 75 72 6e 20 6e 6f 6e 2d 6e urn.nil...If.it.is,.return.non-n
91a0 69 6c 20 61 6e 64 20 70 6c 61 63 65 20 70 6f 69 6e 74 0a 69 6d 6d 65 64 69 61 74 65 6c 79 20 62 il.and.place.point.immediately.b
91c0 65 66 6f 72 65 20 74 68 65 20 66 6f 72 6d 73 20 74 68 61 74 20 73 68 6f 75 6c 64 20 62 65 20 61 efore.the.forms.that.should.be.a
91e0 6c 69 67 6e 65 64 2e 0a 0a 46 6f 72 20 69 6e 73 74 61 6e 63 65 2c 20 69 6e 20 61 20 6d 61 70 20 ligned...For.instance,.in.a.map.
9200 6c 69 74 65 72 61 6c 20 70 6f 69 6e 74 20 69 73 20 6c 65 66 74 20 69 6d 6d 65 64 69 61 74 65 6c literal.point.is.left.immediatel
9220 79 20 62 65 66 6f 72 65 0a 74 68 65 20 66 69 72 73 74 20 6b 65 79 3b 20 77 68 69 6c 65 2c 20 69 y.before.the.first.key;.while,.i
9240 6e 20 61 20 6c 65 74 2d 62 69 6e 64 69 6e 67 2c 20 70 6f 69 6e 74 20 69 73 20 6c 65 66 74 20 69 n.a.let-binding,.point.is.left.i
9260 6e 73 69 64 65 20 74 68 65 0a 62 69 6e 64 69 6e 67 20 76 65 63 74 6f 72 20 61 6e 64 20 69 6d 6d nside.the.binding.vector.and.imm
9280 65 64 69 61 74 65 6c 79 20 62 65 66 6f 72 65 20 74 68 65 20 66 69 72 73 74 20 62 69 6e 64 69 6e ediately.before.the.first.bindin
92a0 67 0a 63 6f 6e 73 74 72 75 63 74 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 g.construct...(defalias.'clojure
92c0 2d 2d 70 6f 73 69 74 69 6f 6e 2d 66 6f 72 2d 61 6c 69 67 6e 6d 65 6e 74 20 23 5b 30 20 22 60 60 --position-for-alignment.#[0."``
92e0 53 66 5c 33 30 34 3d 5c 32 30 33 17 00 5c 32 31 31 53 5c 32 30 36 0f 00 60 53 66 5c 33 30 35 3d Sf\304=\203..\211S\206..`Sf\305=
9300 3f 5c 32 30 36 7f 00 08 5c 32 30 33 24 00 5c 33 30 36 09 60 5c 33 30 37 5a 5c 22 5c 32 30 36 7f ?\206...\203$.\306.`\307Z\"\206.
9320 00 5c 33 31 30 5c 33 31 31 21 5c 6e 5c 32 33 35 40 5c 32 31 31 5c 32 30 35 31 00 5c 33 31 32 01 .\310\311!\n\235@\211\2051.\312.
9340 21 5c 32 31 31 5c 32 34 37 5c 32 30 33 3a 00 5c 32 31 31 5c 32 30 32 4b 00 5c 32 31 31 5c 32 30 !\211\247\203:.\211\202K.\211\20
9360 34 42 00 5c 33 31 33 5c 32 30 32 4b 00 5c 33 31 34 01 21 5c 32 30 35 4b 00 5c 32 31 31 5c 33 31 4B.\313\202K.\314.!\205K.\211\31
9380 33 5c 32 33 34 02 5c 32 30 35 5d 00 5c 32 31 31 5c 32 34 37 5c 32 30 35 5d 00 5c 33 31 35 01 21 3\234.\205].\211\247\205].\315.!
93a0 5c 32 31 30 5c 33 31 36 64 21 5c 32 31 30 02 5c 32 36 36 5c 32 30 33 5c 32 30 36 7f 00 5c 33 31 \210\316d!\210.\266\203\206..\31
93c0 30 5c 33 31 31 21 0b 5c 32 33 35 5c 32 30 35 7f 00 5c 33 31 35 20 5c 32 31 30 5c 33 31 37 20 5c 0\311!.\235\205..\315.\210\317.\
93e0 32 31 30 5c 33 32 30 66 5c 33 32 31 3d 5c 32 30 35 7f 00 5c 33 32 32 75 5c 32 31 30 5c 33 31 36 210\320f\321=\205..\322u\210\316
9400 64 21 5c 32 31 30 5c 33 32 33 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 61 6c 69 67 6e 2d 72 d!\210\323\207".[clojure-align-r
9420 65 61 64 65 72 2d 63 6f 6e 64 69 74 69 6f 6e 61 6c 73 20 63 6c 6f 6a 75 72 65 2d 2d 62 65 67 69 eader-conditionals.clojure--begi
9440 6e 6e 69 6e 67 2d 6f 66 2d 72 65 61 64 65 72 2d 63 6f 6e 64 69 74 69 6f 6e 61 6c 2d 72 65 67 65 nning-of-reader-conditional-rege
9460 78 70 20 63 6c 6f 6a 75 72 65 2d 61 6c 69 67 6e 2d 63 6f 6e 64 2d 66 6f 72 6d 73 20 63 6c 6f 6a xp.clojure-align-cond-forms.cloj
9480 75 72 65 2d 61 6c 69 67 6e 2d 62 69 6e 64 69 6e 67 2d 66 6f 72 6d 73 20 31 32 33 20 33 35 20 6c ure-align-binding-forms.123.35.l
94a0 6f 6f 6b 69 6e 67 2d 62 61 63 6b 20 34 20 74 68 69 6e 67 2d 61 74 2d 70 6f 69 6e 74 20 73 79 6d ooking-back.4.thing-at-point.sym
94c0 62 6f 6c 20 63 6c 6f 6a 75 72 65 2d 2d 67 65 74 2d 69 6e 64 65 6e 74 2d 6d 65 74 68 6f 64 20 30 bol.clojure--get-indent-method.0
94e0 20 73 65 71 75 65 6e 63 65 70 20 63 6c 6f 6a 75 72 65 2d 66 6f 72 77 61 72 64 2d 6c 6f 67 69 63 .sequencep.clojure-forward-logic
9500 61 6c 2d 73 65 78 70 20 63 6f 6d 6d 65 6e 74 2d 66 6f 72 77 61 72 64 20 62 61 63 6b 77 61 72 64 al-sexp.comment-forward.backward
9520 2d 73 65 78 70 20 6e 69 6c 20 39 31 20 31 20 74 5d 20 36 20 28 23 24 20 2e 20 33 36 39 32 33 29 -sexp.nil.91.1.t].6.(#$...36923)
9540 5d 29 0a 23 40 31 32 32 20 4e 6f 6e 2d 6e 69 6c 20 69 66 20 74 68 65 72 65 27 73 20 61 20 73 65 ]).#@122.Non-nil.if.there's.a.se
9560 78 70 20 61 68 65 61 64 20 74 6f 20 62 65 20 61 6c 69 67 6e 65 64 20 62 65 66 6f 72 65 20 45 4e xp.ahead.to.be.aligned.before.EN
9580 44 2e 0a 50 6c 61 63 65 20 70 6f 69 6e 74 20 61 73 20 69 6e 20 60 63 6c 6f 6a 75 72 65 2d 2d 70 D..Place.point.as.in.`clojure--p
95a0 6f 73 69 74 69 6f 6e 2d 66 6f 72 2d 61 6c 69 67 6e 6d 65 6e 74 27 2e 0a 0a 28 66 6e 20 45 4e 44 osition-for-alignment'...(fn.END
95c0 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 2d 66 69 6e 64 2d 73 65 78 70 )..(defalias.'clojure--find-sexp
95e0 2d 74 6f 2d 61 6c 69 67 6e 20 23 5b 32 35 37 20 22 5c 33 30 34 5c 32 31 31 5c 32 30 34 32 00 5c -to-align.#[257."\304\211\2042.\
9600 33 30 35 08 5c 32 30 35 0d 00 09 5c 33 30 36 50 5c 33 30 37 5c 33 31 30 5c 33 31 31 5c 6e 0b 5c 305.\205...\306P\307\310\311\n.\
9620 22 5c 33 31 32 5c 22 51 03 5c 33 31 33 23 5c 32 30 33 32 00 5c 33 31 34 20 5c 32 31 31 5c 33 31 "\312\"Q.\313#\2032.\314.\211\31
9640 35 5c 32 33 34 5c 32 30 34 2e 00 5c 32 31 31 5c 33 31 36 5c 32 33 34 5c 32 30 34 2e 00 5c 33 31 5\234\204..\211\316\234\204..\31
9660 37 20 5c 32 36 32 02 5c 32 31 30 5c 32 30 32 01 00 5c 32 31 31 5c 32 30 37 22 20 5b 63 6c 6f 6a 7.\262.\210\202..\211\207".[cloj
9680 75 72 65 2d 61 6c 69 67 6e 2d 72 65 61 64 65 72 2d 63 6f 6e 64 69 74 69 6f 6e 61 6c 73 20 63 6c ure-align-reader-conditionals.cl
96a0 6f 6a 75 72 65 2d 2d 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 72 65 61 64 65 72 2d 63 6f 6e 64 69 ojure--beginning-of-reader-condi
96c0 74 69 6f 6e 61 6c 2d 72 65 67 65 78 70 20 63 6c 6f 6a 75 72 65 2d 61 6c 69 67 6e 2d 62 69 6e 64 tional-regexp.clojure-align-bind
96e0 69 6e 67 2d 66 6f 72 6d 73 20 63 6c 6f 6a 75 72 65 2d 61 6c 69 67 6e 2d 63 6f 6e 64 2d 66 6f 72 ing-forms.clojure-align-cond-for
9700 6d 73 20 6e 69 6c 20 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 2d 72 65 67 65 78 70 20 22 5c 5c ms.nil.search-forward-regexp."\\
9720 7c 22 20 22 7b 5c 5c 7c 28 22 20 72 65 67 65 78 70 2d 6f 70 74 20 61 70 70 65 6e 64 20 73 79 6d |"."{\\|(".regexp-opt.append.sym
9740 62 6f 6c 73 20 6e 6f 65 72 72 6f 72 20 73 79 6e 74 61 78 2d 70 70 73 73 20 33 20 34 20 63 6c 6f bols.noerror.syntax-ppss.3.4.clo
9760 6a 75 72 65 2d 2d 70 6f 73 69 74 69 6f 6e 2d 66 6f 72 2d 61 6c 69 67 6e 6d 65 6e 74 5d 20 39 20 jure--position-for-alignment].9.
9780 28 23 24 20 2e 20 33 38 32 31 37 29 5d 29 0a 23 40 32 30 32 20 4d 6f 76 65 20 70 6f 69 6e 74 20 (#$...38217)]).#@202.Move.point.
97a0 61 66 74 65 72 20 61 6c 6c 20 77 68 69 74 65 73 70 61 63 65 20 61 66 74 65 72 20 74 68 65 20 6e after.all.whitespace.after.the.n
97c0 65 78 74 20 73 65 78 70 2e 0a 0a 53 65 74 20 74 68 65 20 6d 61 74 63 68 20 64 61 74 61 20 67 72 ext.sexp...Set.the.match.data.gr
97e0 6f 75 70 20 31 20 74 6f 20 62 65 20 74 68 69 73 20 72 65 67 69 6f 6e 20 6f 66 20 77 68 69 74 65 oup.1.to.be.this.region.of.white
9800 73 70 61 63 65 20 61 6e 64 0a 72 65 74 75 72 6e 20 70 6f 69 6e 74 2e 0a 0a 42 4f 55 4e 44 20 69 space.and.return.point...BOUND.i
9820 73 20 62 6f 75 6e 64 73 20 74 68 65 20 77 68 69 74 65 73 70 61 63 65 20 73 65 61 72 63 68 2e 0a s.bounds.the.whitespace.search..
9840 0a 28 66 6e 20 26 6f 70 74 69 6f 6e 61 6c 20 42 4f 55 4e 44 20 4e 4f 45 52 52 4f 52 29 1f 0a 28 .(fn.&optional.BOUND.NOERROR)..(
9860 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 2d 73 65 61 72 63 68 2d 77 68 69 74 65 73 defalias.'clojure--search-whites
9880 70 61 63 65 2d 61 66 74 65 72 2d 6e 65 78 74 2d 73 65 78 70 20 23 5b 35 31 32 20 22 5c 33 30 30 pace-after-next-sexp.#[512."\300
98a0 5c 33 30 31 5c 33 30 32 5c 33 30 33 5c 33 30 34 06 06 21 5c 33 30 35 5c 22 5c 33 30 36 24 5c 32 \301\302\303\304..!\305\"\306$\2
98c0 31 36 5c 33 30 37 31 53 00 5c 33 31 30 5c 33 31 31 21 5c 32 31 30 5c 33 31 32 5c 33 31 33 03 5c 16\3071S.\310\311!\210\312\313.\
98e0 22 5c 32 31 30 5c 33 31 34 60 21 5c 32 31 31 3a 5c 32 30 33 4c 00 5c 32 31 31 40 5c 32 31 31 5c "\210\314`!\211:\203L.\211@\211\
9900 33 31 35 3d 5c 32 30 33 3c 00 01 41 5c 32 31 31 5c 32 30 34 36 00 5c 33 31 36 05 21 5c 32 30 32 315=\203<..A\211\2046.\316.!\202
9920 37 00 60 5c 32 36 32 01 5c 32 30 32 47 00 5c 32 31 31 5c 33 31 37 3d 5c 32 30 33 46 00 5c 33 32 7.`\262.\202G.\211\317=\203F.\32
9940 30 5c 32 30 32 47 00 60 5c 32 36 32 01 5c 32 30 32 4d 00 60 5c 32 36 32 01 30 5c 32 30 32 55 00 0\202G.`\262.\202M.`\262.0\202U.
9960 5c 32 31 30 5c 33 32 30 29 5c 32 30 37 22 20 5b 6d 61 6b 65 2d 62 79 74 65 2d 63 6f 64 65 20 30 \210\320)\207".[make-byte-code.0
9980 20 22 5c 33 30 30 5c 32 30 35 5c 66 00 60 5c 33 30 30 56 5c 32 30 35 5c 66 00 5c 33 30 30 62 5c ."\300\205\f.`\300V\205\f.\300b\
99a0 32 30 37 22 20 76 63 6f 6e 63 61 74 20 76 65 63 74 6f 72 20 5b 5d 20 32 20 28 65 72 72 6f 72 29 207".vconcat.vector.[].2.(error)
99c0 20 63 6c 6f 6a 75 72 65 2d 66 6f 72 77 61 72 64 2d 6c 6f 67 69 63 61 6c 2d 73 65 78 70 20 31 20 .clojure-forward-logical-sexp.1.
99e0 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 2d 72 65 67 65 78 70 20 22 5c 5c 28 5b 2c 20 09 5d 2a search-forward-regexp."\\([,..]*
9a00 5c 5c 29 22 20 73 79 6e 74 61 78 2d 61 66 74 65 72 20 31 32 20 63 6c 6f 6a 75 72 65 2d 2d 73 65 \\)".syntax-after.12.clojure--se
9a20 61 72 63 68 2d 77 68 69 74 65 73 70 61 63 65 2d 61 66 74 65 72 2d 6e 65 78 74 2d 73 65 78 70 20 arch-whitespace-after-next-sexp.
9a40 35 20 6e 69 6c 5d 20 38 20 28 23 24 20 2e 20 33 38 38 30 35 29 5d 29 0a 23 40 32 32 39 20 56 65 5.nil].8.(#$...38805)]).#@229.Ve
9a60 72 74 69 63 61 6c 6c 79 20 61 6c 69 67 6e 20 74 68 65 20 63 6f 6e 74 65 6e 74 73 20 6f 66 20 74 rtically.align.the.contents.of.t
9a80 68 65 20 73 65 78 70 20 61 72 6f 75 6e 64 20 70 6f 69 6e 74 2e 0a 49 66 20 72 65 67 69 6f 6e 20 he.sexp.around.point..If.region.
9aa0 69 73 20 61 63 74 69 76 65 2c 20 61 6c 69 67 6e 20 69 74 2e 20 20 4f 74 68 65 72 77 69 73 65 2c is.active,.align.it...Otherwise,
9ac0 20 61 6c 69 67 6e 20 65 76 65 72 79 74 68 69 6e 67 20 69 6e 20 74 68 65 0a 63 75 72 72 65 6e 74 .align.everything.in.the.current
9ae0 20 22 74 6f 70 2d 6c 65 76 65 6c 22 20 73 65 78 70 2e 0a 57 68 65 6e 20 63 61 6c 6c 65 64 20 66 ."top-level".sexp..When.called.f
9b00 72 6f 6d 20 6c 69 73 70 20 63 6f 64 65 20 61 6c 69 67 6e 20 65 76 65 72 79 74 68 69 6e 67 20 62 rom.lisp.code.align.everything.b
9b20 65 74 77 65 65 6e 20 42 45 47 20 61 6e 64 20 45 4e 44 2e 0a 0a 28 66 6e 20 42 45 47 20 45 4e 44 etween.BEG.and.END...(fn.BEG.END
9b40 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 61 6c 69 67 6e 20 23 5b 35 31 )..(defalias.'clojure-align.#[51
9b60 34 20 22 5c 33 30 31 01 21 5c 32 36 32 01 5c 32 31 32 01 62 5c 32 31 30 5c 33 30 32 01 21 5c 32 4."\301.!\262.\212.b\210\302.!\2
9b80 30 35 56 00 5c 32 31 32 5c 33 30 33 20 5c 32 31 30 5c 33 30 34 5c 33 30 35 21 5c 32 31 30 5c 33 05V.\212\303.\210\304\305!\210\3
9ba0 30 36 20 29 5c 33 30 37 5c 33 30 35 01 18 5c 32 31 32 5c 33 31 30 5c 33 31 31 04 5c 33 31 32 23 06.)\307\305..\212\310\311.\312#
9bc0 5c 32 30 33 2e 00 5c 32 31 31 54 5c 32 36 32 01 5c 32 30 32 1f 00 29 5c 32 31 31 5c 33 31 33 5c \203..\211T\262.\202..)\211\313\
9be0 32 31 31 02 57 5c 32 30 33 49 00 5c 32 31 31 5c 33 31 34 60 06 07 5c 33 30 37 5c 33 31 35 5c 33 211.W\203I.\211\314`..\307\315\3
9c00 30 37 25 5c 32 36 36 02 5c 32 31 31 54 5c 32 36 32 01 5c 32 30 32 31 00 5c 32 36 36 02 5c 33 31 07%\266.\211T\262.\2021.\266.\31
9c20 36 60 04 5c 22 5c 32 31 30 29 5c 32 36 36 03 5c 32 30 32 09 00 29 5c 32 30 37 22 20 5b 63 6c 6f 6`.\"\210)\266.\202..)\207".[clo
9c40 6a 75 72 65 2d 61 6c 69 67 6e 2d 66 6f 72 6d 73 2d 61 75 74 6f 6d 61 74 69 63 61 6c 6c 79 20 63 jure-align-forms-automatically.c
9c60 6f 70 79 2d 6d 61 72 6b 65 72 20 63 6c 6f 6a 75 72 65 2d 2d 66 69 6e 64 2d 73 65 78 70 2d 74 6f opy-marker.clojure--find-sexp-to
9c80 2d 61 6c 69 67 6e 20 62 61 63 6b 77 61 72 64 2d 75 70 2d 6c 69 73 74 20 66 6f 72 77 61 72 64 2d -align.backward-up-list.forward-
9ca0 73 65 78 70 20 31 20 70 6f 69 6e 74 2d 6d 61 72 6b 65 72 20 6e 69 6c 20 73 65 61 72 63 68 2d 66 sexp.1.point-marker.nil.search-f
9cc0 6f 72 77 61 72 64 2d 72 65 67 65 78 70 20 22 5e 20 2a 5c 6e 22 20 6e 6f 65 72 72 6f 72 20 30 20 orward-regexp."^.*\n".noerror.0.
9ce0 61 6c 69 67 6e 2d 72 65 67 69 6f 6e 20 28 28 63 6c 6f 6a 75 72 65 2d 61 6c 69 67 6e 20 28 72 65 align-region.((clojure-align.(re
9d00 67 65 78 70 20 2e 20 63 6c 6f 6a 75 72 65 2d 2d 73 65 61 72 63 68 2d 77 68 69 74 65 73 70 61 63 gexp...clojure--search-whitespac
9d20 65 2d 61 66 74 65 72 2d 6e 65 78 74 2d 73 65 78 70 29 20 28 67 72 6f 75 70 20 2e 20 31 29 20 28 e-after-next-sexp).(group...1).(
9d40 73 65 70 61 72 61 74 65 20 2e 20 22 5e 20 2a 24 22 29 20 28 72 65 70 65 61 74 20 2e 20 74 29 29 separate..."^.*$").(repeat...t))
9d60 29 20 69 6e 64 65 6e 74 2d 72 65 67 69 6f 6e 5d 20 31 34 20 28 23 24 20 2e 20 33 39 35 31 38 29 ).indent-region].14.(#$...39518)
9d80 20 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 30 20 5c 32 30 33 0b 00 5c 33 30 31 20 5c 33 30 .(byte-code."\300.\203..\301.\30
9da0 32 20 44 5c 32 30 37 5c 32 31 32 5c 33 30 33 20 5c 32 31 30 60 5c 33 30 34 20 5c 32 31 30 60 01 2.D\207\212\303.\210`\304.\210`.
9dc0 44 5c 32 36 32 01 29 5c 32 30 37 22 20 5b 75 73 65 2d 72 65 67 69 6f 6e 2d 70 20 72 65 67 69 6f D\262.)\207".[use-region-p.regio
9de0 6e 2d 62 65 67 69 6e 6e 69 6e 67 20 72 65 67 69 6f 6e 2d 65 6e 64 20 65 6e 64 2d 6f 66 2d 64 65 n-beginning.region-end.end-of-de
9e00 66 75 6e 20 63 6c 6f 6a 75 72 65 2d 62 61 63 6b 77 61 72 64 2d 6c 6f 67 69 63 61 6c 2d 73 65 78 fun.clojure-backward-logical-sex
9e20 70 5d 20 33 29 5d 29 0a 23 40 31 35 33 20 4c 69 6b 65 20 60 69 6e 64 65 6e 74 2d 72 65 67 69 6f p].3)]).#@153.Like.`indent-regio
9e40 6e 27 2c 20 62 75 74 20 61 6c 73 6f 20 6d 61 79 62 65 20 61 6c 69 67 6e 20 66 6f 72 6d 73 2e 0a n',.but.also.maybe.align.forms..
9e60 46 6f 72 6d 73 20 62 65 74 77 65 65 6e 20 42 45 47 20 61 6e 64 20 45 4e 44 20 61 72 65 20 61 6c Forms.between.BEG.and.END.are.al
9e80 69 67 6e 65 64 20 61 63 63 6f 72 64 69 6e 67 20 74 6f 0a 60 63 6c 6f 6a 75 72 65 2d 61 6c 69 67 igned.according.to.`clojure-alig
9ea0 6e 2d 66 6f 72 6d 73 2d 61 75 74 6f 6d 61 74 69 63 61 6c 6c 79 27 2e 0a 0a 28 66 6e 20 42 45 47 n-forms-automatically'...(fn.BEG
9ec0 20 45 4e 44 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 69 6e 64 65 6e 74 .END)..(defalias.'clojure-indent
9ee0 2d 72 65 67 69 6f 6e 20 23 5b 35 31 34 20 22 5c 33 30 32 18 5c 33 30 33 02 02 5c 22 29 09 5c 32 -region.#[514."\302.\303..\").\2
9f00 30 33 1a 00 5c 33 30 34 31 17 00 5c 33 30 35 03 03 5c 22 30 5c 32 30 32 19 00 5c 32 31 30 5c 32 03..\3041..\305..\"0\202..\210\2
9f20 30 37 5c 32 31 30 5c 32 30 37 22 20 5b 69 6e 64 65 6e 74 2d 72 65 67 69 6f 6e 2d 66 75 6e 63 74 07\210\207".[indent-region-funct
9f40 69 6f 6e 20 63 6c 6f 6a 75 72 65 2d 61 6c 69 67 6e 2d 66 6f 72 6d 73 2d 61 75 74 6f 6d 61 74 69 ion.clojure-align-forms-automati
9f60 63 61 6c 6c 79 20 6e 69 6c 20 69 6e 64 65 6e 74 2d 72 65 67 69 6f 6e 20 28 73 63 61 6e 2d 65 72 cally.nil.indent-region.(scan-er
9f80 72 6f 72 29 20 63 6c 6f 6a 75 72 65 2d 61 6c 69 67 6e 5d 20 36 20 28 23 24 20 2e 20 34 30 34 39 ror).clojure-align].6.(#$...4049
9fa0 34 29 5d 29 0a 23 40 33 38 20 49 6e 64 65 6e 74 20 63 75 72 72 65 6e 74 20 6c 69 6e 65 20 61 73 4)]).#@38.Indent.current.line.as
9fc0 20 43 6c 6f 6a 75 72 65 20 63 6f 64 65 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 .Clojure.code...(defalias.'cloju
9fe0 72 65 2d 69 6e 64 65 6e 74 2d 6c 69 6e 65 20 23 5b 30 20 22 5c 33 30 31 20 5c 33 30 32 01 38 5c re-indent-line.#[0."\301.\302.8\
a000 32 30 35 10 00 5c 33 30 33 5c 33 30 34 02 38 5c 33 30 35 5c 22 5c 33 30 36 3d 5c 32 36 32 01 5c 205..\303\304.8\305\"\306=\262.\
a020 32 30 33 36 00 5c 32 31 32 5c 33 30 37 20 5c 32 31 30 5c 33 31 30 5c 33 31 31 21 5c 32 30 35 34 2036.\212\307.\210\310\311!\2054
a040 00 5c 33 31 32 5c 33 31 33 5c 33 31 34 21 21 5c 33 31 32 5c 33 31 35 08 5c 33 31 36 5c 22 21 58 .\312\313\314!!\312\315.\316\"!X
a060 5c 32 30 35 34 00 5c 33 31 37 5c 33 31 35 08 5c 33 31 36 5c 22 21 29 5c 32 30 37 5c 33 32 30 20 \2054.\317\315.\316\"!)\207\320.
a080 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 64 6f 63 73 74 72 69 6e 67 2d 66 69 6c 6c 2d 70 72 \207".[clojure-docstring-fill-pr
a0a0 65 66 69 78 2d 77 69 64 74 68 20 73 79 6e 74 61 78 2d 70 70 73 73 20 33 20 67 65 74 2d 74 65 78 efix-width.syntax-ppss.3.get-tex
a0c0 74 2d 70 72 6f 70 65 72 74 79 20 38 20 66 61 63 65 20 66 6f 6e 74 2d 6c 6f 63 6b 2d 64 6f 63 2d t-property.8.face.font-lock-doc-
a0e0 66 61 63 65 20 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 20 6c 6f 6f 6b 69 6e 67 2d 61 face.beginning-of-line.looking-a
a100 74 20 22 5e 5c 5c 73 2d 2a 22 20 73 74 72 69 6e 67 2d 77 69 64 74 68 20 6d 61 74 63 68 2d 73 74 t."^\\s-*".string-width.match-st
a120 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 30 20 6d 61 6b 65 2d 73 74 72 69 6e 67 ring-no-properties.0.make-string
a140 20 33 32 20 72 65 70 6c 61 63 65 2d 6d 61 74 63 68 20 6c 69 73 70 2d 69 6e 64 65 6e 74 2d 6c 69 .32.replace-match.lisp-indent-li
a160 6e 65 5d 20 35 20 28 23 24 20 2e 20 34 30 38 37 34 29 5d 29 0a 23 40 34 32 39 20 46 75 6e 63 74 ne].5.(#$...40874)]).#@429.Funct
a180 69 6f 6e 20 74 6f 20 67 65 74 20 74 68 65 20 69 6e 64 65 6e 74 20 73 70 65 63 20 6f 66 20 61 20 ion.to.get.the.indent.spec.of.a.
a1a0 73 79 6d 62 6f 6c 2e 0a 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 73 68 6f 75 6c 64 20 74 61 6b symbol..This.function.should.tak
a1c0 65 20 6f 6e 65 20 61 72 67 75 6d 65 6e 74 2c 20 74 68 65 20 6e 61 6d 65 20 6f 66 20 74 68 65 20 e.one.argument,.the.name.of.the.
a1e0 73 79 6d 62 6f 6c 20 61 73 0a 61 20 73 74 72 69 6e 67 2e 20 20 54 68 69 73 20 6e 61 6d 65 20 77 symbol.as.a.string...This.name.w
a200 69 6c 6c 20 62 65 20 65 78 61 63 74 6c 79 20 61 73 20 69 74 20 61 70 70 65 61 72 73 20 69 6e 20 ill.be.exactly.as.it.appears.in.
a220 74 68 65 20 62 75 66 66 65 72 2c 0a 73 6f 20 69 74 20 6d 69 67 68 74 20 73 74 61 72 74 20 77 69 the.buffer,.so.it.might.start.wi
a240 74 68 20 61 20 6e 61 6d 65 73 70 61 63 65 20 61 6c 69 61 73 2e 0a 0a 54 68 69 73 20 66 75 6e 63 th.a.namespace.alias...This.func
a260 74 69 6f 6e 20 69 73 20 61 6e 61 6c 6f 67 6f 75 73 20 74 6f 20 74 68 65 20 60 63 6c 6f 6a 75 72 tion.is.analogous.to.the.`clojur
a280 65 2d 69 6e 64 65 6e 74 2d 66 75 6e 63 74 69 6f 6e 27 0a 73 79 6d 62 6f 6c 20 70 72 6f 70 65 72 e-indent-function'.symbol.proper
a2a0 74 79 2c 20 61 6e 64 20 69 74 73 20 72 65 74 75 72 6e 20 76 61 6c 75 65 20 73 68 6f 75 6c 64 20 ty,.and.its.return.value.should.
a2c0 6d 61 74 63 68 20 6f 6e 65 20 6f 66 20 74 68 65 0a 61 6c 6c 6f 77 65 64 20 76 61 6c 75 65 73 20 match.one.of.the.allowed.values.
a2e0 6f 66 20 74 68 69 73 20 70 72 6f 70 65 72 74 79 2e 20 20 53 65 65 20 60 63 6c 6f 6a 75 72 65 2d of.this.property...See.`clojure-
a300 69 6e 64 65 6e 74 2d 66 75 6e 63 74 69 6f 6e 27 0a 66 6f 72 20 6d 6f 72 65 20 69 6e 66 6f 72 6d indent-function'.for.more.inform
a320 61 74 69 6f 6e 2e 1f 0a 28 64 65 66 76 61 72 20 63 6c 6f 6a 75 72 65 2d 67 65 74 2d 69 6e 64 65 ation...(defvar.clojure-get-inde
a340 6e 74 2d 66 75 6e 63 74 69 6f 6e 20 6e 69 6c 20 28 23 24 20 2e 20 34 31 33 33 39 29 29 0a 23 40 nt-function.nil.(#$...41339)).#@
a360 33 31 34 20 52 65 74 75 72 6e 20 74 68 65 20 69 6e 64 65 6e 74 20 73 70 65 63 20 66 6f 72 20 74 314.Return.the.indent.spec.for.t
a380 68 65 20 73 79 6d 62 6f 6c 20 6e 61 6d 65 64 20 46 55 4e 43 54 49 4f 4e 2d 4e 41 4d 45 2e 0a 46 he.symbol.named.FUNCTION-NAME..F
a3a0 55 4e 43 54 49 4f 4e 2d 4e 41 4d 45 20 69 73 20 61 20 73 74 72 69 6e 67 2e 20 20 49 66 20 69 74 UNCTION-NAME.is.a.string...If.it
a3c0 20 63 6f 6e 74 61 69 6e 73 20 61 20 60 2f 27 2c 20 61 6c 73 6f 20 74 72 79 20 6f 6e 6c 79 0a 74 .contains.a.`/',.also.try.only.t
a3e0 68 65 20 70 61 72 74 20 61 66 74 65 72 20 74 68 65 20 60 2f 27 2e 0a 0a 4c 6f 6f 6b 20 66 6f 72 he.part.after.the.`/'...Look.for
a400 20 61 20 73 70 65 63 20 75 73 69 6e 67 20 60 63 6c 6f 6a 75 72 65 2d 67 65 74 2d 69 6e 64 65 6e .a.spec.using.`clojure-get-inden
a420 74 2d 66 75 6e 63 74 69 6f 6e 27 2c 20 74 68 65 6e 20 74 72 79 20 74 68 65 0a 60 63 6c 6f 6a 75 t-function',.then.try.the.`cloju
a440 72 65 2d 69 6e 64 65 6e 74 2d 66 75 6e 63 74 69 6f 6e 27 20 61 6e 64 20 60 63 6c 6f 6a 75 72 65 re-indent-function'.and.`clojure
a460 2d 62 61 63 6b 74 72 61 63 6b 69 6e 67 2d 69 6e 64 65 6e 74 27 0a 73 79 6d 62 6f 6c 20 70 72 6f -backtracking-indent'.symbol.pro
a480 70 65 72 74 69 65 73 2e 0a 0a 28 66 6e 20 46 55 4e 43 54 49 4f 4e 2d 4e 41 4d 45 29 1f 0a 28 64 perties...(fn.FUNCTION-NAME)..(d
a4a0 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 2d 67 65 74 2d 69 6e 64 65 6e 74 2d 6d 65 74 efalias.'clojure--get-indent-met
a4c0 68 6f 64 20 23 5b 32 35 37 20 22 5c 33 30 31 08 21 5c 32 30 33 5c 66 00 08 01 21 5c 32 30 36 49 hod.#[257."\301.!\203\f...!\206I
a4e0 00 5c 33 30 32 01 21 5c 33 30 33 4e 5c 32 30 36 49 00 5c 33 30 32 01 21 5c 33 30 34 4e 5c 32 30 .\302.!\303N\206I.\302.!\304N\20
a500 36 49 00 5c 33 30 35 5c 33 30 36 02 5c 22 5c 32 30 33 39 00 5c 33 30 32 5c 33 30 37 5c 33 31 30 6I.\305\306.\"\2039.\302\307\310
a520 03 5c 22 21 5c 33 30 33 4e 5c 32 30 36 49 00 5c 33 30 32 5c 33 30 37 5c 33 31 30 03 5c 22 21 5c .\"!\303N\206I.\302\307\310.\"!\
a540 33 30 34 4e 5c 32 30 36 49 00 5c 33 30 35 5c 33 31 31 02 5c 22 5c 32 30 35 49 00 5c 33 31 32 5c 304N\206I.\305\311.\"\205I.\312\
a560 33 30 37 5c 33 31 33 03 5c 22 5c 33 31 33 5c 33 31 34 4f 21 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 307\313.\"\313\314O!\207".[cloju
a580 72 65 2d 67 65 74 2d 69 6e 64 65 6e 74 2d 66 75 6e 63 74 69 6f 6e 20 66 75 6e 63 74 69 6f 6e 70 re-get-indent-function.functionp
a5a0 20 69 6e 74 65 72 6e 2d 73 6f 66 74 20 63 6c 6f 6a 75 72 65 2d 69 6e 64 65 6e 74 2d 66 75 6e 63 .intern-soft.clojure-indent-func
a5c0 74 69 6f 6e 20 63 6c 6f 6a 75 72 65 2d 62 61 63 6b 74 72 61 63 6b 69 6e 67 2d 69 6e 64 65 6e 74 tion.clojure-backtracking-indent
a5e0 20 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 2f 5c 5c 28 5b 5e 2f 5d 2b 5c 5c 29 5c 5c 27 22 20 .string-match."/\\([^/]+\\)\\'".
a600 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 31 20 22 5c 5c 28 3f 3a 5c 5c 28 3f 3a 6c 65 74 5c 5c 7c match-string.1."\\(?:\\(?:let\\|
a620 77 68 5c 5c 28 3f 3a 65 6e 5c 5c 7c 69 6c 65 5c 5c 29 5c 5c 29 5c 5c 29 5c 5c 73 5f 22 20 63 6c wh\\(?:en\\|ile\\)\\)\\)\\s_".cl
a640 6f 6a 75 72 65 2d 2d 67 65 74 2d 69 6e 64 65 6e 74 2d 6d 65 74 68 6f 64 20 30 20 2d 31 5d 20 35 ojure--get-indent-method.0.-1].5
a660 20 28 23 24 20 2e 20 34 31 38 32 38 29 5d 29 0a 28 64 65 66 76 61 72 20 63 6c 6f 6a 75 72 65 2d .(#$...41828)]).(defvar.clojure-
a680 2d 63 75 72 72 65 6e 74 2d 62 61 63 6b 74 72 61 63 6b 69 6e 67 2d 64 65 70 74 68 20 30 29 0a 23 -current-backtracking-depth.0).#
a6a0 40 31 31 36 20 52 65 74 75 72 6e 20 74 68 65 20 69 6e 64 65 6e 74 20 73 65 78 70 20 74 68 61 74 @116.Return.the.indent.sexp.that
a6c0 20 61 70 70 6c 69 65 73 20 74 6f 20 74 68 65 20 73 65 78 70 20 61 74 20 70 6f 69 6e 74 2e 0a 49 .applies.to.the.sexp.at.point..I
a6e0 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 20 66 75 6e 63 74 69 6f 6e 20 66 6f 72 20 60 63 6c 6f 6a mplementation.function.for.`cloj
a700 75 72 65 2d 2d 66 69 6e 64 2d 69 6e 64 65 6e 74 2d 73 70 65 63 27 2e 1f 0a 28 64 65 66 61 6c 69 ure--find-indent-spec'...(defali
a720 61 73 20 27 63 6c 6f 6a 75 72 65 2d 2d 66 69 6e 64 2d 69 6e 64 65 6e 74 2d 73 70 65 63 2d 62 61 as.'clojure--find-indent-spec-ba
a740 63 6b 74 72 61 63 6b 69 6e 67 20 23 5b 30 20 22 08 09 59 5c 32 30 35 5c 33 35 37 00 5c 33 30 32 cktracking.#[0."..Y\205\357.\302
a760 5c 33 30 33 21 3f 5c 32 30 35 5c 33 35 37 00 09 54 5c 33 30 34 01 19 5c 33 30 35 31 28 00 5c 33 \303!?\205\357..T\304..\3051(.\3
a780 30 36 5c 33 30 37 21 5c 32 31 30 6f 5c 32 30 36 23 00 60 53 66 5c 33 31 30 3d 3f 30 5c 32 30 32 06\307!\210o\206#.`Sf\310=?0\202
a7a0 2c 00 5c 32 31 30 5c 32 30 32 36 00 5c 32 30 33 36 00 5c 32 31 31 54 5c 32 36 32 01 5c 32 30 32 ,.\210\2026.\2036.\211T\262.\202
a7c0 12 00 5c 33 31 31 5c 33 31 32 21 5c 32 31 31 5c 32 30 33 43 00 5c 33 31 33 01 21 5c 32 30 36 75 ..\311\312!\211\203C.\313.!\206u
a7e0 00 5c 33 31 34 31 73 00 5c 33 31 35 20 5c 32 31 31 3a 5c 32 30 35 6d 00 5c 32 31 31 40 5c 33 30 .\3141s.\315.\211:\205m.\211@\30
a800 34 01 57 5c 32 30 35 6b 00 01 41 5c 32 31 31 3a 5c 32 30 35 69 00 5c 32 31 31 40 5c 32 31 31 5c 4.W\205k..A\211:\205i.\211@\211\
a820 32 31 31 62 5c 32 31 30 5c 33 31 36 20 5c 32 36 32 01 5c 32 36 32 01 5c 32 36 32 01 5c 32 36 32 211b\210\316.\262.\262.\262.\262
a840 01 5c 32 36 32 01 30 5c 32 30 32 75 00 5c 32 31 30 5c 33 31 37 5c 32 31 31 5c 32 34 37 5c 32 30 .\262.0\202u.\210\317\211\247\20
a860 33 7e 00 5c 32 31 31 43 5c 32 36 32 01 5c 33 32 30 01 21 5c 32 30 33 5c 32 31 36 00 02 5c 33 30 3~.\211C\262.\320.!\203\216..\30
a880 34 55 5c 32 30 35 5c 33 35 32 00 5c 32 31 31 5c 32 30 32 5c 33 35 32 00 5c 33 32 31 01 21 5c 32 4U\205\352.\211\202\352.\321.!\2
a8a0 30 33 5c 33 32 33 00 5c 32 31 31 47 5c 32 31 31 5c 33 30 34 3d 5c 32 30 33 5c 32 34 30 00 5c 33 03\323.\211G\211\304=\203\240.\3
a8c0 31 37 5c 32 30 32 5c 33 31 36 00 5c 32 31 31 5c 33 30 37 3d 5c 32 30 33 5c 32 37 33 00 01 5c 33 17\202\316.\211\307=\203\273..\3
a8e0 30 34 5c 32 33 34 04 5c 33 30 34 55 5c 32 30 34 5c 32 36 35 00 5c 33 32 31 01 21 5c 32 30 35 5c 04\234.\304U\204\265.\321.!\205\
a900 32 36 36 00 5c 32 31 31 5c 32 36 32 01 5c 32 30 32 5c 33 31 36 00 5c 32 31 31 04 01 59 5c 32 30 266.\211\262.\202\316.\211..Y\20
a920 33 5c 33 31 31 00 02 01 53 5c 32 33 34 5c 32 30 32 5c 33 31 34 00 02 05 5c 32 33 34 5c 32 36 32 3\311...S\234\202\314...\234\262
a940 01 5c 32 36 32 01 5c 32 30 32 5c 33 35 32 00 5c 32 31 31 5c 33 32 32 3e 5c 32 30 33 5c 33 34 33 .\262.\202\352.\211\322>\203\343
a960 00 02 5c 33 30 34 55 5c 32 30 35 5c 33 35 32 00 5c 33 32 33 5c 32 30 32 5c 33 35 32 00 5c 33 32 ..\304U\205\352.\323\202\352.\32
a980 34 5c 33 32 35 03 03 23 5c 32 31 30 5c 33 31 37 5c 32 36 36 5c 32 30 32 29 5c 32 36 36 5c 32 30 4\325..#\210\317\266\202)\266\20
a9a0 32 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 6d 61 78 2d 62 61 63 6b 74 72 61 63 6b 69 6e 67 2\207".[clojure-max-backtracking
a9c0 20 63 6c 6f 6a 75 72 65 2d 2d 63 75 72 72 65 6e 74 2d 62 61 63 6b 74 72 61 63 6b 69 6e 67 2d 64 .clojure--current-backtracking-d
a9e0 65 70 74 68 20 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 5e 22 20 30 20 28 65 72 72 6f 72 29 20 63 6c epth.looking-at."^".0.(error).cl
aa00 6f 6a 75 72 65 2d 62 61 63 6b 77 61 72 64 2d 6c 6f 67 69 63 61 6c 2d 73 65 78 70 20 31 20 31 30 ojure-backward-logical-sexp.1.10
aa20 20 74 68 69 6e 67 2d 61 74 2d 70 6f 69 6e 74 20 73 79 6d 62 6f 6c 20 63 6c 6f 6a 75 72 65 2d 2d .thing-at-point.symbol.clojure--
aa40 67 65 74 2d 69 6e 64 65 6e 74 2d 6d 65 74 68 6f 64 20 28 65 72 72 6f 72 29 20 73 79 6e 74 61 78 get-indent-method.(error).syntax
aa60 2d 70 70 73 73 20 63 6c 6f 6a 75 72 65 2d 2d 66 69 6e 64 2d 69 6e 64 65 6e 74 2d 73 70 65 63 2d -ppss.clojure--find-indent-spec-
aa80 62 61 63 6b 74 72 61 63 6b 69 6e 67 20 6e 69 6c 20 66 75 6e 63 74 69 6f 6e 70 20 73 65 71 75 65 backtracking.nil.functionp.seque
aaa0 6e 63 65 70 20 28 3a 64 65 66 6e 20 64 65 66 75 6e 29 20 3a 64 65 66 6e 20 6d 65 73 73 61 67 65 ncep.(:defn.defun).:defn.message
aac0 20 22 49 6e 76 61 6c 69 64 20 69 6e 64 65 6e 74 20 73 70 65 63 20 66 6f 72 20 60 25 73 27 3a 20 ."Invalid.indent.spec.for.`%s':.
aae0 25 73 22 5d 20 39 20 28 23 24 20 2e 20 34 32 36 36 31 29 5d 29 0a 23 40 31 37 37 20 52 65 74 75 %s"].9.(#$...42661)]).#@177.Retu
ab00 72 6e 20 74 68 65 20 69 6e 64 65 6e 74 20 73 70 65 63 20 74 68 61 74 20 61 70 70 6c 69 65 73 20 rn.the.indent.spec.that.applies.
ab20 74 6f 20 63 75 72 72 65 6e 74 20 73 65 78 70 2e 0a 49 66 20 60 63 6c 6f 6a 75 72 65 2d 75 73 65 to.current.sexp..If.`clojure-use
ab40 2d 62 61 63 6b 74 72 61 63 6b 69 6e 67 2d 69 6e 64 65 6e 74 27 20 69 73 20 6e 6f 6e 2d 6e 69 6c -backtracking-indent'.is.non-nil
ab60 2c 20 61 6c 73 6f 20 64 6f 0a 62 61 63 6b 74 72 61 63 6b 69 6e 67 20 75 70 20 74 6f 20 61 20 68 ,.also.do.backtracking.up.to.a.h
ab80 69 67 68 65 72 2d 6c 65 76 65 6c 20 73 65 78 70 20 69 6e 20 6f 72 64 65 72 20 74 6f 20 66 69 6e igher-level.sexp.in.order.to.fin
aba0 64 20 74 68 65 0a 73 70 65 63 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d d.the.spec...(defalias.'clojure-
abc0 2d 66 69 6e 64 2d 69 6e 64 65 6e 74 2d 73 70 65 63 20 23 5b 30 20 22 08 5c 32 30 33 09 00 5c 32 -find-indent-spec.#[0.".\203..\2
abe0 31 32 5c 33 30 31 20 29 5c 32 30 37 5c 33 30 32 5c 33 30 33 21 5c 33 30 34 01 21 5c 32 30 37 22 12\301.)\207\302\303!\304.!\207"
ac00 20 5b 63 6c 6f 6a 75 72 65 2d 75 73 65 2d 62 61 63 6b 74 72 61 63 6b 69 6e 67 2d 69 6e 64 65 6e .[clojure-use-backtracking-inden
ac20 74 20 63 6c 6f 6a 75 72 65 2d 2d 66 69 6e 64 2d 69 6e 64 65 6e 74 2d 73 70 65 63 2d 62 61 63 6b t.clojure--find-indent-spec-back
ac40 74 72 61 63 6b 69 6e 67 20 74 68 69 6e 67 2d 61 74 2d 70 6f 69 6e 74 20 73 79 6d 62 6f 6c 20 63 tracking.thing-at-point.symbol.c
ac60 6c 6f 6a 75 72 65 2d 2d 67 65 74 2d 69 6e 64 65 6e 74 2d 6d 65 74 68 6f 64 5d 20 33 20 28 23 24 lojure--get-indent-method].3.(#$
ac80 20 2e 20 34 33 37 37 32 29 5d 29 0a 23 40 33 30 34 20 52 65 74 75 72 6e 20 74 68 65 20 6e 6f 72 ...43772)]).#@304.Return.the.nor
aca0 6d 61 6c 20 69 6e 64 65 6e 74 61 74 69 6f 6e 20 63 6f 6c 75 6d 6e 20 66 6f 72 20 61 20 73 65 78 mal.indentation.column.for.a.sex
acc0 70 2e 0a 50 6f 69 6e 74 20 73 68 6f 75 6c 64 20 62 65 20 61 66 74 65 72 20 74 68 65 20 6f 70 65 p..Point.should.be.after.the.ope
ace0 6e 20 70 61 72 65 6e 20 6f 66 20 74 68 65 20 5f 65 6e 63 6c 6f 73 69 6e 67 5f 20 73 65 78 70 2c n.paren.of.the._enclosing_.sexp,
ad00 20 61 6e 64 0a 4c 41 53 54 2d 53 45 58 50 20 69 73 20 74 68 65 20 73 74 61 72 74 20 6f 66 20 74 .and.LAST-SEXP.is.the.start.of.t
ad20 68 65 20 70 72 65 76 69 6f 75 73 20 73 65 78 70 20 28 69 6d 6d 65 64 69 61 74 65 6c 79 20 62 65 he.previous.sexp.(immediately.be
ad40 66 6f 72 65 0a 74 68 65 20 73 65 78 70 20 62 65 69 6e 67 20 69 6e 64 65 6e 74 65 64 29 2e 20 20 fore.the.sexp.being.indented)...
ad60 49 4e 44 45 4e 54 2d 4d 4f 44 45 20 69 73 20 61 6e 79 20 6f 66 20 74 68 65 20 76 61 6c 75 65 73 INDENT-MODE.is.any.of.the.values
ad80 0a 61 63 63 65 70 74 65 64 20 62 79 20 60 63 6c 6f 6a 75 72 65 2d 69 6e 64 65 6e 74 2d 73 74 79 .accepted.by.`clojure-indent-sty
ada0 6c 65 27 2e 0a 0a 28 66 6e 20 4c 41 53 54 2d 53 45 58 50 20 49 4e 44 45 4e 54 2d 4d 4f 44 45 29 le'...(fn.LAST-SEXP.INDENT-MODE)
adc0 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 2d 6e 6f 72 6d 61 6c 2d 69 6e 64 ..(defalias.'clojure--normal-ind
ade0 65 6e 74 20 23 5b 35 31 34 20 22 01 62 5c 32 31 30 5c 33 30 31 5c 33 30 32 21 5c 32 31 30 5c 33 ent.#[514.".b\210\301\302!\210\3
ae00 30 33 5c 33 30 32 21 5c 32 31 30 5c 33 30 34 5c 33 30 35 31 29 00 5c 33 30 36 5c 33 30 37 5c 33 03\302!\210\304\3051).\306\307\3
ae20 31 30 20 60 7b 5c 22 5c 32 30 33 24 00 60 5c 33 30 31 5c 33 31 31 21 5c 32 31 30 5c 32 36 32 01 10.`{\"\203$.`\301\311!\210\262.
ae40 5c 32 30 32 10 00 5c 33 31 32 30 5c 32 30 32 2d 00 5c 32 31 30 5c 32 30 32 34 00 5c 32 30 33 34 \202..\3120\202-.\210\2024.\2034
ae60 00 69 5c 32 30 32 66 00 5c 32 31 31 5c 32 30 35 3c 00 5c 32 31 31 5c 33 31 33 20 57 02 5c 33 31 .i\202f.\211\205<.\211\313.W.\31
ae80 34 3e 5c 32 30 34 4a 00 5c 33 31 35 69 08 5c 33 31 31 23 5c 32 30 32 64 00 5c 32 31 31 5c 32 30 4>\204J.\315i.\311#\202d.\211\20
aea0 33 55 00 01 62 5c 32 31 30 69 5c 32 30 32 64 00 02 5c 33 31 36 3d 5c 32 30 33 63 00 5c 33 31 35 3U..b\210i\202d..\316=\203c.\315
aec0 69 08 5c 33 31 31 23 5c 32 30 32 64 00 69 5c 32 36 32 01 5c 32 30 37 22 20 5b 6c 69 73 70 2d 62 i.\311#\202d.i\262.\207".[lisp-b
aee0 6f 64 79 2d 69 6e 64 65 6e 74 20 66 6f 72 77 61 72 64 2d 73 65 78 70 20 31 20 63 6c 6f 6a 75 72 ody-indent.forward-sexp.1.clojur
af00 65 2d 62 61 63 6b 77 61 72 64 2d 6c 6f 67 69 63 61 6c 2d 73 65 78 70 20 6e 69 6c 20 28 65 72 72 e-backward-logical-sexp.nil.(err
af20 6f 72 29 20 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 5b 5e 5b 3a 62 6c 61 6e 6b 3a 5d 5d 22 20 or).string-match."[^[:blank:]]".
af40 6c 69 6e 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 70 6f 73 69 74 69 6f 6e 20 2d 31 20 74 20 6c 69 6e line-beginning-position.-1.t.lin
af60 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e 20 28 3a 61 6c 77 61 79 73 2d 61 6c 69 67 6e 20 3a 61 e-end-position.(:always-align.:a
af80 6c 69 67 6e 2d 61 72 67 75 6d 65 6e 74 73 20 6e 69 6c 29 20 2b 20 3a 61 6c 69 67 6e 2d 61 72 67 lign-arguments.nil).+.:align-arg
afa0 75 6d 65 6e 74 73 5d 20 38 20 28 23 24 20 2e 20 34 34 31 37 38 29 5d 29 0a 23 40 36 31 20 4e 6f uments].8.(#$...44178)]).#@61.No
afc0 6e 2d 6e 69 6c 20 69 66 20 66 6f 72 6d 20 61 74 20 70 6f 69 6e 74 20 64 6f 65 73 6e 27 74 20 72 n-nil.if.form.at.point.doesn't.r
afe0 65 70 72 65 73 65 6e 74 20 61 20 66 75 6e 63 74 69 6f 6e 20 63 61 6c 6c 2e 1f 0a 28 64 65 66 61 epresent.a.function.call...(defa
b000 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 2d 6e 6f 74 2d 66 75 6e 63 74 69 6f 6e 2d 66 6f 72 6d lias.'clojure--not-function-form
b020 2d 70 20 23 5b 30 20 22 5c 33 30 30 66 5c 33 30 31 5c 32 33 35 5c 32 30 36 31 00 5c 32 31 32 5c -p.#[0."\300f\301\235\2061.\212\
b040 33 30 32 5c 33 30 30 78 5c 32 31 30 60 53 66 5c 33 30 33 3d 5c 32 30 33 17 00 5c 33 30 34 75 5c 302\300x\210`Sf\303=\203..\304u\
b060 32 31 30 60 53 66 5c 33 30 35 3d 5c 32 30 35 29 00 60 53 5c 32 30 36 25 00 60 53 66 5c 33 30 36 210`Sf\305=\205).`S\206%.`Sf\306
b080 3d 29 5c 32 30 36 31 00 5c 33 30 37 5c 33 31 30 21 3f 5c 32 30 37 22 20 5b 6e 69 6c 20 28 39 31 =)\2061.\307\310!?\207".[nil.(91
b0a0 20 31 32 33 29 20 22 0d 5c 6e 5b 3a 62 6c 61 6e 6b 3a 5d 22 20 36 34 20 2d 31 20 36 33 20 33 35 .123).".\n[:blank:]".64.-1.63.35
b0c0 20 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 2e 5c 5c 28 3f 3a 5c 5c 73 77 5c 5c 7c 5c 5c 73 5f 5c 5c .looking-at.".\\(?:\\sw\\|\\s_\\
b0e0 29 22 5d 20 32 20 28 23 24 20 2e 20 34 34 39 39 30 29 5d 29 0a 23 40 39 32 36 20 57 68 65 6e 20 )"].2.(#$...44990)]).#@926.When.
b100 69 6e 64 65 6e 74 69 6e 67 20 61 20 6c 69 6e 65 20 77 69 74 68 69 6e 20 61 20 66 75 6e 63 74 69 indenting.a.line.within.a.functi
b120 6f 6e 20 63 61 6c 6c 2c 20 69 6e 64 65 6e 74 20 70 72 6f 70 65 72 6c 79 2e 0a 0a 49 4e 44 45 4e on.call,.indent.properly...INDEN
b140 54 2d 50 4f 49 4e 54 20 69 73 20 74 68 65 20 70 6f 73 69 74 69 6f 6e 20 77 68 65 72 65 20 74 68 T-POINT.is.the.position.where.th
b160 65 20 75 73 65 72 20 74 79 70 65 64 20 54 41 42 2c 20 6f 72 20 65 71 75 69 76 61 6c 65 6e 74 2e e.user.typed.TAB,.or.equivalent.
b180 0a 50 6f 69 6e 74 20 69 73 20 6c 6f 63 61 74 65 64 20 61 74 20 74 68 65 20 70 6f 69 6e 74 20 74 .Point.is.located.at.the.point.t
b1a0 6f 20 69 6e 64 65 6e 74 20 75 6e 64 65 72 20 28 66 6f 72 20 64 65 66 61 75 6c 74 20 69 6e 64 65 o.indent.under.(for.default.inde
b1c0 6e 74 61 74 69 6f 6e 29 3b 0a 53 54 41 54 45 20 69 73 20 74 68 65 20 60 70 61 72 73 65 2d 70 61 ntation);.STATE.is.the.`parse-pa
b1e0 72 74 69 61 6c 2d 73 65 78 70 27 20 73 74 61 74 65 20 66 6f 72 20 74 68 61 74 20 70 6f 73 69 74 rtial-sexp'.state.for.that.posit
b200 69 6f 6e 2e 0a 0a 49 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 6c 69 6e 65 20 69 73 20 69 6e 20 ion...If.the.current.line.is.in.
b220 61 20 63 61 6c 6c 20 74 6f 20 61 20 43 6c 6f 6a 75 72 65 20 66 75 6e 63 74 69 6f 6e 20 77 69 74 a.call.to.a.Clojure.function.wit
b240 68 20 61 0a 6e 6f 6e 2d 6e 69 6c 20 70 72 6f 70 65 72 74 79 20 60 63 6c 6f 6a 75 72 65 2d 69 6e h.a.non-nil.property.`clojure-in
b260 64 65 6e 74 2d 66 75 6e 63 74 69 6f 6e 27 2c 20 74 68 61 74 20 73 70 65 63 69 66 69 65 73 20 68 dent-function',.that.specifies.h
b280 6f 77 20 74 6f 20 64 6f 0a 74 68 65 20 69 6e 64 65 6e 74 61 74 69 6f 6e 2e 0a 0a 54 68 65 20 70 ow.to.do.the.indentation...The.p
b2a0 72 6f 70 65 72 74 79 20 76 61 6c 75 65 20 63 61 6e 20 62 65 0a 0a 2d 20 60 64 65 66 75 6e 27 2c roperty.value.can.be..-.`defun',
b2c0 20 6d 65 61 6e 69 6e 67 20 69 6e 64 65 6e 74 20 60 64 65 66 75 6e 27 2d 73 74 79 6c 65 3b 0a 2d .meaning.indent.`defun'-style;.-
b2e0 20 61 6e 20 69 6e 74 65 67 65 72 20 4e 2c 20 6d 65 61 6e 69 6e 67 20 69 6e 64 65 6e 74 20 74 68 .an.integer.N,.meaning.indent.th
b300 65 20 66 69 72 73 74 20 4e 20 61 72 67 75 6d 65 6e 74 73 20 73 70 65 63 69 61 6c 6c 79 0a 20 20 e.first.N.arguments.specially...
b320 6c 69 6b 65 20 6f 72 64 69 6e 61 72 79 20 66 75 6e 63 74 69 6f 6e 20 61 72 67 75 6d 65 6e 74 73 like.ordinary.function.arguments
b340 20 61 6e 64 20 74 68 65 6e 20 69 6e 64 65 6e 74 20 61 6e 79 20 66 75 72 74 68 65 72 0a 20 20 61 .and.then.indent.any.further...a
b360 72 67 75 6d 65 6e 74 73 20 6c 69 6b 65 20 61 20 62 6f 64 79 3b 0a 2d 20 61 20 66 75 6e 63 74 69 rguments.like.a.body;.-.a.functi
b380 6f 6e 20 74 6f 20 63 61 6c 6c 20 6a 75 73 74 20 61 73 20 74 68 69 73 20 66 75 6e 63 74 69 6f 6e on.to.call.just.as.this.function
b3a0 20 77 61 73 20 63 61 6c 6c 65 64 2e 0a 20 20 49 66 20 74 68 61 74 20 66 75 6e 63 74 69 6f 6e 20 .was.called....If.that.function.
b3c0 72 65 74 75 72 6e 73 20 6e 69 6c 2c 20 74 68 61 74 20 6d 65 61 6e 73 20 69 74 20 64 6f 65 73 6e returns.nil,.that.means.it.doesn
b3e0 27 74 20 73 70 65 63 69 66 79 0a 20 20 74 68 65 20 69 6e 64 65 6e 74 61 74 69 6f 6e 2e 0a 2d 20 't.specify...the.indentation..-.
b400 61 20 6c 69 73 74 2c 20 77 68 69 63 68 20 69 73 20 75 73 65 64 20 62 79 20 60 63 6c 6f 6a 75 72 a.list,.which.is.used.by.`clojur
b420 65 2d 62 61 63 6b 74 72 61 63 6b 69 6e 67 2d 69 6e 64 65 6e 74 27 2e 0a 0a 54 68 69 73 20 66 75 e-backtracking-indent'...This.fu
b440 6e 63 74 69 6f 6e 20 61 6c 73 6f 20 72 65 74 75 72 6e 73 20 6e 69 6c 20 6d 65 61 6e 69 6e 67 20 nction.also.returns.nil.meaning.
b460 64 6f 6e 27 74 20 73 70 65 63 69 66 79 20 74 68 65 20 69 6e 64 65 6e 74 61 74 69 6f 6e 2e 0a 0a don't.specify.the.indentation...
b480 28 66 6e 20 49 4e 44 45 4e 54 2d 50 4f 49 4e 54 20 53 54 41 54 45 29 1f 0a 28 64 65 66 61 6c 69 (fn.INDENT-POINT.STATE)..(defali
b4a0 61 73 20 27 63 6c 6f 6a 75 72 65 2d 69 6e 64 65 6e 74 2d 66 75 6e 63 74 69 6f 6e 20 23 5b 35 31 as.'clojure-indent-function.#[51
b4c0 34 20 22 5c 32 31 31 5c 33 30 33 5c 32 33 34 62 5c 32 31 30 5c 33 30 34 20 5c 32 30 33 0d 00 69 4."\211\303\234b\210\304.\203..i
b4e0 54 5c 32 30 37 5c 33 30 33 75 5c 32 31 30 5c 33 30 35 20 08 69 53 5c 33 30 36 03 5c 32 35 30 5c T\207\303u\210\305..iS\306.\250\
b500 32 30 33 25 00 5c 32 31 31 06 06 05 05 05 24 5c 32 30 32 5c 32 35 36 00 03 3a 5c 32 30 33 55 00 203%.\211.....$\202\256..:\203U.
b520 03 40 04 41 5c 32 31 31 5c 32 30 34 3f 00 02 06 08 06 07 06 07 06 07 24 5c 32 30 32 50 00 5c 33 .@.A\211\204?..........$\202P.\3
b540 30 37 06 06 21 5c 32 30 33 4f 00 05 06 08 06 08 5c 22 5c 32 30 32 50 00 5c 33 31 30 5c 32 36 36 07..!\203O......\"\202P.\310\266
b560 5c 32 30 32 5c 32 30 32 5c 32 35 36 00 03 5c 33 31 31 3d 5c 32 30 33 61 00 09 02 5c 5c 5c 32 30 \202\202\256..\311=\203a...\\\20
b580 32 5c 32 35 36 00 5c 33 30 37 04 21 5c 32 30 33 70 00 03 06 06 06 06 5c 22 5c 32 30 32 5c 32 35 2\256.\307.!\203p......\"\202\25
b5a0 36 00 03 5c 32 30 34 5c 32 35 35 00 5c 33 31 32 5c 33 31 33 21 5c 32 31 31 5c 32 30 33 5c 32 31 6..\204\255.\312\313!\211\203\21
b5c0 31 00 5c 33 31 34 5c 33 31 35 02 5c 22 5c 32 30 33 5c 32 31 31 00 5c 33 31 36 04 5c 33 31 37 5c 1.\314\315.\"\203\211.\316.\317\
b5e0 22 5c 32 30 32 5c 32 35 30 00 5c 32 31 31 5c 32 30 33 5c 32 34 34 00 5c 33 31 34 5c 33 32 30 02 "\202\250.\211\203\244.\314\320.
b600 5c 22 5c 32 30 33 5c 32 34 34 00 5c 33 31 34 5c 33 32 31 5c 33 32 32 5c 33 30 33 04 5c 22 5c 22 \"\203\244.\314\321\322\303.\"\"
b620 5c 32 30 34 5c 32 34 34 00 09 03 5c 5c 5c 32 30 32 5c 32 35 30 00 5c 33 31 36 04 5c 6e 5c 22 5c \204\244...\\\202\250.\316.\n\"\
b640 32 36 32 01 5c 32 30 32 5c 32 35 36 00 5c 33 31 30 5c 32 36 32 01 5c 32 30 37 22 20 5b 63 61 6c 262.\202\256.\310\262.\207".[cal
b660 63 75 6c 61 74 65 2d 6c 69 73 70 2d 69 6e 64 65 6e 74 2d 6c 61 73 74 2d 73 65 78 70 20 6c 69 73 culate-lisp-indent-last-sexp.lis
b680 70 2d 62 6f 64 79 2d 69 6e 64 65 6e 74 20 63 6c 6f 6a 75 72 65 2d 69 6e 64 65 6e 74 2d 73 74 79 p-body-indent.clojure-indent-sty
b6a0 6c 65 20 31 20 63 6c 6f 6a 75 72 65 2d 2d 6e 6f 74 2d 66 75 6e 63 74 69 6f 6e 2d 66 6f 72 6d 2d le.1.clojure--not-function-form-
b6c0 70 20 63 6c 6f 6a 75 72 65 2d 2d 66 69 6e 64 2d 69 6e 64 65 6e 74 2d 73 70 65 63 20 23 5b 31 30 p.clojure--find-indent-spec.#[10
b6e0 32 38 20 22 5c 33 30 31 5c 33 30 32 31 1f 00 60 05 58 5c 32 30 35 1b 00 6d 3f 5c 32 30 35 1b 00 28."\301\3021..`.X\205..m?\205..
b700 5c 33 30 33 5c 33 30 34 21 5c 32 31 30 5c 32 31 31 54 5c 32 36 32 01 5c 32 30 32 05 00 30 5c 32 \303\304!\210\211T\262.\202..0\2
b720 30 32 25 00 5c 32 31 30 5c 32 31 31 54 5c 32 31 31 5c 32 36 32 02 5c 32 31 30 5c 32 31 31 04 54 02%.\210\211T\211\262.\210\211.T
b740 55 5c 32 30 33 33 00 08 02 5c 5c 5c 32 30 32 46 00 5c 32 31 31 04 54 56 5c 32 30 33 41 00 5c 33 U\2033...\\\202F.\211.TV\203A.\3
b760 30 35 03 5c 33 30 36 5c 22 5c 32 30 32 46 00 08 5c 33 30 37 5f 02 5c 5c 5c 32 30 37 22 20 5b 6c 05.\306\"\202F..\307_.\\\207".[l
b780 69 73 70 2d 62 6f 64 79 2d 69 6e 64 65 6e 74 20 2d 31 20 28 73 63 61 6e 2d 65 72 72 6f 72 29 20 isp-body-indent.-1.(scan-error).
b7a0 63 6c 6f 6a 75 72 65 2d 66 6f 72 77 61 72 64 2d 6c 6f 67 69 63 61 6c 2d 73 65 78 70 20 31 20 63 clojure-forward-logical-sexp.1.c
b7c0 6c 6f 6a 75 72 65 2d 2d 6e 6f 72 6d 61 6c 2d 69 6e 64 65 6e 74 20 3a 61 6c 77 61 79 73 2d 61 6c lojure--normal-indent.:always-al
b7e0 69 67 6e 20 32 5d 20 38 20 22 5c 6e 5c 6e 28 66 6e 20 49 4e 44 45 4e 54 2d 50 4f 49 4e 54 20 4d ign.2].8."\n\n(fn.INDENT-POINT.M
b800 45 54 48 4f 44 20 4c 41 53 54 2d 53 45 58 50 20 43 4f 4e 54 41 49 4e 49 4e 47 2d 46 4f 52 4d 2d ETHOD.LAST-SEXP.CONTAINING-FORM-
b820 43 4f 4c 55 4d 4e 29 22 5d 20 66 75 6e 63 74 69 6f 6e 70 20 6e 69 6c 20 3a 64 65 66 6e 20 74 68 COLUMN)"].functionp.nil.:defn.th
b840 69 6e 67 2d 61 74 2d 70 6f 69 6e 74 20 73 79 6d 62 6f 6c 20 73 74 72 69 6e 67 2d 6d 61 74 63 68 ing-at-point.symbol.string-match
b860 20 22 5e 3a 22 20 63 6c 6f 6a 75 72 65 2d 2d 6e 6f 72 6d 61 6c 2d 69 6e 64 65 6e 74 20 3a 61 6c ."^:".clojure--normal-indent.:al
b880 77 61 79 73 2d 61 6c 69 67 6e 20 22 5c 5c 60 5c 5c 28 3f 3a 5c 5c 53 20 2b 2f 5c 5c 29 3f 5c 5c ways-align."\\`\\(?:\\S.+/\\)?\\
b8a0 28 64 65 66 5b 61 2d 7a 5d 2a 5c 5c 7c 77 69 74 68 2d 5c 5c 29 22 20 22 5c 5c 60 64 65 66 61 75 (def[a-z]*\\|with-\\)"."\\`defau
b8c0 6c 74 22 20 6d 61 74 63 68 2d 73 74 72 69 6e 67 5d 20 31 33 20 28 23 24 20 2e 20 34 35 33 30 37 lt".match-string].13.(#$...45307
b8e0 29 5d 29 0a 23 40 39 30 20 49 6e 73 74 72 75 63 74 20 60 63 6c 6f 6a 75 72 65 2d 69 6e 64 65 6e )]).#@90.Instruct.`clojure-inden
b900 74 2d 66 75 6e 63 74 69 6f 6e 27 20 74 6f 20 69 6e 64 65 6e 74 20 74 68 65 20 62 6f 64 79 20 6f t-function'.to.indent.the.body.o
b920 66 20 53 59 4d 20 62 79 20 49 4e 44 45 4e 54 2e 0a 0a 28 66 6e 20 53 59 4d 20 49 4e 44 45 4e 54 f.SYM.by.INDENT...(fn.SYM.INDENT
b940 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 70 75 74 2d 63 6c 6f 6a 75 72 65 2d 69 6e 64 65 6e 74 )..(defalias.'put-clojure-indent
b960 20 23 5b 35 31 34 20 22 5c 33 30 30 02 5c 33 30 31 03 23 5c 32 30 37 22 20 5b 70 75 74 20 63 6c .#[514."\300.\301.#\207".[put.cl
b980 6f 6a 75 72 65 2d 69 6e 64 65 6e 74 2d 66 75 6e 63 74 69 6f 6e 5d 20 36 20 28 23 24 20 2e 20 34 ojure-indent-function].6.(#$...4
b9a0 37 33 33 37 29 5d 29 0a 23 40 36 31 20 43 61 6c 6c 20 60 70 75 74 2d 63 6c 6f 6a 75 72 65 2d 69 7337)]).#@61.Call.`put-clojure-i
b9c0 6e 64 65 6e 74 27 20 6f 6e 20 61 20 73 65 72 69 65 73 2c 20 4b 56 53 2e 0a 0a 28 66 6e 20 26 72 ndent'.on.a.series,.KVS...(fn.&r
b9e0 65 73 74 20 4b 56 53 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 64 65 66 69 6e 65 2d 63 6c 6f 6a est.KVS)..(defalias.'define-cloj
ba00 75 72 65 2d 69 6e 64 65 6e 74 20 27 28 6d 61 63 72 6f 20 2e 20 23 5b 31 32 38 20 22 5c 33 30 30 ure-indent.'(macro...#[128."\300
ba20 5c 33 30 31 5c 33 30 32 03 5c 22 42 5c 32 30 37 22 20 5b 70 72 6f 67 6e 20 6d 61 70 63 61 72 20 \301\302.\"B\207".[progn.mapcar.
ba40 23 5b 32 35 37 20 22 5c 33 30 30 5c 33 30 31 02 40 44 02 41 40 45 5c 32 30 37 22 20 5b 70 75 74 #[257."\300\301.@D.A@E\207".[put
ba60 2d 63 6c 6f 6a 75 72 65 2d 69 6e 64 65 6e 74 20 71 75 6f 74 65 5d 20 34 20 22 5c 6e 5c 6e 28 66 -clojure-indent.quote].4."\n\n(f
ba80 6e 20 58 29 22 5d 5d 20 35 20 28 23 24 20 2e 20 34 37 35 33 33 29 5d 29 29 0a 23 40 31 32 31 20 n.X)"]].5.(#$...47533)])).#@121.
baa0 41 6c 6c 6f 77 20 60 63 6c 6f 6a 75 72 65 2d 64 65 66 75 6e 2d 69 6e 64 65 6e 74 73 27 20 74 6f Allow.`clojure-defun-indents'.to
bac0 20 69 6e 64 65 6e 74 20 75 73 65 72 2d 73 70 65 63 69 66 69 65 64 20 6d 61 63 72 6f 73 2e 0a 0a .indent.user-specified.macros...
bae0 52 65 71 75 69 72 65 73 20 74 68 65 20 6d 61 63 72 6f 27 73 20 4e 41 4d 45 20 61 6e 64 20 61 20 Requires.the.macro's.NAME.and.a.
bb00 56 41 4c 55 45 2e 0a 0a 28 66 6e 20 4e 41 4d 45 20 56 41 4c 55 45 29 1f 0a 28 64 65 66 61 6c 69 VALUE...(fn.NAME.VALUE)..(defali
bb20 61 73 20 27 61 64 64 2d 63 75 73 74 6f 6d 2d 63 6c 6f 6a 75 72 65 2d 69 6e 64 65 6e 74 73 20 23 as.'add-custom-clojure-indents.#
bb40 5b 35 31 34 20 22 5c 33 30 30 02 02 5c 22 5c 32 31 30 5c 33 30 31 5c 33 30 32 02 5c 22 5c 32 30 [514."\300..\"\210\301\302.\"\20
bb60 37 22 20 5b 63 75 73 74 6f 6d 2d 73 65 74 2d 64 65 66 61 75 6c 74 20 6d 61 70 63 61 72 20 23 5b 7".[custom-set-default.mapcar.#[
bb80 32 35 37 20 22 5c 33 30 30 01 5c 33 30 31 5c 22 5c 32 30 37 22 20 5b 70 75 74 2d 63 6c 6f 6a 75 257."\300.\301\"\207".[put-cloju
bba0 72 65 2d 69 6e 64 65 6e 74 20 64 65 66 75 6e 5d 20 34 20 22 5c 6e 5c 6e 28 66 6e 20 58 29 22 5d re-indent.defun].4."\n\n(fn.X)"]
bbc0 5d 20 35 20 28 23 24 20 2e 20 34 37 37 37 36 29 5d 29 0a 28 62 79 74 65 2d 63 6f 64 65 20 22 5c ].5.(#$...47776)]).(byte-code."\
bbe0 33 30 30 5c 33 30 31 5c 33 30 32 5c 33 30 33 5c 33 30 34 44 44 5c 33 30 35 5c 33 30 36 5c 33 30 300\301\302\303\304DD\305\306\30
bc00 37 5c 33 31 30 5c 33 31 31 26 07 5c 32 31 30 5c 33 31 32 5c 33 31 33 5c 33 31 34 5c 22 5c 32 31 7\310\311&.\210\312\313\314\"\21
bc20 30 5c 33 31 32 5c 33 31 35 5c 33 31 36 5c 22 5c 32 31 30 5c 33 31 32 5c 33 31 37 5c 33 31 36 5c 0\312\315\316\"\210\312\317\316\
bc40 22 5c 32 31 30 5c 33 31 32 5c 33 32 30 5c 33 31 36 5c 22 5c 32 31 30 5c 33 31 32 5c 33 32 31 5c "\210\312\320\316\"\210\312\321\
bc60 33 31 36 5c 22 5c 32 31 30 5c 33 31 32 5c 33 32 32 5c 33 31 34 5c 22 5c 32 31 30 5c 33 31 32 5c 316\"\210\312\322\314\"\210\312\
bc80 33 32 33 5c 33 31 34 5c 22 5c 32 31 30 5c 33 31 32 5c 33 32 34 5c 33 31 34 5c 22 5c 32 31 30 5c 323\314\"\210\312\324\314\"\210\
bca0 33 31 32 5c 33 32 35 5c 33 32 36 5c 22 5c 32 31 30 5c 33 31 32 5c 33 32 37 5c 33 33 30 5c 22 5c 312\325\326\"\210\312\327\330\"\
bcc0 32 31 30 5c 33 31 32 5c 33 33 31 5c 33 31 34 5c 22 5c 32 31 30 5c 33 31 32 5c 33 33 32 5c 33 31 210\312\331\314\"\210\312\332\31
bce0 34 5c 22 5c 32 31 30 5c 33 31 32 5c 33 33 33 5c 33 31 34 5c 22 5c 32 31 30 5c 33 31 32 5c 33 33 4\"\210\312\333\314\"\210\312\33
bd00 34 5c 33 31 34 5c 22 5c 32 31 30 5c 33 31 32 5c 33 33 35 5c 33 31 34 5c 22 5c 32 31 30 5c 33 31 4\314\"\210\312\335\314\"\210\31
bd20 32 5c 33 33 36 5c 33 31 34 5c 22 5c 32 31 30 5c 33 31 32 5c 33 33 37 5c 33 32 36 5c 22 5c 32 31 2\336\314\"\210\312\337\326\"\21
bd40 30 5c 33 31 32 5c 33 34 30 5c 33 32 36 5c 22 5c 32 31 30 5c 33 31 32 5c 33 34 31 5c 33 32 36 5c 0\312\340\326\"\210\312\341\326\
bd60 22 5c 32 31 30 5c 33 31 32 5c 33 34 32 5c 33 31 34 5c 22 5c 32 31 30 5c 33 31 32 5c 33 34 33 5c "\210\312\342\314\"\210\312\343\
bd80 33 31 34 5c 22 5c 32 31 30 5c 33 31 32 5c 33 34 34 5c 33 34 35 5c 22 5c 32 31 30 5c 33 31 32 5c 314\"\210\312\344\345\"\210\312\
bda0 33 34 36 5c 33 33 30 5c 22 5c 32 31 30 5c 33 31 32 5c 33 34 37 5c 33 31 34 5c 22 5c 32 31 30 5c 346\330\"\210\312\347\314\"\210\
bdc0 33 31 32 5c 33 35 30 5c 33 35 31 5c 22 5c 32 31 30 5c 33 31 32 5c 33 35 32 5c 33 35 33 5c 22 5c 312\350\351\"\210\312\352\353\"\
bde0 32 31 30 5c 33 31 32 5c 33 35 34 5c 33 35 35 5c 22 5c 32 31 30 5c 33 31 32 5c 33 35 36 5c 33 35 210\312\354\355\"\210\312\356\35
be00 37 5c 22 5c 32 31 30 5c 33 31 32 5c 33 36 30 5c 33 36 31 5c 22 5c 32 31 30 5c 33 31 32 5c 33 36 7\"\210\312\360\361\"\210\312\36
be20 32 5c 33 31 34 5c 22 5c 32 31 30 5c 33 31 32 5c 33 36 33 5c 33 36 34 5c 22 5c 32 31 30 5c 33 31 2\314\"\210\312\363\364\"\210\31
be40 32 5c 33 36 35 5c 33 36 36 5c 22 5c 32 31 30 5c 33 31 32 5c 33 36 37 5c 33 37 30 5c 22 5c 32 31 2\365\366\"\210\312\367\370\"\21
be60 30 5c 33 31 32 5c 33 37 31 5c 33 37 32 5c 22 5c 32 31 30 5c 33 31 32 5c 33 37 33 5c 33 32 36 5c 0\312\371\372\"\210\312\373\326\
be80 22 5c 32 31 30 5c 33 31 32 5c 33 37 34 5c 33 33 30 5c 22 5c 32 31 30 5c 33 31 32 5c 33 37 35 5c "\210\312\374\330\"\210\312\375\
bea0 33 32 36 5c 22 5c 32 31 30 5c 33 31 32 5c 33 37 36 5c 33 31 34 5c 22 5c 32 31 30 5c 33 31 32 5c 326\"\210\312\376\314\"\210\312\
bec0 33 37 37 5c 32 30 31 40 00 5c 22 5c 32 31 30 5c 33 31 32 5c 32 30 31 41 00 5c 33 31 34 5c 22 5c 377\201@.\"\210\312\201A.\314\"\
bee0 32 31 30 5c 33 31 32 5c 32 30 31 42 00 5c 33 31 34 5c 22 5c 32 31 30 5c 33 31 32 5c 32 30 31 43 210\312\201B.\314\"\210\312\201C
bf00 00 5c 33 31 34 5c 22 5c 32 31 30 5c 33 31 32 5c 32 30 31 44 00 5c 33 31 34 5c 22 5c 32 31 30 5c .\314\"\210\312\201D.\314\"\210\
bf20 33 31 32 5c 32 30 31 45 00 5c 33 31 34 5c 22 5c 32 31 30 5c 33 31 32 5c 32 30 31 46 00 5c 33 31 312\201E.\314\"\210\312\201F.\31
bf40 34 5c 22 5c 32 31 30 5c 33 31 32 5c 32 30 31 47 00 5c 33 31 34 5c 22 5c 32 31 30 5c 33 31 32 5c 4\"\210\312\201G.\314\"\210\312\
bf60 32 30 31 48 00 5c 33 31 34 5c 22 5c 32 31 30 5c 33 31 32 5c 32 30 31 49 00 5c 33 31 34 5c 22 5c 201H.\314\"\210\312\201I.\314\"\
bf80 32 31 30 5c 33 31 32 5c 32 30 31 4a 00 5c 33 31 34 5c 22 5c 32 31 30 5c 33 31 32 5c 32 30 31 4b 210\312\201J.\314\"\210\312\201K
bfa0 00 5c 33 31 36 5c 22 5c 32 31 30 5c 33 31 32 5c 32 30 31 4c 00 5c 33 31 34 5c 22 5c 32 31 30 5c .\316\"\210\312\201L.\314\"\210\
bfc0 33 31 32 5c 32 30 31 4d 00 5c 33 31 36 5c 22 5c 32 31 30 5c 33 31 32 5c 32 30 31 4e 00 5c 33 33 312\201M.\316\"\210\312\201N.\33
bfe0 30 5c 22 5c 32 31 30 5c 33 31 32 5c 32 30 31 4f 00 5c 33 31 36 5c 22 5c 32 31 30 5c 33 31 32 5c 0\"\210\312\201O.\316\"\210\312\
c000 32 30 31 50 00 5c 33 31 36 5c 22 5c 32 31 30 5c 33 31 32 5c 32 30 31 51 00 5c 33 31 36 5c 22 5c 201P.\316\"\210\312\201Q.\316\"\
c020 32 31 30 5c 33 31 32 5c 32 30 31 52 00 5c 33 31 36 5c 22 5c 32 31 30 5c 33 31 32 5c 32 30 31 53 210\312\201R.\316\"\210\312\201S
c040 00 5c 33 32 36 5c 22 5c 32 31 30 5c 33 31 32 5c 32 30 31 54 00 5c 33 32 36 5c 22 5c 32 31 30 5c .\326\"\210\312\201T.\326\"\210\
c060 33 31 32 5c 32 30 31 55 00 5c 33 32 36 5c 22 5c 32 31 30 5c 33 31 32 5c 32 30 31 56 00 5c 33 31 312\201U.\326\"\210\312\201V.\31
c080 34 5c 22 5c 32 31 30 5c 33 31 32 5c 32 30 31 57 00 5c 33 32 36 5c 22 5c 32 30 37 22 20 5b 63 75 4\"\210\312\201W.\326\"\207".[cu
c0a0 73 74 6f 6d 2d 64 65 63 6c 61 72 65 2d 76 61 72 69 61 62 6c 65 20 63 6c 6f 6a 75 72 65 2d 64 65 stom-declare-variable.clojure-de
c0c0 66 75 6e 2d 69 6e 64 65 6e 74 73 20 66 75 6e 63 61 6c 6c 20 66 75 6e 63 74 69 6f 6e 20 23 5b 30 fun-indents.funcall.function.#[0
c0e0 20 22 5c 33 30 30 5c 32 30 37 22 20 5b 6e 69 6c 5d 20 31 5d 20 22 4c 69 73 74 20 6f 66 20 61 64 ."\300\207".[nil].1]."List.of.ad
c100 64 69 74 69 6f 6e 61 6c 20 73 79 6d 62 6f 6c 73 20 77 69 74 68 20 64 65 66 75 6e 2d 73 74 79 6c ditional.symbols.with.defun-styl
c120 65 20 69 6e 64 65 6e 74 61 74 69 6f 6e 20 69 6e 20 43 6c 6f 6a 75 72 65 2e 5c 6e 5c 6e 59 6f 75 e.indentation.in.Clojure.\n\nYou
c140 20 63 61 6e 20 75 73 65 20 74 68 69 73 20 74 6f 20 6c 65 74 20 45 6d 61 63 73 20 69 6e 64 65 6e .can.use.this.to.let.Emacs.inden
c160 74 20 79 6f 75 72 20 6f 77 6e 20 6d 61 63 72 6f 73 20 74 68 65 20 73 61 6d 65 20 77 61 79 5c 6e t.your.own.macros.the.same.way\n
c180 74 68 61 74 20 69 74 20 69 6e 64 65 6e 74 73 20 62 75 69 6c 74 2d 69 6e 20 6d 61 63 72 6f 73 20 that.it.indents.built-in.macros.
c1a0 6c 69 6b 65 20 77 69 74 68 2d 6f 70 65 6e 2e 20 20 54 68 69 73 20 76 61 72 69 61 62 6c 65 5c 6e like.with-open...This.variable\n
c1c0 6f 6e 6c 79 20 77 6f 72 6b 73 20 77 68 65 6e 20 73 65 74 20 76 69 61 20 74 68 65 20 63 75 73 74 only.works.when.set.via.the.cust
c1e0 6f 6d 69 7a 65 20 69 6e 74 65 72 66 61 63 65 20 28 60 73 65 74 71 27 20 77 6f 6e 27 74 5c 6e 77 omize.interface.(`setq'.won't\nw
c200 6f 72 6b 29 2e 20 20 54 6f 20 73 65 74 20 69 74 20 66 72 6f 6d 20 4c 69 73 70 20 63 6f 64 65 2c ork)...To.set.it.from.Lisp.code,
c220 20 75 73 65 5c 6e 20 20 20 20 20 28 70 75 74 2d 63 6c 6f 6a 75 72 65 2d 69 6e 64 65 6e 74 20 5c .use\n.....(put-clojure-indent.\
c240 5c 3d 27 73 6f 6d 65 2d 73 79 6d 62 6f 6c 20 3a 64 65 66 6e 29 2e 22 20 3a 74 79 70 65 20 28 72 \='some-symbol.:defn).".:type.(r
c260 65 70 65 61 74 20 73 79 6d 62 6f 6c 29 20 3a 73 65 74 20 61 64 64 2d 63 75 73 74 6f 6d 2d 63 6c epeat.symbol).:set.add-custom-cl
c280 6f 6a 75 72 65 2d 69 6e 64 65 6e 74 73 20 70 75 74 2d 63 6c 6f 6a 75 72 65 2d 69 6e 64 65 6e 74 ojure-indents.put-clojure-indent
c2a0 20 6e 73 20 31 20 66 6e 20 3a 64 65 66 6e 20 64 65 66 20 64 65 66 6e 20 62 6f 75 6e 64 2d 66 6e .ns.1.fn.:defn.def.defn.bound-fn
c2c0 20 69 66 20 69 66 2d 6e 6f 74 20 63 61 73 65 20 63 6f 6e 64 20 30 20 63 6f 6e 64 70 20 32 20 63 .if.if-not.case.cond.0.condp.2.c
c2e0 6f 6e 64 2d 3e 20 63 6f 6e 64 2d 3e 3e 20 77 68 65 6e 20 77 68 69 6c 65 20 77 68 65 6e 2d 6e 6f ond->.cond->>.when.while.when-no
c300 74 20 77 68 65 6e 2d 66 69 72 73 74 20 64 6f 20 66 75 74 75 72 65 20 63 6f 6d 6d 65 6e 74 20 64 t.when-first.do.future.comment.d
c320 6f 74 6f 20 6c 6f 63 6b 69 6e 67 20 70 72 6f 78 79 20 28 32 20 6e 69 6c 20 6e 69 6c 20 28 3a 64 oto.locking.proxy.(2.nil.nil.(:d
c340 65 66 6e 29 29 20 61 73 2d 3e 20 66 64 65 66 20 72 65 69 66 79 20 28 3a 64 65 66 6e 20 28 31 29 efn)).as->.fdef.reify.(:defn.(1)
c360 29 20 64 65 66 74 79 70 65 20 28 32 20 6e 69 6c 20 6e 69 6c 20 28 3a 64 65 66 6e 29 29 20 64 65 ).deftype.(2.nil.nil.(:defn)).de
c380 66 72 65 63 6f 72 64 20 28 32 20 6e 69 6c 20 6e 69 6c 20 28 3a 64 65 66 6e 29 29 20 64 65 66 70 frecord.(2.nil.nil.(:defn)).defp
c3a0 72 6f 74 6f 63 6f 6c 20 28 31 20 28 3a 64 65 66 6e 29 29 20 64 65 66 69 6e 74 65 72 66 61 63 65 rotocol.(1.(:defn)).definterface
c3c0 20 28 31 20 28 3a 64 65 66 6e 29 29 20 65 78 74 65 6e 64 20 65 78 74 65 6e 64 2d 70 72 6f 74 6f .(1.(:defn)).extend.extend-proto
c3e0 63 6f 6c 20 28 31 20 3a 64 65 66 6e 29 20 65 78 74 65 6e 64 2d 74 79 70 65 20 28 31 20 3a 64 65 col.(1.:defn).extend-type.(1.:de
c400 66 6e 29 20 73 70 65 63 69 66 79 20 28 31 20 3a 64 65 66 6e 29 20 73 70 65 63 69 66 79 21 20 28 fn).specify.(1.:defn).specify!.(
c420 31 20 3a 64 65 66 6e 29 20 74 72 79 20 63 61 74 63 68 20 66 69 6e 61 6c 6c 79 20 6c 65 74 20 6c 1.:defn).try.catch.finally.let.l
c440 65 74 66 6e 20 28 31 20 28 28 3a 64 65 66 6e 29 29 20 6e 69 6c 29 20 62 69 6e 64 69 6e 67 20 6c etfn.(1.((:defn)).nil).binding.l
c460 6f 6f 70 20 66 6f 72 20 64 6f 73 65 71 20 64 6f 74 69 6d 65 73 20 77 68 65 6e 2d 6c 65 74 20 69 oop.for.doseq.dotimes.when-let.i
c480 66 2d 6c 65 74 20 77 68 65 6e 2d 73 6f 6d 65 20 69 66 2d 73 6f 6d 65 20 74 68 69 73 2d 61 73 20 f-let.when-some.if-some.this-as.
c4a0 64 65 66 6d 65 74 68 6f 64 20 74 65 73 74 69 6e 67 20 64 65 66 74 65 73 74 20 61 72 65 20 75 73 defmethod.testing.deftest.are.us
c4c0 65 2d 66 69 78 74 75 72 65 73 20 72 75 6e 20 72 75 6e 2a 20 66 72 65 73 68 20 61 6c 74 21 20 61 e-fixtures.run.run*.fresh.alt!.a
c4e0 6c 74 21 21 20 67 6f 20 67 6f 2d 6c 6f 6f 70 20 74 68 72 65 61 64 5d 20 38 29 0a 23 40 32 32 32 lt!!.go.go-loop.thread].8).#@222
c500 20 52 65 74 75 72 6e 20 74 68 65 20 70 6f 73 69 74 69 6f 6e 20 6f 66 20 74 68 65 20 22 20 74 68 .Return.the.position.of.the.".th
c520 61 74 20 62 65 67 69 6e 73 20 74 68 65 20 73 74 72 69 6e 67 20 61 74 20 70 6f 69 6e 74 2e 0a 49 at.begins.the.string.at.point..I
c540 66 20 52 45 47 45 58 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 72 65 74 75 72 6e 20 74 68 65 20 70 f.REGEX.is.non-nil,.return.the.p
c560 6f 73 69 74 69 6f 6e 20 6f 66 20 74 68 65 20 23 20 74 68 61 74 20 62 65 67 69 6e 73 20 74 68 65 osition.of.the.#.that.begins.the
c580 0a 72 65 67 65 78 20 61 74 20 70 6f 69 6e 74 2e 20 20 49 66 20 70 6f 69 6e 74 20 69 73 20 6e 6f .regex.at.point...If.point.is.no
c5a0 74 20 69 6e 73 69 64 65 20 61 20 73 74 72 69 6e 67 20 6f 72 20 72 65 67 65 78 2c 20 72 65 74 75 t.inside.a.string.or.regex,.retu
c5c0 72 6e 0a 6e 69 6c 2e 0a 0a 28 66 6e 20 26 6f 70 74 69 6f 6e 61 6c 20 52 45 47 45 58 29 1f 0a 28 rn.nil...(fn.&optional.REGEX)..(
c5e0 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 73 74 72 69 6e 67 2d 73 74 61 72 74 20 23 defalias.'clojure-string-start.#
c600 5b 32 35 36 20 22 5c 33 30 30 5c 33 30 31 20 38 5c 32 30 35 53 00 5c 32 31 32 5c 33 30 32 20 5c [256."\300\301.8\205S.\212\302.\
c620 33 30 33 5c 33 30 34 5c 33 30 35 5c 33 30 36 5c 33 30 37 05 21 5c 33 31 30 5c 22 5c 33 30 30 24 303\304\305\306\307.!\310\"\300$
c640 5c 32 31 36 5c 33 31 31 5c 33 31 32 21 5c 32 31 30 5c 33 31 33 5c 32 32 34 5c 32 31 31 5c 32 30 \216\311\312!\210\313\224\211\20
c660 35 4d 00 02 5c 32 30 33 3f 00 5c 32 31 31 5c 32 30 36 29 00 60 53 66 5c 32 30 35 4d 00 5c 32 31 5M..\203?.\211\206).`Sf\205M.\21
c680 31 5c 32 30 36 33 00 60 53 66 5c 33 31 34 3d 5c 32 30 35 4d 00 5c 32 31 31 53 5c 32 30 32 4d 00 1\2063.`Sf\314=\205M.\211S\202M.
c6a0 5c 32 31 31 5c 32 30 36 44 00 60 53 66 5c 33 31 34 3d 3f 5c 32 30 35 4d 00 5c 32 31 31 5c 32 36 \211\206D.`Sf\314=?\205M.\211\26
c6c0 32 01 29 5c 32 36 32 01 29 5c 32 30 37 22 20 5b 33 20 73 79 6e 74 61 78 2d 70 70 73 73 20 6d 61 2.)\262.)\207".[3.syntax-ppss.ma
c6e0 74 63 68 2d 64 61 74 61 20 6d 61 6b 65 2d 62 79 74 65 2d 63 6f 64 65 20 30 20 22 5c 33 30 31 5c tch-data.make-byte-code.0."\301\
c700 33 30 30 5c 33 30 32 5c 22 5c 32 30 37 22 20 76 63 6f 6e 63 61 74 20 76 65 63 74 6f 72 20 5b 73 300\302\"\207".vconcat.vector.[s
c720 65 74 2d 6d 61 74 63 68 2d 64 61 74 61 20 65 76 61 70 6f 72 61 74 65 5d 20 72 65 2d 73 65 61 72 et-match-data.evaporate].re-sear
c740 63 68 2d 62 61 63 6b 77 61 72 64 20 22 5c 5c 28 5c 5c 73 2d 5c 5c 7c 5e 5c 5c 7c 23 5c 5c 7c 28 ch-backward."\\(\\s-\\|^\\|#\\|(
c760 5c 5c 7c 5c 5c 5b 5c 5c 7c 7b 5c 5c 29 5c 5c 28 5c 22 5c 5c 29 22 20 32 20 33 35 5d 20 38 20 28 \\|\\[\\|{\\)\\(\"\\)".2.35].8.(
c780 23 24 20 2e 20 35 30 34 33 33 29 5d 29 0a 23 40 35 31 20 52 65 74 75 72 6e 20 74 68 65 20 63 68 #$...50433)]).#@51.Return.the.ch
c7a0 61 72 20 61 74 20 70 6f 69 6e 74 20 6f 72 20 6e 69 6c 20 69 66 20 61 74 20 62 75 66 66 65 72 20 ar.at.point.or.nil.if.at.buffer.
c7c0 65 6e 64 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 63 68 61 72 2d 61 74 end...(defalias.'clojure-char-at
c7e0 2d 70 6f 69 6e 74 20 23 5b 30 20 22 60 64 55 3f 5c 32 30 35 5c 66 00 5c 33 30 30 60 60 54 5c 22 -point.#[0."`dU?\205\f.\300``T\"
c800 5c 32 30 37 22 20 5b 62 75 66 66 65 72 2d 73 75 62 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 \207".[buffer-substring-no-prope
c820 72 74 69 65 73 5d 20 33 20 28 23 24 20 2e 20 35 31 30 39 31 29 5d 29 0a 23 40 36 31 20 52 65 74 rties].3.(#$...51091)]).#@61.Ret
c840 75 72 6e 20 74 68 65 20 63 68 61 72 20 62 65 66 6f 72 65 20 70 6f 69 6e 74 20 6f 72 20 6e 69 6c urn.the.char.before.point.or.nil
c860 20 69 66 20 61 74 20 62 75 66 66 65 72 20 62 65 67 69 6e 6e 69 6e 67 2e 1f 0a 28 64 65 66 61 6c .if.at.buffer.beginning...(defal
c880 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 63 68 61 72 2d 62 65 66 6f 72 65 2d 70 6f 69 6e 74 20 23 ias.'clojure-char-before-point.#
c8a0 5b 30 20 22 60 65 55 3f 5c 32 30 35 5c 66 00 5c 33 30 30 60 60 53 5c 22 5c 32 30 37 22 20 5b 62 [0."`eU?\205\f.\300``S\"\207".[b
c8c0 75 66 66 65 72 2d 73 75 62 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 5d 20 33 uffer-substring-no-properties].3
c8e0 20 28 23 24 20 2e 20 35 31 32 36 31 29 5d 29 0a 23 40 36 32 20 43 6f 6e 76 65 72 74 20 74 68 65 .(#$...51261)]).#@62.Convert.the
c900 20 73 74 72 69 6e 67 20 6f 72 20 6b 65 79 77 6f 72 64 20 61 74 20 70 6f 69 6e 74 20 74 6f 20 6b .string.or.keyword.at.point.to.k
c920 65 79 77 6f 72 64 20 6f 72 20 73 74 72 69 6e 67 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c eyword.or.string...(defalias.'cl
c940 6f 6a 75 72 65 2d 74 6f 67 67 6c 65 2d 6b 65 79 77 6f 72 64 2d 73 74 72 69 6e 67 20 23 5b 30 20 ojure-toggle-keyword-string.#[0.
c960 22 60 60 5c 33 30 30 56 5c 32 30 33 21 00 5c 33 30 31 60 60 54 5c 22 5c 33 30 32 5c 32 33 32 5c "``\300V\203!.\301``T\"\302\232\
c980 32 30 34 21 00 5c 33 30 31 60 60 54 5c 22 5c 33 30 33 5c 32 33 32 5c 32 30 34 21 00 5c 33 30 34 204!.\301``T\"\303\232\204!.\304
c9a0 75 5c 32 31 30 5c 32 30 32 01 00 60 5c 33 30 30 5c 32 33 32 5c 32 30 33 2e 00 5c 33 30 35 5c 33 u\210\202..`\300\232\203..\305\3
c9c0 30 36 21 5c 32 31 30 5c 32 30 32 58 00 5c 33 30 31 60 60 54 5c 22 5c 33 30 32 5c 32 33 32 5c 32 06!\210\202X.\301``T\"\302\232\2
c9e0 30 33 44 00 5c 33 30 33 5c 33 30 37 20 5c 33 30 30 5c 33 30 34 4f 5c 32 36 31 02 5c 32 31 30 5c 03D.\303\307.\300\304O\261.\210\
ca00 32 30 32 58 00 5c 33 30 31 60 60 54 5c 22 5c 33 30 33 5c 32 33 32 5c 32 30 33 58 00 5c 33 30 32 202X.\301``T\"\303\232\203X.\302
ca20 5c 33 30 37 20 5c 33 30 30 5c 33 31 30 4f 5c 33 30 32 5c 32 36 31 03 5c 32 31 30 5c 32 31 31 62 \307.\300\310O\302\261.\210\211b
ca40 5c 32 30 37 22 20 5b 31 20 62 75 66 66 65 72 2d 73 75 62 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f \207".[1.buffer-substring-no-pro
ca60 70 65 72 74 69 65 73 20 22 5c 22 22 20 22 3a 22 20 2d 31 20 65 72 72 6f 72 20 22 42 65 67 69 6e perties."\"".":".-1.error."Begin
ca80 6e 69 6e 67 20 6f 66 20 66 69 6c 65 20 72 65 61 63 68 65 64 2c 20 74 68 69 73 20 77 61 73 20 70 ning.of.file.reached,.this.was.p
caa0 72 6f 62 61 62 6c 79 20 61 20 6d 69 73 74 61 6b 65 22 20 63 6c 6f 6a 75 72 65 2d 64 65 6c 65 74 robably.a.mistake".clojure-delet
cac0 65 2d 61 6e 64 2d 65 78 74 72 61 63 74 2d 73 65 78 70 20 6e 69 6c 5d 20 35 20 28 23 24 20 2e 20 e-and-extract-sexp.nil].5.(#$...
cae0 35 31 34 34 35 29 20 6e 69 6c 5d 29 0a 23 40 34 34 20 44 65 6c 65 74 65 20 74 68 65 20 73 75 72 51445).nil]).#@44.Delete.the.sur
cb00 72 6f 75 6e 64 69 6e 67 20 73 65 78 70 20 61 6e 64 20 72 65 74 75 72 6e 20 69 74 2e 1f 0a 28 64 rounding.sexp.and.return.it...(d
cb20 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 64 65 6c 65 74 65 2d 61 6e 64 2d 65 78 74 72 efalias.'clojure-delete-and-extr
cb40 61 63 74 2d 73 65 78 70 20 23 5b 30 20 22 60 5c 33 30 30 20 5c 32 31 30 5c 32 31 31 60 7b 01 60 act-sexp.#[0."`\300.\210\211`{.`
cb60 7c 5c 32 31 30 5c 32 31 31 5c 32 36 32 01 5c 32 30 37 22 20 5b 66 6f 72 77 61 72 64 2d 73 65 78 |\210\211\262.\207".[forward-sex
cb80 70 5d 20 34 20 28 23 24 20 2e 20 35 31 39 35 34 29 5d 29 0a 28 62 79 74 65 2d 63 6f 64 65 20 22 p].4.(#$...51954)]).(byte-code."
cba0 5c 33 30 30 5c 33 30 31 5c 33 30 32 5c 33 30 33 5c 33 30 34 44 44 5c 33 30 35 5c 33 30 36 5c 33 \300\301\302\303\304DD\305\306\3
cbc0 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 5b 63 75 73 74 6f 07\310\311\312\313&.\207".[custo
cbe0 6d 2d 64 65 63 6c 61 72 65 2d 76 61 72 69 61 62 6c 65 20 63 6c 6f 6a 75 72 65 2d 63 61 63 68 65 m-declare-variable.clojure-cache
cc00 2d 70 72 6f 6a 65 63 74 2d 64 69 72 20 66 75 6e 63 61 6c 6c 20 66 75 6e 63 74 69 6f 6e 20 23 5b -project-dir.funcall.function.#[
cc20 30 20 22 5c 33 30 30 5c 32 30 37 22 20 5b 74 5d 20 31 5d 20 22 57 68 65 74 68 65 72 20 74 6f 20 0."\300\207".[t].1]."Whether.to.
cc40 63 61 63 68 65 20 74 68 65 20 72 65 73 75 6c 74 73 20 6f 66 20 60 63 6c 6f 6a 75 72 65 2d 70 72 cache.the.results.of.`clojure-pr
cc60 6f 6a 65 63 74 2d 64 69 72 27 2e 22 20 3a 74 79 70 65 20 62 6f 6f 6c 65 61 6e 20 3a 73 61 66 65 oject-dir'.".:type.boolean.:safe
cc80 20 62 6f 6f 6c 65 61 6e 70 20 3a 70 61 63 6b 61 67 65 2d 76 65 72 73 69 6f 6e 20 28 63 6c 6f 6a .booleanp.:package-version.(cloj
cca0 75 72 65 2d 6d 6f 64 65 20 2e 20 22 35 2e 38 2e 30 22 29 5d 20 31 30 29 0a 23 40 35 38 20 41 20 ure-mode..."5.8.0")].10).#@58.A.
ccc0 70 72 6f 6a 65 63 74 20 64 69 72 20 63 61 63 68 65 20 75 73 65 64 20 74 6f 20 73 70 65 65 64 20 project.dir.cache.used.to.speed.
cce0 75 70 20 72 65 6c 61 74 65 64 20 6f 70 65 72 61 74 69 6f 6e 73 2e 1f 0a 28 64 65 66 76 61 72 20 up.related.operations...(defvar.
cd00 63 6c 6f 6a 75 72 65 2d 63 61 63 68 65 64 2d 70 72 6f 6a 65 63 74 2d 64 69 72 20 6e 69 6c 20 28 clojure-cached-project-dir.nil.(
cd20 23 24 20 2e 20 35 32 34 31 34 29 29 0a 28 6d 61 6b 65 2d 76 61 72 69 61 62 6c 65 2d 62 75 66 66 #$...52414)).(make-variable-buff
cd40 65 72 2d 6c 6f 63 61 6c 20 27 63 6c 6f 6a 75 72 65 2d 63 61 63 68 65 64 2d 70 72 6f 6a 65 63 74 er-local.'clojure-cached-project
cd60 2d 64 69 72 29 0a 23 40 33 31 35 20 52 65 74 75 72 6e 20 74 68 65 20 61 62 73 6f 6c 75 74 65 20 -dir).#@315.Return.the.absolute.
cd80 70 61 74 68 20 74 6f 20 74 68 65 20 70 72 6f 6a 65 63 74 27 73 20 72 6f 6f 74 20 64 69 72 65 63 path.to.the.project's.root.direc
cda0 74 6f 72 79 2e 0a 0a 43 61 6c 6c 20 69 73 20 64 65 6c 65 67 61 74 65 64 20 64 6f 77 6e 20 74 6f tory...Call.is.delegated.down.to
cdc0 20 60 63 6c 6f 6a 75 72 65 2d 70 72 6f 6a 65 63 74 2d 72 6f 6f 74 2d 66 75 6e 63 74 69 6f 6e 27 .`clojure-project-root-function'
cde0 20 77 69 74 68 0a 6f 70 74 69 6f 6e 61 6c 20 44 49 52 2d 4e 41 4d 45 20 61 73 20 61 72 67 75 6d .with.optional.DIR-NAME.as.argum
ce00 65 6e 74 2e 0a 0a 57 68 65 6e 20 60 63 6c 6f 6a 75 72 65 2d 63 61 63 68 65 2d 70 72 6f 6a 65 63 ent...When.`clojure-cache-projec
ce20 74 2d 64 69 72 27 20 69 73 20 74 20 74 68 65 20 72 65 73 75 6c 74 73 20 6f 66 20 74 68 65 20 63 t-dir'.is.t.the.results.of.the.c
ce40 6f 6d 6d 61 6e 64 0a 61 72 65 20 63 61 63 68 65 64 20 69 6e 20 61 20 62 75 66 66 65 72 20 6c 6f ommand.are.cached.in.a.buffer.lo
ce60 63 61 6c 20 76 61 72 69 61 62 6c 65 20 28 60 63 6c 6f 6a 75 72 65 2d 63 61 63 68 65 64 2d 70 72 cal.variable.(`clojure-cached-pr
ce80 6f 6a 65 63 74 2d 64 69 72 27 29 2e 0a 0a 28 66 6e 20 26 6f 70 74 69 6f 6e 61 6c 20 44 49 52 2d oject-dir')...(fn.&optional.DIR-
cea0 4e 41 4d 45 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 70 72 6f 6a 65 63 NAME)..(defalias.'clojure-projec
cec0 74 2d 64 69 72 20 23 5b 32 35 36 20 22 08 5c 32 30 36 07 00 09 01 21 5c 6e 5c 32 30 33 17 00 5c t-dir.#[256.".\206....!\n\203..\
cee0 33 30 33 5c 33 30 34 21 5c 32 30 33 17 00 08 5c 32 30 34 17 00 5c 32 31 31 10 5c 32 31 31 5c 32 303\304!\203...\204..\211.\211\2
cf00 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 63 61 63 68 65 64 2d 70 72 6f 6a 65 63 74 2d 64 69 72 20 07".[clojure-cached-project-dir.
cf20 63 6c 6f 6a 75 72 65 2d 70 72 6f 6a 65 63 74 2d 72 6f 6f 74 2d 66 75 6e 63 74 69 6f 6e 20 63 6c clojure-project-root-function.cl
cf40 6f 6a 75 72 65 2d 63 61 63 68 65 2d 70 72 6f 6a 65 63 74 2d 64 69 72 20 64 65 72 69 76 65 64 2d ojure-cache-project-dir.derived-
cf60 6d 6f 64 65 2d 70 20 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 5d 20 34 20 28 23 24 20 2e 20 35 32 35 mode-p.clojure-mode].4.(#$...525
cf80 38 38 29 5d 29 0a 23 40 31 37 35 20 52 65 74 75 72 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 70 88)]).#@175.Return.the.current.p
cfa0 72 6f 6a 65 63 74 20 61 73 20 61 20 63 6f 6e 73 20 63 65 6c 6c 20 75 73 61 62 6c 65 20 62 79 20 roject.as.a.cons.cell.usable.by.
cfc0 70 72 6f 6a 65 63 74 2e 65 6c 2e 0a 0a 43 61 6c 6c 20 69 73 20 64 65 6c 65 67 61 74 65 64 20 64 project.el...Call.is.delegated.d
cfe0 6f 77 6e 20 74 6f 20 60 63 6c 6f 6a 75 72 65 2d 63 6c 6f 6a 75 72 65 2d 64 69 72 27 20 77 69 74 own.to.`clojure-clojure-dir'.wit
d000 68 0a 6f 70 74 69 6f 6e 61 6c 20 44 49 52 2d 4e 41 4d 45 20 61 73 20 61 72 67 75 6d 65 6e 74 2e h.optional.DIR-NAME.as.argument.
d020 0a 0a 28 66 6e 20 26 6f 70 74 69 6f 6e 61 6c 20 44 49 52 2d 4e 41 4d 45 29 1f 0a 28 64 65 66 61 ..(fn.&optional.DIR-NAME)..(defa
d040 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 63 75 72 72 65 6e 74 2d 70 72 6f 6a 65 63 74 20 23 5b lias.'clojure-current-project.#[
d060 32 35 36 20 22 5c 33 30 30 01 21 5c 32 31 31 5c 32 30 35 5c 6e 00 5c 33 30 31 01 42 5c 32 30 37 256."\300.!\211\205\n.\301.B\207
d080 22 20 5b 63 6c 6f 6a 75 72 65 2d 70 72 6f 6a 65 63 74 2d 64 69 72 20 63 6c 6f 6a 75 72 65 5d 20 ".[clojure-project-dir.clojure].
d0a0 34 20 28 23 24 20 2e 20 35 33 31 33 32 29 5d 29 0a 23 40 31 36 35 20 52 65 74 75 72 6e 20 74 68 4.(#$...53132)]).#@165.Return.th
d0c0 65 20 61 62 73 6f 6c 75 74 65 20 70 61 74 68 20 74 6f 20 74 68 65 20 70 72 6f 6a 65 63 74 27 73 e.absolute.path.to.the.project's
d0e0 20 72 6f 6f 74 20 64 69 72 65 63 74 6f 72 79 2e 0a 0a 55 73 65 20 60 64 65 66 61 75 6c 74 2d 64 .root.directory...Use.`default-d
d100 69 72 65 63 74 6f 72 79 27 20 69 66 20 44 49 52 2d 4e 41 4d 45 20 69 73 20 6e 69 6c 2e 0a 52 65 irectory'.if.DIR-NAME.is.nil..Re
d120 74 75 72 6e 20 6e 69 6c 20 69 66 20 6e 6f 74 20 69 6e 73 69 64 65 20 61 20 70 72 6f 6a 65 63 74 turn.nil.if.not.inside.a.project
d140 2e 0a 0a 28 66 6e 20 26 6f 70 74 69 6f 6e 61 6c 20 44 49 52 2d 4e 41 4d 45 29 1f 0a 28 64 65 66 ...(fn.&optional.DIR-NAME)..(def
d160 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 70 72 6f 6a 65 63 74 2d 72 6f 6f 74 2d 70 61 74 68 alias.'clojure-project-root-path
d180 20 23 5b 32 35 36 20 22 5c 32 31 31 5c 32 30 36 05 00 08 5c 33 30 32 5c 33 30 33 5c 33 30 34 5c .#[256."\211\206...\302\303\304\
d1a0 33 30 35 5c 33 30 36 5c 33 30 37 5c 33 31 30 5c 33 31 31 06 08 21 5c 33 31 32 5c 22 5c 33 31 33 305\306\307\310\311..!\312\"\313
d1c0 5c 33 31 34 25 09 5c 22 5c 22 5c 32 31 31 47 5c 33 31 35 56 5c 32 30 35 24 00 5c 33 31 36 01 5c \314%.\"\"\211G\315V\205$.\316.\
d1e0 33 31 37 5c 22 40 5c 32 30 37 22 20 5b 64 65 66 61 75 6c 74 2d 64 69 72 65 63 74 6f 72 79 20 63 317\"@\207".[default-directory.c
d200 6c 6f 6a 75 72 65 2d 62 75 69 6c 64 2d 74 6f 6f 6c 2d 66 69 6c 65 73 20 64 65 6c 71 20 6e 69 6c lojure-build-tool-files.delq.nil
d220 20 6d 61 70 63 61 72 20 6d 61 6b 65 2d 62 79 74 65 2d 63 6f 64 65 20 32 35 37 20 22 5c 33 30 31 .mapcar.make-byte-code.257."\301
d240 5c 33 30 30 02 5c 22 5c 32 30 37 22 20 76 63 6f 6e 63 61 74 20 76 65 63 74 6f 72 20 5b 6c 6f 63 \300.\"\207".vconcat.vector.[loc
d260 61 74 65 2d 64 6f 6d 69 6e 61 74 69 6e 67 2d 66 69 6c 65 5d 20 34 20 22 5c 6e 5c 6e 28 66 6e 20 ate-dominating-file].4."\n\n(fn.
d280 46 4e 41 4d 45 29 22 20 30 20 73 6f 72 74 20 66 69 6c 65 2d 69 6e 2d 64 69 72 65 63 74 6f 72 79 FNAME)".0.sort.file-in-directory
d2a0 2d 70 5d 20 31 31 20 28 23 24 20 2e 20 35 33 34 33 31 29 5d 29 0a 23 40 37 32 20 44 65 6e 6f 72 -p].11.(#$...53431)]).#@72.Denor
d2c0 6d 61 6c 69 7a 65 20 50 41 54 48 20 62 79 20 6d 61 6b 69 6e 67 20 69 74 20 72 65 6c 61 74 69 76 malize.PATH.by.making.it.relativ
d2e0 65 20 74 6f 20 74 68 65 20 70 72 6f 6a 65 63 74 20 72 6f 6f 74 2e 0a 0a 28 66 6e 20 50 41 54 48 e.to.the.project.root...(fn.PATH
d300 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 70 72 6f 6a 65 63 74 2d 72 65 )..(defalias.'clojure-project-re
d320 6c 61 74 69 76 65 2d 70 61 74 68 20 23 5b 32 35 37 20 22 5c 33 30 30 01 5c 33 30 31 20 5c 22 5c lative-path.#[257."\300.\301.\"\
d340 32 30 37 22 20 5b 66 69 6c 65 2d 72 65 6c 61 74 69 76 65 2d 6e 61 6d 65 20 63 6c 6f 6a 75 72 65 207".[file-relative-name.clojure
d360 2d 70 72 6f 6a 65 63 74 2d 64 69 72 5d 20 34 20 28 23 24 20 2e 20 35 33 39 34 37 29 5d 29 0a 23 -project-dir].4.(#$...53947)]).#
d380 40 31 37 35 20 52 65 74 75 72 6e 20 74 68 65 20 6e 61 6d 65 73 70 61 63 65 20 6d 61 74 63 68 69 @175.Return.the.namespace.matchi
d3a0 6e 67 20 50 41 54 48 2e 0a 0a 50 41 54 48 20 69 73 20 65 78 70 65 63 74 65 64 20 74 6f 20 62 65 ng.PATH...PATH.is.expected.to.be
d3c0 20 61 6e 20 61 62 73 6f 6c 75 74 65 20 66 69 6c 65 20 70 61 74 68 2e 0a 0a 49 66 20 50 41 54 48 .an.absolute.file.path...If.PATH
d3e0 20 69 73 20 6e 69 6c 2c 20 75 73 65 20 74 68 65 20 70 61 74 68 20 74 6f 20 74 68 65 20 66 69 6c .is.nil,.use.the.path.to.the.fil
d400 65 20 62 61 63 6b 69 6e 67 20 74 68 65 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 2e 0a 0a 28 e.backing.the.current.buffer...(
d420 66 6e 20 26 6f 70 74 69 6f 6e 61 6c 20 50 41 54 48 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 fn.&optional.PATH)..(defalias.'c
d440 6c 6f 6a 75 72 65 2d 65 78 70 65 63 74 65 64 2d 6e 73 20 23 5b 32 35 36 20 22 5c 32 31 31 5c 32 lojure-expected-ns.#[256."\211\2
d460 30 36 08 00 5c 33 30 30 5c 33 30 31 20 21 5c 33 30 32 01 21 5c 32 31 31 5c 33 30 33 5c 33 30 34 06..\300\301.!\302.!\211\303\304
d480 04 5c 33 30 35 5c 22 47 5b 4f 5c 33 30 36 5c 33 30 37 5c 33 31 30 03 5c 33 31 31 5c 22 41 5c 33 .\305\"G[O\306\307\310.\311\"A\3
d4a0 31 32 23 5c 33 31 33 5c 33 31 34 5c 33 31 35 03 23 5c 33 31 33 5c 33 31 36 5c 33 31 37 03 23 5c 12#\313\314\315.#\313\316\317.#\
d4c0 32 30 37 22 20 5b 66 69 6c 65 2d 74 72 75 65 6e 61 6d 65 20 62 75 66 66 65 72 2d 66 69 6c 65 2d 207".[file-truename.buffer-file-
d4e0 6e 61 6d 65 20 63 6c 6f 6a 75 72 65 2d 70 72 6f 6a 65 63 74 2d 72 65 6c 61 74 69 76 65 2d 70 61 name.clojure-project-relative-pa
d500 74 68 20 30 20 66 69 6c 65 2d 6e 61 6d 65 2d 65 78 74 65 6e 73 69 6f 6e 20 74 20 6d 61 70 63 6f th.0.file-name-extension.t.mapco
d520 6e 63 61 74 20 69 64 65 6e 74 69 74 79 20 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 22 2f 22 20 22 ncat.identity.split-string."/"."
d540 2e 22 20 72 65 70 6c 61 63 65 2d 72 65 67 65 78 70 2d 69 6e 2d 73 74 72 69 6e 67 20 22 5f 22 20 .".replace-regexp-in-string."_".
d560 22 2d 22 20 22 5c 5c 60 63 6c 6a 5b 73 63 78 5d 3f 5c 5c 2e 22 20 22 22 5d 20 31 30 20 28 23 24 "-"."\\`clj[scx]?\\.".""].10.(#$
d580 20 2e 20 35 34 31 34 39 29 5d 29 0a 23 40 33 35 20 49 6e 73 65 72 74 20 61 20 6e 61 6d 65 73 70 ...54149)]).#@35.Insert.a.namesp
d5a0 61 63 65 20 66 6f 72 6d 20 61 74 20 70 6f 69 6e 74 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 ace.form.at.point...(defalias.'c
d5c0 6c 6f 6a 75 72 65 2d 69 6e 73 65 72 74 2d 6e 73 2d 66 6f 72 6d 2d 61 74 2d 70 6f 69 6e 74 20 23 lojure-insert-ns-form-at-point.#
d5e0 5b 30 20 22 5c 33 30 31 5c 33 30 32 08 20 5c 22 63 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d [0."\301\302..\"c\207".[clojure-
d600 65 78 70 65 63 74 65 64 2d 6e 73 2d 66 75 6e 63 74 69 6f 6e 20 66 6f 72 6d 61 74 20 22 28 6e 73 expected-ns-function.format."(ns
d620 20 25 73 29 22 5d 20 33 20 28 23 24 20 2e 20 35 34 36 37 33 29 20 6e 69 6c 5d 29 0a 23 40 35 37 .%s)"].3.(#$...54673).nil]).#@57
d640 20 49 6e 73 65 72 74 20 61 20 6e 61 6d 65 73 70 61 63 65 20 66 6f 72 6d 20 61 74 20 74 68 65 20 .Insert.a.namespace.form.at.the.
d660 62 65 67 69 6e 6e 69 6e 67 20 6f 66 20 74 68 65 20 62 75 66 66 65 72 2e 1f 0a 28 64 65 66 61 6c beginning.of.the.buffer...(defal
d680 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 69 6e 73 65 72 74 2d 6e 73 2d 66 6f 72 6d 20 23 5b 30 20 ias.'clojure-insert-ns-form.#[0.
d6a0 22 7e 5c 32 31 30 65 62 5c 32 31 30 5c 33 30 30 20 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d "~\210eb\210\300.\207".[clojure-
d6c0 69 6e 73 65 72 74 2d 6e 73 2d 66 6f 72 6d 2d 61 74 2d 70 6f 69 6e 74 5d 20 31 20 28 23 24 20 2e insert-ns-form-at-point].1.(#$..
d6e0 20 35 34 38 34 39 29 20 6e 69 6c 5d 29 0a 23 40 38 30 20 55 70 64 61 74 65 20 74 68 65 20 6e 61 .54849).nil]).#@80.Update.the.na
d700 6d 65 73 70 61 63 65 20 6f 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 2e 0a 55 mespace.of.the.current.buffer..U
d720 73 65 66 75 6c 20 69 66 20 61 20 66 69 6c 65 20 68 61 73 20 62 65 65 6e 20 72 65 6e 61 6d 65 64 seful.if.a.file.has.been.renamed
d740 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 75 70 64 61 74 65 2d 6e 73 20 ...(defalias.'clojure-update-ns.
d760 23 5b 30 20 22 08 20 5c 32 31 31 5c 32 30 35 34 00 5c 32 31 32 5c 33 30 32 20 5c 33 30 33 5c 33 #[0."..\211\2054.\212\302.\303\3
d780 30 34 5c 33 30 35 5c 33 30 36 5c 33 30 37 05 21 5c 33 31 30 5c 22 5c 33 31 31 24 5c 32 31 36 5c 04\305\306\307.!\310\"\311$\216\
d7a0 33 31 32 20 5c 32 30 33 2d 00 5c 33 31 33 02 5c 33 31 34 5c 32 31 31 5c 32 31 31 5c 33 31 35 25 312.\203-.\313.\314\211\211\315%
d7c0 5c 32 31 30 5c 33 31 36 5c 33 31 37 03 5c 22 5c 32 31 30 01 5c 32 31 31 11 5c 32 30 32 30 00 5c \210\316\317.\"\210.\211.\2020.\
d7e0 33 32 30 5c 33 32 31 21 29 5c 32 36 32 01 29 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 65 78 320\321!)\262.)\207".[clojure-ex
d800 70 65 63 74 65 64 2d 6e 73 2d 66 75 6e 63 74 69 6f 6e 20 63 6c 6f 6a 75 72 65 2d 63 61 63 68 65 pected-ns-function.clojure-cache
d820 64 2d 6e 73 20 6d 61 74 63 68 2d 64 61 74 61 20 6d 61 6b 65 2d 62 79 74 65 2d 63 6f 64 65 20 30 d-ns.match-data.make-byte-code.0
d840 20 22 5c 33 30 31 5c 33 30 30 5c 33 30 32 5c 22 5c 32 30 37 22 20 76 63 6f 6e 63 61 74 20 76 65 ."\301\300\302\"\207".vconcat.ve
d860 63 74 6f 72 20 5b 73 65 74 2d 6d 61 74 63 68 2d 64 61 74 61 20 65 76 61 70 6f 72 61 74 65 5d 20 ctor.[set-match-data.evaporate].
d880 33 20 63 6c 6f 6a 75 72 65 2d 66 69 6e 64 2d 6e 73 20 72 65 70 6c 61 63 65 2d 6d 61 74 63 68 20 3.clojure-find-ns.replace-match.
d8a0 6e 69 6c 20 34 20 6d 65 73 73 61 67 65 20 22 6e 73 20 66 6f 72 6d 20 75 70 64 61 74 65 64 20 74 nil.4.message."ns.form.updated.t
d8c0 6f 20 60 25 73 27 22 20 75 73 65 72 2d 65 72 72 6f 72 20 22 43 61 6e 27 74 20 66 69 6e 64 20 6e o.`%s'".user-error."Can't.find.n
d8e0 73 20 66 6f 72 6d 22 5d 20 38 20 28 23 24 20 2e 20 35 35 30 32 37 29 20 6e 69 6c 5d 29 0a 23 40 s.form"].8.(#$...55027).nil]).#@
d900 32 32 37 20 53 6f 72 74 20 73 65 78 70 73 20 62 65 74 77 65 65 6e 20 70 6f 69 6e 74 20 61 6e 64 227.Sort.sexps.between.point.and
d920 20 65 6e 64 20 6f 66 20 63 75 72 72 65 6e 74 20 73 65 78 70 2e 0a 43 6f 6d 6d 65 6e 74 73 20 61 .end.of.current.sexp..Comments.a
d940 74 20 74 68 65 20 73 74 61 72 74 20 6f 66 20 61 20 6c 69 6e 65 20 61 72 65 20 63 6f 6e 73 69 64 t.the.start.of.a.line.are.consid
d960 65 72 65 64 20 70 61 72 74 20 6f 66 20 74 68 65 0a 66 6f 6c 6c 6f 77 69 6e 67 20 73 65 78 70 2e ered.part.of.the.following.sexp.
d980 20 20 43 6f 6d 6d 65 6e 74 73 20 61 74 20 74 68 65 20 65 6e 64 20 6f 66 20 61 20 6c 69 6e 65 20 ..Comments.at.the.end.of.a.line.
d9a0 28 61 66 74 65 72 20 73 6f 6d 65 20 6f 74 68 65 72 0a 63 6f 6e 74 65 6e 74 29 20 61 72 65 20 63 (after.some.other.content).are.c
d9c0 6f 6e 73 69 64 65 72 65 64 20 70 61 72 74 20 6f 66 20 74 68 65 20 70 72 65 63 65 64 69 6e 67 20 onsidered.part.of.the.preceding.
d9e0 73 65 78 70 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 2d 73 6f 72 74 2d sexp...(defalias.'clojure--sort-
da00 66 6f 6c 6c 6f 77 69 6e 67 2d 73 65 78 70 73 20 23 5b 30 20 22 5c 32 31 34 60 5c 32 31 32 5c 33 following-sexps.#[0."\214`\212\3
da20 30 30 20 5c 32 31 30 60 53 29 7d 5c 32 31 30 5c 33 30 31 5c 33 30 32 77 5c 32 31 30 5c 33 30 33 00.\210`S)}\210\301\302w\210\303
da40 5c 33 30 32 5c 33 30 34 5c 33 30 35 5c 33 30 36 5c 33 30 37 25 5c 32 31 30 64 62 5c 32 31 30 5c \302\304\305\306\307%\210db\210\
da60 33 31 30 5c 33 31 31 65 60 5c 22 38 5c 32 30 35 25 00 5c 33 31 32 63 29 5c 32 30 37 22 20 5b 75 310\311e`\"8\205%.\312c)\207".[u
da80 70 2d 6c 69 73 74 20 22 0d 5c 6e 5b 3a 62 6c 61 6e 6b 3a 5d 22 20 6e 69 6c 20 73 6f 72 74 2d 73 p-list.".\n[:blank:]".nil.sort-s
daa0 75 62 72 20 23 5b 30 20 22 5c 33 30 30 5c 33 30 31 77 5c 32 30 37 22 20 5b 22 0d 5c 6e 5b 3a 62 ubr.#[0."\300\301w\207".[".\n[:b
dac0 6c 61 6e 6b 3a 5d 22 20 6e 69 6c 5d 20 32 5d 20 23 5b 30 20 22 5c 33 30 30 31 5c 6e 00 5c 33 30 lank:]".nil].2].#[0."\3001\n.\30
dae0 31 20 5c 32 31 30 5c 32 30 32 04 00 5c 32 31 30 5c 33 30 32 5c 33 30 33 21 5c 32 30 34 14 00 5c 1.\210\202..\210\302\303!\204..\
db00 33 30 34 20 5c 32 31 30 5c 33 30 35 5c 33 30 36 21 5c 32 30 37 22 20 5b 28 73 63 61 6e 2d 65 72 304.\210\305\306!\207".[(scan-er
db20 72 6f 72 29 20 75 70 2d 6c 69 73 74 20 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 5c 5c 73 2d 5c 5c 7c ror).up-list.looking-at."\\s-\\|
db40 24 22 20 63 6c 6f 6a 75 72 65 2d 66 6f 72 77 61 72 64 2d 6c 6f 67 69 63 61 6c 2d 73 65 78 70 20 $".clojure-forward-logical-sexp.
db60 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 2d 72 65 67 65 78 70 20 22 24 22 5d 20 32 5d 20 23 5b search-forward-regexp."$"].2].#[
db80 30 20 22 5c 33 30 30 20 5c 32 31 30 5c 33 30 31 5c 33 30 32 77 5c 32 31 30 5c 33 30 33 20 5c 32 0."\300.\210\301\302w\210\303.\2
dba0 31 30 5c 33 30 34 5c 33 30 35 21 5c 32 31 30 5c 33 30 32 5c 32 30 37 22 20 5b 63 6f 6d 6d 65 6e 10\304\305!\210\302\207".[commen
dbc0 74 2d 66 6f 72 77 61 72 64 20 22 5b 3a 62 6c 61 6e 6b 3a 5d 5c 6e 0d 5b 28 22 20 6e 69 6c 20 63 t-forward."[:blank:]\n.[(".nil.c
dbe0 6c 6f 6a 75 72 65 2d 66 6f 72 77 61 72 64 2d 6c 6f 67 69 63 61 6c 2d 73 65 78 70 20 66 6f 72 77 lojure-forward-logical-sexp.forw
dc00 61 72 64 2d 73 65 78 70 20 2d 31 5d 20 32 5d 20 23 5b 30 20 22 5c 33 30 30 20 5c 32 30 37 22 20 ard-sexp.-1].2].#[0."\300.\207".
dc20 5b 63 6c 6f 6a 75 72 65 2d 66 6f 72 77 61 72 64 2d 6c 6f 67 69 63 61 6c 2d 73 65 78 70 5d 20 31 [clojure-forward-logical-sexp].1
dc40 5d 20 34 20 70 61 72 73 65 2d 70 61 72 74 69 61 6c 2d 73 65 78 70 20 22 5c 6e 22 5d 20 36 20 28 ].4.parse-partial-sexp."\n"].6.(
dc60 23 24 20 2e 20 35 35 35 35 36 29 5d 29 0a 23 40 34 37 20 49 6e 74 65 72 6e 61 6c 6c 79 20 73 6f #$...55556)]).#@47.Internally.so
dc80 72 74 20 65 61 63 68 20 73 65 78 70 20 69 6e 73 69 64 65 20 74 68 65 20 6e 73 20 66 6f 72 6d 2e rt.each.sexp.inside.the.ns.form.
dca0 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 73 6f 72 74 2d 6e 73 20 23 5b 30 ..(defalias.'clojure-sort-ns.#[0
dcc0 20 22 5c 33 30 30 20 5c 32 31 30 5c 33 30 31 20 5c 32 30 33 5a 00 5c 32 31 32 5c 33 30 32 5c 32 ."\300.\210\301.\203Z.\212\302\2
dce0 32 34 62 5c 32 31 30 5c 33 30 33 20 5c 32 31 30 60 5c 33 30 34 5c 33 30 35 5c 33 30 36 21 5c 32 24b\210\303.\210`\304\305\306!\2
dd00 31 30 01 60 7b 5c 32 36 32 01 5c 33 30 37 75 5c 32 31 30 5c 33 30 35 5c 33 30 37 21 5c 32 31 30 10.`{\262.\307u\210\305\307!\210
dd20 5c 33 31 30 5c 33 31 31 21 5c 32 30 33 37 00 5c 32 31 32 5c 33 30 36 75 5c 32 31 30 5c 33 30 35 \310\311!\2037.\212\306u\210\305
dd40 5c 33 30 36 21 5c 32 31 30 5c 33 31 32 20 5c 32 31 30 29 5c 32 30 32 1e 00 01 62 5c 32 31 30 5c \306!\210\312.\210)\202...b\210\
dd60 33 31 30 5c 33 31 33 02 21 21 5c 32 30 33 48 00 5c 33 31 34 5c 33 31 35 21 5c 32 30 32 56 00 5c 310\313.!!\203H.\314\315!\202V.\
dd80 33 31 36 5c 33 31 37 21 5c 32 31 30 5c 33 30 33 20 5c 32 31 30 5c 33 31 34 5c 33 32 30 21 5c 32 316\317!\210\303.\210\314\320!\2
dda0 31 30 5c 33 31 36 5c 33 32 31 21 5c 32 36 36 5c 32 30 32 29 5c 32 30 37 5c 33 32 32 5c 33 32 33 10\316\321!\266\202)\207\322\323
ddc0 21 5c 32 30 37 22 20 5b 63 6f 6d 6d 65 6e 74 2d 6e 6f 72 6d 61 6c 69 7a 65 2d 76 61 72 73 20 63 !\207".[comment-normalize-vars.c
dde0 6c 6f 6a 75 72 65 2d 66 69 6e 64 2d 6e 73 20 30 20 72 65 64 69 73 70 6c 61 79 20 6e 69 6c 20 66 lojure-find-ns.0.redisplay.nil.f
de00 6f 72 77 61 72 64 2d 73 65 78 70 20 31 20 2d 31 20 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 28 3a 5b orward-sexp.1.-1.looking-at."(:[
de20 61 2d 7a 5d 22 20 63 6c 6f 6a 75 72 65 2d 2d 73 6f 72 74 2d 66 6f 6c 6c 6f 77 69 6e 67 2d 73 65 a-z]".clojure--sort-following-se
de40 78 70 73 20 72 65 67 65 78 70 2d 71 75 6f 74 65 20 6d 65 73 73 61 67 65 20 22 6e 73 20 66 6f 72 xps.regexp-quote.message."ns.for
de60 6d 20 69 73 20 61 6c 72 65 61 64 79 20 73 6f 72 74 65 64 22 20 73 6c 65 65 70 2d 66 6f 72 20 30 m.is.already.sorted".sleep-for.0
de80 2e 31 20 22 6e 73 20 66 6f 72 6d 20 68 61 73 20 62 65 65 6e 20 73 6f 72 74 65 64 22 20 30 2e 31 .1."ns.form.has.been.sorted".0.1
dea0 20 75 73 65 72 2d 65 72 72 6f 72 20 22 43 61 6e 27 74 20 66 69 6e 64 20 6e 73 20 66 6f 72 6d 22 .user-error."Can't.find.ns.form"
dec0 5d 20 35 20 28 23 24 20 2e 20 35 36 34 33 35 29 20 6e 69 6c 5d 29 0a 28 64 65 66 63 6f 6e 73 74 ].5.(#$...56435).nil]).(defconst
dee0 20 63 6c 6f 6a 75 72 65 2d 6e 61 6d 65 73 70 61 63 65 2d 6e 61 6d 65 2d 72 65 67 65 78 20 22 5e .clojure-namespace-name-regex."^
df00 28 5c 5c 28 63 6c 6f 6a 75 72 65 2e 63 6f 72 65 2f 5c 5c 29 3f 5c 5c 28 69 6e 2d 5c 5c 29 3f 6e (\\(clojure.core/\\)?\\(in-\\)?n
df20 73 5c 5c 2b 3f 5b 5c 6e 5b 3a 73 70 61 63 65 3a 5d 5d 2b 5c 5c 28 3f 3a 5c 5c 28 3f 3a 5c 5c 28 s\\+?[\n[:space:]]+\\(?:\\(?:\\(
df40 23 3f 5c 5c 5e 7b 5b 5e 7d 5d 2a 7d 5c 5c 29 5c 5c 7c 5c 5c 28 3f 3a 5c 5c 5e 3a 5b 5e 5b 3a 73 #?\\^{[^}]*}\\)\\|\\(?:\\^:[^[:s
df60 70 61 63 65 3a 5d 5d 2b 5c 5c 29 2a 5c 5c 29 5b 5c 6e 5b 3a 73 70 61 63 65 3a 5d 5d 2b 5c 5c 29 pace:]]+\\)*\\)[\n[:space:]]+\\)
df80 2a 5b 27 3a 5d 3f 5c 5c 28 5b 5e 5c 22 28 29 5b 3a 73 70 61 63 65 3a 5d 5d 2b 5c 5c 5f 3e 5c 5c *[':]?\\([^\"()[:space:]]+\\_>\\
dfa0 29 22 29 0a 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 30 5c 33 30 31 5c 33 30 32 5c 33 30 33 )").(byte-code."\300\301\302\303
dfc0 5c 33 30 34 44 44 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 \304DD\305\306\307\310\311\312\3
dfe0 31 33 26 09 5c 32 30 37 22 20 5b 63 75 73 74 6f 6d 2d 64 65 63 6c 61 72 65 2d 76 61 72 69 61 62 13&.\207".[custom-declare-variab
e000 6c 65 20 63 6c 6f 6a 75 72 65 2d 63 61 63 68 65 2d 6e 73 20 66 75 6e 63 61 6c 6c 20 66 75 6e 63 le.clojure-cache-ns.funcall.func
e020 74 69 6f 6e 20 23 5b 30 20 22 5c 33 30 30 5c 32 30 37 22 20 5b 6e 69 6c 5d 20 31 5d 20 22 57 68 tion.#[0."\300\207".[nil].1]."Wh
e040 65 74 68 65 72 20 74 6f 20 63 61 63 68 65 20 74 68 65 20 72 65 73 75 6c 74 73 20 6f 66 20 60 63 ether.to.cache.the.results.of.`c
e060 6c 6f 6a 75 72 65 2d 66 69 6e 64 2d 6e 73 27 2e 5c 6e 5c 6e 4e 6f 74 65 20 74 68 61 74 20 74 68 lojure-find-ns'.\n\nNote.that.th
e080 69 73 20 77 6f 6e 27 74 20 77 6f 72 6b 20 77 65 6c 6c 20 69 6e 20 62 75 66 66 65 72 73 20 77 69 is.won't.work.well.in.buffers.wi
e0a0 74 68 20 6d 75 6c 74 69 70 6c 65 20 6e 61 6d 65 73 70 61 63 65 5c 6e 64 65 63 6c 61 72 61 74 69 th.multiple.namespace\ndeclarati
e0c0 6f 6e 73 20 28 77 68 69 63 68 20 72 61 72 65 6c 79 20 6f 63 63 75 72 20 69 6e 20 70 72 61 63 74 ons.(which.rarely.occur.in.pract
e0e0 69 63 65 29 20 61 6e 64 20 79 6f 75 27 6c 6c 5c 6e 68 61 76 65 20 74 6f 20 69 6e 76 61 6c 69 64 ice).and.you'll\nhave.to.invalid
e100 61 74 65 20 74 68 69 73 20 6d 61 6e 75 61 6c 6c 79 20 61 66 74 65 72 20 63 68 61 6e 67 69 6e 67 ate.this.manually.after.changing
e120 20 74 68 65 20 6e 73 20 66 6f 72 5c 6e 61 20 62 75 66 66 65 72 2e 20 20 49 66 20 79 6f 75 20 75 .the.ns.for\na.buffer...If.you.u
e140 70 64 61 74 65 20 74 68 65 20 6e 73 20 75 73 69 6e 67 20 60 63 6c 6f 6a 75 72 65 2d 75 70 64 61 pdate.the.ns.using.`clojure-upda
e160 74 65 2d 6e 73 27 5c 6e 74 68 65 20 63 61 63 68 65 64 20 76 61 6c 75 65 20 77 69 6c 6c 20 62 65 te-ns'\nthe.cached.value.will.be
e180 20 75 70 64 61 74 65 64 20 61 75 74 6f 6d 61 74 69 63 61 6c 6c 79 2e 22 20 3a 74 79 70 65 20 62 .updated.automatically.".:type.b
e1a0 6f 6f 6c 65 61 6e 20 3a 73 61 66 65 20 62 6f 6f 6c 65 61 6e 70 20 3a 70 61 63 6b 61 67 65 2d 76 oolean.:safe.booleanp.:package-v
e1c0 65 72 73 69 6f 6e 20 28 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 20 2e 20 22 35 2e 38 2e 30 22 29 5d ersion.(clojure-mode..."5.8.0")]
e1e0 20 31 30 29 0a 23 40 35 39 20 41 20 62 75 66 66 65 72 20 6e 73 20 63 61 63 68 65 20 75 73 65 64 .10).#@59.A.buffer.ns.cache.used
e200 20 74 6f 20 73 70 65 65 64 20 75 70 20 6e 73 2d 72 65 6c 61 74 65 64 20 6f 70 65 72 61 74 69 6f .to.speed.up.ns-related.operatio
e220 6e 73 2e 1f 0a 28 64 65 66 76 61 72 20 63 6c 6f 6a 75 72 65 2d 63 61 63 68 65 64 2d 6e 73 20 6e ns...(defvar.clojure-cached-ns.n
e240 69 6c 20 28 23 24 20 2e 20 35 37 38 33 34 29 29 0a 28 6d 61 6b 65 2d 76 61 72 69 61 62 6c 65 2d il.(#$...57834)).(make-variable-
e260 62 75 66 66 65 72 2d 6c 6f 63 61 6c 20 27 63 6c 6f 6a 75 72 65 2d 63 61 63 68 65 64 2d 6e 73 29 buffer-local.'clojure-cached-ns)
e280 0a 23 40 32 34 35 20 52 65 74 75 72 6e 20 74 68 65 20 6e 61 6d 65 73 70 61 63 65 20 6f 66 20 74 .#@245.Return.the.namespace.of.t
e2a0 68 65 20 63 75 72 72 65 6e 74 20 43 6c 6f 6a 75 72 65 20 62 75 66 66 65 72 2e 0a 52 65 74 75 72 he.current.Clojure.buffer..Retur
e2c0 6e 20 74 68 65 20 6e 61 6d 65 73 70 61 63 65 20 63 6c 6f 73 65 73 74 20 74 6f 20 70 6f 69 6e 74 n.the.namespace.closest.to.point
e2e0 20 61 6e 64 20 61 62 6f 76 65 20 69 74 2e 20 20 49 66 20 74 68 65 72 65 20 61 72 65 0a 6e 6f 20 .and.above.it...If.there.are.no.
e300 6e 61 6d 65 73 70 61 63 65 73 20 61 62 6f 76 65 20 70 6f 69 6e 74 2c 20 72 65 74 75 72 6e 20 74 namespaces.above.point,.return.t
e320 68 65 20 66 69 72 73 74 20 6f 6e 65 20 69 6e 20 74 68 65 20 62 75 66 66 65 72 2e 0a 0a 54 68 65 he.first.one.in.the.buffer...The
e340 20 72 65 73 75 6c 74 73 20 77 69 6c 6c 20 62 65 20 63 61 63 68 65 64 20 69 66 20 60 63 6c 6f 6a .results.will.be.cached.if.`cloj
e360 75 72 65 2d 63 61 63 68 65 2d 6e 73 27 20 69 73 20 73 65 74 20 74 6f 20 74 2e 1f 0a 28 64 65 66 ure-cache-ns'.is.set.to.t...(def
e380 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 66 69 6e 64 2d 6e 73 20 23 5b 30 20 22 08 5c 32 30 alias.'clojure-find-ns.#[0.".\20
e3a0 33 5c 6e 00 09 5c 32 30 33 5c 6e 00 09 5c 32 30 37 5c 32 31 32 5c 32 31 34 7e 5c 32 31 30 5c 33 3\n..\203\n..\207\212\214~\210\3
e3c0 30 33 31 1b 00 5c 33 30 34 5c 33 30 35 5c 33 30 36 5c 32 31 31 23 5c 32 31 30 5c 32 30 32 12 00 031..\304\305\306\211#\210\202..
e3e0 5c 32 31 30 5c 33 30 37 5c 6e 5c 33 30 35 5c 33 30 36 23 5c 32 30 34 31 00 65 62 5c 32 30 35 34 \210\307\n\305\306#\2041.eb\2054
e400 00 5c 33 31 30 5c 6e 5c 33 30 35 5c 33 30 36 23 5c 32 30 35 34 00 5c 33 31 31 5c 33 31 32 21 2a .\310\n\305\306#\2054.\311\312!*
e420 5c 32 31 31 11 5c 32 31 31 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 63 61 63 68 65 2d 6e 73 \211.\211\207".[clojure-cache-ns
e440 20 63 6c 6f 6a 75 72 65 2d 63 61 63 68 65 64 2d 6e 73 20 63 6c 6f 6a 75 72 65 2d 6e 61 6d 65 73 .clojure-cached-ns.clojure-names
e460 70 61 63 65 2d 6e 61 6d 65 2d 72 65 67 65 78 20 28 65 72 72 6f 72 29 20 75 70 2d 6c 69 73 74 20 pace-name-regex.(error).up-list.
e480 6e 69 6c 20 74 20 72 65 2d 73 65 61 72 63 68 2d 62 61 63 6b 77 61 72 64 20 72 65 2d 73 65 61 72 nil.t.re-search-backward.re-sear
e4a0 63 68 2d 66 6f 72 77 61 72 64 20 6d 61 74 63 68 2d 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 ch-forward.match-string-no-prope
e4c0 72 74 69 65 73 20 34 5d 20 34 20 28 23 24 20 2e 20 35 37 39 39 31 29 5d 29 0a 23 40 35 37 20 44 rties.4].4.(#$...57991)]).#@57.D
e4e0 69 73 70 6c 61 79 20 63 61 63 68 65 64 20 76 61 6c 75 65 73 20 69 66 20 70 72 65 73 65 6e 74 2e isplay.cached.values.if.present.
e500 0a 55 73 65 66 75 6c 20 66 6f 72 20 64 65 62 75 67 67 69 6e 67 2e 1f 0a 28 64 65 66 61 6c 69 61 .Useful.for.debugging...(defalia
e520 73 20 27 63 6c 6f 6a 75 72 65 2d 73 68 6f 77 2d 63 61 63 68 65 20 23 5b 30 20 22 5c 33 30 32 5c s.'clojure-show-cache.#[0."\302\
e540 33 30 33 08 09 23 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 63 61 63 68 65 64 2d 70 72 6f 6a 303..#\207".[clojure-cached-proj
e560 65 63 74 2d 64 69 72 20 63 6c 6f 6a 75 72 65 2d 63 61 63 68 65 64 2d 6e 73 20 6d 65 73 73 61 67 ect-dir.clojure-cached-ns.messag
e580 65 20 22 43 61 63 68 65 64 20 50 72 6f 6a 65 63 74 3a 20 25 73 2c 20 43 61 63 68 65 64 20 4e 61 e."Cached.Project:.%s,.Cached.Na
e5a0 6d 65 73 70 61 63 65 3a 20 25 73 22 5d 20 34 20 28 23 24 20 2e 20 35 38 35 39 31 29 20 6e 69 6c mespace:.%s"].4.(#$...58591).nil
e5c0 5d 29 0a 23 40 31 36 39 20 43 6c 65 61 72 20 61 6c 6c 20 62 75 66 66 65 72 2d 6c 6f 63 61 6c 20 ]).#@169.Clear.all.buffer-local.
e5e0 63 61 63 68 65 64 20 76 61 6c 75 65 73 2e 0a 0a 4e 6f 72 6d 61 6c 6c 79 20 79 6f 75 27 64 20 6e cached.values...Normally.you'd.n
e600 65 65 64 20 74 6f 20 64 6f 20 74 68 69 73 20 76 65 72 79 20 69 6e 66 72 65 71 75 65 6e 74 6c 79 eed.to.do.this.very.infrequently
e620 20 2d 20 65 2e 67 2e 0a 61 66 74 65 72 20 72 65 6e 61 6d 69 6e 67 20 74 68 65 20 72 6f 6f 74 20 .-.e.g..after.renaming.the.root.
e640 66 6f 6c 64 65 72 20 6f 66 20 70 72 6f 6a 65 63 74 20 6f 72 20 61 66 74 65 72 0a 72 65 6e 61 6d folder.of.project.or.after.renam
e660 69 6e 67 20 61 20 6e 61 6d 65 73 70 61 63 65 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f ing.a.namespace...(defalias.'clo
e680 6a 75 72 65 2d 63 6c 65 61 72 2d 63 61 63 68 65 20 23 5b 30 20 22 5c 33 30 32 5c 32 31 31 10 11 jure-clear-cache.#[0."\302\211..
e6a0 5c 33 30 33 5c 33 30 34 21 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 63 61 63 68 65 64 2d 70 \303\304!\207".[clojure-cached-p
e6c0 72 6f 6a 65 63 74 2d 64 69 72 20 63 6c 6f 6a 75 72 65 2d 63 61 63 68 65 64 2d 6e 73 20 6e 69 6c roject-dir.clojure-cached-ns.nil
e6e0 20 6d 65 73 73 61 67 65 20 22 42 75 66 66 65 72 2d 6c 6f 63 61 6c 20 63 6c 6f 6a 75 72 65 2d 6d .message."Buffer-local.clojure-m
e700 6f 64 65 20 63 61 63 68 65 20 63 6c 65 61 72 65 64 22 5d 20 33 20 28 23 24 20 2e 20 35 38 38 32 ode.cache.cleared"].3.(#$...5882
e720 35 29 20 6e 69 6c 5d 29 0a 28 64 65 66 63 6f 6e 73 74 20 63 6c 6f 6a 75 72 65 2d 64 65 66 2d 74 5).nil]).(defconst.clojure-def-t
e740 79 70 65 2d 61 6e 64 2d 6e 61 6d 65 2d 72 65 67 65 78 20 22 28 5c 5c 28 3f 3a 5c 5c 28 3f 3a 5c ype-and-name-regex."(\\(?:\\(?:\
e760 5c 73 77 5c 5c 7c 5c 5c 73 5f 5c 5c 29 2b 2f 5c 5c 29 3f 5c 5c 28 64 65 66 5c 5c 28 3f 3a 5c 5c \sw\\|\\s_\\)+/\\)?\\(def\\(?:\\
e780 73 77 5c 5c 7c 5c 5c 73 5f 5c 5c 29 2a 5c 5c 29 5c 5c 3e 5b 20 0d 5c 6e 09 5d 2a 5c 5c 28 3f 3a sw\\|\\s_\\)*\\)\\>[..\n.]*\\(?:
e7a0 23 3f 5e 5c 5c 28 3f 3a 7b 5b 5e 7d 5d 2a 7d 5c 5c 7c 5c 5c 28 3f 3a 5c 5c 73 77 5c 5c 7c 5c 5c #?^\\(?:{[^}]*}\\|\\(?:\\sw\\|\\
e7c0 73 5f 5c 5c 29 2b 5c 5c 29 5b 20 0d 5c 6e 09 5d 2a 5c 5c 29 2a 5c 5c 28 5c 5c 28 3f 3a 5c 5c 73 s_\\)+\\)[..\n.]*\\)*\\(\\(?:\\s
e7e0 77 5c 5c 7c 5c 5c 73 5f 5c 5c 29 2b 5c 5c 29 22 29 0a 23 40 31 33 38 20 46 69 6e 64 20 74 68 65 w\\|\\s_\\)+\\)").#@138.Find.the
e800 20 76 61 72 20 64 65 63 6c 61 72 61 74 69 6f 6e 20 6d 61 63 72 6f 20 61 6e 64 20 73 79 6d 62 6f .var.declaration.macro.and.symbo
e820 6c 20 6e 61 6d 65 20 6f 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 66 6f 72 6d 2e 0a 52 65 74 75 l.name.of.the.current.form..Retu
e840 72 6e 73 20 61 20 6c 69 73 74 20 70 61 69 72 2c 20 65 2e 67 2e 20 28 22 64 65 66 6e 22 20 22 61 rns.a.list.pair,.e.g..("defn"."a
e860 62 63 22 29 20 6f 72 20 28 22 64 65 66 74 65 73 74 22 20 22 73 6f 6d 65 2d 74 65 73 74 22 29 2e bc").or.("deftest"."some-test").
e880 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 66 69 6e 64 2d 64 65 66 20 23 5b ..(defalias.'clojure-find-def.#[
e8a0 30 20 22 5c 32 31 32 5c 33 30 31 08 21 5c 32 30 34 5c 6e 00 5c 33 30 32 20 5c 32 31 30 5c 33 30 0."\212\301.!\204\n.\302.\210\30
e8c0 33 08 5c 33 30 34 5c 33 30 35 23 5c 32 30 35 19 00 5c 33 30 36 5c 33 30 37 21 5c 33 30 36 5c 33 3.\304\305#\205..\306\307!\306\3
e8e0 31 30 21 44 29 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 64 65 66 2d 74 79 70 65 2d 61 6e 64 10!D)\207".[clojure-def-type-and
e900 2d 6e 61 6d 65 2d 72 65 67 65 78 20 6c 6f 6f 6b 69 6e 67 2d 61 74 20 62 65 67 69 6e 6e 69 6e 67 -name-regex.looking-at.beginning
e920 2d 6f 66 2d 64 65 66 75 6e 20 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 2d 72 65 67 65 78 70 20 -of-defun.search-forward-regexp.
e940 6e 69 6c 20 74 20 6d 61 74 63 68 2d 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 nil.t.match-string-no-properties
e960 20 31 20 32 5d 20 34 20 28 23 24 20 2e 20 35 39 33 38 34 29 5d 29 0a 23 40 31 31 32 20 52 65 74 .1.2].4.(#$...59384)]).#@112.Ret
e980 75 72 6e 20 6e 6f 6e 2d 6e 69 6c 20 69 66 20 74 65 78 74 20 61 66 74 65 72 20 70 6f 69 6e 74 20 urn.non-nil.if.text.after.point.
e9a0 69 73 20 22 6e 6f 6e 2d 6c 6f 67 69 63 61 6c 22 20 73 65 78 70 2e 0a 22 4e 6f 6e 2d 6c 6f 67 69 is."non-logical".sexp.."Non-logi
e9c0 63 61 6c 22 20 73 65 78 70 20 61 72 65 20 5e 6d 65 74 61 64 61 74 61 20 61 6e 64 20 23 72 65 61 cal".sexp.are.^metadata.and.#rea
e9e0 64 65 72 2e 6d 61 63 72 6f 73 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d der.macros...(defalias.'clojure-
ea00 2d 6c 6f 6f 6b 69 6e 67 2d 61 74 2d 6e 6f 6e 2d 6c 6f 67 69 63 61 6c 2d 73 65 78 70 20 23 5b 30 -looking-at-non-logical-sexp.#[0
ea20 20 22 5c 33 30 31 20 5c 32 31 30 5c 33 30 32 64 21 5c 32 31 30 5c 33 30 33 5c 33 30 34 18 5c 33 ."\301.\210\302d!\210\303\304.\3
ea40 30 35 01 21 29 5c 32 30 37 22 20 5b 69 6e 68 69 62 69 74 2d 63 68 61 6e 67 69 6e 67 2d 6d 61 74 05.!)\207".[inhibit-changing-mat
ea60 63 68 2d 64 61 74 61 20 63 6f 6d 6d 65 6e 74 2d 6e 6f 72 6d 61 6c 69 7a 65 2d 76 61 72 73 20 63 ch-data.comment-normalize-vars.c
ea80 6f 6d 6d 65 6e 74 2d 66 6f 72 77 61 72 64 20 22 5c 5c 5e 5c 5c 7c 23 5b 5b 3a 61 6c 70 68 61 3a omment-forward."\\^\\|#[[:alpha:
eaa0 5d 5d 22 20 74 20 6c 6f 6f 6b 69 6e 67 2d 61 74 5d 20 33 20 28 23 24 20 2e 20 35 39 37 37 33 29 ]]".t.looking-at].3.(#$...59773)
eac0 5d 29 0a 23 40 31 38 32 20 4d 6f 76 65 20 66 6f 72 77 61 72 64 20 4e 20 6c 6f 67 69 63 61 6c 20 ]).#@182.Move.forward.N.logical.
eae0 73 65 78 70 73 2e 0a 54 68 69 73 20 77 69 6c 6c 20 73 6b 69 70 20 6f 76 65 72 20 73 65 78 70 73 sexps..This.will.skip.over.sexps
eb00 20 74 68 61 74 20 64 6f 6e 27 74 20 72 65 70 72 65 73 65 6e 74 20 6f 62 6a 65 63 74 73 2c 20 73 .that.don't.represent.objects,.s
eb20 6f 20 74 68 61 74 20 5e 68 69 6e 74 73 20 61 6e 64 0a 23 72 65 61 64 65 72 2e 6d 61 63 72 6f 73 o.that.^hints.and.#reader.macros
eb40 20 61 72 65 20 63 6f 6e 73 69 64 65 72 65 64 20 70 61 72 74 20 6f 66 20 74 68 65 20 66 6f 6c 6c .are.considered.part.of.the.foll
eb60 6f 77 69 6e 67 20 73 65 78 70 2e 0a 0a 28 66 6e 20 26 6f 70 74 69 6f 6e 61 6c 20 4e 29 1f 0a 28 owing.sexp...(fn.&optional.N)..(
eb80 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 66 6f 72 77 61 72 64 2d 6c 6f 67 69 63 61 defalias.'clojure-forward-logica
eba0 6c 2d 73 65 78 70 20 23 5b 32 35 36 20 22 5c 32 31 31 5c 32 30 34 07 00 5c 33 30 31 5c 32 36 32 l-sexp.#[256."\211\204..\301\262
ebc0 01 5c 32 31 31 5c 33 30 32 57 5c 32 30 33 12 00 5c 33 30 33 01 5b 21 5c 32 30 37 5c 33 30 34 18 .\211\302W\203..\303.[!\207\304.
ebe0 5c 32 31 31 5c 33 30 32 56 5c 32 30 35 35 00 5c 33 30 35 20 5c 32 30 33 26 00 5c 33 30 36 5c 33 \211\302V\2055.\305.\203&.\306\3
ec00 30 31 21 5c 32 31 30 5c 32 30 32 1a 00 5c 33 30 36 5c 33 30 31 21 5c 32 31 30 5c 33 30 37 5c 33 01!\210\202..\306\301!\210\307\3
ec20 30 34 77 5c 32 31 30 5c 32 31 31 53 5c 32 36 32 01 5c 32 30 32 14 00 29 5c 32 30 37 22 20 5b 66 04w\210\211S\262.\202..)\207".[f
ec40 6f 72 77 61 72 64 2d 73 65 78 70 2d 66 75 6e 63 74 69 6f 6e 20 31 20 30 20 63 6c 6f 6a 75 72 65 orward-sexp-function.1.0.clojure
ec60 2d 62 61 63 6b 77 61 72 64 2d 6c 6f 67 69 63 61 6c 2d 73 65 78 70 20 6e 69 6c 20 63 6c 6f 6a 75 -backward-logical-sexp.nil.cloju
ec80 72 65 2d 2d 6c 6f 6f 6b 69 6e 67 2d 61 74 2d 6e 6f 6e 2d 6c 6f 67 69 63 61 6c 2d 73 65 78 70 20 re--looking-at-non-logical-sexp.
eca0 66 6f 72 77 61 72 64 2d 73 65 78 70 20 22 2c 22 5d 20 33 20 28 23 24 20 2e 20 36 30 31 30 35 29 forward-sexp.","].3.(#$...60105)
ecc0 20 22 70 22 5d 29 0a 23 40 31 38 33 20 4d 6f 76 65 20 62 61 63 6b 77 61 72 64 20 4e 20 6c 6f 67 ."p"]).#@183.Move.backward.N.log
ece0 69 63 61 6c 20 73 65 78 70 73 2e 0a 54 68 69 73 20 77 69 6c 6c 20 73 6b 69 70 20 6f 76 65 72 20 ical.sexps..This.will.skip.over.
ed00 73 65 78 70 73 20 74 68 61 74 20 64 6f 6e 27 74 20 72 65 70 72 65 73 65 6e 74 20 6f 62 6a 65 63 sexps.that.don't.represent.objec
ed20 74 73 2c 20 73 6f 20 74 68 61 74 20 5e 68 69 6e 74 73 20 61 6e 64 0a 23 72 65 61 64 65 72 2e 6d ts,.so.that.^hints.and.#reader.m
ed40 61 63 72 6f 73 20 61 72 65 20 63 6f 6e 73 69 64 65 72 65 64 20 70 61 72 74 20 6f 66 20 74 68 65 acros.are.considered.part.of.the
ed60 20 66 6f 6c 6c 6f 77 69 6e 67 20 73 65 78 70 2e 0a 0a 28 66 6e 20 26 6f 70 74 69 6f 6e 61 6c 20 .following.sexp...(fn.&optional.
ed80 4e 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 62 61 63 6b 77 61 72 64 2d N)..(defalias.'clojure-backward-
eda0 6c 6f 67 69 63 61 6c 2d 73 65 78 70 20 23 5b 32 35 36 20 22 5c 32 31 31 5c 32 30 34 07 00 5c 33 logical-sexp.#[256."\211\204..\3
edc0 30 31 5c 32 36 32 01 5c 32 31 31 5c 33 30 32 57 5c 32 30 33 12 00 5c 33 30 33 01 5b 21 5c 32 30 01\262.\211\302W\203..\303.[!\20
ede0 37 5c 33 30 34 18 5c 32 31 31 5c 33 30 32 56 5c 32 30 35 45 00 5c 33 30 35 5c 33 30 31 21 5c 32 7\304.\211\302V\205E.\305\301!\2
ee00 31 30 6f 5c 32 30 34 3e 00 5c 33 30 36 31 32 00 5c 32 31 32 5c 33 30 35 5c 33 30 31 21 5c 32 31 10o\204>.\30612.\212\305\301!\21
ee20 30 5c 33 30 37 20 29 30 5c 32 30 32 34 00 5c 32 31 30 5c 33 30 34 5c 32 30 33 3e 00 5c 33 30 35 0\307.)0\2024.\210\304\203>.\305
ee40 5c 33 30 31 21 5c 32 31 30 5c 32 30 32 1e 00 5c 32 31 31 53 5c 32 36 32 01 5c 32 30 32 14 00 29 \301!\210\202..\211S\262.\202..)
ee60 5c 32 30 37 22 20 5b 66 6f 72 77 61 72 64 2d 73 65 78 70 2d 66 75 6e 63 74 69 6f 6e 20 31 20 30 \207".[forward-sexp-function.1.0
ee80 20 63 6c 6f 6a 75 72 65 2d 66 6f 72 77 61 72 64 2d 6c 6f 67 69 63 61 6c 2d 73 65 78 70 20 6e 69 .clojure-forward-logical-sexp.ni
eea0 6c 20 62 61 63 6b 77 61 72 64 2d 73 65 78 70 20 28 65 72 72 6f 72 29 20 63 6c 6f 6a 75 72 65 2d l.backward-sexp.(error).clojure-
eec0 2d 6c 6f 6f 6b 69 6e 67 2d 61 74 2d 6e 6f 6e 2d 6c 6f 67 69 63 61 6c 2d 73 65 78 70 5d 20 33 20 -looking-at-non-logical-sexp].3.
eee0 28 23 24 20 2e 20 36 30 36 32 31 29 20 22 70 22 5d 29 0a 23 40 37 30 20 52 65 74 75 72 6e 20 74 (#$...60621)."p"]).#@70.Return.t
ef00 72 75 74 68 79 20 69 66 20 74 68 65 20 66 69 72 73 74 20 66 6f 72 6d 20 6d 61 74 63 68 65 73 20 ruthy.if.the.first.form.matches.
ef20 46 49 52 53 54 2d 46 4f 52 4d 2e 0a 0a 28 66 6e 20 46 49 52 53 54 2d 46 4f 52 4d 29 1f 0a 28 64 FIRST-FORM...(fn.FIRST-FORM)..(d
ef40 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 74 6f 70 2d 6c 65 76 65 6c 2d 66 6f 72 6d 2d efalias.'clojure-top-level-form-
ef60 70 20 23 5b 32 35 37 20 22 5c 33 30 31 31 2c 00 5c 33 30 32 31 28 00 5c 32 31 32 5c 33 30 33 20 p.#[257."\3011,.\3021(.\212\303.
ef80 5c 32 31 30 5c 33 30 34 5c 33 30 35 21 5c 32 31 30 5c 33 30 35 75 5c 32 31 30 5c 33 30 36 5c 33 \210\304\305!\210\305u\210\306\3
efa0 30 35 21 5c 32 31 30 5c 33 30 34 5c 33 30 35 21 5c 32 31 30 5c 32 31 31 5c 33 30 37 18 5c 33 31 05!\210\304\305!\210\211\307.\31
efc0 30 01 21 29 5c 32 36 32 01 29 30 30 5c 32 30 37 30 5c 32 31 30 5c 33 31 31 5c 32 30 37 5c 32 31 0.!)\262.)00\2070\210\311\207\21
efe0 30 5c 33 31 31 5c 32 30 37 22 20 5b 69 6e 68 69 62 69 74 2d 63 68 61 6e 67 69 6e 67 2d 6d 61 74 0\311\207".[inhibit-changing-mat
f000 63 68 2d 64 61 74 61 20 28 65 6e 64 2d 6f 66 2d 62 75 66 66 65 72 29 20 28 73 63 61 6e 2d 65 72 ch-data.(end-of-buffer).(scan-er
f020 72 6f 72 29 20 65 6e 64 2d 6f 66 2d 64 65 66 75 6e 20 63 6c 6f 6a 75 72 65 2d 62 61 63 6b 77 61 ror).end-of-defun.clojure-backwa
f040 72 64 2d 6c 6f 67 69 63 61 6c 2d 73 65 78 70 20 31 20 63 6c 6f 6a 75 72 65 2d 66 6f 72 77 61 72 rd-logical-sexp.1.clojure-forwar
f060 64 2d 6c 6f 67 69 63 61 6c 2d 73 65 78 70 20 74 20 6c 6f 6f 6b 69 6e 67 2d 61 74 20 6e 69 6c 5d d-logical-sexp.t.looking-at.nil]
f080 20 34 20 28 23 24 20 2e 20 36 31 31 37 36 29 5d 29 0a 23 40 31 38 30 20 52 65 74 75 72 6e 20 74 .4.(#$...61176)]).#@180.Return.t
f0a0 68 65 20 73 74 61 72 74 69 6e 67 20 70 6f 69 6e 74 73 20 66 6f 72 20 66 6f 72 6d 73 20 62 65 66 he.starting.points.for.forms.bef
f0c0 6f 72 65 20 50 4f 53 49 54 49 4f 4e 2e 0a 50 6f 73 69 74 69 6f 6e 73 20 61 72 65 20 69 6e 20 64 ore.POSITION..Positions.are.in.d
f0e0 65 73 63 65 6e 64 69 6e 67 20 6f 72 64 65 72 20 74 6f 20 61 69 64 65 20 69 6e 20 66 69 6e 64 69 escending.order.to.aide.in.findi
f100 6e 67 20 74 68 65 20 66 69 72 73 74 20 73 74 61 72 74 69 6e 67 0a 70 6f 73 69 74 69 6f 6e 20 62 ng.the.first.starting.position.b
f120 65 66 6f 72 65 20 74 68 65 20 63 75 72 72 65 6e 74 20 70 6f 73 69 74 69 6f 6e 2e 0a 0a 28 66 6e efore.the.current.position...(fn
f140 20 50 4f 53 49 54 49 4f 4e 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 73 .POSITION)..(defalias.'clojure-s
f160 65 78 70 2d 73 74 61 72 74 73 2d 75 6e 74 69 6c 2d 70 6f 73 69 74 69 6f 6e 20 23 5b 32 35 37 20 exp-starts-until-position.#[257.
f180 22 5c 32 31 32 5c 33 30 30 5c 33 30 31 31 24 00 60 02 57 5c 32 30 35 20 00 5c 33 30 32 5c 33 30 "\212\300\3011$.`.W\205..\302\30
f1a0 33 21 5c 32 31 30 5c 33 30 34 5c 33 30 33 21 5c 32 31 30 60 01 42 5c 32 36 32 01 5c 33 30 32 5c 3!\210\304\303!\210`.B\262.\302\
f1c0 33 30 33 21 5c 32 31 30 5c 32 30 32 06 00 30 5c 32 30 32 28 00 5c 32 31 30 5c 32 30 32 29 00 5c 303!\210\202..0\202(.\210\202).\
f1e0 32 31 30 5c 32 31 31 5c 32 36 32 01 29 5c 32 30 37 22 20 5b 6e 69 6c 20 28 73 63 61 6e 2d 65 72 210\211\262.)\207".[nil.(scan-er
f200 72 6f 72 29 20 63 6c 6f 6a 75 72 65 2d 66 6f 72 77 61 72 64 2d 6c 6f 67 69 63 61 6c 2d 73 65 78 ror).clojure-forward-logical-sex
f220 70 20 31 20 63 6c 6f 6a 75 72 65 2d 62 61 63 6b 77 61 72 64 2d 6c 6f 67 69 63 61 6c 2d 73 65 78 p.1.clojure-backward-logical-sex
f240 70 5d 20 34 20 28 23 24 20 2e 20 36 31 35 39 32 29 5d 29 0a 28 62 79 74 65 2d 63 6f 64 65 20 22 p].4.(#$...61592)]).(byte-code."
f260 5c 33 30 30 5c 33 30 31 5c 33 30 32 5c 33 30 33 5c 33 30 34 44 44 5c 33 30 35 5c 33 30 36 5c 33 \300\301\302\303\304DD\305\306\3
f280 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 5b 63 75 73 74 6f 07\310\311\312\313&.\207".[custo
f2a0 6d 2d 64 65 63 6c 61 72 65 2d 76 61 72 69 61 62 6c 65 20 63 6c 6f 6a 75 72 65 2d 74 6f 70 6c 65 m-declare-variable.clojure-tople
f2c0 76 65 6c 2d 69 6e 73 69 64 65 2d 63 6f 6d 6d 65 6e 74 2d 66 6f 72 6d 20 66 75 6e 63 61 6c 6c 20 vel-inside-comment-form.funcall.
f2e0 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 6e 69 6c 5d 20 31 5d function.#[0."\300\207".[nil].1]
f300 20 22 45 76 61 6c 20 74 6f 70 20 6c 65 76 65 6c 20 66 6f 72 6d 73 20 69 6e 73 69 64 65 20 63 6f ."Eval.top.level.forms.inside.co
f320 6d 6d 65 6e 74 20 66 6f 72 6d 73 20 69 6e 73 74 65 61 64 20 6f 66 20 74 68 65 20 63 6f 6d 6d 65 mment.forms.instead.of.the.comme
f340 6e 74 20 66 6f 72 6d 20 69 74 73 65 6c 66 2e 5c 6e 45 78 70 65 72 69 6d 65 6e 74 61 6c 2e 20 20 nt.form.itself.\nExperimental...
f360 46 75 6e 63 74 69 6f 6e 20 60 63 69 64 65 72 2d 64 65 66 75 6e 2d 61 74 2d 70 6f 69 6e 74 27 20 Function.`cider-defun-at-point'.
f380 69 73 20 75 73 65 64 20 65 78 74 65 6e 73 69 76 65 6c 79 20 73 6f 20 69 66 20 77 65 5c 6e 63 68 is.used.extensively.so.if.we\nch
f3a0 61 6e 67 65 20 74 68 69 73 20 68 65 75 72 69 73 74 69 63 20 69 74 20 6e 65 65 64 73 20 74 6f 20 ange.this.heuristic.it.needs.to.
f3c0 62 65 20 62 75 6c 6c 65 74 2d 70 72 6f 6f 66 20 61 6e 64 20 64 65 73 69 72 65 64 2e 20 20 57 68 be.bullet-proof.and.desired...Wh
f3e0 69 6c 65 5c 6e 74 65 73 74 69 6e 67 2c 20 67 69 76 65 20 61 6e 20 65 61 73 79 20 77 61 79 20 74 ile\ntesting,.give.an.easy.way.t
f400 6f 20 74 75 72 6e 20 74 68 69 73 20 6e 65 77 20 62 65 68 61 76 69 6f 72 20 6f 66 66 2e 22 20 3a o.turn.this.new.behavior.off.".:
f420 74 79 70 65 20 62 6f 6f 6c 65 61 6e 20 3a 73 61 66 65 20 62 6f 6f 6c 65 61 6e 70 20 3a 70 61 63 type.boolean.:safe.booleanp.:pac
f440 6b 61 67 65 2d 76 65 72 73 69 6f 6e 20 28 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 20 2e 20 22 35 2e kage-version.(clojure-mode..."5.
f460 38 2e 33 22 29 5d 20 31 30 29 0a 23 40 37 34 20 46 69 6e 64 20 66 69 72 73 74 20 65 6c 65 6d 65 8.3")].10).#@74.Find.first.eleme
f480 6e 74 20 6f 66 20 43 4f 4c 4c 20 66 6f 72 20 77 68 69 63 68 20 50 52 45 44 20 72 65 74 75 72 6e nt.of.COLL.for.which.PRED.return
f4a0 20 74 72 75 74 68 79 2e 0a 0a 28 66 6e 20 50 52 45 44 20 43 4f 4c 4c 29 1f 0a 28 64 65 66 61 6c .truthy...(fn.PRED.COLL)..(defal
f4c0 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 66 69 6e 64 2d 66 69 72 73 74 20 23 5b 35 31 34 20 22 5c ias.'clojure-find-first.#[514."\
f4e0 33 30 30 01 01 5c 32 30 34 1f 00 5c 32 31 31 5c 32 30 33 1f 00 03 01 40 21 5c 32 30 33 18 00 5c 300..\204..\211\203....@!\203..\
f500 32 31 31 40 5c 32 36 32 02 5c 32 30 32 02 00 5c 32 31 31 41 5c 32 36 32 01 5c 32 30 32 02 00 01 211@\262.\202..\211A\262.\202...
f520 5c 32 30 37 22 20 5b 6e 69 6c 5d 20 36 20 28 23 24 20 2e 20 36 32 35 37 36 29 5d 29 0a 23 40 31 \207".[nil].6.(#$...62576)]).#@1
f540 37 34 20 47 6f 20 74 6f 20 74 6f 70 20 6c 65 76 65 6c 20 66 6f 72 6d 2e 0a 53 65 74 20 61 73 20 74.Go.to.top.level.form..Set.as.
f560 60 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 64 65 66 75 6e 2d 66 75 6e 63 74 69 6f 6e 27 20 73 6f `beginning-of-defun-function'.so
f580 20 74 68 61 74 20 74 68 65 73 65 20 67 65 6e 65 72 69 63 0a 6f 70 65 72 61 74 6f 72 73 20 63 61 .that.these.generic.operators.ca
f5a0 6e 20 62 65 20 75 73 65 64 2e 20 20 47 69 76 65 6e 20 61 20 70 6f 73 69 74 69 76 65 20 4e 20 69 n.be.used...Given.a.positive.N.i
f5c0 74 20 77 69 6c 6c 20 64 6f 20 69 74 20 74 68 61 74 0a 6d 61 6e 79 20 74 69 6d 65 73 2e 0a 0a 28 t.will.do.it.that.many.times...(
f5e0 66 6e 20 26 6f 70 74 69 6f 6e 61 6c 20 4e 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a fn.&optional.N)..(defalias.'cloj
f600 75 72 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 64 65 66 75 6e 2d 66 75 6e 63 74 69 6f 6e 20 ure-beginning-of-defun-function.
f620 23 5b 32 35 36 20 22 5c 33 30 32 18 09 5c 32 30 33 5b 00 5c 33 30 33 5c 33 30 34 21 5c 32 30 33 #[256."\302..\203[.\303\304!\203
f640 5b 00 5c 33 30 35 20 5c 33 30 36 5c 33 30 37 5c 33 31 30 5c 33 31 31 5c 33 31 32 05 21 5c 33 31 [.\305.\306\307\310\311\312.!\31
f660 33 5c 22 5c 33 31 34 24 5c 32 31 36 60 5c 33 30 32 5c 32 31 31 5c 33 31 35 20 5c 32 31 30 60 5c 3\"\314$\216`\302\211\315.\210`\
f680 32 36 32 01 5c 33 31 36 5c 33 31 37 21 5c 32 31 30 60 5c 32 36 32 02 5c 33 31 37 75 5c 32 31 30 262.\316\317!\210`\262.\317u\210
f6a0 5c 33 32 30 20 5c 32 31 30 5c 33 32 31 5c 33 30 36 5c 33 32 32 5c 33 32 33 5c 33 31 31 5c 33 31 \320.\210\321\306\322\323\311\31
f6c0 32 06 08 21 5c 33 32 34 5c 22 5c 33 31 34 5c 33 32 35 25 5c 33 32 36 03 21 5c 22 5c 32 31 31 5c 2..!\324\"\314\325%\326.!\"\211\
f6e0 32 30 33 4d 00 5c 32 31 31 62 5c 32 31 30 5c 33 32 37 5c 32 30 32 51 00 5c 33 33 30 06 06 21 5c 203M.\211b\210\327\202Q.\330..!\
f700 32 36 32 01 5c 32 36 36 5c 32 30 33 29 5c 32 36 32 01 5c 32 30 32 5e 00 5c 33 33 30 01 21 29 5c 262.\266\203)\262.\202^.\330.!)\
f720 32 30 37 22 20 5b 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 64 65 66 75 6e 2d 66 75 6e 63 74 69 6f 207".[beginning-of-defun-functio
f740 6e 20 63 6c 6f 6a 75 72 65 2d 74 6f 70 6c 65 76 65 6c 2d 69 6e 73 69 64 65 2d 63 6f 6d 6d 65 6e n.clojure-toplevel-inside-commen
f760 74 2d 66 6f 72 6d 20 6e 69 6c 20 63 6c 6f 6a 75 72 65 2d 74 6f 70 2d 6c 65 76 65 6c 2d 66 6f 72 t-form.nil.clojure-top-level-for
f780 6d 2d 70 20 22 63 6f 6d 6d 65 6e 74 22 20 6d 61 74 63 68 2d 64 61 74 61 20 6d 61 6b 65 2d 62 79 m-p."comment".match-data.make-by
f7a0 74 65 2d 63 6f 64 65 20 30 20 22 5c 33 30 31 5c 33 30 30 5c 33 30 32 5c 22 5c 32 30 37 22 20 76 te-code.0."\301\300\302\"\207".v
f7c0 63 6f 6e 63 61 74 20 76 65 63 74 6f 72 20 5b 73 65 74 2d 6d 61 74 63 68 2d 64 61 74 61 20 65 76 concat.vector.[set-match-data.ev
f7e0 61 70 6f 72 61 74 65 5d 20 33 20 65 6e 64 2d 6f 66 2d 64 65 66 75 6e 20 63 6c 6f 6a 75 72 65 2d aporate].3.end-of-defun.clojure-
f800 62 61 63 6b 77 61 72 64 2d 6c 6f 67 69 63 61 6c 2d 73 65 78 70 20 31 20 63 6c 6f 6a 75 72 65 2d backward-logical-sexp.1.clojure-
f820 66 6f 72 77 61 72 64 2d 6c 6f 67 69 63 61 6c 2d 73 65 78 70 20 63 6c 6f 6a 75 72 65 2d 66 69 6e forward-logical-sexp.clojure-fin
f840 64 2d 66 69 72 73 74 20 32 35 37 20 22 5c 32 31 31 5c 33 30 30 57 5c 32 30 37 22 20 5b 5d 20 22 d-first.257."\211\300W\207".[]."
f860 5c 6e 5c 6e 28 66 6e 20 42 45 47 2d 50 4f 53 29 22 20 63 6c 6f 6a 75 72 65 2d 73 65 78 70 2d 73 \n\n(fn.BEG-POS)".clojure-sexp-s
f880 74 61 72 74 73 2d 75 6e 74 69 6c 2d 70 6f 73 69 74 69 6f 6e 20 74 20 62 65 67 69 6e 6e 69 6e 67 tarts-until-position.t.beginning
f8a0 2d 6f 66 2d 64 65 66 75 6e 5d 20 31 32 20 28 23 24 20 2e 20 36 32 37 38 37 29 5d 29 0a 28 62 79 -of-defun].12.(#$...62787)]).(by
f8c0 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 44 5c te-code."\300\301\302\303\304DD\
f8e0 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 26 09 5c 32 30 305\306\307\310\311\312\313&.\20
f900 37 22 20 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 63 6c 6f 6a 7".[custom-declare-variable.cloj
f920 75 72 65 2d 74 68 72 65 61 64 2d 61 6c 6c 2d 62 75 74 2d 6c 61 73 74 20 66 75 6e 63 61 6c 6c 20 ure-thread-all-but-last.funcall.
f940 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 6e 69 6c 5d 20 31 5d function.#[0."\300\207".[nil].1]
f960 20 22 4e 6f 6e 2d 6e 69 6c 20 6d 65 61 6e 73 20 64 6f 20 6e 6f 74 20 74 68 72 65 61 64 20 74 68 ."Non-nil.means.do.not.thread.th
f980 65 20 6c 61 73 74 20 65 78 70 72 65 73 73 69 6f 6e 2e 5c 6e 54 68 69 73 20 6d 65 61 6e 73 20 74 e.last.expression.\nThis.means.t
f9a0 68 61 74 20 60 63 6c 6f 6a 75 72 65 2d 74 68 72 65 61 64 2d 66 69 72 73 74 2d 61 6c 6c 27 20 61 hat.`clojure-thread-first-all'.a
f9c0 6e 64 5c 6e 60 63 6c 6f 6a 75 72 65 2d 74 68 72 65 61 64 2d 6c 61 73 74 2d 61 6c 6c 27 20 6e 6f nd\n`clojure-thread-last-all'.no
f9e0 74 20 74 68 72 65 61 64 20 74 68 65 20 64 65 65 70 65 73 74 20 73 65 78 70 20 69 6e 73 69 64 65 t.thread.the.deepest.sexp.inside
fa00 20 74 68 65 5c 6e 63 75 72 72 65 6e 74 20 73 65 78 70 2e 22 20 3a 70 61 63 6b 61 67 65 2d 76 65 .the\ncurrent.sexp.".:package-ve
fa20 72 73 69 6f 6e 20 28 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 20 2e 20 22 35 2e 34 2e 30 22 29 20 3a rsion.(clojure-mode..."5.4.0").:
fa40 73 61 66 65 20 62 6f 6f 6c 65 61 6e 70 20 3a 74 79 70 65 20 62 6f 6f 6c 65 61 6e 5d 20 31 30 29 safe.booleanp.:type.boolean].10)
fa60 0a 23 40 31 36 31 20 52 65 74 75 72 6e 20 50 4f 49 4e 54 20 61 66 74 65 72 20 70 65 72 66 6f 72 .#@161.Return.POINT.after.perfor
fa80 6d 69 6e 67 20 41 43 54 49 4f 4e 53 2e 0a 0a 41 6e 20 61 63 74 69 6f 6e 20 69 73 20 65 69 74 68 ming.ACTIONS...An.action.is.eith
faa0 65 72 20 74 68 65 20 73 79 6d 62 6f 6c 20 6f 66 20 61 20 66 75 6e 63 74 69 6f 6e 20 6f 72 20 61 er.the.symbol.of.a.function.or.a
fac0 20 74 77 6f 20 65 6c 65 6d 65 6e 74 0a 6c 69 73 74 20 6f 66 20 28 66 6e 20 61 72 67 73 29 20 74 .two.element.list.of.(fn.args).t
fae0 6f 20 70 61 73 73 20 74 6f 20 60 61 70 70 6c 79 27 27 0a 0a 28 66 6e 20 26 72 65 73 74 20 41 43 o.pass.to.`apply''..(fn.&rest.AC
fb00 54 49 4f 4e 53 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 2d 70 6f 69 6e TIONS)..(defalias.'clojure--poin
fb20 74 2d 61 66 74 65 72 20 23 5b 31 32 38 20 22 5c 32 31 32 5c 32 31 31 5c 32 31 31 5c 32 30 33 27 t-after.#[128."\212\211\211\203'
fb40 00 5c 32 31 31 40 5c 32 31 31 3c 5c 32 30 33 12 00 5c 32 31 31 40 5c 32 30 32 13 00 5c 32 31 31 .\211@\211<\203..\211@\202..\211
fb60 01 3c 5c 32 30 35 1a 00 01 41 5c 33 30 30 02 02 5c 22 5c 32 36 36 03 01 41 5c 32 36 36 5c 32 30 .<\205...A\300..\"\266..A\266\20
fb80 32 5c 32 30 32 02 00 5c 32 31 30 60 29 5c 32 30 37 22 20 5b 61 70 70 6c 79 5d 20 38 20 28 23 24 2\202..\210`)\207".[apply].8.(#$
fba0 20 2e 20 36 34 31 30 33 29 5d 29 0a 23 40 34 39 20 55 6e 64 6f 20 61 20 60 6a 6f 69 6e 2d 6c 69 ...64103)]).#@49.Undo.a.`join-li
fbc0 6e 65 27 20 64 6f 6e 65 20 62 79 20 61 20 74 68 72 65 61 64 69 6e 67 20 63 6f 6d 6d 61 6e 64 2e ne'.done.by.a.threading.command.
fbe0 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 2d 6d 61 79 62 65 2d 75 6e 6a 6f ..(defalias.'clojure--maybe-unjo
fc00 69 6e 2d 6c 69 6e 65 20 23 5b 30 20 22 5c 33 30 30 60 5c 33 30 31 5c 22 5c 32 30 35 10 00 5c 33 in-line.#[0."\300`\301\"\205..\3
fc20 30 32 60 60 54 5c 33 30 33 23 5c 32 31 30 5c 33 30 34 63 5c 32 30 37 22 20 5b 67 65 74 2d 74 65 02``T\303#\210\304c\207".[get-te
fc40 78 74 2d 70 72 6f 70 65 72 74 79 20 63 6c 6f 6a 75 72 65 2d 74 68 72 65 61 64 2d 6c 69 6e 65 2d xt-property.clojure-thread-line-
fc60 6a 6f 69 6e 65 64 20 72 65 6d 6f 76 65 2d 74 65 78 74 2d 70 72 6f 70 65 72 74 69 65 73 20 28 63 joined.remove-text-properties.(c
fc80 6c 6f 6a 75 72 65 2d 74 68 72 65 61 64 2d 6c 69 6e 65 2d 6a 6f 69 6e 65 64 20 74 29 20 22 5c 6e lojure-thread-line-joined.t)."\n
fca0 22 5d 20 34 20 28 23 24 20 2e 20 36 34 34 33 33 29 5d 29 0a 23 40 39 35 20 55 6e 77 69 6e 64 20 "].4.(#$...64433)]).#@95.Unwind.
fcc0 61 20 74 68 72 65 61 64 20 6c 61 73 74 20 6d 61 63 72 6f 20 6f 6e 63 65 2e 0a 0a 50 6f 69 6e 74 a.thread.last.macro.once...Point
fce0 20 6d 75 73 74 20 62 65 20 62 65 74 77 65 65 6e 20 74 68 65 20 6f 70 65 6e 69 6e 67 20 70 61 72 .must.be.between.the.opening.par
fd00 65 6e 20 61 6e 64 20 74 68 65 20 2d 3e 3e 20 73 79 6d 62 6f 6c 2e 1f 0a 28 64 65 66 61 6c 69 61 en.and.the.->>.symbol...(defalia
fd20 73 20 27 63 6c 6f 6a 75 72 65 2d 2d 75 6e 77 69 6e 64 2d 6c 61 73 74 20 23 5b 30 20 22 5c 33 30 s.'clojure--unwind-last.#[0."\30
fd40 30 20 5c 32 31 30 5c 32 31 32 60 5c 33 30 31 20 5c 33 30 32 5c 33 30 33 21 5c 32 30 33 11 00 5c 0.\210\212`\301.\302\303!\203..\
fd60 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 20 5c 33 30 30 20 5c 304\305!\210\306.\210\307.\300.\
fd80 32 31 30 5c 33 30 37 20 01 01 55 3f 5c 33 31 30 5c 33 31 31 21 5c 32 31 30 5c 32 31 31 5c 32 30 210\307...U?\310\311!\210\211\20
fda0 33 2d 00 5c 33 31 32 63 5c 32 31 30 5c 32 30 32 30 00 5c 33 31 33 20 5c 32 31 30 03 63 5c 32 36 3-.\312c\210\2020.\313.\210.c\26
fdc0 36 06 29 5c 33 31 34 75 5c 32 30 37 22 20 5b 66 6f 72 77 61 72 64 2d 73 65 78 70 20 63 6c 6f 6a 6.)\314u\207".[forward-sexp.cloj
fde0 75 72 65 2d 64 65 6c 65 74 65 2d 61 6e 64 2d 65 78 74 72 61 63 74 2d 73 65 78 70 20 6c 6f 6f 6b ure-delete-and-extract-sexp.look
fe00 69 6e 67 2d 61 74 20 22 20 2a 5c 6e 22 20 6a 6f 69 6e 2d 6c 69 6e 65 20 66 6f 6c 6c 6f 77 69 6e ing-at.".*\n".join-line.followin
fe20 67 20 63 6c 6f 6a 75 72 65 2d 2d 65 6e 73 75 72 65 2d 70 61 72 65 6e 73 2d 61 72 6f 75 6e 64 2d g.clojure--ensure-parens-around-
fe40 66 75 6e 63 74 69 6f 6e 2d 6e 61 6d 65 73 20 6c 69 6e 65 2d 6e 75 6d 62 65 72 2d 61 74 2d 70 6f function-names.line-number-at-po
fe60 73 20 64 6f 77 6e 2d 6c 69 73 74 20 2d 31 20 22 5c 6e 22 20 63 6c 6f 6a 75 72 65 2d 2d 6d 61 79 s.down-list.-1."\n".clojure--may
fe80 62 65 2d 75 6e 6a 6f 69 6e 2d 6c 69 6e 65 20 6e 69 6c 5d 20 37 20 28 23 24 20 2e 20 36 34 36 39 be-unjoin-line.nil].7.(#$...6469
fea0 37 29 5d 29 0a 23 40 35 31 20 49 6e 73 65 72 74 20 70 61 72 65 6e 73 20 61 72 6f 75 6e 64 20 66 7)]).#@51.Insert.parens.around.f
fec0 75 6e 63 74 69 6f 6e 20 6e 61 6d 65 73 20 69 66 20 6e 65 63 65 73 73 61 72 79 2e 1f 0a 28 64 65 unction.names.if.necessary...(de
fee0 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 2d 65 6e 73 75 72 65 2d 70 61 72 65 6e 73 2d 61 falias.'clojure--ensure-parens-a
ff00 72 6f 75 6e 64 2d 66 75 6e 63 74 69 6f 6e 2d 6e 61 6d 65 73 20 23 5b 30 20 22 5c 33 30 30 20 5c round-function-names.#[0."\300.\
ff20 32 31 30 5c 33 30 31 5c 33 30 32 21 3f 5c 32 30 35 10 00 5c 33 30 33 5c 33 30 34 21 5c 32 31 30 210\301\302!?\205..\303\304!\210
ff40 5c 33 30 35 20 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 2d 6c 6f 6f 6b 69 6e 67 2d 61 74 2d \305.\207".[clojure--looking-at-
ff60 6e 6f 6e 2d 6c 6f 67 69 63 61 6c 2d 73 65 78 70 20 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 28 22 20 non-logical-sexp.looking-at."(".
ff80 69 6e 73 65 72 74 2d 70 61 72 65 6e 74 68 65 73 65 73 20 31 20 62 61 63 6b 77 61 72 64 2d 75 70 insert-parentheses.1.backward-up
ffa0 2d 6c 69 73 74 5d 20 32 20 28 23 24 20 2e 20 36 35 31 39 34 29 5d 29 0a 23 40 39 35 20 55 6e 77 -list].2.(#$...65194)]).#@95.Unw
ffc0 69 6e 64 20 61 20 74 68 72 65 61 64 20 66 69 72 73 74 20 6d 61 63 72 6f 20 6f 6e 63 65 2e 0a 0a ind.a.thread.first.macro.once...
ffe0 50 6f 69 6e 74 20 6d 75 73 74 20 62 65 20 62 65 74 77 65 65 6e 20 74 68 65 20 6f 70 65 6e 69 6e Point.must.be.between.the.openin
10000 67 20 70 61 72 65 6e 20 61 6e 64 20 74 68 65 20 2d 3e 20 73 79 6d 62 6f 6c 2e 1f 0a 28 64 65 66 g.paren.and.the.->.symbol...(def
10020 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 2d 75 6e 77 69 6e 64 2d 66 69 72 73 74 20 23 5b 30 alias.'clojure--unwind-first.#[0
10040 20 22 5c 33 30 30 20 5c 32 31 30 5c 32 31 32 5c 33 30 31 20 5c 33 30 32 5c 33 30 33 21 5c 32 30 ."\300.\210\212\301.\302\303!\20
10060 33 10 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 20 5c 32 3..\304\305!\210\306.\210\307.\2
10080 31 30 5c 33 30 30 20 5c 32 31 30 5c 32 31 31 63 5c 32 31 30 5c 33 30 30 5c 33 31 30 21 5c 32 31 10\300.\210\211c\210\300\310!\21
100a0 30 5c 33 31 31 20 5c 32 36 36 02 29 5c 33 31 32 75 5c 32 30 37 22 20 5b 66 6f 72 77 61 72 64 2d 0\311.\266.)\312u\207".[forward-
100c0 73 65 78 70 20 63 6c 6f 6a 75 72 65 2d 64 65 6c 65 74 65 2d 61 6e 64 2d 65 78 74 72 61 63 74 2d sexp.clojure-delete-and-extract-
100e0 73 65 78 70 20 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 20 2a 5c 6e 22 20 6a 6f 69 6e 2d 6c 69 6e 65 sexp.looking-at.".*\n".join-line
10100 20 66 6f 6c 6c 6f 77 69 6e 67 20 63 6c 6f 6a 75 72 65 2d 2d 65 6e 73 75 72 65 2d 70 61 72 65 6e .following.clojure--ensure-paren
10120 73 2d 61 72 6f 75 6e 64 2d 66 75 6e 63 74 69 6f 6e 2d 6e 61 6d 65 73 20 64 6f 77 6e 2d 6c 69 73 s-around-function-names.down-lis
10140 74 20 2d 31 20 63 6c 6f 6a 75 72 65 2d 2d 6d 61 79 62 65 2d 75 6e 6a 6f 69 6e 2d 6c 69 6e 65 20 t.-1.clojure--maybe-unjoin-line.
10160 6e 69 6c 5d 20 33 20 28 23 24 20 2e 20 36 35 34 36 39 29 5d 29 0a 23 40 35 33 20 52 61 69 73 65 nil].3.(#$...65469)]).#@53.Raise
10180 20 61 20 73 65 78 70 20 75 70 20 61 20 6c 65 76 65 6c 20 74 6f 20 75 6e 77 69 6e 64 20 61 20 74 .a.sexp.up.a.level.to.unwind.a.t
101a0 68 72 65 61 64 69 6e 67 20 66 6f 72 6d 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 hreading.form...(defalias.'cloju
101c0 72 65 2d 2d 70 6f 70 2d 6f 75 74 2d 6f 66 2d 74 68 72 65 61 64 69 6e 67 20 23 5b 30 20 22 5c 32 re--pop-out-of-threading.#[0."\2
101e0 31 32 5c 33 30 30 5c 33 30 31 21 5c 32 31 30 5c 33 30 32 20 5c 32 31 30 5c 33 30 33 20 29 5c 32 12\300\301!\210\302.\210\303.)\2
10200 30 37 22 20 5b 64 6f 77 6e 2d 6c 69 73 74 20 32 20 62 61 63 6b 77 61 72 64 2d 75 70 2d 6c 69 73 07".[down-list.2.backward-up-lis
10220 74 20 72 61 69 73 65 2d 73 65 78 70 5d 20 32 20 28 23 24 20 2e 20 36 35 39 31 35 29 5d 29 0a 23 t.raise-sexp].2.(#$...65915)]).#
10240 40 36 32 20 52 65 74 75 72 6e 20 6e 6f 6e 2d 6e 69 6c 20 69 66 20 61 20 74 68 72 65 61 64 65 64 @62.Return.non-nil.if.a.threaded
10260 20 66 6f 72 6d 20 63 61 6e 6e 6f 74 20 62 65 20 75 6e 77 6f 75 6e 64 20 66 75 72 74 68 65 72 2e .form.cannot.be.unwound.further.
10280 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 2d 6e 6f 74 68 69 6e 67 2d 6d 6f ..(defalias.'clojure--nothing-mo
102a0 72 65 2d 74 6f 2d 75 6e 77 69 6e 64 20 23 5b 30 20 22 5c 32 31 32 60 5c 33 30 30 20 5c 32 31 30 re-to-unwind.#[0."\212`\300.\210
102c0 5c 33 30 31 5c 33 30 32 21 5c 32 31 30 5c 33 30 33 5c 33 30 34 21 5c 32 31 30 5c 33 30 35 5c 33 \301\302!\210\303\304!\210\305\3
102e0 30 36 5c 33 30 37 20 5c 22 5c 32 30 33 18 00 5c 33 31 30 20 5c 32 31 30 5c 32 31 31 60 55 5c 32 06\307.\"\203..\310.\210\211`U\2
10300 36 32 01 29 5c 32 30 37 22 20 5b 66 6f 72 77 61 72 64 2d 73 65 78 70 20 64 6f 77 6e 2d 6c 69 73 62.)\207".[forward-sexp.down-lis
10320 74 20 2d 31 20 62 61 63 6b 77 61 72 64 2d 73 65 78 70 20 32 20 6c 6f 6f 6b 69 6e 67 2d 62 61 63 t.-1.backward-sexp.2.looking-bac
10340 6b 20 22 28 5c 5c 73 2d 2a 22 20 6c 69 6e 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 70 6f 73 69 74 69 k."(\\s-*".line-beginning-positi
10360 6f 6e 20 62 61 63 6b 77 61 72 64 2d 75 70 2d 6c 69 73 74 5d 20 34 20 28 23 24 20 2e 20 36 36 31 on.backward-up-list].4.(#$...661
10380 31 36 29 5d 29 0a 23 40 31 36 34 20 46 69 78 20 77 68 69 74 65 73 70 61 63 65 20 61 66 74 65 72 16)]).#@164.Fix.whitespace.after
103a0 20 75 6e 77 69 6e 64 69 6e 67 20 61 20 74 68 72 65 61 64 69 6e 67 20 66 6f 72 6d 2e 0a 0a 4f 70 .unwinding.a.threading.form...Op
103c0 74 69 6f 6e 61 6c 20 61 72 67 75 6d 65 6e 74 20 4d 4f 56 45 2d 4f 55 54 2c 20 69 66 20 6e 6f 6e tional.argument.MOVE-OUT,.if.non
103e0 2d 6e 69 6c 2c 20 6d 65 61 6e 73 20 6d 6f 76 65 73 20 75 70 20 61 20 6c 69 73 74 0a 62 65 66 6f -nil,.means.moves.up.a.list.befo
10400 72 65 20 66 69 78 69 6e 67 20 77 68 69 74 65 73 70 61 63 65 2e 0a 0a 28 66 6e 20 26 6f 70 74 69 re.fixing.whitespace...(fn.&opti
10420 6f 6e 61 6c 20 4d 4f 56 45 2d 4f 55 54 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 onal.MOVE-OUT)..(defalias.'cloju
10440 72 65 2d 2d 66 69 78 2d 73 65 78 70 2d 77 68 69 74 65 73 70 61 63 65 20 23 5b 32 35 36 20 22 5c re--fix-sexp-whitespace.#[256."\
10460 32 31 32 5c 32 31 31 5c 32 30 33 08 00 5c 33 30 30 20 5c 32 31 30 5c 33 30 31 5c 33 30 32 21 5c 212\211\203..\300.\210\301\302!\
10480 33 30 33 01 40 02 41 5c 22 5c 32 31 30 5c 33 30 34 01 40 02 41 5c 22 5c 32 36 32 01 29 5c 32 30 303.@.A\"\210\304.@.A\"\262.)\20
104a0 37 22 20 5b 62 61 63 6b 77 61 72 64 2d 75 70 2d 6c 69 73 74 20 62 6f 75 6e 64 73 2d 6f 66 2d 74 7".[backward-up-list.bounds-of-t
104c0 68 69 6e 67 2d 61 74 2d 70 6f 69 6e 74 20 73 65 78 70 20 63 6c 6f 6a 75 72 65 2d 69 6e 64 65 6e hing-at-point.sexp.clojure-inden
104e0 74 2d 72 65 67 69 6f 6e 20 64 65 6c 65 74 65 2d 74 72 61 69 6c 69 6e 67 2d 77 68 69 74 65 73 70 t-region.delete-trailing-whitesp
10500 61 63 65 5d 20 35 20 28 23 24 20 2e 20 36 36 34 34 34 29 5d 29 0a 23 40 31 30 33 20 55 6e 77 69 ace].5.(#$...66444)]).#@103.Unwi
10520 6e 64 20 74 68 72 65 61 64 20 61 74 20 70 6f 69 6e 74 20 6f 72 20 61 62 6f 76 65 20 70 6f 69 6e nd.thread.at.point.or.above.poin
10540 74 20 62 79 20 6f 6e 65 20 6c 65 76 65 6c 2e 0a 52 65 74 75 72 6e 20 6e 69 6c 20 69 66 20 74 68 t.by.one.level..Return.nil.if.th
10560 65 72 65 20 61 72 65 20 6e 6f 20 6d 6f 72 65 20 6c 65 76 65 6c 73 20 74 6f 20 75 6e 77 69 6e 64 ere.are.no.more.levels.to.unwind
10580 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 75 6e 77 69 6e 64 20 23 5b 30 ...(defalias.'clojure-unwind.#[0
105a0 20 22 5c 32 31 32 5c 32 31 32 5c 33 30 30 20 5c 32 31 30 60 29 5c 33 30 31 31 1b 00 5c 33 30 32 ."\212\212\300.\210`)\3011..\302
105c0 5c 33 30 33 21 5c 32 30 35 17 00 5c 33 30 34 75 5c 32 31 30 5c 33 30 35 5c 33 30 34 21 30 5c 32 \303!\205..\304u\210\305\304!0\2
105e0 30 32 1f 00 5c 32 31 30 5c 32 30 32 20 00 5c 32 31 30 5c 33 30 36 5c 33 30 37 02 5c 22 5c 32 31 02..\210\202..\210\306\307.\"\21
10600 30 5c 33 31 30 20 5c 32 30 33 34 00 5c 33 31 31 20 5c 32 31 30 5c 33 31 32 20 5c 32 31 30 5c 33 0\310.\2034.\311.\210\312.\210\3
10620 31 33 5c 32 30 32 51 00 5c 33 31 34 20 5c 32 31 30 5c 33 30 32 5c 33 31 35 21 5c 32 30 33 43 00 13\202Q.\314.\210\302\315!\203C.
10640 5c 33 31 36 20 5c 32 31 30 5c 32 30 32 4c 00 5c 33 30 32 5c 33 31 37 21 5c 32 30 33 4c 00 5c 33 \316.\210\202L.\302\317!\203L.\3
10660 32 30 20 5c 32 31 30 5c 33 31 32 5c 33 32 31 21 5c 32 31 30 5c 33 32 32 5c 32 36 32 01 29 5c 32 20.\210\312\321!\210\322\262.)\2
10680 30 37 22 20 5b 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 64 65 66 75 6e 20 28 65 72 72 6f 72 29 20 07".[beginning-of-defun.(error).
106a0 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 28 22 20 31 20 66 6f 72 77 61 72 64 2d 73 65 78 70 20 73 65 looking-at."(".1.forward-sexp.se
106c0 61 72 63 68 2d 62 61 63 6b 77 61 72 64 2d 72 65 67 65 78 70 20 22 28 5b 5e 2d 5d 2a 2d 3e 22 20 arch-backward-regexp."([^-]*->".
106e0 63 6c 6f 6a 75 72 65 2d 2d 6e 6f 74 68 69 6e 67 2d 6d 6f 72 65 2d 74 6f 2d 75 6e 77 69 6e 64 20 clojure--nothing-more-to-unwind.
10700 63 6c 6f 6a 75 72 65 2d 2d 70 6f 70 2d 6f 75 74 2d 6f 66 2d 74 68 72 65 61 64 69 6e 67 20 63 6c clojure--pop-out-of-threading.cl
10720 6f 6a 75 72 65 2d 2d 66 69 78 2d 73 65 78 70 2d 77 68 69 74 65 73 70 61 63 65 20 6e 69 6c 20 64 ojure--fix-sexp-whitespace.nil.d
10740 6f 77 6e 2d 6c 69 73 74 20 22 5b 5e 2d 5d 2a 2d 3e 5c 5c 5f 3e 22 20 63 6c 6f 6a 75 72 65 2d 2d own-list."[^-]*->\\_>".clojure--
10760 75 6e 77 69 6e 64 2d 66 69 72 73 74 20 22 5b 5e 2d 5d 2a 2d 3e 3e 5c 5c 5f 3e 22 20 63 6c 6f 6a unwind-first."[^-]*->>\\_>".cloj
10780 75 72 65 2d 2d 75 6e 77 69 6e 64 2d 6c 61 73 74 20 6d 6f 76 65 2d 6f 75 74 20 74 5d 20 34 20 28 ure--unwind-last.move-out.t].4.(
107a0 23 24 20 2e 20 36 36 38 34 34 29 20 6e 69 6c 5d 29 0a 23 40 34 36 20 46 75 6c 6c 79 20 75 6e 77 #$...66844).nil]).#@46.Fully.unw
107c0 69 6e 64 20 74 68 72 65 61 64 20 61 74 20 70 6f 69 6e 74 20 6f 72 20 61 62 6f 76 65 20 70 6f 69 ind.thread.at.point.or.above.poi
107e0 6e 74 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 75 6e 77 69 6e 64 2d 61 nt...(defalias.'clojure-unwind-a
10800 6c 6c 20 23 5b 30 20 22 5c 33 30 30 20 5c 32 30 35 08 00 5c 32 30 32 00 00 5c 32 30 37 22 20 5b ll.#[0."\300.\205..\202..\207".[
10820 63 6c 6f 6a 75 72 65 2d 75 6e 77 69 6e 64 5d 20 31 20 28 23 24 20 2e 20 36 37 35 31 31 29 20 6e clojure-unwind].1.(#$...67511).n
10840 69 6c 5d 29 0a 23 40 33 34 20 52 65 6d 6f 76 65 20 65 78 74 72 61 20 70 61 72 65 6e 73 20 66 72 il]).#@34.Remove.extra.parens.fr
10860 6f 6d 20 61 20 66 6f 72 6d 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 2d om.a.form...(defalias.'clojure--
10880 72 65 6d 6f 76 65 2d 73 75 70 65 72 66 6c 75 6f 75 73 2d 70 61 72 65 6e 73 20 23 5b 30 20 22 5c remove-superfluous-parens.#[0."\
108a0 33 30 30 5c 33 30 31 21 5c 32 30 35 08 00 5c 33 30 32 20 5c 32 30 37 22 20 5b 6c 6f 6f 6b 69 6e 300\301!\205..\302.\207".[lookin
108c0 67 2d 61 74 20 22 28 5b 5e 20 29 5d 2b 29 22 20 64 65 6c 65 74 65 2d 70 61 69 72 5d 20 32 20 28 g-at."([^.)]+)".delete-pair].2.(
108e0 23 24 20 2e 20 36 37 36 35 38 29 5d 29 0a 23 40 33 32 20 54 68 72 65 61 64 20 61 20 6e 65 73 74 #$...67658)]).#@32.Thread.a.nest
10900 65 64 20 73 65 78 70 20 75 73 69 6e 67 20 2d 3e 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c ed.sexp.using.->...(defalias.'cl
10920 6f 6a 75 72 65 2d 2d 74 68 72 65 61 64 2d 66 69 72 73 74 20 23 5b 30 20 22 5c 33 30 30 20 5c 32 ojure--thread-first.#[0."\300.\2
10940 31 30 5c 33 30 31 5c 33 30 32 21 5c 32 31 30 5c 33 30 33 5c 33 30 34 21 3f 5c 32 30 35 39 00 5c 10\301\302!\210\303\304!?\2059.\
10960 33 30 35 20 5c 33 30 36 20 5c 32 31 30 5c 33 30 37 5c 33 31 30 21 5c 32 31 30 5c 32 31 32 5c 32 305.\306.\210\307\310!\210\212\2
10980 31 31 5c 33 31 31 5c 32 36 31 02 5c 32 31 30 5c 33 31 32 20 5c 32 31 30 29 5c 33 30 33 5c 33 31 11\311\261.\210\312.\210)\303\31
109a0 33 21 5c 32 30 33 36 00 5c 33 31 34 5c 33 31 35 21 5c 32 31 30 5c 33 30 32 75 5c 32 31 30 5c 33 3!\2036.\314\315!\210\302u\210\3
109c0 31 36 60 60 54 5c 33 31 37 5c 33 32 30 24 5c 32 31 30 5c 33 32 30 5c 32 36 32 01 5c 32 30 37 22 16``T\317\320$\210\320\262.\207"
109e0 20 5b 64 6f 77 6e 2d 6c 69 73 74 20 66 6f 72 77 61 72 64 2d 73 79 6d 62 6f 6c 20 31 20 6c 6f 6f .[down-list.forward-symbol.1.loo
10a00 6b 69 6e 67 2d 61 74 20 22 29 22 20 63 6c 6f 6a 75 72 65 2d 64 65 6c 65 74 65 2d 61 6e 64 2d 65 king-at.")".clojure-delete-and-e
10a20 78 74 72 61 63 74 2d 73 65 78 70 20 62 61 63 6b 77 61 72 64 2d 75 70 2d 6c 69 73 74 20 6a 75 73 xtract-sexp.backward-up-list.jus
10a40 74 2d 6f 6e 65 2d 73 70 61 63 65 20 30 20 22 5c 6e 22 20 63 6c 6f 6a 75 72 65 2d 2d 72 65 6d 6f t-one-space.0."\n".clojure--remo
10a60 76 65 2d 73 75 70 65 72 66 6c 75 6f 75 73 2d 70 61 72 65 6e 73 20 22 5c 5c 73 2d 2a 5c 6e 22 20 ve-superfluous-parens."\\s-*\n".
10a80 6a 6f 69 6e 2d 6c 69 6e 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 70 75 74 2d 74 65 78 74 2d 70 72 6f join-line.following.put-text-pro
10aa0 70 65 72 74 79 20 63 6c 6f 6a 75 72 65 2d 74 68 72 65 61 64 2d 6c 69 6e 65 2d 6a 6f 69 6e 65 64 perty.clojure-thread-line-joined
10ac0 20 74 5d 20 36 20 28 23 24 20 2e 20 36 37 38 32 37 29 5d 29 0a 23 40 33 33 20 54 68 72 65 61 64 .t].6.(#$...67827)]).#@33.Thread
10ae0 20 61 20 6e 65 73 74 65 64 20 73 65 78 70 20 75 73 69 6e 67 20 2d 3e 3e 2e 1f 0a 28 64 65 66 61 .a.nested.sexp.using.->>...(defa
10b00 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 2d 74 68 72 65 61 64 2d 6c 61 73 74 20 23 5b 30 20 22 lias.'clojure--thread-last.#[0."
10b20 5c 33 30 30 5c 33 30 31 21 5c 32 31 30 5c 33 30 32 5c 33 30 33 21 5c 32 31 30 5c 33 30 34 20 5c \300\301!\210\302\303!\210\304.\
10b40 32 31 30 60 53 66 5c 33 30 35 3d 3f 5c 32 30 35 41 00 5c 33 30 36 20 5c 33 30 37 5c 33 31 30 21 210`Sf\305=?\205A.\306.\307\310!
10b60 5c 32 31 30 5c 33 31 31 20 5c 32 31 30 5c 32 31 31 5c 33 31 32 5c 32 36 31 02 5c 32 31 30 5c 33 \210\311.\210\211\312\261.\210\3
10b80 31 33 20 5c 32 31 30 5c 33 30 30 20 5c 32 31 30 5c 33 31 34 5c 33 31 35 5c 33 31 36 20 5c 22 5c 13.\210\300.\210\314\315\316.\"\
10ba0 32 30 33 3e 00 5c 33 31 37 5c 32 32 34 5c 33 32 30 01 5c 32 31 31 54 5c 33 32 31 5c 33 32 32 24 203>.\317\224\320.\211T\321\322$
10bc0 5c 32 36 36 02 5c 33 32 33 20 5c 32 31 30 5c 33 32 32 5c 32 36 32 01 5c 32 30 37 22 20 5b 66 6f \266.\323.\210\322\262.\207".[fo
10be0 72 77 61 72 64 2d 73 65 78 70 20 32 20 64 6f 77 6e 2d 6c 69 73 74 20 2d 31 20 62 61 63 6b 77 61 rward-sexp.2.down-list.-1.backwa
10c00 72 64 2d 73 65 78 70 20 34 30 20 63 6c 6f 6a 75 72 65 2d 64 65 6c 65 74 65 2d 61 6e 64 2d 65 78 rd-sexp.40.clojure-delete-and-ex
10c20 74 72 61 63 74 2d 73 65 78 70 20 6a 75 73 74 2d 6f 6e 65 2d 73 70 61 63 65 20 30 20 62 61 63 6b tract-sexp.just-one-space.0.back
10c40 77 61 72 64 2d 75 70 2d 6c 69 73 74 20 22 5c 6e 22 20 63 6c 6f 6a 75 72 65 2d 2d 72 65 6d 6f 76 ward-up-list."\n".clojure--remov
10c60 65 2d 73 75 70 65 72 66 6c 75 6f 75 73 2d 70 61 72 65 6e 73 20 6c 6f 6f 6b 69 6e 67 2d 62 61 63 e-superfluous-parens.looking-bac
10c80 6b 20 22 5e 5c 5c 73 2d 2a 5c 5c 28 29 2b 5c 5c 29 5c 5c 73 2d 2a 22 20 6c 69 6e 65 2d 62 65 67 k."^\\s-*\\()+\\)\\s-*".line-beg
10ca0 69 6e 6e 69 6e 67 2d 70 6f 73 69 74 69 6f 6e 20 31 20 70 75 74 2d 74 65 78 74 2d 70 72 6f 70 65 inning-position.1.put-text-prope
10cc0 72 74 79 20 63 6c 6f 6a 75 72 65 2d 74 68 72 65 61 64 2d 6c 69 6e 65 2d 6a 6f 69 6e 65 64 20 74 rty.clojure-thread-line-joined.t
10ce0 20 6a 6f 69 6e 2d 6c 69 6e 65 5d 20 37 20 28 23 24 20 2e 20 36 38 33 31 34 29 5d 29 0a 23 40 34 .join-line].7.(#$...68314)]).#@4
10d00 33 20 52 65 74 75 72 6e 20 6e 6f 6e 2d 6e 69 6c 20 69 66 20 61 20 66 6f 72 6d 20 63 61 6e 20 62 3.Return.non-nil.if.a.form.can.b
10d20 65 20 74 68 72 65 61 64 65 64 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d e.threaded...(defalias.'clojure-
10d40 2d 74 68 72 65 61 64 61 62 6c 65 2d 70 20 23 5b 30 20 22 5c 32 31 32 5c 33 30 30 5c 33 30 31 21 -threadable-p.#[0."\212\300\301!
10d60 5c 32 31 30 5c 33 30 32 5c 33 30 33 21 29 5c 32 30 37 22 20 5b 66 6f 72 77 61 72 64 2d 73 79 6d \210\302\303!)\207".[forward-sym
10d80 62 6f 6c 20 31 20 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 5b 5c 6e 0d 09 20 5d 2a 28 22 5d 20 32 20 bol.1.looking-at."[\n...]*("].2.
10da0 28 23 24 20 2e 20 36 38 38 36 36 29 5d 29 0a 23 40 35 35 20 54 68 72 65 61 64 20 62 79 20 6f 6e (#$...68866)]).#@55.Thread.by.on
10dc0 65 20 6d 6f 72 65 20 6c 65 76 65 6c 20 61 6e 20 65 78 69 73 74 69 6e 67 20 74 68 72 65 61 64 69 e.more.level.an.existing.threadi
10de0 6e 67 20 6d 61 63 72 6f 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 74 68 ng.macro...(defalias.'clojure-th
10e00 72 65 61 64 20 23 5b 30 20 22 5c 33 30 30 31 14 00 5c 33 30 31 5c 33 30 32 21 5c 32 30 35 10 00 read.#[0."\3001..\301\302!\205..
10e20 5c 33 30 33 75 5c 32 31 30 5c 33 30 34 5c 33 30 33 21 30 5c 32 30 32 18 00 5c 32 31 30 5c 32 30 \303u\210\304\303!0\202..\210\20
10e40 32 19 00 5c 32 31 30 5c 33 30 35 5c 33 30 36 21 5c 32 31 30 5c 33 30 37 20 5c 32 31 30 5c 33 31 2..\210\305\306!\210\307.\210\31
10e60 30 20 5c 32 30 35 3c 00 5c 33 30 31 5c 33 31 31 21 5c 32 30 33 30 00 5c 33 31 32 20 5c 32 30 32 0.\205<.\301\311!\2030.\312.\202
10e80 38 00 5c 33 30 31 5c 33 31 33 21 5c 32 30 35 38 00 5c 33 31 34 20 5c 33 31 35 5c 33 31 36 21 5c 8.\301\313!\2058.\314.\315\316!\
10ea0 32 31 30 5c 32 30 37 22 20 5b 28 65 72 72 6f 72 29 20 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 28 22 210\207".[(error).looking-at."("
10ec0 20 31 20 66 6f 72 77 61 72 64 2d 73 65 78 70 20 73 65 61 72 63 68 2d 62 61 63 6b 77 61 72 64 2d .1.forward-sexp.search-backward-
10ee0 72 65 67 65 78 70 20 22 28 5b 5e 2d 5d 2a 2d 3e 22 20 64 6f 77 6e 2d 6c 69 73 74 20 63 6c 6f 6a regexp."([^-]*->".down-list.cloj
10f00 75 72 65 2d 2d 74 68 72 65 61 64 61 62 6c 65 2d 70 20 22 5b 5e 2d 5d 2a 2d 3e 5c 5c 5f 3e 22 20 ure--threadable-p."[^-]*->\\_>".
10f20 63 6c 6f 6a 75 72 65 2d 2d 74 68 72 65 61 64 2d 66 69 72 73 74 20 22 5b 5e 2d 5d 2a 2d 3e 3e 5c clojure--thread-first."[^-]*->>\
10f40 5c 5f 3e 22 20 63 6c 6f 6a 75 72 65 2d 2d 74 68 72 65 61 64 2d 6c 61 73 74 20 63 6c 6f 6a 75 72 \_>".clojure--thread-last.clojur
10f60 65 2d 2d 66 69 78 2d 73 65 78 70 2d 77 68 69 74 65 73 70 61 63 65 20 6d 6f 76 65 2d 6f 75 74 5d e--fix-sexp-whitespace.move-out]
10f80 20 33 20 28 23 24 20 2e 20 36 39 30 34 34 29 20 6e 69 6c 5d 29 0a 23 40 32 32 31 20 46 75 6c 6c .3.(#$...69044).nil]).#@221.Full
10fa0 79 20 74 68 72 65 61 64 20 74 68 65 20 66 6f 72 6d 20 61 74 20 70 6f 69 6e 74 2e 0a 0a 46 49 52 y.thread.the.form.at.point...FIR
10fc0 53 54 2d 4f 52 2d 4c 41 53 54 2d 54 48 52 45 41 44 20 69 73 20 22 2d 3e 22 20 6f 72 20 22 2d 3e ST-OR-LAST-THREAD.is."->".or."->
10fe0 3e 22 2e 0a 0a 57 68 65 6e 20 42 55 54 2d 4c 41 53 54 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 74 >"...When.BUT-LAST.is.non-nil,.t
11000 68 65 20 6c 61 73 74 20 65 78 70 72 65 73 73 69 6f 6e 20 69 73 20 6e 6f 74 20 74 68 72 65 61 64 he.last.expression.is.not.thread
11020 65 64 2e 0a 44 65 66 61 75 6c 74 20 76 61 6c 75 65 20 69 73 20 60 63 6c 6f 6a 75 72 65 2d 74 68 ed..Default.value.is.`clojure-th
11040 72 65 61 64 2d 61 6c 6c 2d 62 75 74 2d 6c 61 73 74 27 2e 0a 0a 28 66 6e 20 46 49 52 53 54 2d 4f read-all-but-last'...(fn.FIRST-O
11060 52 2d 4c 41 53 54 2d 54 48 52 45 41 44 20 42 55 54 2d 4c 41 53 54 29 1f 0a 28 64 65 66 61 6c 69 R-LAST-THREAD.BUT-LAST)..(defali
11080 61 73 20 27 63 6c 6f 6a 75 72 65 2d 2d 74 68 72 65 61 64 2d 61 6c 6c 20 23 5b 35 31 34 20 22 5c as.'clojure--thread-all.#[514."\
110a0 32 31 32 5c 33 30 31 5c 33 30 32 21 5c 32 31 30 01 63 5c 32 31 30 29 5c 32 31 32 5c 33 30 33 20 212\301\302!\210.c\210)\212\303.
110c0 29 5c 32 30 34 09 00 5c 32 31 31 5c 32 30 34 18 00 08 5c 32 30 35 1a 00 5c 33 30 34 20 5c 32 30 )\204..\211\204...\205..\304.\20
110e0 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 74 68 72 65 61 64 2d 61 6c 6c 2d 62 75 74 2d 6c 61 73 74 20 7".[clojure-thread-all-but-last.
11100 69 6e 73 65 72 74 2d 70 61 72 65 6e 74 68 65 73 65 73 20 31 20 63 6c 6f 6a 75 72 65 2d 74 68 72 insert-parentheses.1.clojure-thr
11120 65 61 64 20 63 6c 6f 6a 75 72 65 2d 75 6e 77 69 6e 64 5d 20 34 20 28 23 24 20 2e 20 36 39 35 33 ead.clojure-unwind].4.(#$...6953
11140 32 29 5d 29 0a 23 40 31 36 39 20 46 75 6c 6c 79 20 74 68 72 65 61 64 20 74 68 65 20 66 6f 72 6d 2)]).#@169.Fully.thread.the.form
11160 20 61 74 20 70 6f 69 6e 74 20 75 73 69 6e 67 20 2d 3e 2e 0a 0a 57 68 65 6e 20 42 55 54 2d 4c 41 .at.point.using.->...When.BUT-LA
11180 53 54 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 74 68 65 20 6c 61 73 74 20 65 78 70 72 65 73 73 69 ST.is.non-nil,.the.last.expressi
111a0 6f 6e 20 69 73 20 6e 6f 74 20 74 68 72 65 61 64 65 64 2e 0a 44 65 66 61 75 6c 74 20 76 61 6c 75 on.is.not.threaded..Default.valu
111c0 65 20 69 73 20 60 63 6c 6f 6a 75 72 65 2d 74 68 72 65 61 64 2d 61 6c 6c 2d 62 75 74 2d 6c 61 73 e.is.`clojure-thread-all-but-las
111e0 74 27 2e 0a 0a 28 66 6e 20 42 55 54 2d 4c 41 53 54 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 t'...(fn.BUT-LAST)..(defalias.'c
11200 6c 6f 6a 75 72 65 2d 74 68 72 65 61 64 2d 66 69 72 73 74 2d 61 6c 6c 20 23 5b 32 35 37 20 22 5c lojure-thread-first-all.#[257."\
11220 33 30 30 5c 33 30 31 02 5c 22 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 2d 74 68 72 65 61 64 300\301.\"\207".[clojure--thread
11240 2d 61 6c 6c 20 22 2d 3e 20 22 5d 20 34 20 28 23 24 20 2e 20 36 39 39 36 33 29 20 22 50 22 5d 29 -all."->."].4.(#$...69963)."P"])
11260 0a 23 40 31 37 30 20 46 75 6c 6c 79 20 74 68 72 65 61 64 20 74 68 65 20 66 6f 72 6d 20 61 74 20 .#@170.Fully.thread.the.form.at.
11280 70 6f 69 6e 74 20 75 73 69 6e 67 20 2d 3e 3e 2e 0a 0a 57 68 65 6e 20 42 55 54 2d 4c 41 53 54 20 point.using.->>...When.BUT-LAST.
112a0 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 74 68 65 20 6c 61 73 74 20 65 78 70 72 65 73 73 69 6f 6e 20 is.non-nil,.the.last.expression.
112c0 69 73 20 6e 6f 74 20 74 68 72 65 61 64 65 64 2e 0a 44 65 66 61 75 6c 74 20 76 61 6c 75 65 20 69 is.not.threaded..Default.value.i
112e0 73 20 60 63 6c 6f 6a 75 72 65 2d 74 68 72 65 61 64 2d 61 6c 6c 2d 62 75 74 2d 6c 61 73 74 27 2e s.`clojure-thread-all-but-last'.
11300 0a 0a 28 66 6e 20 42 55 54 2d 4c 41 53 54 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a ..(fn.BUT-LAST)..(defalias.'cloj
11320 75 72 65 2d 74 68 72 65 61 64 2d 6c 61 73 74 2d 61 6c 6c 20 23 5b 32 35 37 20 22 5c 33 30 30 5c ure-thread-last-all.#[257."\300\
11340 33 30 31 02 5c 22 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 2d 74 68 72 65 61 64 2d 61 6c 6c 301.\"\207".[clojure--thread-all
11360 20 22 2d 3e 3e 20 22 5d 20 34 20 28 23 24 20 2e 20 37 30 32 34 37 29 20 22 50 22 5d 29 0a 28 62 ."->>."].4.(#$...70247)."P"]).(b
11380 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 44 yte-code."\300\301\302\303\304DD
113a0 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 26 09 5c 32 \305\306\307\310\311\312\313&.\2
113c0 30 37 22 20 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 63 6c 6f 07".[custom-declare-variable.clo
113e0 6a 75 72 65 2d 75 73 65 2d 6d 65 74 61 64 61 74 61 2d 66 6f 72 2d 70 72 69 76 61 63 79 20 66 75 jure-use-metadata-for-privacy.fu
11400 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 37 22 20 5b 6e ncall.function.#[0."\300\207".[n
11420 69 6c 5d 20 31 5d 20 22 49 66 20 6e 69 6c 2c 20 60 63 6c 6f 6a 75 72 65 2d 63 79 63 6c 65 2d 70 il].1]."If.nil,.`clojure-cycle-p
11440 72 69 76 61 63 79 27 20 77 69 6c 6c 20 75 73 65 20 28 64 65 66 6e 2d 20 66 20 5b 5d 29 2e 5c 6e rivacy'.will.use.(defn-.f.[]).\n
11460 49 66 20 74 2c 20 69 74 20 77 69 6c 6c 20 75 73 65 20 28 64 65 66 6e 20 5e 3a 70 72 69 76 61 74 If.t,.it.will.use.(defn.^:privat
11480 65 20 66 20 5b 5d 29 2e 22 20 3a 70 61 63 6b 61 67 65 2d 76 65 72 73 69 6f 6e 20 28 63 6c 6f 6a e.f.[]).".:package-version.(cloj
114a0 75 72 65 2d 6d 6f 64 65 20 2e 20 22 35 2e 35 2e 30 22 29 20 3a 73 61 66 65 20 62 6f 6f 6c 65 61 ure-mode..."5.5.0").:safe.boolea
114c0 6e 70 20 3a 74 79 70 65 20 62 6f 6f 6c 65 61 6e 5d 20 31 30 29 0a 23 40 31 33 31 20 4d 61 6b 65 np.:type.boolean].10).#@131.Make
114e0 20 70 75 62 6c 69 63 20 74 68 65 20 63 75 72 72 65 6e 74 20 70 72 69 76 61 74 65 20 64 65 66 2c .public.the.current.private.def,
11500 20 6f 72 20 76 69 63 65 2d 76 65 72 73 61 2e 0a 53 65 65 3a 20 68 74 74 70 73 3a 2f 2f 67 69 74 .or.vice-versa..See:.https://git
11520 68 75 62 2e 63 6f 6d 2f 63 6c 6f 6a 75 72 65 2d 65 6d 61 63 73 2f 63 6c 6a 2d 72 65 66 61 63 74 hub.com/clojure-emacs/clj-refact
11540 6f 72 2e 65 6c 2f 77 69 6b 69 2f 63 6c 6a 72 2d 63 79 63 6c 65 2d 70 72 69 76 61 63 79 1f 0a 28 or.el/wiki/cljr-cycle-privacy..(
11560 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 63 79 63 6c 65 2d 70 72 69 76 61 63 79 20 defalias.'clojure-cycle-privacy.
11580 23 5b 30 20 22 5c 32 31 32 5c 33 30 31 31 0b 00 5c 33 30 32 75 30 5c 32 30 32 0f 00 5c 32 31 30 #[0."\212\3011..\302u0\202..\210
115a0 5c 32 30 32 10 00 5c 32 31 30 5c 33 30 33 5c 33 30 34 21 5c 32 31 30 5c 33 30 35 5c 33 30 36 21 \202..\210\303\304!\210\305\306!
115c0 5c 32 30 33 24 00 5c 33 30 37 5c 33 31 30 5c 33 31 31 5c 32 31 31 5c 32 31 31 5c 33 30 36 25 5c \203$.\307\310\311\211\211\306%\
115e0 32 30 32 3a 00 5c 33 31 32 5c 32 32 35 62 5c 32 31 30 08 5c 32 30 34 34 00 5c 33 30 35 5c 33 31 202:.\312\225b\210.\2044.\305\31
11600 32 21 5c 33 31 33 5c 32 33 32 5c 32 30 33 38 00 5c 33 31 34 5c 32 30 32 39 00 5c 33 31 35 63 29 2!\313\232\2038.\314\2029.\315c)
11620 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 75 73 65 2d 6d 65 74 61 64 61 74 61 2d 66 6f 72 2d \207".[clojure-use-metadata-for-
11640 70 72 69 76 61 63 79 20 28 65 72 72 6f 72 29 20 37 20 73 65 61 72 63 68 2d 62 61 63 6b 77 61 72 privacy.(error).7.search-backwar
11660 64 2d 72 65 67 65 78 70 20 22 28 64 65 66 6e 3f 5c 5c 28 2d 5c 5c 7c 20 5e 3a 70 72 69 76 61 74 d-regexp."(defn?\\(-\\|.^:privat
11680 65 5c 5c 29 3f 5c 5c 5f 3e 22 20 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 31 20 72 65 70 6c 61 63 e\\)?\\_>".match-string.1.replac
116a0 65 2d 6d 61 74 63 68 20 22 22 20 6e 69 6c 20 30 20 22 28 64 65 66 22 20 22 20 5e 3a 70 72 69 76 e-match."".nil.0."(def".".^:priv
116c0 61 74 65 22 20 22 2d 22 5d 20 36 20 28 23 24 20 2e 20 37 30 38 37 36 29 20 6e 69 6c 5d 29 0a 23 ate"."-"].6.(#$...70876).nil]).#
116e0 40 31 32 38 20 43 6f 6e 76 65 72 74 20 74 68 65 20 63 6f 6c 6c 65 63 74 69 6f 6e 20 61 74 20 28 @128.Convert.the.collection.at.(
11700 70 6f 69 6e 74 29 20 62 79 20 75 6e 77 72 61 70 70 69 6e 67 20 69 74 20 61 6e 20 77 72 61 70 70 point).by.unwrapping.it.an.wrapp
11720 69 6e 67 20 69 74 20 62 65 74 77 65 65 6e 20 43 4f 4c 4c 2d 4f 50 45 4e 20 61 6e 64 20 43 4f 4c ing.it.between.COLL-OPEN.and.COL
11740 4c 2d 43 4c 4f 53 45 2e 0a 0a 28 66 6e 20 43 4f 4c 4c 2d 4f 50 45 4e 20 43 4f 4c 4c 2d 43 4c 4f L-CLOSE...(fn.COLL-OPEN.COLL-CLO
11760 53 45 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 2d 63 6f 6e 76 65 72 74 SE)..(defalias.'clojure--convert
11780 2d 63 6f 6c 6c 65 63 74 69 6f 6e 20 23 5b 35 31 34 20 22 5c 32 31 32 6f 5c 32 30 34 11 00 5c 33 -collection.#[514."\212o\204..\3
117a0 30 30 5c 33 30 31 21 5c 32 30 34 11 00 5c 33 30 32 75 5c 32 31 30 5c 32 30 32 01 00 60 53 66 5c 00\301!\204..\302u\210\202..`Sf\
117c0 33 30 33 3d 5c 32 30 34 21 00 60 53 66 5c 33 30 34 3d 5c 32 30 33 25 00 5c 33 30 35 5c 33 30 32 303=\204!.`Sf\304=\203%.\305\302
117e0 21 5c 32 31 30 6f 5c 32 30 33 34 00 5c 33 30 36 66 5c 33 30 37 3e 5c 32 30 34 34 00 5c 33 31 30 !\210o\2034.\306f\307>\2044.\310
11800 5c 33 31 31 21 5c 32 31 30 01 5c 33 31 32 20 5c 33 31 33 5c 33 30 32 4f 02 5c 32 36 31 03 29 5c \311!\210.\312.\313\302O.\261.)\
11820 32 30 37 22 20 5b 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 28 5c 5c 7c 7b 5c 5c 7c 5c 5c 5b 22 20 2d 207".[looking-at."(\\|{\\|\\[".-
11840 31 20 33 35 20 33 39 20 64 65 6c 65 74 65 2d 63 68 61 72 20 6e 69 6c 20 28 31 32 33 20 34 30 20 1.35.39.delete-char.nil.(123.40.
11860 39 31 29 20 75 73 65 72 2d 65 72 72 6f 72 20 22 42 65 67 69 6e 6e 69 6e 67 20 6f 66 20 66 69 6c 91).user-error."Beginning.of.fil
11880 65 20 72 65 61 63 68 65 64 2c 20 63 6f 6c 6c 65 63 74 69 6f 6e 20 69 73 20 6e 6f 74 20 66 6f 75 e.reached,.collection.is.not.fou
118a0 6e 64 22 20 63 6c 6f 6a 75 72 65 2d 64 65 6c 65 74 65 2d 61 6e 64 2d 65 78 74 72 61 63 74 2d 73 nd".clojure-delete-and-extract-s
118c0 65 78 70 20 31 5d 20 36 20 28 23 24 20 2e 20 37 31 33 39 37 29 5d 29 0a 23 40 34 30 20 43 6f 6e exp.1].6.(#$...71397)]).#@40.Con
118e0 76 65 72 74 20 63 6f 6c 6c 65 63 74 69 6f 6e 20 61 74 20 28 70 6f 69 6e 74 29 20 74 6f 20 6c 69 vert.collection.at.(point).to.li
11900 73 74 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 63 6f 6e 76 65 72 74 2d st...(defalias.'clojure-convert-
11920 63 6f 6c 6c 65 63 74 69 6f 6e 2d 74 6f 2d 6c 69 73 74 20 23 5b 30 20 22 5c 33 30 30 5c 33 30 31 collection-to-list.#[0."\300\301
11940 5c 33 30 32 5c 22 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 2d 63 6f 6e 76 65 72 74 2d 63 6f \302\"\207".[clojure--convert-co
11960 6c 6c 65 63 74 69 6f 6e 20 22 28 22 20 22 29 22 5d 20 33 20 28 23 24 20 2e 20 37 31 39 30 31 29 llection."(".")"].3.(#$...71901)
11980 20 6e 69 6c 5d 29 0a 23 40 34 37 20 43 6f 6e 76 65 72 74 20 63 6f 6c 6c 65 63 74 69 6f 6e 20 61 .nil]).#@47.Convert.collection.a
119a0 74 20 28 70 6f 69 6e 74 29 20 74 6f 20 71 75 6f 74 65 64 20 6c 69 73 74 2e 1f 0a 28 64 65 66 61 t.(point).to.quoted.list...(defa
119c0 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 63 6f 6e 76 65 72 74 2d 63 6f 6c 6c 65 63 74 69 6f 6e lias.'clojure-convert-collection
119e0 2d 74 6f 2d 71 75 6f 74 65 64 2d 6c 69 73 74 20 23 5b 30 20 22 5c 33 30 30 5c 33 30 31 5c 33 30 -to-quoted-list.#[0."\300\301\30
11a00 32 5c 22 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 2d 63 6f 6e 76 65 72 74 2d 63 6f 6c 6c 65 2\"\207".[clojure--convert-colle
11a20 63 74 69 6f 6e 20 22 27 28 22 20 22 29 22 5d 20 33 20 28 23 24 20 2e 20 37 32 30 37 36 29 20 6e ction."'(".")"].3.(#$...72076).n
11a40 69 6c 5d 29 0a 23 40 33 39 20 43 6f 6e 76 65 72 74 20 63 6f 6c 6c 65 63 74 69 6f 6e 20 61 74 20 il]).#@39.Convert.collection.at.
11a60 28 70 6f 69 6e 74 29 20 74 6f 20 6d 61 70 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a (point).to.map...(defalias.'cloj
11a80 75 72 65 2d 63 6f 6e 76 65 72 74 2d 63 6f 6c 6c 65 63 74 69 6f 6e 2d 74 6f 2d 6d 61 70 20 23 5b ure-convert-collection-to-map.#[
11aa0 30 20 22 5c 33 30 30 5c 33 30 31 5c 33 30 32 5c 22 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 0."\300\301\302\"\207".[clojure-
11ac0 2d 63 6f 6e 76 65 72 74 2d 63 6f 6c 6c 65 63 74 69 6f 6e 20 22 7b 22 20 22 7d 22 5d 20 33 20 28 -convert-collection."{"."}"].3.(
11ae0 23 24 20 2e 20 37 32 32 36 36 29 20 6e 69 6c 5d 29 0a 23 40 34 32 20 43 6f 6e 76 65 72 74 20 63 #$...72266).nil]).#@42.Convert.c
11b00 6f 6c 6c 65 63 74 69 6f 6e 20 61 74 20 28 70 6f 69 6e 74 29 20 74 6f 20 76 65 63 74 6f 72 2e 1f ollection.at.(point).to.vector..
11b20 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 63 6f 6e 76 65 72 74 2d 63 6f 6c 6c .(defalias.'clojure-convert-coll
11b40 65 63 74 69 6f 6e 2d 74 6f 2d 76 65 63 74 6f 72 20 23 5b 30 20 22 5c 33 30 30 5c 33 30 31 5c 33 ection-to-vector.#[0."\300\301\3
11b60 30 32 5c 22 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 2d 63 6f 6e 76 65 72 74 2d 63 6f 6c 6c 02\"\207".[clojure--convert-coll
11b80 65 63 74 69 6f 6e 20 22 5b 22 20 22 5d 22 5d 20 33 20 28 23 24 20 2e 20 37 32 34 33 39 29 20 6e ection."["."]"].3.(#$...72439).n
11ba0 69 6c 5d 29 0a 23 40 33 39 20 43 6f 6e 76 65 72 74 20 63 6f 6c 6c 65 63 74 69 6f 6e 20 61 74 20 il]).#@39.Convert.collection.at.
11bc0 28 70 6f 69 6e 74 29 20 74 6f 20 73 65 74 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a (point).to.set...(defalias.'cloj
11be0 75 72 65 2d 63 6f 6e 76 65 72 74 2d 63 6f 6c 6c 65 63 74 69 6f 6e 2d 74 6f 2d 73 65 74 20 23 5b ure-convert-collection-to-set.#[
11c00 30 20 22 5c 33 30 30 5c 33 30 31 5c 33 30 32 5c 22 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 0."\300\301\302\"\207".[clojure-
11c20 2d 63 6f 6e 76 65 72 74 2d 63 6f 6c 6c 65 63 74 69 6f 6e 20 22 23 7b 22 20 22 7d 22 5d 20 33 20 -convert-collection."#{"."}"].3.
11c40 28 23 24 20 2e 20 37 32 36 31 38 29 20 6e 69 6c 5d 29 0a 23 40 35 31 20 43 68 65 63 6b 20 77 68 (#$...72618).nil]).#@51.Check.wh
11c60 65 74 68 65 72 20 74 68 65 20 70 6f 69 6e 74 20 69 73 20 63 75 72 72 65 6e 74 6c 79 20 69 6e 20 ether.the.point.is.currently.in.
11c80 61 20 73 74 72 69 6e 67 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 2d 69 a.string...(defalias.'clojure--i
11ca0 6e 2d 73 74 72 69 6e 67 2d 70 20 23 5b 30 20 22 5c 33 30 30 5c 33 30 31 20 38 5c 32 30 37 22 20 n-string-p.#[0."\300\301.8\207".
11cc0 5b 33 20 73 79 6e 74 61 78 2d 70 70 73 73 5d 20 32 20 28 23 24 20 2e 20 37 32 37 39 32 29 5d 29 [3.syntax-ppss].2.(#$...72792)])
11ce0 0a 23 40 35 33 20 46 69 6e 64 20 74 68 65 20 66 69 72 73 74 20 73 75 72 72 6f 75 6e 64 69 6e 67 .#@53.Find.the.first.surrounding
11d00 20 69 66 20 6f 72 20 69 66 2d 6e 6f 74 20 65 78 70 72 65 73 73 69 6f 6e 2e 1f 0a 28 64 65 66 61 .if.or.if-not.expression...(defa
11d20 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 2d 67 6f 74 6f 2d 69 66 20 23 5b 30 20 22 5c 33 30 30 lias.'clojure--goto-if.#[0."\300
11d40 20 5c 32 30 33 16 00 5c 33 30 31 5c 33 30 32 21 5c 32 30 33 10 00 5c 33 30 30 20 5c 32 30 33 16 .\203..\301\302!\203..\300.\203.
11d60 00 5c 33 30 33 75 5c 32 31 30 5c 32 30 32 05 00 5c 33 30 31 5c 33 30 34 21 3f 5c 32 30 35 2f 00 .\303u\210\202..\301\304!?\205/.
11d80 5c 33 30 35 31 27 00 5c 33 30 36 20 30 5c 32 30 32 2b 00 5c 32 31 30 5c 33 30 37 5c 33 31 30 21 \3051'.\306.0\202+.\210\307\310!
11da0 5c 32 31 30 5c 32 30 32 16 00 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 2d 69 6e 2d 73 74 72 \210\202..\207".[clojure--in-str
11dc0 69 6e 67 2d 70 20 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 28 22 20 2d 31 20 22 5c 5c 28 28 69 66 20 ing-p.looking-at."(".-1."\\((if.
11de0 5c 5c 29 5c 5c 7c 5c 5c 28 28 69 66 2d 6e 6f 74 20 5c 5c 29 22 20 28 73 63 61 6e 2d 65 72 72 6f \\)\\|\\((if-not.\\)".(scan-erro
11e00 72 29 20 62 61 63 6b 77 61 72 64 2d 75 70 2d 6c 69 73 74 20 75 73 65 72 2d 65 72 72 6f 72 20 22 r).backward-up-list.user-error."
11e20 4e 6f 20 69 66 20 6f 72 20 69 66 2d 6e 6f 74 20 66 6f 75 6e 64 22 5d 20 32 20 28 23 24 20 2e 20 No.if.or.if-not.found"].2.(#$...
11e40 37 32 39 33 34 29 5d 29 0a 23 40 31 32 35 20 43 68 61 6e 67 65 20 61 20 73 75 72 72 6f 75 6e 64 72934)]).#@125.Change.a.surround
11e60 69 6e 67 20 69 66 20 74 6f 20 69 66 2d 6e 6f 74 2c 20 6f 72 20 76 69 63 65 2d 76 65 72 73 61 2e ing.if.to.if-not,.or.vice-versa.
11e80 0a 0a 53 65 65 3a 20 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 63 6c 6f 6a 75 72 ..See:.https://github.com/clojur
11ea0 65 2d 65 6d 61 63 73 2f 63 6c 6a 2d 72 65 66 61 63 74 6f 72 2e 65 6c 2f 77 69 6b 69 2f 63 6c 6a e-emacs/clj-refactor.el/wiki/clj
11ec0 72 2d 63 79 63 6c 65 2d 69 66 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 63 r-cycle-if..(defalias.'clojure-c
11ee0 79 63 6c 65 2d 69 66 20 23 5b 30 20 22 5c 32 31 32 5c 33 30 30 20 5c 32 31 30 5c 33 30 31 5c 33 ycle-if.#[0."\212\300.\210\301\3
11f00 30 32 21 5c 32 30 33 1b 00 5c 33 30 33 75 5c 32 31 30 5c 33 30 34 5c 33 30 35 21 5c 32 31 30 5c 02!\203..\303u\210\304\305!\210\
11f20 33 30 36 5c 33 30 37 21 5c 32 31 30 5c 33 31 30 5c 33 31 31 21 5c 32 30 32 2e 00 5c 33 30 31 5c 306\307!\210\310\311!\202..\301\
11f40 33 31 32 21 5c 32 30 35 2e 00 5c 33 30 33 75 5c 32 31 30 5c 33 31 33 63 5c 32 31 30 5c 33 30 36 312!\205..\303u\210\313c\210\306
11f60 5c 33 30 37 21 5c 32 31 30 5c 33 31 30 5c 33 31 31 21 29 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 \307!\210\310\311!)\207".[clojur
11f80 65 2d 2d 67 6f 74 6f 2d 69 66 20 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 28 69 66 2d 6e 6f 74 22 20 e--goto-if.looking-at."(if-not".
11fa0 33 20 64 65 6c 65 74 65 2d 63 68 61 72 20 34 20 66 6f 72 77 61 72 64 2d 73 65 78 70 20 32 20 74 3.delete-char.4.forward-sexp.2.t
11fc0 72 61 6e 73 70 6f 73 65 2d 73 65 78 70 73 20 31 20 22 28 69 66 22 20 22 2d 6e 6f 74 22 5d 20 32 ranspose-sexps.1."(if"."-not"].2
11fe0 20 28 23 24 20 2e 20 37 33 32 39 35 29 20 6e 69 6c 5d 29 0a 23 40 35 37 20 46 69 6e 64 20 74 68 .(#$...73295).nil]).#@57.Find.th
12000 65 20 66 69 72 73 74 20 73 75 72 72 6f 75 6e 64 69 6e 67 20 77 68 65 6e 20 6f 72 20 77 68 65 6e e.first.surrounding.when.or.when
12020 2d 6e 6f 74 20 65 78 70 72 65 73 73 69 6f 6e 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f -not.expression...(defalias.'clo
12040 6a 75 72 65 2d 2d 67 6f 74 6f 2d 77 68 65 6e 20 23 5b 30 20 22 5c 33 30 30 20 5c 32 30 33 16 00 jure--goto-when.#[0."\300.\203..
12060 5c 33 30 31 5c 33 30 32 21 5c 32 30 33 10 00 5c 33 30 30 20 5c 32 30 33 16 00 5c 33 30 33 75 5c \301\302!\203..\300.\203..\303u\
12080 32 31 30 5c 32 30 32 05 00 5c 33 30 31 5c 33 30 34 21 3f 5c 32 30 35 2f 00 5c 33 30 35 31 27 00 210\202..\301\304!?\205/.\3051'.
120a0 5c 33 30 36 20 30 5c 32 30 32 2b 00 5c 32 31 30 5c 33 30 37 5c 33 31 30 21 5c 32 31 30 5c 32 30 \306.0\202+.\210\307\310!\210\20
120c0 32 16 00 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 2d 69 6e 2d 73 74 72 69 6e 67 2d 70 20 6c 2..\207".[clojure--in-string-p.l
120e0 6f 6f 6b 69 6e 67 2d 61 74 20 22 28 22 20 2d 31 20 22 5c 5c 28 28 77 68 65 6e 20 5c 5c 29 5c 5c ooking-at."(".-1."\\((when.\\)\\
12100 7c 5c 5c 28 28 77 68 65 6e 2d 6e 6f 74 20 5c 5c 29 22 20 28 73 63 61 6e 2d 65 72 72 6f 72 29 20 |\\((when-not.\\)".(scan-error).
12120 62 61 63 6b 77 61 72 64 2d 75 70 2d 6c 69 73 74 20 75 73 65 72 2d 65 72 72 6f 72 20 22 4e 6f 20 backward-up-list.user-error."No.
12140 77 68 65 6e 20 6f 72 20 77 68 65 6e 2d 6e 6f 74 20 66 6f 75 6e 64 22 5d 20 32 20 28 23 24 20 2e when.or.when-not.found"].2.(#$..
12160 20 37 33 37 32 31 29 5d 29 0a 23 40 35 35 20 43 68 61 6e 67 65 20 61 20 73 75 72 72 6f 75 6e 64 .73721)]).#@55.Change.a.surround
12180 69 6e 67 20 77 68 65 6e 20 74 6f 20 77 68 65 6e 2d 6e 6f 74 2c 20 6f 72 20 76 69 63 65 2d 76 65 ing.when.to.when-not,.or.vice-ve
121a0 72 73 61 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 63 79 63 6c 65 2d 77 rsa...(defalias.'clojure-cycle-w
121c0 68 65 6e 20 23 5b 30 20 22 5c 32 31 32 5c 33 30 30 20 5c 32 31 30 5c 33 30 31 5c 33 30 32 21 5c hen.#[0."\212\300.\210\301\302!\
121e0 32 30 33 13 00 5c 33 30 33 75 5c 32 31 30 5c 33 30 34 5c 33 30 35 21 5c 32 30 32 1e 00 5c 33 30 203..\303u\210\304\305!\202..\30
12200 31 5c 33 30 36 21 5c 32 30 35 1e 00 5c 33 30 37 75 5c 32 31 30 5c 33 31 30 63 29 5c 32 30 37 22 1\306!\205..\307u\210\310c)\207"
12220 20 5b 63 6c 6f 6a 75 72 65 2d 2d 67 6f 74 6f 2d 77 68 65 6e 20 6c 6f 6f 6b 69 6e 67 2d 61 74 20 .[clojure--goto-when.looking-at.
12240 22 28 77 68 65 6e 2d 6e 6f 74 22 20 39 20 64 65 6c 65 74 65 2d 63 68 61 72 20 2d 34 20 22 28 77 "(when-not".9.delete-char.-4."(w
12260 68 65 6e 22 20 35 20 22 2d 6e 6f 74 22 5d 20 32 20 28 23 24 20 2e 20 37 34 30 39 35 29 20 6e 69 hen".5."-not"].2.(#$...74095).ni
12280 6c 5d 29 0a 23 40 35 31 20 41 64 64 20 6f 72 20 72 65 6d 6f 76 65 20 61 20 6e 6f 74 20 66 6f 72 l]).#@51.Add.or.remove.a.not.for
122a0 6d 20 61 72 6f 75 6e 64 20 74 68 65 20 63 75 72 72 65 6e 74 20 66 6f 72 6d 2e 1f 0a 28 64 65 66 m.around.the.current.form...(def
122c0 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 63 79 63 6c 65 2d 6e 6f 74 20 23 5b 30 20 22 5c 32 alias.'clojure-cycle-not.#[0."\2
122e0 31 32 5c 33 30 30 31 0b 00 5c 33 30 31 20 30 5c 32 30 32 0f 00 5c 32 31 30 5c 33 30 32 5c 33 30 12\3001..\301.0\202..\210\302\30
12300 33 21 5c 32 31 30 5c 33 30 34 5c 33 30 35 21 5c 32 30 33 23 00 5c 33 30 36 5c 33 30 37 21 5c 32 3!\210\304\305!\203#.\306\307!\2
12320 31 30 5c 33 31 30 20 5c 32 31 30 5c 33 30 36 5c 33 31 31 21 5c 32 30 32 2b 00 5c 33 30 35 63 5c 10\310.\210\306\311!\202+.\305c\
12340 32 31 30 5c 33 31 30 20 5c 32 31 30 5c 33 31 32 63 29 5c 32 30 37 22 20 5b 28 73 63 61 6e 2d 65 210\310.\210\312c)\207".[(scan-e
12360 72 72 6f 72 29 20 62 61 63 6b 77 61 72 64 2d 75 70 2d 6c 69 73 74 20 75 73 65 72 2d 65 72 72 6f rror).backward-up-list.user-erro
12380 72 20 22 60 63 6c 6f 6a 75 72 65 2d 63 79 63 6c 65 2d 6e 6f 74 27 20 6d 75 73 74 20 62 65 20 69 r."`clojure-cycle-not'.must.be.i
123a0 6e 76 6f 6b 65 64 20 69 6e 73 69 64 65 20 61 20 6c 69 73 74 22 20 6c 6f 6f 6b 69 6e 67 2d 62 61 nvoked.inside.a.list".looking-ba
123c0 63 6b 20 22 28 6e 6f 74 20 22 20 64 65 6c 65 74 65 2d 63 68 61 72 20 2d 35 20 66 6f 72 77 61 72 ck."(not.".delete-char.-5.forwar
123e0 64 2d 73 65 78 70 20 31 20 22 29 22 5d 20 32 20 28 23 24 20 2e 20 37 34 33 37 37 29 20 6e 69 6c d-sexp.1.")"].2.(#$...74377).nil
12400 5d 29 0a 23 40 32 35 32 20 52 65 67 65 78 70 20 6d 61 74 63 68 69 6e 67 20 6c 65 74 20 6c 69 6b ]).#@252.Regexp.matching.let.lik
12420 65 20 65 78 70 72 65 73 73 69 6f 6e 73 2c 20 69 2e 65 2e 20 22 6c 65 74 22 2c 20 22 77 68 65 6e e.expressions,.i.e.."let",."when
12440 2d 6c 65 74 22 2c 20 22 69 66 2d 6c 65 74 22 2e 0a 0a 54 68 65 20 66 69 72 73 74 20 6d 61 74 63 -let",."if-let"...The.first.matc
12460 68 2d 67 72 6f 75 70 20 69 73 20 74 68 65 20 6c 65 74 20 65 78 70 72 65 73 73 69 6f 6e 2e 0a 0a h-group.is.the.let.expression...
12480 54 68 65 20 73 65 63 6f 6e 64 20 6d 61 74 63 68 2d 67 72 6f 75 70 20 69 73 20 74 68 65 20 77 68 The.second.match-group.is.the.wh
124a0 69 74 65 73 70 61 63 65 20 6f 72 20 74 68 65 20 6f 70 65 6e 69 6e 67 20 73 71 75 61 72 65 0a 62 itespace.or.the.opening.square.b
124c0 72 61 63 6b 65 74 20 69 66 20 6e 6f 20 77 68 69 74 65 73 70 61 63 65 20 62 65 74 77 65 65 6e 20 racket.if.no.whitespace.between.
124e0 74 68 65 20 6c 65 74 20 65 78 70 72 65 73 73 69 6f 6e 20 61 6e 64 20 74 68 65 0a 62 72 61 63 6b the.let.expression.and.the.brack
12500 65 74 2e 1f 0a 28 64 65 66 76 61 72 20 63 6c 6f 6a 75 72 65 2d 2d 6c 65 74 2d 72 65 67 65 78 70 et...(defvar.clojure--let-regexp
12520 20 22 28 5c 5c 28 77 68 65 6e 2d 6c 65 74 5c 5c 7c 69 66 2d 6c 65 74 5c 5c 7c 6c 65 74 5c 5c 29 ."(\\(when-let\\|if-let\\|let\\)
12540 5c 5c 28 5c 5c 73 2d 2a 5c 5c 7c 5c 5c 5b 5c 5c 29 22 20 28 23 24 20 2e 20 37 34 37 36 31 29 29 \\(\\s-*\\|\\[\\)".(#$...74761))
12560 0a 23 40 34 36 20 47 6f 20 74 6f 20 74 68 65 20 62 65 67 69 6e 6e 69 6e 67 20 6f 66 20 74 68 65 .#@46.Go.to.the.beginning.of.the
12580 20 6e 65 61 72 65 73 74 20 6c 65 74 20 66 6f 72 6d 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 .nearest.let.form...(defalias.'c
125a0 6c 6f 6a 75 72 65 2d 2d 67 6f 74 6f 2d 6c 65 74 20 23 5b 30 20 22 5c 33 30 31 20 5c 32 30 33 16 lojure--goto-let.#[0."\301.\203.
125c0 00 5c 33 30 32 5c 33 30 33 21 5c 32 30 33 10 00 5c 33 30 31 20 5c 32 30 33 16 00 5c 33 30 34 75 .\302\303!\203..\301.\203..\304u
125e0 5c 32 31 30 5c 32 30 32 05 00 5c 33 30 35 31 2b 00 5c 33 30 32 08 21 3f 5c 32 30 35 27 00 5c 33 \210\202..\3051+.\302.!?\205'.\3
12600 30 36 20 5c 32 31 30 5c 32 30 32 1a 00 30 5c 32 30 32 2f 00 5c 32 31 30 5c 32 30 32 30 00 5c 32 06.\210\202..0\202/.\210\2020.\2
12620 31 30 5c 33 30 32 08 21 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 2d 6c 65 74 2d 72 65 67 65 10\302.!\207".[clojure--let-rege
12640 78 70 20 63 6c 6f 6a 75 72 65 2d 2d 69 6e 2d 73 74 72 69 6e 67 2d 70 20 6c 6f 6f 6b 69 6e 67 2d xp.clojure--in-string-p.looking-
12660 61 74 20 22 28 22 20 2d 31 20 28 65 72 72 6f 72 29 20 62 61 63 6b 77 61 72 64 2d 75 70 2d 6c 69 at."(".-1.(error).backward-up-li
12680 73 74 5d 20 32 20 28 23 24 20 2e 20 37 35 31 31 30 29 5d 29 0a 23 40 35 30 20 52 65 74 75 72 6e st].2.(#$...75110)]).#@50.Return
126a0 20 6e 6f 6e 2d 6e 69 6c 20 69 66 20 70 6f 69 6e 74 20 69 73 20 69 6e 73 69 64 65 20 61 20 6c 65 .non-nil.if.point.is.inside.a.le
126c0 74 20 62 69 6e 64 69 6e 67 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 2d t.binding...(defalias.'clojure--
126e0 69 6e 73 69 64 65 2d 6c 65 74 2d 62 69 6e 64 69 6e 67 2d 70 20 23 5b 30 20 22 5c 33 30 30 31 5c inside-let-binding-p.#[0."\3001\
12700 22 00 5c 32 31 32 60 5c 33 30 31 20 5c 32 31 30 5c 33 30 32 5c 33 30 33 21 5c 32 31 30 5c 32 31 ".\212`\301.\210\302\303!\210\21
12720 31 60 57 3f 5c 32 30 35 1d 00 5c 33 30 34 20 5c 32 31 30 5c 33 30 35 20 5c 32 31 30 5c 32 31 31 1`W?\205..\304.\210\305.\210\211
12740 60 57 5c 32 36 32 01 29 30 5c 32 30 37 5c 32 31 30 5c 33 30 36 5c 32 30 37 22 20 5b 28 65 72 72 `W\262.)0\207\210\306\207".[(err
12760 6f 72 29 20 63 6c 6f 6a 75 72 65 2d 2d 67 6f 74 6f 2d 6c 65 74 20 72 65 2d 73 65 61 72 63 68 2d or).clojure--goto-let.re-search-
12780 66 6f 72 77 61 72 64 20 22 5c 5c 5b 22 20 66 6f 72 77 61 72 64 2d 73 65 78 70 20 75 70 2d 6c 69 forward."\\[".forward-sexp.up-li
127a0 73 74 20 6e 69 6c 5d 20 33 20 28 23 24 20 2e 20 37 35 34 31 38 29 5d 29 0a 23 40 31 30 33 20 4d st.nil].3.(#$...75418)]).#@103.M
127c0 6f 76 65 20 62 65 66 6f 72 65 20 74 68 65 20 62 6f 75 6e 64 20 6e 61 6d 65 20 6f 66 20 74 68 65 ove.before.the.bound.name.of.the
127e0 20 63 75 72 72 65 6e 74 20 62 69 6e 64 69 6e 67 2e 0a 41 73 73 75 6d 65 20 74 68 61 74 20 70 6f .current.binding..Assume.that.po
12800 69 6e 74 20 69 73 20 69 6e 20 74 68 65 20 62 69 6e 64 69 6e 67 20 66 6f 72 6d 20 6f 66 20 61 20 int.is.in.the.binding.form.of.a.
12820 6c 65 74 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 2d 62 65 67 69 6e 6e let...(defalias.'clojure--beginn
12840 69 6e 67 2d 6f 66 2d 63 75 72 72 65 6e 74 2d 6c 65 74 2d 62 69 6e 64 69 6e 67 20 23 5b 30 20 22 ing-of-current-let-binding.#[0."
12860 60 5c 33 30 30 20 5c 32 31 30 5c 33 30 31 5c 33 30 32 21 5c 32 31 30 5c 33 30 33 75 5c 32 31 30 `\300.\210\301\302!\210\303u\210
12880 5c 32 31 31 60 56 5c 32 30 33 17 00 5c 33 30 34 20 5c 32 31 30 5c 32 30 32 0b 00 5c 33 30 35 5c \211`V\203..\304.\210\202..\305\
128a0 33 30 36 21 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 2d 67 6f 74 6f 2d 6c 65 74 20 73 65 61 306!\207".[clojure--goto-let.sea
128c0 72 63 68 2d 66 6f 72 77 61 72 64 20 22 5b 22 20 6e 69 6c 20 66 6f 72 77 61 72 64 2d 73 65 78 70 rch-forward."[".nil.forward-sexp
128e0 20 62 61 63 6b 77 61 72 64 2d 73 65 78 70 20 32 5d 20 33 20 28 23 24 20 2e 20 37 35 37 31 31 29 .backward-sexp.2].3.(#$...75711)
12900 5d 29 0a 23 40 35 34 20 4b 65 65 70 20 74 68 65 20 63 6f 6c 75 6d 6e 20 70 6f 73 69 74 69 6f 6e ]).#@54.Keep.the.column.position
12920 20 77 68 69 6c 65 20 67 6f 20 74 68 65 20 70 72 65 76 69 6f 75 73 20 6c 69 6e 65 2e 1f 0a 28 64 .while.go.the.previous.line...(d
12940 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 2d 70 72 65 76 69 6f 75 73 2d 6c 69 6e 65 20 efalias.'clojure--previous-line.
12960 23 5b 30 20 22 69 5c 33 30 30 79 5c 32 31 30 5c 33 30 31 01 21 5c 32 30 37 22 20 5b 2d 31 20 6d #[0."i\300y\210\301.!\207".[-1.m
12980 6f 76 65 2d 74 6f 2d 63 6f 6c 75 6d 6e 5d 20 33 20 28 23 24 20 2e 20 37 36 30 34 30 29 5d 29 0a ove-to-column].3.(#$...76040)]).
129a0 23 40 37 33 20 4d 6f 76 65 20 74 6f 20 72 69 67 68 74 20 70 6c 61 63 65 20 69 6e 20 74 68 65 20 #@73.Move.to.right.place.in.the.
129c0 6c 65 74 20 66 6f 72 6d 20 74 6f 20 69 6e 73 65 72 74 20 61 20 6e 65 77 20 62 69 6e 64 69 6e 67 let.form.to.insert.a.new.binding
129e0 20 61 6e 64 20 69 6e 64 65 6e 74 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 .and.indent...(defalias.'clojure
12a00 2d 2d 70 72 65 70 61 72 65 2d 74 6f 2d 69 6e 73 65 72 74 2d 6e 65 77 2d 6c 65 74 2d 62 69 6e 64 --prepare-to-insert-new-let-bind
12a20 69 6e 67 20 23 5b 30 20 22 5c 33 30 30 20 5c 32 30 33 11 00 5c 33 30 31 20 5c 32 31 30 5c 33 30 ing.#[0."\300.\203..\301.\210\30
12a40 32 20 5c 32 31 30 5c 33 30 33 20 5c 32 31 30 5c 33 30 34 20 5c 32 30 37 5c 33 30 35 20 5c 32 31 2.\210\303.\210\304.\207\305.\21
12a60 30 5c 33 30 36 5c 33 30 37 21 5c 32 31 30 5c 33 31 30 20 5c 32 31 30 5c 33 31 31 20 5c 32 31 30 0\306\307!\210\310.\210\311.\210
12a80 5c 33 31 32 5c 33 31 33 21 5c 32 31 30 5c 33 31 33 75 5c 32 31 30 5c 33 31 34 5c 33 31 35 21 5c \312\313!\210\313u\210\314\315!\
12aa0 32 30 33 2e 00 5c 33 31 36 75 5c 32 30 37 5c 33 31 36 75 5c 32 31 30 5c 33 30 32 20 5c 32 30 37 203..\316u\207\316u\210\302.\207
12ac0 22 20 5b 63 6c 6f 6a 75 72 65 2d 2d 69 6e 73 69 64 65 2d 6c 65 74 2d 62 69 6e 64 69 6e 67 2d 70 ".[clojure--inside-let-binding-p
12ae0 20 63 6c 6f 6a 75 72 65 2d 2d 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 63 75 72 72 65 6e 74 2d 6c .clojure--beginning-of-current-l
12b00 65 74 2d 62 69 6e 64 69 6e 67 20 6e 65 77 6c 69 6e 65 2d 61 6e 64 2d 69 6e 64 65 6e 74 20 63 6c et-binding.newline-and-indent.cl
12b20 6f 6a 75 72 65 2d 2d 70 72 65 76 69 6f 75 73 2d 6c 69 6e 65 20 69 6e 64 65 6e 74 2d 66 6f 72 2d ojure--previous-line.indent-for-
12b40 74 61 62 2d 63 6f 6d 6d 61 6e 64 20 63 6c 6f 6a 75 72 65 2d 2d 67 6f 74 6f 2d 6c 65 74 20 73 65 tab-command.clojure--goto-let.se
12b60 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 5b 22 20 62 61 63 6b 77 61 72 64 2d 75 70 2d 6c 69 73 arch-forward."[".backward-up-lis
12b80 74 20 66 6f 72 77 61 72 64 2d 73 65 78 70 20 64 6f 77 6e 2d 6c 69 73 74 20 2d 31 20 6c 6f 6f 6b t.forward-sexp.down-list.-1.look
12ba0 69 6e 67 2d 61 74 20 22 5c 5c 5b 5c 5c 73 2d 2a 5c 5c 5d 22 20 6e 69 6c 5d 20 32 20 28 23 24 20 ing-at."\\[\\s-*\\]".nil].2.(#$.
12bc0 2e 20 37 36 31 39 37 29 5d 29 0a 23 40 34 37 20 52 65 74 75 72 6e 20 61 20 72 65 67 65 78 70 20 ..76197)]).#@47.Return.a.regexp.
12be0 66 6f 72 20 6d 61 74 63 68 69 6e 67 20 53 45 58 50 2e 0a 0a 28 66 6e 20 53 45 58 50 29 1f 0a 28 for.matching.SEXP...(fn.SEXP)..(
12c00 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 2d 73 65 78 70 2d 72 65 67 65 78 70 20 23 defalias.'clojure--sexp-regexp.#
12c20 5b 32 35 37 20 22 5c 33 30 30 5c 33 30 31 5c 33 30 32 5c 33 30 33 5c 33 30 34 5c 33 30 35 06 06 [257."\300\301\302\303\304\305..
12c40 21 5c 22 5c 33 30 36 23 5c 33 30 30 51 5c 32 30 37 22 20 5b 22 5c 5c 28 5b 5e 5b 3a 77 6f 72 64 !\"\306#\300Q\207".["\\([^[:word
12c60 3a 5d 5e 2d 5d 5c 5c 29 22 20 6d 61 70 63 6f 6e 63 61 74 20 69 64 65 6e 74 69 74 79 20 6d 61 70 :]^-]\\)".mapconcat.identity.map
12c80 63 61 72 20 72 65 67 65 78 70 2d 71 75 6f 74 65 20 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 22 5b car.regexp-quote.split-string."[
12ca0 5b 3a 73 70 61 63 65 3a 5d 5c 6e 0d 5d 2b 22 5d 20 38 20 28 23 24 20 2e 20 37 36 37 35 32 29 5d [:space:]\n.]+"].8.(#$...76752)]
12cc0 29 0a 23 40 31 39 34 20 52 65 70 6c 61 63 65 20 61 20 62 69 6e 64 69 6e 67 20 77 69 74 68 20 69 ).#@194.Replace.a.binding.with.i
12ce0 74 73 20 62 6f 75 6e 64 20 6e 61 6d 65 20 69 6e 20 74 68 65 20 6c 65 74 20 66 6f 72 6d 2e 0a 0a ts.bound.name.in.the.let.form...
12d00 42 4f 55 4e 44 2d 4e 41 4d 45 20 69 73 20 74 68 65 20 6e 61 6d 65 20 28 6c 65 66 74 2d 68 61 6e BOUND-NAME.is.the.name.(left-han
12d20 64 20 73 69 64 65 29 20 6f 66 20 61 20 62 69 6e 64 69 6e 67 2e 0a 0a 49 4e 49 54 2d 45 58 50 52 d.side).of.a.binding...INIT-EXPR
12d40 20 69 73 20 74 68 65 20 76 61 6c 75 65 20 28 72 69 67 68 74 2d 68 61 6e 64 20 73 69 64 65 29 20 .is.the.value.(right-hand.side).
12d60 6f 66 20 61 20 62 69 6e 64 69 6e 67 2e 0a 0a 28 66 6e 20 42 4f 55 4e 44 2d 4e 41 4d 45 20 49 4e of.a.binding...(fn.BOUND-NAME.IN
12d80 49 54 2d 45 58 50 52 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 2d 72 65 IT-EXPR)..(defalias.'clojure--re
12da0 70 6c 61 63 65 2d 73 65 78 70 2d 77 69 74 68 2d 62 69 6e 64 69 6e 67 20 23 5b 35 31 34 20 22 5c place-sexp-with-binding.#[514."\
12dc0 32 31 32 5c 33 30 30 5c 33 30 31 02 21 5c 33 30 32 5c 33 30 33 5c 33 30 34 5c 22 5c 33 30 35 23 212\300\301.!\302\303\304\"\305#
12de0 5c 32 30 35 18 00 5c 33 30 36 5c 33 30 37 03 5c 33 31 30 51 21 5c 32 31 30 5c 32 30 32 01 00 29 \205..\306\307.\310Q!\210\202..)
12e00 5c 32 30 37 22 20 5b 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 63 6c 6f 6a 75 72 65 \207".[re-search-forward.clojure
12e20 2d 2d 73 65 78 70 2d 72 65 67 65 78 70 20 63 6c 6f 6a 75 72 65 2d 2d 70 6f 69 6e 74 2d 61 66 74 --sexp-regexp.clojure--point-aft
12e40 65 72 20 63 6c 6f 6a 75 72 65 2d 2d 67 6f 74 6f 2d 6c 65 74 20 66 6f 72 77 61 72 64 2d 73 65 78 er.clojure--goto-let.forward-sex
12e60 70 20 74 20 72 65 70 6c 61 63 65 2d 6d 61 74 63 68 20 22 5c 5c 31 22 20 22 5c 5c 32 22 5d 20 37 p.t.replace-match."\\1"."\\2"].7
12e80 20 28 23 24 20 2e 20 37 37 30 30 30 29 5d 29 0a 23 40 31 34 33 20 52 65 70 6c 61 63 65 20 62 69 .(#$...77000)]).#@143.Replace.bi
12ea0 6e 64 69 6e 67 73 20 77 69 74 68 20 74 68 65 69 72 20 72 65 73 70 65 63 74 69 76 65 20 62 6f 75 ndings.with.their.respective.bou
12ec0 6e 64 20 6e 61 6d 65 73 20 69 6e 20 74 68 65 20 6c 65 74 20 66 6f 72 6d 2e 0a 0a 42 49 4e 44 49 nd.names.in.the.let.form...BINDI
12ee0 4e 47 53 20 69 73 20 74 68 65 20 6c 69 73 74 20 6f 66 20 62 6f 75 6e 64 20 6e 61 6d 65 73 20 61 NGS.is.the.list.of.bound.names.a
12f00 6e 64 20 69 6e 69 74 20 65 78 70 72 65 73 73 69 6f 6e 73 2e 0a 0a 28 66 6e 20 42 49 4e 44 49 4e nd.init.expressions...(fn.BINDIN
12f20 47 53 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 2d 72 65 70 6c 61 63 65 GS)..(defalias.'clojure--replace
12f40 2d 73 65 78 70 73 2d 77 69 74 68 2d 62 69 6e 64 69 6e 67 73 20 23 5b 32 35 37 20 22 5c 32 31 31 -sexps-with-bindings.#[257."\211
12f60 01 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 01 5c 32 30 35 18 .A\262.\242.\211A\262.\242.\205.
12f80 00 5c 33 30 30 02 02 5c 22 5c 32 31 30 5c 33 30 31 03 21 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 .\300..\"\210\301.!\207".[clojur
12fa0 65 2d 2d 72 65 70 6c 61 63 65 2d 73 65 78 70 2d 77 69 74 68 2d 62 69 6e 64 69 6e 67 20 63 6c 6f e--replace-sexp-with-binding.clo
12fc0 6a 75 72 65 2d 2d 72 65 70 6c 61 63 65 2d 73 65 78 70 73 2d 77 69 74 68 2d 62 69 6e 64 69 6e 67 jure--replace-sexps-with-binding
12fe0 73 5d 20 36 20 28 23 24 20 2e 20 37 37 34 36 32 29 5d 29 0a 23 40 33 30 20 52 65 70 6c 61 63 65 s].6.(#$...77462)]).#@30.Replace
13000 20 73 65 78 70 73 20 77 69 74 68 20 62 69 6e 64 69 6e 67 73 2e 1f 0a 28 64 65 66 61 6c 69 61 73 .sexps.with.bindings...(defalias
13020 20 27 63 6c 6f 6a 75 72 65 2d 2d 72 65 70 6c 61 63 65 2d 73 65 78 70 73 2d 77 69 74 68 2d 62 69 .'clojure--replace-sexps-with-bi
13040 6e 64 69 6e 67 73 2d 61 6e 64 2d 69 6e 64 65 6e 74 20 23 5b 30 20 22 5c 33 30 30 5c 33 30 31 20 ndings-and-indent.#[0."\300\301.
13060 21 5c 32 31 30 5c 33 30 32 5c 33 30 33 5c 33 30 34 21 5c 33 30 33 5c 33 30 34 5c 33 30 35 5c 22 !\210\302\303\304!\303\304\305\"
13080 5c 22 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 2d 72 65 70 6c 61 63 65 2d 73 65 78 70 73 2d \"\207".[clojure--replace-sexps-
130a0 77 69 74 68 2d 62 69 6e 64 69 6e 67 73 20 63 6c 6f 6a 75 72 65 2d 2d 72 65 61 64 2d 6c 65 74 2d with-bindings.clojure--read-let-
130c0 62 69 6e 64 69 6e 67 73 20 63 6c 6f 6a 75 72 65 2d 69 6e 64 65 6e 74 2d 72 65 67 69 6f 6e 20 63 bindings.clojure-indent-region.c
130e0 6c 6f 6a 75 72 65 2d 2d 70 6f 69 6e 74 2d 61 66 74 65 72 20 63 6c 6f 6a 75 72 65 2d 2d 67 6f 74 lojure--point-after.clojure--got
13100 6f 2d 6c 65 74 20 66 6f 72 77 61 72 64 2d 73 65 78 70 5d 20 35 20 28 23 24 20 2e 20 37 37 38 31 o-let.forward-sexp].5.(#$...7781
13120 37 29 5d 29 0a 23 40 31 34 35 20 52 65 61 64 20 74 68 65 20 62 6f 75 6e 64 2d 6e 61 6d 65 20 61 7)]).#@145.Read.the.bound-name.a
13140 6e 64 20 69 6e 69 74 20 65 78 70 72 65 73 73 69 6f 6e 20 70 61 69 72 73 20 69 6e 20 74 68 65 20 nd.init.expression.pairs.in.the.
13160 62 69 6e 64 69 6e 67 20 66 6f 72 6d 2e 0a 52 65 74 75 72 6e 20 61 20 6c 69 73 74 3a 20 6f 64 64 binding.form..Return.a.list:.odd
13180 20 65 6c 65 6d 65 6e 74 73 20 61 72 65 20 62 6f 75 6e 64 20 6e 61 6d 65 73 2c 20 65 76 65 6e 20 .elements.are.bound.names,.even.
131a0 65 6c 65 6d 65 6e 74 73 20 69 6e 69 74 20 65 78 70 72 65 73 73 69 6f 6e 73 2e 1f 0a 28 64 65 66 elements.init.expressions...(def
131c0 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 2d 72 65 61 64 2d 6c 65 74 2d 62 69 6e 64 69 6e 67 alias.'clojure--read-let-binding
131e0 73 20 23 5b 30 20 22 5c 33 30 30 20 5c 32 31 30 5c 33 30 31 5c 33 30 32 21 5c 32 31 30 60 5c 32 s.#[0."\300.\210\301\302!\210`\2
13200 31 31 5c 32 31 32 5c 33 30 33 75 5c 32 31 30 5c 33 30 34 20 5c 32 31 30 5c 33 30 31 5c 33 30 33 11\212\303u\210\304.\210\301\303
13220 21 5c 32 31 30 60 29 5c 33 30 35 02 02 55 5c 32 30 34 56 00 5c 33 30 34 20 5c 32 31 30 5c 33 30 !\210`)\305..U\204V.\304.\210\30
13240 36 03 60 5c 22 5c 32 31 31 5c 33 30 37 5c 33 31 30 02 5c 22 5c 32 30 33 34 00 5c 33 31 31 5c 33 6.`\"\211\307\310.\"\2034.\311\3
13260 31 32 5c 33 31 33 5c 32 31 31 04 24 5c 32 36 32 01 5c 33 30 37 5c 33 31 34 02 5c 22 5c 32 30 33 12\313\211.$\262.\307\314.\"\203
13280 46 00 5c 33 31 31 5c 33 31 32 5c 33 31 33 5c 32 31 31 04 24 5c 32 36 36 5c 32 30 32 5c 32 30 32 F.\311\312\313\211.$\266\202\202
132a0 48 00 5c 32 36 32 01 01 42 5c 32 36 32 01 5c 33 31 35 5c 33 30 35 77 5c 32 31 30 60 5c 32 36 32 H.\262..B\262.\315\305w\210`\262
132c0 03 5c 32 30 32 17 00 5c 32 31 31 5c 32 33 37 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 2d 67 .\202..\211\237\207".[clojure--g
132e0 6f 74 6f 2d 6c 65 74 20 64 6f 77 6e 2d 6c 69 73 74 20 32 20 2d 31 20 66 6f 72 77 61 72 64 2d 73 oto-let.down-list.2.-1.forward-s
13300 65 78 70 20 6e 69 6c 20 62 75 66 66 65 72 2d 73 75 62 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 exp.nil.buffer-substring-no-prop
13320 65 72 74 69 65 73 20 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 5b 20 09 5c 6e 0d 5d 2b 5c 5c 27 erties.string-match."[..\n.]+\\'
13340 22 20 72 65 70 6c 61 63 65 2d 6d 61 74 63 68 20 22 22 20 74 20 22 5c 5c 60 5b 20 09 5c 6e 0d 5d ".replace-match."".t."\\`[..\n.]
13360 2b 22 20 22 0d 5c 6e 09 5b 3a 62 6c 61 6e 6b 3a 5d 22 5d 20 31 31 20 28 23 24 20 2e 20 37 38 31 +".".\n.[:blank:]"].11.(#$...781
13380 32 33 29 5d 29 0a 23 40 31 35 33 20 43 72 65 61 74 65 20 61 20 6c 65 74 20 66 6f 72 6d 2c 20 62 23)]).#@153.Create.a.let.form,.b
133a0 69 6e 64 69 6e 67 20 74 68 65 20 66 6f 72 6d 20 61 74 20 70 6f 69 6e 74 20 77 69 74 68 20 4e 41 inding.the.form.at.point.with.NA
133c0 4d 45 2e 0a 0a 4f 70 74 69 6f 6e 61 6c 20 6e 75 6d 65 72 69 63 20 61 72 67 75 6d 65 6e 74 20 4e ME...Optional.numeric.argument.N
133e0 2c 20 69 66 20 6e 6f 6e 2d 6e 69 6c 2c 20 69 6e 74 72 6f 64 75 63 65 73 20 74 68 65 20 6c 65 74 ,.if.non-nil,.introduces.the.let
13400 20 4e 0a 6c 69 73 74 73 20 75 70 2e 0a 0a 28 66 6e 20 4e 41 4d 45 20 26 6f 70 74 69 6f 6e 61 6c .N.lists.up...(fn.NAME.&optional
13420 20 4e 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 2d 69 6e 74 72 6f 64 75 .N)..(defalias.'clojure--introdu
13440 63 65 2d 6c 65 74 2d 69 6e 74 65 72 6e 61 6c 20 23 5b 35 31 33 20 22 5c 32 31 31 5c 32 34 37 5c ce-let-internal.#[513."\211\247\
13460 32 30 33 35 00 5c 33 30 30 20 02 63 5c 32 31 30 5c 33 30 31 31 15 00 5c 33 30 32 02 21 30 5c 32 2035.\300..c\210\3011..\302.!0\2
13480 30 32 19 00 5c 32 31 30 5c 32 30 32 1a 00 5c 32 31 30 5c 33 30 33 5c 33 30 30 20 5c 33 30 34 5c 02..\210\202..\210\303\300.\304\
134a0 32 36 31 03 5c 32 31 30 5c 33 30 35 20 5c 32 31 30 5c 33 30 36 20 5c 32 31 30 5c 33 30 37 20 5c 261.\210\305.\210\306.\210\307.\
134c0 32 31 30 5c 33 31 30 03 5c 33 31 31 03 5c 33 31 32 5c 32 36 31 05 5c 32 31 30 5c 33 31 33 20 5c 210\310.\311.\312\261.\210\313.\
134e0 32 30 37 5c 33 31 34 5c 33 30 30 20 5c 33 31 35 5c 32 36 31 03 5c 32 31 30 5c 33 30 35 20 5c 32 207\314\300.\315\261.\210\305.\2
13500 31 30 5c 33 31 36 5c 33 30 30 20 5c 33 30 34 5c 32 36 31 03 5c 32 31 30 5c 33 30 35 20 5c 32 31 10\316\300.\304\261.\210\305.\21
13520 30 5c 33 30 36 5c 33 31 37 21 5c 32 31 30 01 63 5c 32 31 30 5c 33 30 37 20 5c 32 31 30 5c 33 32 0\306\317!\210.c\210\307.\210\32
13540 30 20 5c 32 31 30 5c 33 32 31 20 5c 32 31 30 01 63 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 0.\210\321.\210.c\207".[clojure-
13560 64 65 6c 65 74 65 2d 61 6e 64 2d 65 78 74 72 61 63 74 2d 73 65 78 70 20 28 65 72 72 6f 72 29 20 delete-and-extract-sexp.(error).
13580 62 61 63 6b 77 61 72 64 2d 75 70 2d 6c 69 73 74 20 22 28 6c 65 74 22 20 22 29 22 20 62 61 63 6b backward-up-list."(let".")".back
135a0 77 61 72 64 2d 73 65 78 70 20 64 6f 77 6e 2d 6c 69 73 74 20 66 6f 72 77 61 72 64 2d 73 65 78 70 ward-sexp.down-list.forward-sexp
135c0 20 22 20 5b 22 20 22 20 22 20 22 5d 5c 6e 22 20 63 6c 6f 6a 75 72 65 2d 2d 72 65 70 6c 61 63 65 .".["."."."]\n".clojure--replace
135e0 2d 73 65 78 70 73 2d 77 69 74 68 2d 62 69 6e 64 69 6e 67 73 2d 61 6e 64 2d 69 6e 64 65 6e 74 20 -sexps-with-bindings-and-indent.
13600 22 5b 20 22 20 22 5d 22 20 22 28 6c 65 74 20 22 20 32 20 75 70 2d 6c 69 73 74 20 6e 65 77 6c 69 "[."."]"."(let.".2.up-list.newli
13620 6e 65 2d 61 6e 64 2d 69 6e 64 65 6e 74 5d 20 38 20 28 23 24 20 2e 20 37 38 37 33 32 29 5d 29 0a ne-and-indent].8.(#$...78732)]).
13640 23 40 36 33 20 42 69 6e 64 20 74 68 65 20 66 6f 72 6d 20 61 74 20 70 6f 69 6e 74 20 74 6f 20 4e #@63.Bind.the.form.at.point.to.N
13660 41 4d 45 20 69 6e 20 74 68 65 20 6e 65 61 72 65 73 74 20 6c 65 74 2e 0a 0a 28 66 6e 20 4e 41 4d AME.in.the.nearest.let...(fn.NAM
13680 45 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 2d 6d 6f 76 65 2d 74 6f 2d E)..(defalias.'clojure--move-to-
136a0 6c 65 74 2d 69 6e 74 65 72 6e 61 6c 20 23 5b 32 35 37 20 22 5c 32 31 32 5c 33 30 30 20 29 5c 32 let-internal.#[257."\212\300.)\2
136c0 30 34 0b 00 5c 33 30 31 01 21 5c 32 30 37 5c 33 30 32 20 01 63 5c 32 31 30 5c 33 30 33 20 5c 32 04..\301.!\207\302..c\210\303.\2
136e0 31 30 5c 32 31 31 63 5c 32 31 30 5c 33 30 34 20 5c 32 31 30 5c 33 30 35 63 5c 32 31 30 5c 33 30 10\211c\210\304.\210\305c\210\30
13700 36 75 5c 32 31 30 01 63 5c 32 31 30 5c 33 30 37 20 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 6u\210.c\210\307.\207".[clojure-
13720 2d 67 6f 74 6f 2d 6c 65 74 20 63 6c 6f 6a 75 72 65 2d 2d 69 6e 74 72 6f 64 75 63 65 2d 6c 65 74 -goto-let.clojure--introduce-let
13740 2d 69 6e 74 65 72 6e 61 6c 20 63 6c 6f 6a 75 72 65 2d 64 65 6c 65 74 65 2d 61 6e 64 2d 65 78 74 -internal.clojure-delete-and-ext
13760 72 61 63 74 2d 73 65 78 70 20 63 6c 6f 6a 75 72 65 2d 2d 70 72 65 70 61 72 65 2d 74 6f 2d 69 6e ract-sexp.clojure--prepare-to-in
13780 73 65 72 74 2d 6e 65 77 2d 6c 65 74 2d 62 69 6e 64 69 6e 67 20 62 61 63 6b 77 61 72 64 2d 73 65 sert-new-let-binding.backward-se
137a0 78 70 20 22 20 22 20 2d 31 20 63 6c 6f 6a 75 72 65 2d 2d 72 65 70 6c 61 63 65 2d 73 65 78 70 73 xp.".".-1.clojure--replace-sexps
137c0 2d 77 69 74 68 2d 62 69 6e 64 69 6e 67 73 2d 61 6e 64 2d 69 6e 64 65 6e 74 5d 20 33 20 28 23 24 -with-bindings-and-indent].3.(#$
137e0 20 2e 20 37 39 34 32 39 29 5d 29 0a 23 40 36 33 20 53 6c 75 72 70 20 74 68 65 20 73 2d 65 78 70 ...79429)]).#@63.Slurp.the.s-exp
13800 72 65 73 73 69 6f 6e 20 62 65 66 6f 72 65 20 74 68 65 20 6c 65 74 20 66 6f 72 6d 20 69 6e 74 6f ression.before.the.let.form.into
13820 20 74 68 65 20 6c 65 74 20 66 6f 72 6d 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 .the.let.form...(defalias.'cloju
13840 72 65 2d 2d 6c 65 74 2d 62 61 63 6b 77 61 72 64 2d 73 6c 75 72 70 2d 73 65 78 70 2d 69 6e 74 65 re--let-backward-slurp-sexp-inte
13860 72 6e 61 6c 20 23 5b 30 20 22 5c 33 30 30 20 5c 32 31 30 5c 33 30 31 20 5c 32 31 30 5c 33 30 32 rnal.#[0."\300.\210\301.\210\302
13880 20 5c 32 31 31 5c 33 30 33 5c 33 30 34 02 5c 22 5c 32 30 33 18 00 5c 33 30 35 5c 33 30 36 5c 33 .\211\303\304.\"\203..\305\306\3
138a0 30 37 5c 32 31 31 04 24 5c 32 36 32 01 5c 33 30 33 5c 33 31 30 02 5c 22 5c 32 30 33 2a 00 5c 33 07\211.$\262.\303\310.\"\203*.\3
138c0 30 35 5c 33 30 36 5c 33 30 37 5c 32 31 31 04 24 5c 32 36 36 5c 32 30 32 5c 32 30 32 2c 00 5c 32 05\306\307\211.$\266\202\202,.\2
138e0 36 32 01 5c 33 31 31 20 5c 32 31 30 5c 33 31 32 20 5c 32 31 30 5c 33 31 33 5c 33 31 34 21 5c 32 62.\311.\210\312.\210\313\314!\2
13900 31 30 5c 33 31 35 20 5c 32 31 30 5c 32 31 31 63 5c 32 31 30 5c 33 31 36 20 5c 32 30 37 22 20 5b 10\315.\210\211c\210\316.\207".[
13920 63 6c 6f 6a 75 72 65 2d 2d 67 6f 74 6f 2d 6c 65 74 20 62 61 63 6b 77 61 72 64 2d 73 65 78 70 20 clojure--goto-let.backward-sexp.
13940 63 6c 6f 6a 75 72 65 2d 64 65 6c 65 74 65 2d 61 6e 64 2d 65 78 74 72 61 63 74 2d 73 65 78 70 20 clojure-delete-and-extract-sexp.
13960 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 5b 20 09 5c 6e 0d 5d 2b 5c 5c 27 22 20 72 65 70 6c 61 string-match."[..\n.]+\\'".repla
13980 63 65 2d 6d 61 74 63 68 20 22 22 20 74 20 22 5c 5c 60 5b 20 09 5c 6e 0d 5d 2b 22 20 64 65 6c 65 ce-match."".t."\\`[..\n.]+".dele
139a0 74 65 2d 62 6c 61 6e 6b 2d 6c 69 6e 65 73 20 64 6f 77 6e 2d 6c 69 73 74 20 66 6f 72 77 61 72 64 te-blank-lines.down-list.forward
139c0 2d 73 65 78 70 20 32 20 6e 65 77 6c 69 6e 65 2d 61 6e 64 2d 69 6e 64 65 6e 74 20 63 6c 6f 6a 75 -sexp.2.newline-and-indent.cloju
139e0 72 65 2d 2d 72 65 70 6c 61 63 65 2d 73 65 78 70 73 2d 77 69 74 68 2d 62 69 6e 64 69 6e 67 73 2d re--replace-sexps-with-bindings-
13a00 61 6e 64 2d 69 6e 64 65 6e 74 5d 20 37 20 28 23 24 20 2e 20 37 39 38 35 37 29 5d 29 0a 23 40 31 and-indent].7.(#$...79857)]).#@1
13a20 36 36 20 53 6c 75 72 70 20 74 68 65 20 73 2d 65 78 70 72 65 73 73 69 6f 6e 20 62 65 66 6f 72 65 66.Slurp.the.s-expression.before
13a40 20 74 68 65 20 6c 65 74 20 66 6f 72 6d 20 69 6e 74 6f 20 74 68 65 20 6c 65 74 20 66 6f 72 6d 2e .the.let.form.into.the.let.form.
13a60 0a 57 69 74 68 20 61 20 6e 75 6d 62 65 72 69 63 20 70 72 65 66 69 78 20 61 72 67 75 6d 65 6e 74 .With.a.numberic.prefix.argument
13a80 20 73 6c 75 72 70 20 74 68 65 20 70 72 65 76 69 6f 75 73 20 4e 20 73 2d 65 78 70 72 65 73 73 69 .slurp.the.previous.N.s-expressi
13aa0 6f 6e 20 69 6e 74 6f 20 74 68 65 20 6c 65 74 20 66 6f 72 6d 2e 0a 0a 28 66 6e 20 26 6f 70 74 69 on.into.the.let.form...(fn.&opti
13ac0 6f 6e 61 6c 20 4e 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 6c 65 74 2d onal.N)..(defalias.'clojure-let-
13ae0 62 61 63 6b 77 61 72 64 2d 73 6c 75 72 70 2d 73 65 78 70 20 23 5b 32 35 36 20 22 5c 32 31 31 5c backward-slurp-sexp.#[256."\211\
13b00 32 30 34 07 00 5c 33 30 30 5c 32 36 32 01 5c 32 31 31 5c 33 30 31 5c 32 31 31 02 57 5c 32 30 35 204..\300\262.\211\301\211.W\205
13b20 1d 00 5c 32 31 31 5c 32 31 32 5c 33 30 32 20 5c 32 31 30 29 5c 32 31 30 5c 32 31 31 54 5c 32 36 ..\211\212\302.\210)\210\211T\26
13b40 32 01 5c 32 30 32 09 00 5c 32 30 37 22 20 5b 31 20 30 20 63 6c 6f 6a 75 72 65 2d 2d 6c 65 74 2d 2.\202..\207".[1.0.clojure--let-
13b60 62 61 63 6b 77 61 72 64 2d 73 6c 75 72 70 2d 73 65 78 70 2d 69 6e 74 65 72 6e 61 6c 5d 20 35 20 backward-slurp-sexp-internal].5.
13b80 28 23 24 20 2e 20 38 30 34 31 39 29 20 22 70 22 5d 29 0a 23 40 36 37 20 53 6c 75 72 70 20 74 68 (#$...80419)."p"]).#@67.Slurp.th
13ba0 65 20 6e 65 78 74 20 73 2d 65 78 70 72 65 73 73 69 6f 6e 20 61 66 74 65 72 20 74 68 65 20 6c 65 e.next.s-expression.after.the.le
13bc0 74 20 66 6f 72 6d 20 69 6e 74 6f 20 74 68 65 20 6c 65 74 20 66 6f 72 6d 2e 1f 0a 28 64 65 66 61 t.form.into.the.let.form...(defa
13be0 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 2d 6c 65 74 2d 66 6f 72 77 61 72 64 2d 73 6c 75 72 70 lias.'clojure--let-forward-slurp
13c00 2d 73 65 78 70 2d 69 6e 74 65 72 6e 61 6c 20 23 5b 30 20 22 5c 33 30 30 20 5c 32 31 30 5c 33 30 -sexp-internal.#[0."\300.\210\30
13c20 31 20 5c 32 31 30 5c 33 30 32 20 5c 32 31 31 5c 33 30 33 5c 33 30 34 02 5c 22 5c 32 30 33 18 00 1.\210\302.\211\303\304.\"\203..
13c40 5c 33 30 35 5c 33 30 36 5c 33 30 37 5c 32 31 31 04 24 5c 32 36 32 01 5c 33 30 33 5c 33 31 30 02 \305\306\307\211.$\262.\303\310.
13c60 5c 22 5c 32 30 33 2a 00 5c 33 30 35 5c 33 30 36 5c 33 30 37 5c 32 31 31 04 24 5c 32 36 36 5c 32 \"\203*.\305\306\307\211.$\266\2
13c80 30 32 5c 32 30 32 2c 00 5c 32 36 32 01 5c 33 31 31 5c 33 31 32 21 5c 32 31 30 5c 33 31 33 20 5c 02\202,.\262.\311\312!\210\313.\
13ca0 32 31 30 5c 32 31 31 63 5c 32 31 30 5c 33 31 34 20 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 210\211c\210\314.\207".[clojure-
13cc0 2d 67 6f 74 6f 2d 6c 65 74 20 66 6f 72 77 61 72 64 2d 73 65 78 70 20 63 6c 6f 6a 75 72 65 2d 64 -goto-let.forward-sexp.clojure-d
13ce0 65 6c 65 74 65 2d 61 6e 64 2d 65 78 74 72 61 63 74 2d 73 65 78 70 20 73 74 72 69 6e 67 2d 6d 61 elete-and-extract-sexp.string-ma
13d00 74 63 68 20 22 5b 20 09 5c 6e 0d 5d 2b 5c 5c 27 22 20 72 65 70 6c 61 63 65 2d 6d 61 74 63 68 20 tch."[..\n.]+\\'".replace-match.
13d20 22 22 20 74 20 22 5c 5c 60 5b 20 09 5c 6e 0d 5d 2b 22 20 64 6f 77 6e 2d 6c 69 73 74 20 2d 31 20 "".t."\\`[..\n.]+".down-list.-1.
13d40 6e 65 77 6c 69 6e 65 2d 61 6e 64 2d 69 6e 64 65 6e 74 20 63 6c 6f 6a 75 72 65 2d 2d 72 65 70 6c newline-and-indent.clojure--repl
13d60 61 63 65 2d 73 65 78 70 73 2d 77 69 74 68 2d 62 69 6e 64 69 6e 67 73 2d 61 6e 64 2d 69 6e 64 65 ace-sexps-with-bindings-and-inde
13d80 6e 74 5d 20 37 20 28 23 24 20 2e 20 38 30 37 39 32 29 5d 29 0a 23 40 31 36 36 20 53 6c 75 72 70 nt].7.(#$...80792)]).#@166.Slurp
13da0 20 74 68 65 20 6e 65 78 74 20 73 2d 65 78 70 72 65 73 73 69 6f 6e 20 61 66 74 65 72 20 74 68 65 .the.next.s-expression.after.the
13dc0 20 6c 65 74 20 66 6f 72 6d 20 69 6e 74 6f 20 74 68 65 20 6c 65 74 20 66 6f 72 6d 2e 0a 57 69 74 .let.form.into.the.let.form..Wit
13de0 68 20 61 20 6e 75 6d 65 72 69 63 20 70 72 65 66 69 78 20 61 72 67 75 6d 65 6e 74 20 73 6c 75 72 h.a.numeric.prefix.argument.slur
13e00 70 20 74 68 65 20 6e 65 78 74 20 4e 20 73 2d 65 78 70 72 65 73 73 69 6f 6e 73 20 69 6e 74 6f 20 p.the.next.N.s-expressions.into.
13e20 74 68 65 20 6c 65 74 20 66 6f 72 6d 2e 0a 0a 28 66 6e 20 26 6f 70 74 69 6f 6e 61 6c 20 4e 29 1f the.let.form...(fn.&optional.N).
13e40 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 2d 6c 65 74 2d 66 6f 72 77 61 72 64 2d .(defalias.'clojure-let-forward-
13e60 73 6c 75 72 70 2d 73 65 78 70 20 23 5b 32 35 36 20 22 5c 32 31 31 5c 32 30 34 07 00 5c 33 30 30 slurp-sexp.#[256."\211\204..\300
13e80 5c 32 36 32 01 5c 32 31 31 5c 33 30 31 5c 32 31 31 02 57 5c 32 30 35 1d 00 5c 32 31 31 5c 32 31 \262.\211\301\211.W\205..\211\21
13ea0 32 5c 33 30 32 20 5c 32 31 30 29 5c 32 31 30 5c 32 31 31 54 5c 32 36 32 01 5c 32 30 32 09 00 5c 2\302.\210)\210\211T\262.\202..\
13ec0 32 30 37 22 20 5b 31 20 30 20 63 6c 6f 6a 75 72 65 2d 2d 6c 65 74 2d 66 6f 72 77 61 72 64 2d 73 207".[1.0.clojure--let-forward-s
13ee0 6c 75 72 70 2d 73 65 78 70 2d 69 6e 74 65 72 6e 61 6c 5d 20 35 20 28 23 24 20 2e 20 38 31 33 30 lurp-sexp-internal].5.(#$...8130
13f00 37 29 20 22 70 22 5d 29 0a 23 40 31 33 30 20 43 72 65 61 74 65 20 61 20 6c 65 74 20 66 6f 72 6d 7)."p"]).#@130.Create.a.let.form
13f20 2c 20 62 69 6e 64 69 6e 67 20 74 68 65 20 66 6f 72 6d 20 61 74 20 70 6f 69 6e 74 2e 0a 57 69 74 ,.binding.the.form.at.point..Wit
13f40 68 20 61 20 6e 75 6d 65 72 69 63 20 70 72 65 66 69 78 20 61 72 67 75 6d 65 6e 74 20 74 68 65 20 h.a.numeric.prefix.argument.the.
13f60 6c 65 74 20 69 73 20 69 6e 74 72 6f 64 75 63 65 64 20 4e 20 6c 69 73 74 73 20 75 70 2e 0a 0a 28 let.is.introduced.N.lists.up...(
13f80 66 6e 20 26 6f 70 74 69 6f 6e 61 6c 20 4e 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a fn.&optional.N)..(defalias.'cloj
13fa0 75 72 65 2d 69 6e 74 72 6f 64 75 63 65 2d 6c 65 74 20 23 5b 32 35 36 20 22 5c 33 30 30 5c 33 30 ure-introduce-let.#[256."\300\30
13fc0 31 5c 33 30 32 21 02 5c 22 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 2d 69 6e 74 72 6f 64 75 1\302!.\"\207".[clojure--introdu
13fe0 63 65 2d 6c 65 74 2d 69 6e 74 65 72 6e 61 6c 20 72 65 61 64 2d 66 72 6f 6d 2d 6d 69 6e 69 62 75 ce-let-internal.read-from-minibu
14000 66 66 65 72 20 22 4e 61 6d 65 20 6f 66 20 62 6f 75 6e 64 20 73 79 6d 62 6f 6c 3a 20 22 5d 20 34 ffer."Name.of.bound.symbol:."].4
14020 20 28 23 24 20 2e 20 38 31 36 37 39 29 20 22 50 22 5d 29 0a 23 40 35 37 20 4d 6f 76 65 20 74 68 .(#$...81679)."P"]).#@57.Move.th
14040 65 20 66 6f 72 6d 20 61 74 20 70 6f 69 6e 74 20 74 6f 20 61 20 62 69 6e 64 69 6e 67 20 69 6e 20 e.form.at.point.to.a.binding.in.
14060 74 68 65 20 6e 65 61 72 65 73 74 20 6c 65 74 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f the.nearest.let...(defalias.'clo
14080 6a 75 72 65 2d 6d 6f 76 65 2d 74 6f 2d 6c 65 74 20 23 5b 30 20 22 5c 33 30 30 5c 33 30 31 5c 33 jure-move-to-let.#[0."\300\301\3
140a0 30 32 21 21 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 2d 2d 6d 6f 76 65 2d 74 6f 2d 6c 65 74 2d 02!!\207".[clojure--move-to-let-
140c0 69 6e 74 65 72 6e 61 6c 20 72 65 61 64 2d 66 72 6f 6d 2d 6d 69 6e 69 62 75 66 66 65 72 20 22 4e internal.read-from-minibuffer."N
140e0 61 6d 65 20 6f 66 20 62 6f 75 6e 64 20 73 79 6d 62 6f 6c 3a 20 22 5d 20 33 20 28 23 24 20 2e 20 ame.of.bound.symbol:."].3.(#$...
14100 38 31 39 37 37 29 20 6e 69 6c 5d 29 0a 23 40 35 31 20 41 64 64 69 74 69 6f 6e 61 6c 20 66 6f 6e 81977).nil]).#@51.Additional.fon
14120 74 2d 6c 6f 63 6b 69 6e 67 20 66 6f 72 20 60 63 6c 6f 6a 75 72 65 73 63 72 69 70 74 2d 6d 6f 64 t-locking.for.`clojurescript-mod
14140 65 27 2e 1f 0a 28 64 65 66 63 6f 6e 73 74 20 63 6c 6f 6a 75 72 65 73 63 72 69 70 74 2d 66 6f 6e e'...(defconst.clojurescript-fon
14160 74 2d 6c 6f 63 6b 2d 6b 65 79 77 6f 72 64 73 20 27 28 28 22 28 5c 5c 28 3f 3a 2e 2a 2f 5c 5c 29 t-lock-keywords.'(("(\\(?:.*/\\)
14180 3f 5c 5c 28 3f 3a 63 6c 6a 2d 3e 6a 73 5c 5c 7c 6a 73 2d 5c 5c 28 3f 3a 3e 63 6c 6a 5c 5c 7c 64 ?\\(?:clj->js\\|js-\\(?:>clj\\|d
141a0 65 6c 65 74 65 5c 5c 7c 6f 62 6a 5c 5c 29 5c 5c 29 5c 5c 3e 22 20 30 20 66 6f 6e 74 2d 6c 6f 63 elete\\|obj\\)\\)\\>".0.font-loc
141c0 6b 2d 62 75 69 6c 74 69 6e 2d 66 61 63 65 29 29 20 28 23 24 20 2e 20 38 32 31 39 34 29 29 0a 23 k-builtin-face)).(#$...82194)).#
141e0 40 31 37 30 20 48 6f 6f 6b 20 72 75 6e 20 61 66 74 65 72 20 65 6e 74 65 72 69 6e 67 20 43 6c 6f @170.Hook.run.after.entering.Clo
14200 6a 75 72 65 53 63 72 69 70 74 20 6d 6f 64 65 2e 0a 4e 6f 20 70 72 6f 62 6c 65 6d 73 20 72 65 73 jureScript.mode..No.problems.res
14220 75 6c 74 20 69 66 20 74 68 69 73 20 76 61 72 69 61 62 6c 65 20 69 73 20 6e 6f 74 20 62 6f 75 6e ult.if.this.variable.is.not.boun
14240 64 2e 0a 60 61 64 64 2d 68 6f 6f 6b 27 20 61 75 74 6f 6d 61 74 69 63 61 6c 6c 79 20 62 69 6e 64 d..`add-hook'.automatically.bind
14260 73 20 69 74 2e 20 20 28 54 68 69 73 20 69 73 20 74 72 75 65 20 66 6f 72 20 61 6c 6c 20 68 6f 6f s.it...(This.is.true.for.all.hoo
14280 6b 20 76 61 72 69 61 62 6c 65 73 2e 29 1f 0a 28 64 65 66 76 61 72 20 63 6c 6f 6a 75 72 65 73 63 k.variables.)..(defvar.clojuresc
142a0 72 69 70 74 2d 6d 6f 64 65 2d 68 6f 6f 6b 20 6e 69 6c 20 28 23 24 20 2e 20 38 32 34 30 35 29 29 ript-mode-hook.nil.(#$...82405))
142c0 0a 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 30 5c 33 30 31 21 5c 32 30 34 5c 66 00 5c 33 30 .(byte-code."\300\301!\204\f.\30
142e0 32 5c 33 30 31 5c 33 30 33 5c 33 30 34 23 5c 32 31 30 5c 33 30 30 5c 32 30 37 22 20 5b 62 6f 75 2\301\303\304#\210\300\207".[bou
14300 6e 64 70 20 63 6c 6f 6a 75 72 65 73 63 72 69 70 74 2d 6d 6f 64 65 2d 6d 61 70 20 70 75 74 20 64 ndp.clojurescript-mode-map.put.d
14320 65 66 69 6e 69 74 69 6f 6e 2d 6e 61 6d 65 20 63 6c 6f 6a 75 72 65 73 63 72 69 70 74 2d 6d 6f 64 efinition-name.clojurescript-mod
14340 65 5d 20 34 29 0a 28 64 65 66 76 61 72 20 63 6c 6f 6a 75 72 65 73 63 72 69 70 74 2d 6d 6f 64 65 e].4).(defvar.clojurescript-mode
14360 2d 6d 61 70 20 28 6d 61 6b 65 2d 73 70 61 72 73 65 2d 6b 65 79 6d 61 70 29 29 0a 28 62 79 74 65 -map.(make-sparse-keymap)).(byte
14380 2d 63 6f 64 65 20 22 5c 33 30 30 5c 33 30 31 4e 5c 32 30 34 0e 00 5c 33 30 32 5c 33 30 30 5c 33 -code."\300\301N\204..\302\300\3
143a0 30 31 5c 33 30 33 5c 33 30 34 21 23 5c 32 31 30 5c 33 30 35 5c 33 30 36 21 5c 32 30 34 1a 00 5c 01\303\304!#\210\305\306!\204..\
143c0 33 30 32 5c 33 30 36 5c 33 30 37 5c 33 31 30 23 5c 32 31 30 5c 33 30 30 5c 32 30 37 22 20 5b 63 302\306\307\310#\210\300\207".[c
143e0 6c 6f 6a 75 72 65 73 63 72 69 70 74 2d 6d 6f 64 65 2d 6d 61 70 20 76 61 72 69 61 62 6c 65 2d 64 lojurescript-mode-map.variable-d
14400 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 70 75 74 20 70 75 72 65 63 6f 70 79 20 22 4b 65 79 6d 61 ocumentation.put.purecopy."Keyma
14420 70 20 66 6f 72 20 60 63 6c 6f 6a 75 72 65 73 63 72 69 70 74 2d 6d 6f 64 65 27 2e 22 20 62 6f 75 p.for.`clojurescript-mode'.".bou
14440 6e 64 70 20 63 6c 6f 6a 75 72 65 73 63 72 69 70 74 2d 6d 6f 64 65 2d 73 79 6e 74 61 78 2d 74 61 ndp.clojurescript-mode-syntax-ta
14460 62 6c 65 20 64 65 66 69 6e 69 74 69 6f 6e 2d 6e 61 6d 65 20 63 6c 6f 6a 75 72 65 73 63 72 69 70 ble.definition-name.clojurescrip
14480 74 2d 6d 6f 64 65 5d 20 35 29 0a 28 64 65 66 76 61 72 20 63 6c 6f 6a 75 72 65 73 63 72 69 70 74 t-mode].5).(defvar.clojurescript
144a0 2d 6d 6f 64 65 2d 73 79 6e 74 61 78 2d 74 61 62 6c 65 20 28 6d 61 6b 65 2d 73 79 6e 74 61 78 2d -mode-syntax-table.(make-syntax-
144c0 74 61 62 6c 65 29 29 0a 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 30 5c 33 30 31 4e 5c 32 30 table)).(byte-code."\300\301N\20
144e0 34 0e 00 5c 33 30 32 5c 33 30 30 5c 33 30 31 5c 33 30 33 5c 33 30 34 21 23 5c 32 31 30 5c 33 30 4..\302\300\301\303\304!#\210\30
14500 32 5c 33 30 35 5c 33 30 36 5c 33 30 37 23 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 73 63 72 69 2\305\306\307#\207".[clojurescri
14520 70 74 2d 6d 6f 64 65 2d 73 79 6e 74 61 78 2d 74 61 62 6c 65 20 76 61 72 69 61 62 6c 65 2d 64 6f pt-mode-syntax-table.variable-do
14540 63 75 6d 65 6e 74 61 74 69 6f 6e 20 70 75 74 20 70 75 72 65 63 6f 70 79 20 22 53 79 6e 74 61 78 cumentation.put.purecopy."Syntax
14560 20 74 61 62 6c 65 20 66 6f 72 20 60 63 6c 6f 6a 75 72 65 73 63 72 69 70 74 2d 6d 6f 64 65 27 2e .table.for.`clojurescript-mode'.
14580 22 20 63 6c 6f 6a 75 72 65 73 63 72 69 70 74 2d 6d 6f 64 65 2d 61 62 62 72 65 76 2d 74 61 62 6c ".clojurescript-mode-abbrev-tabl
145a0 65 20 64 65 66 69 6e 69 74 69 6f 6e 2d 6e 61 6d 65 20 63 6c 6f 6a 75 72 65 73 63 72 69 70 74 2d e.definition-name.clojurescript-
145c0 6d 6f 64 65 5d 20 35 29 0a 28 64 65 66 76 61 72 20 63 6c 6f 6a 75 72 65 73 63 72 69 70 74 2d 6d mode].5).(defvar.clojurescript-m
145e0 6f 64 65 2d 61 62 62 72 65 76 2d 74 61 62 6c 65 20 28 70 72 6f 67 6e 20 28 64 65 66 69 6e 65 2d ode-abbrev-table.(progn.(define-
14600 61 62 62 72 65 76 2d 74 61 62 6c 65 20 27 63 6c 6f 6a 75 72 65 73 63 72 69 70 74 2d 6d 6f 64 65 abbrev-table.'clojurescript-mode
14620 2d 61 62 62 72 65 76 2d 74 61 62 6c 65 20 6e 69 6c 29 20 63 6c 6f 6a 75 72 65 73 63 72 69 70 74 -abbrev-table.nil).clojurescript
14640 2d 6d 6f 64 65 2d 61 62 62 72 65 76 2d 74 61 62 6c 65 29 29 0a 28 62 79 74 65 2d 63 6f 64 65 20 -mode-abbrev-table)).(byte-code.
14660 22 5c 33 30 30 5c 33 30 31 4e 5c 32 30 34 0e 00 5c 33 30 32 5c 33 30 30 5c 33 30 31 5c 33 30 33 "\300\301N\204..\302\300\301\303
14680 5c 33 30 34 21 23 5c 32 31 30 5c 33 30 32 5c 33 30 35 5c 33 30 36 5c 33 30 37 23 5c 32 30 37 22 \304!#\210\302\305\306\307#\207"
146a0 20 5b 63 6c 6f 6a 75 72 65 73 63 72 69 70 74 2d 6d 6f 64 65 2d 61 62 62 72 65 76 2d 74 61 62 6c .[clojurescript-mode-abbrev-tabl
146c0 65 20 76 61 72 69 61 62 6c 65 2d 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 70 75 74 20 70 75 72 e.variable-documentation.put.pur
146e0 65 63 6f 70 79 20 22 41 62 62 72 65 76 20 74 61 62 6c 65 20 66 6f 72 20 60 63 6c 6f 6a 75 72 65 ecopy."Abbrev.table.for.`clojure
14700 73 63 72 69 70 74 2d 6d 6f 64 65 27 2e 22 20 63 6c 6f 6a 75 72 65 73 63 72 69 70 74 2d 6d 6f 64 script-mode'.".clojurescript-mod
14720 65 20 64 65 72 69 76 65 64 2d 6d 6f 64 65 2d 70 61 72 65 6e 74 20 63 6c 6f 6a 75 72 65 2d 6d 6f e.derived-mode-parent.clojure-mo
14740 64 65 5d 20 35 29 0a 23 40 32 33 36 20 4d 61 6a 6f 72 20 6d 6f 64 65 20 66 6f 72 20 65 64 69 74 de].5).#@236.Major.mode.for.edit
14760 69 6e 67 20 43 6c 6f 6a 75 72 65 53 63 72 69 70 74 20 63 6f 64 65 2e 0a 0a 5c 7b 63 6c 6f 6a 75 ing.ClojureScript.code...\{cloju
14780 72 65 73 63 72 69 70 74 2d 6d 6f 64 65 2d 6d 61 70 7d 0a 0a 49 6e 20 61 64 64 69 74 69 6f 6e 20 rescript-mode-map}..In.addition.
147a0 74 6f 20 61 6e 79 20 68 6f 6f 6b 73 20 69 74 73 20 70 61 72 65 6e 74 20 6d 6f 64 65 20 60 63 6c to.any.hooks.its.parent.mode.`cl
147c0 6f 6a 75 72 65 2d 6d 6f 64 65 27 20 6d 69 67 68 74 20 68 61 76 65 20 72 75 6e 2c 0a 74 68 69 73 ojure-mode'.might.have.run,.this
147e0 20 6d 6f 64 65 20 72 75 6e 73 20 74 68 65 20 68 6f 6f 6b 20 60 63 6c 6f 6a 75 72 65 73 63 72 69 .mode.runs.the.hook.`clojurescri
14800 70 74 2d 6d 6f 64 65 2d 68 6f 6f 6b 27 2c 20 61 73 20 74 68 65 20 66 69 6e 61 6c 20 73 74 65 70 pt-mode-hook',.as.the.final.step
14820 0a 64 75 72 69 6e 67 20 69 6e 69 74 69 61 6c 69 7a 61 74 69 6f 6e 2e 1f 0a 28 64 65 66 61 6c 69 .during.initialization...(defali
14840 61 73 20 27 63 6c 6f 6a 75 72 65 73 63 72 69 70 74 2d 6d 6f 64 65 20 23 5b 30 20 22 5c 33 30 36 as.'clojurescript-mode.#[0."\306
14860 5c 33 30 30 21 5c 32 31 30 5c 33 30 37 18 5c 33 31 30 20 5c 32 31 30 5c 33 31 31 11 5c 33 31 32 \300!\210\307.\310.\210\311.\312
14880 12 5c 33 31 30 5c 33 31 33 4e 5c 32 30 33 1b 00 5c 33 31 34 5c 33 31 31 5c 33 31 33 5c 33 31 30 .\310\313N\203..\314\311\313\310
148a0 5c 33 31 33 4e 23 5c 32 31 30 5c 33 31 35 0b 21 5c 32 30 34 27 00 5c 33 31 36 0b 5c 33 31 37 20 \313N#\210\315.!\204'.\316.\317.
148c0 5c 22 5c 32 31 30 5c 33 32 30 5c 66 21 5c 32 31 31 5c 32 30 33 35 00 5c 32 31 31 5c 33 32 31 20 \"\210\320\f!\211\2035.\211\321.
148e0 3d 5c 32 30 33 3b 00 5c 33 32 32 5c 66 5c 33 32 33 20 5c 22 5c 32 31 30 5c 32 31 30 5c 33 32 34 =\203;.\322\f\323.\"\210\210\324
14900 0d 5c 33 32 35 5c 22 5c 32 30 34 52 00 0d 0e 1d 3d 5c 32 30 34 52 00 5c 33 32 36 0d 5c 33 32 35 .\325\"\204R....=\204R.\326.\325
14920 0e 1d 43 23 5c 32 31 30 5c 33 32 37 0b 21 5c 32 31 30 5c 33 33 30 5c 66 21 5c 32 31 30 0d 16 1d ..C#\210\327.!\210\330\f!\210...
14940 5c 33 33 31 5c 33 33 32 0e 1e 5c 22 5c 32 31 30 29 5c 33 33 33 5c 33 33 34 21 5c 32 30 37 22 20 \331\332..\"\210)\333\334!\207".
14960 5b 64 65 6c 61 79 2d 6d 6f 64 65 2d 68 6f 6f 6b 73 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 6d 6f 64 [delay-mode-hooks.major-mode.mod
14980 65 2d 6e 61 6d 65 20 63 6c 6f 6a 75 72 65 73 63 72 69 70 74 2d 6d 6f 64 65 2d 6d 61 70 20 63 6c e-name.clojurescript-mode-map.cl
149a0 6f 6a 75 72 65 73 63 72 69 70 74 2d 6d 6f 64 65 2d 73 79 6e 74 61 78 2d 74 61 62 6c 65 20 63 6c ojurescript-mode-syntax-table.cl
149c0 6f 6a 75 72 65 73 63 72 69 70 74 2d 6d 6f 64 65 2d 61 62 62 72 65 76 2d 74 61 62 6c 65 20 6d 61 ojurescript-mode-abbrev-table.ma
149e0 6b 65 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 20 74 20 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 ke-local-variable.t.clojure-mode
14a00 20 63 6c 6f 6a 75 72 65 73 63 72 69 70 74 2d 6d 6f 64 65 20 22 43 6c 6f 6a 75 72 65 53 63 72 69 .clojurescript-mode."ClojureScri
14a20 70 74 22 20 6d 6f 64 65 2d 63 6c 61 73 73 20 70 75 74 20 6b 65 79 6d 61 70 2d 70 61 72 65 6e 74 pt".mode-class.put.keymap-parent
14a40 20 73 65 74 2d 6b 65 79 6d 61 70 2d 70 61 72 65 6e 74 20 63 75 72 72 65 6e 74 2d 6c 6f 63 61 6c .set-keymap-parent.current-local
14a60 2d 6d 61 70 20 63 68 61 72 2d 74 61 62 6c 65 2d 70 61 72 65 6e 74 20 73 74 61 6e 64 61 72 64 2d -map.char-table-parent.standard-
14a80 73 79 6e 74 61 78 2d 74 61 62 6c 65 20 73 65 74 2d 63 68 61 72 2d 74 61 62 6c 65 2d 70 61 72 65 syntax-table.set-char-table-pare
14aa0 6e 74 20 73 79 6e 74 61 78 2d 74 61 62 6c 65 20 61 62 62 72 65 76 2d 74 61 62 6c 65 2d 67 65 74 nt.syntax-table.abbrev-table-get
14ac0 20 3a 70 61 72 65 6e 74 73 20 61 62 62 72 65 76 2d 74 61 62 6c 65 2d 70 75 74 20 75 73 65 2d 6c .:parents.abbrev-table-put.use-l
14ae0 6f 63 61 6c 2d 6d 61 70 20 73 65 74 2d 73 79 6e 74 61 78 2d 74 61 62 6c 65 20 66 6f 6e 74 2d 6c ocal-map.set-syntax-table.font-l
14b00 6f 63 6b 2d 61 64 64 2d 6b 65 79 77 6f 72 64 73 20 6e 69 6c 20 72 75 6e 2d 6d 6f 64 65 2d 68 6f ock-add-keywords.nil.run-mode-ho
14b20 6f 6b 73 20 63 6c 6f 6a 75 72 65 73 63 72 69 70 74 2d 6d 6f 64 65 2d 68 6f 6f 6b 20 6c 6f 63 61 oks.clojurescript-mode-hook.loca
14b40 6c 2d 61 62 62 72 65 76 2d 74 61 62 6c 65 20 63 6c 6f 6a 75 72 65 73 63 72 69 70 74 2d 66 6f 6e l-abbrev-table.clojurescript-fon
14b60 74 2d 6c 6f 63 6b 2d 6b 65 79 77 6f 72 64 73 5d 20 35 20 28 23 24 20 2e 20 38 33 37 38 39 29 20 t-lock-keywords].5.(#$...83789).
14b80 6e 69 6c 5d 29 0a 23 40 31 36 35 20 48 6f 6f 6b 20 72 75 6e 20 61 66 74 65 72 20 65 6e 74 65 72 nil]).#@165.Hook.run.after.enter
14ba0 69 6e 67 20 43 6c 6f 6a 75 72 65 43 20 6d 6f 64 65 2e 0a 4e 6f 20 70 72 6f 62 6c 65 6d 73 20 72 ing.ClojureC.mode..No.problems.r
14bc0 65 73 75 6c 74 20 69 66 20 74 68 69 73 20 76 61 72 69 61 62 6c 65 20 69 73 20 6e 6f 74 20 62 6f esult.if.this.variable.is.not.bo
14be0 75 6e 64 2e 0a 60 61 64 64 2d 68 6f 6f 6b 27 20 61 75 74 6f 6d 61 74 69 63 61 6c 6c 79 20 62 69 und..`add-hook'.automatically.bi
14c00 6e 64 73 20 69 74 2e 20 20 28 54 68 69 73 20 69 73 20 74 72 75 65 20 66 6f 72 20 61 6c 6c 20 68 nds.it...(This.is.true.for.all.h
14c20 6f 6f 6b 20 76 61 72 69 61 62 6c 65 73 2e 29 1f 0a 28 64 65 66 76 61 72 20 63 6c 6f 6a 75 72 65 ook.variables.)..(defvar.clojure
14c40 63 2d 6d 6f 64 65 2d 68 6f 6f 6b 20 6e 69 6c 20 28 23 24 20 2e 20 38 34 38 37 36 29 29 0a 28 62 c-mode-hook.nil.(#$...84876)).(b
14c60 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 30 5c 33 30 31 21 5c 32 30 34 5c 66 00 5c 33 30 32 5c 33 yte-code."\300\301!\204\f.\302\3
14c80 30 31 5c 33 30 33 5c 33 30 34 23 5c 32 31 30 5c 33 30 30 5c 32 30 37 22 20 5b 62 6f 75 6e 64 70 01\303\304#\210\300\207".[boundp
14ca0 20 63 6c 6f 6a 75 72 65 63 2d 6d 6f 64 65 2d 6d 61 70 20 70 75 74 20 64 65 66 69 6e 69 74 69 6f .clojurec-mode-map.put.definitio
14cc0 6e 2d 6e 61 6d 65 20 63 6c 6f 6a 75 72 65 63 2d 6d 6f 64 65 5d 20 34 29 0a 28 64 65 66 76 61 72 n-name.clojurec-mode].4).(defvar
14ce0 20 63 6c 6f 6a 75 72 65 63 2d 6d 6f 64 65 2d 6d 61 70 20 28 6d 61 6b 65 2d 73 70 61 72 73 65 2d .clojurec-mode-map.(make-sparse-
14d00 6b 65 79 6d 61 70 29 29 0a 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 30 5c 33 30 31 4e 5c 32 keymap)).(byte-code."\300\301N\2
14d20 30 34 0e 00 5c 33 30 32 5c 33 30 30 5c 33 30 31 5c 33 30 33 5c 33 30 34 21 23 5c 32 31 30 5c 33 04..\302\300\301\303\304!#\210\3
14d40 30 35 5c 33 30 36 21 5c 32 30 34 1a 00 5c 33 30 32 5c 33 30 36 5c 33 30 37 5c 33 31 30 23 5c 32 05\306!\204..\302\306\307\310#\2
14d60 31 30 5c 33 30 30 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 63 2d 6d 6f 64 65 2d 6d 61 70 20 76 10\300\207".[clojurec-mode-map.v
14d80 61 72 69 61 62 6c 65 2d 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 70 75 74 20 70 75 72 65 63 6f ariable-documentation.put.pureco
14da0 70 79 20 22 4b 65 79 6d 61 70 20 66 6f 72 20 60 63 6c 6f 6a 75 72 65 63 2d 6d 6f 64 65 27 2e 22 py."Keymap.for.`clojurec-mode'."
14dc0 20 62 6f 75 6e 64 70 20 63 6c 6f 6a 75 72 65 63 2d 6d 6f 64 65 2d 73 79 6e 74 61 78 2d 74 61 62 .boundp.clojurec-mode-syntax-tab
14de0 6c 65 20 64 65 66 69 6e 69 74 69 6f 6e 2d 6e 61 6d 65 20 63 6c 6f 6a 75 72 65 63 2d 6d 6f 64 65 le.definition-name.clojurec-mode
14e00 5d 20 35 29 0a 28 64 65 66 76 61 72 20 63 6c 6f 6a 75 72 65 63 2d 6d 6f 64 65 2d 73 79 6e 74 61 ].5).(defvar.clojurec-mode-synta
14e20 78 2d 74 61 62 6c 65 20 28 6d 61 6b 65 2d 73 79 6e 74 61 78 2d 74 61 62 6c 65 29 29 0a 28 62 79 x-table.(make-syntax-table)).(by
14e40 74 65 2d 63 6f 64 65 20 22 5c 33 30 30 5c 33 30 31 4e 5c 32 30 34 0e 00 5c 33 30 32 5c 33 30 30 te-code."\300\301N\204..\302\300
14e60 5c 33 30 31 5c 33 30 33 5c 33 30 34 21 23 5c 32 31 30 5c 33 30 32 5c 33 30 35 5c 33 30 36 5c 33 \301\303\304!#\210\302\305\306\3
14e80 30 37 23 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 63 2d 6d 6f 64 65 2d 73 79 6e 74 61 78 2d 74 07#\207".[clojurec-mode-syntax-t
14ea0 61 62 6c 65 20 76 61 72 69 61 62 6c 65 2d 64 6f 63 75 6d 65 6e 74 61 74 69 6f 6e 20 70 75 74 20 able.variable-documentation.put.
14ec0 70 75 72 65 63 6f 70 79 20 22 53 79 6e 74 61 78 20 74 61 62 6c 65 20 66 6f 72 20 60 63 6c 6f 6a purecopy."Syntax.table.for.`cloj
14ee0 75 72 65 63 2d 6d 6f 64 65 27 2e 22 20 63 6c 6f 6a 75 72 65 63 2d 6d 6f 64 65 2d 61 62 62 72 65 urec-mode'.".clojurec-mode-abbre
14f00 76 2d 74 61 62 6c 65 20 64 65 66 69 6e 69 74 69 6f 6e 2d 6e 61 6d 65 20 63 6c 6f 6a 75 72 65 63 v-table.definition-name.clojurec
14f20 2d 6d 6f 64 65 5d 20 35 29 0a 28 64 65 66 76 61 72 20 63 6c 6f 6a 75 72 65 63 2d 6d 6f 64 65 2d -mode].5).(defvar.clojurec-mode-
14f40 61 62 62 72 65 76 2d 74 61 62 6c 65 20 28 70 72 6f 67 6e 20 28 64 65 66 69 6e 65 2d 61 62 62 72 abbrev-table.(progn.(define-abbr
14f60 65 76 2d 74 61 62 6c 65 20 27 63 6c 6f 6a 75 72 65 63 2d 6d 6f 64 65 2d 61 62 62 72 65 76 2d 74 ev-table.'clojurec-mode-abbrev-t
14f80 61 62 6c 65 20 6e 69 6c 29 20 63 6c 6f 6a 75 72 65 63 2d 6d 6f 64 65 2d 61 62 62 72 65 76 2d 74 able.nil).clojurec-mode-abbrev-t
14fa0 61 62 6c 65 29 29 0a 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 30 5c 33 30 31 4e 5c 32 30 34 able)).(byte-code."\300\301N\204
14fc0 0e 00 5c 33 30 32 5c 33 30 30 5c 33 30 31 5c 33 30 33 5c 33 30 34 21 23 5c 32 31 30 5c 33 30 32 ..\302\300\301\303\304!#\210\302
14fe0 5c 33 30 35 5c 33 30 36 5c 33 30 37 23 5c 32 30 37 22 20 5b 63 6c 6f 6a 75 72 65 63 2d 6d 6f 64 \305\306\307#\207".[clojurec-mod
15000 65 2d 61 62 62 72 65 76 2d 74 61 62 6c 65 20 76 61 72 69 61 62 6c 65 2d 64 6f 63 75 6d 65 6e 74 e-abbrev-table.variable-document
15020 61 74 69 6f 6e 20 70 75 74 20 70 75 72 65 63 6f 70 79 20 22 41 62 62 72 65 76 20 74 61 62 6c 65 ation.put.purecopy."Abbrev.table
15040 20 66 6f 72 20 60 63 6c 6f 6a 75 72 65 63 2d 6d 6f 64 65 27 2e 22 20 63 6c 6f 6a 75 72 65 63 2d .for.`clojurec-mode'.".clojurec-
15060 6d 6f 64 65 20 64 65 72 69 76 65 64 2d 6d 6f 64 65 2d 70 61 72 65 6e 74 20 63 6c 6f 6a 75 72 65 mode.derived-mode-parent.clojure
15080 2d 6d 6f 64 65 5d 20 35 29 0a 23 40 32 32 31 20 4d 61 6a 6f 72 20 6d 6f 64 65 20 66 6f 72 20 65 -mode].5).#@221.Major.mode.for.e
150a0 64 69 74 69 6e 67 20 43 6c 6f 6a 75 72 65 43 20 63 6f 64 65 2e 0a 0a 5c 7b 63 6c 6f 6a 75 72 65 diting.ClojureC.code...\{clojure
150c0 63 2d 6d 6f 64 65 2d 6d 61 70 7d 0a 0a 49 6e 20 61 64 64 69 74 69 6f 6e 20 74 6f 20 61 6e 79 20 c-mode-map}..In.addition.to.any.
150e0 68 6f 6f 6b 73 20 69 74 73 20 70 61 72 65 6e 74 20 6d 6f 64 65 20 60 63 6c 6f 6a 75 72 65 2d 6d hooks.its.parent.mode.`clojure-m
15100 6f 64 65 27 20 6d 69 67 68 74 20 68 61 76 65 20 72 75 6e 2c 0a 74 68 69 73 20 6d 6f 64 65 20 72 ode'.might.have.run,.this.mode.r
15120 75 6e 73 20 74 68 65 20 68 6f 6f 6b 20 60 63 6c 6f 6a 75 72 65 63 2d 6d 6f 64 65 2d 68 6f 6f 6b uns.the.hook.`clojurec-mode-hook
15140 27 2c 20 61 73 20 74 68 65 20 66 69 6e 61 6c 20 73 74 65 70 0a 64 75 72 69 6e 67 20 69 6e 69 74 ',.as.the.final.step.during.init
15160 69 61 6c 69 7a 61 74 69 6f 6e 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 63 6c 6f 6a 75 72 65 63 ialization...(defalias.'clojurec
15180 2d 6d 6f 64 65 20 23 5b 30 20 22 5c 33 30 36 5c 33 30 30 21 5c 32 31 30 5c 33 30 37 18 5c 33 31 -mode.#[0."\306\300!\210\307.\31
151a0 30 20 5c 32 31 30 5c 33 31 31 11 5c 33 31 32 12 5c 33 31 30 5c 33 31 33 4e 5c 32 30 33 1b 00 5c 0.\210\311.\312.\310\313N\203..\
151c0 33 31 34 5c 33 31 31 5c 33 31 33 5c 33 31 30 5c 33 31 33 4e 23 5c 32 31 30 5c 33 31 35 0b 21 5c 314\311\313\310\313N#\210\315.!\
151e0 32 30 34 27 00 5c 33 31 36 0b 5c 33 31 37 20 5c 22 5c 32 31 30 5c 33 32 30 5c 66 21 5c 32 31 31 204'.\316.\317.\"\210\320\f!\211
15200 5c 32 30 33 35 00 5c 32 31 31 5c 33 32 31 20 3d 5c 32 30 33 3b 00 5c 33 32 32 5c 66 5c 33 32 33 \2035.\211\321.=\203;.\322\f\323
15220 20 5c 22 5c 32 31 30 5c 32 31 30 5c 33 32 34 0d 5c 33 32 35 5c 22 5c 32 30 34 52 00 0d 0e 1b 3d .\"\210\210\324.\325\"\204R....=
15240 5c 32 30 34 52 00 5c 33 32 36 0d 5c 33 32 35 0e 1b 43 23 5c 32 31 30 5c 33 32 37 0b 21 5c 32 31 \204R.\326.\325..C#\210\327.!\21
15260 30 5c 33 33 30 5c 66 21 5c 32 31 30 0d 16 1b 29 5c 33 33 31 5c 33 33 32 21 5c 32 30 37 22 20 5b 0\330\f!\210...)\331\332!\207".[
15280 64 65 6c 61 79 2d 6d 6f 64 65 2d 68 6f 6f 6b 73 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 6d 6f 64 65 delay-mode-hooks.major-mode.mode
152a0 2d 6e 61 6d 65 20 63 6c 6f 6a 75 72 65 63 2d 6d 6f 64 65 2d 6d 61 70 20 63 6c 6f 6a 75 72 65 63 -name.clojurec-mode-map.clojurec
152c0 2d 6d 6f 64 65 2d 73 79 6e 74 61 78 2d 74 61 62 6c 65 20 63 6c 6f 6a 75 72 65 63 2d 6d 6f 64 65 -mode-syntax-table.clojurec-mode
152e0 2d 61 62 62 72 65 76 2d 74 61 62 6c 65 20 6d 61 6b 65 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c -abbrev-table.make-local-variabl
15300 65 20 74 20 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 20 63 6c 6f 6a 75 72 65 63 2d 6d 6f 64 65 20 22 e.t.clojure-mode.clojurec-mode."
15320 43 6c 6f 6a 75 72 65 43 22 20 6d 6f 64 65 2d 63 6c 61 73 73 20 70 75 74 20 6b 65 79 6d 61 70 2d ClojureC".mode-class.put.keymap-
15340 70 61 72 65 6e 74 20 73 65 74 2d 6b 65 79 6d 61 70 2d 70 61 72 65 6e 74 20 63 75 72 72 65 6e 74 parent.set-keymap-parent.current
15360 2d 6c 6f 63 61 6c 2d 6d 61 70 20 63 68 61 72 2d 74 61 62 6c 65 2d 70 61 72 65 6e 74 20 73 74 61 -local-map.char-table-parent.sta
15380 6e 64 61 72 64 2d 73 79 6e 74 61 78 2d 74 61 62 6c 65 20 73 65 74 2d 63 68 61 72 2d 74 61 62 6c ndard-syntax-table.set-char-tabl
153a0 65 2d 70 61 72 65 6e 74 20 73 79 6e 74 61 78 2d 74 61 62 6c 65 20 61 62 62 72 65 76 2d 74 61 62 e-parent.syntax-table.abbrev-tab
153c0 6c 65 2d 67 65 74 20 3a 70 61 72 65 6e 74 73 20 61 62 62 72 65 76 2d 74 61 62 6c 65 2d 70 75 74 le-get.:parents.abbrev-table-put
153e0 20 75 73 65 2d 6c 6f 63 61 6c 2d 6d 61 70 20 73 65 74 2d 73 79 6e 74 61 78 2d 74 61 62 6c 65 20 .use-local-map.set-syntax-table.
15400 72 75 6e 2d 6d 6f 64 65 2d 68 6f 6f 6b 73 20 63 6c 6f 6a 75 72 65 63 2d 6d 6f 64 65 2d 68 6f 6f run-mode-hooks.clojurec-mode-hoo
15420 6b 20 6c 6f 63 61 6c 2d 61 62 62 72 65 76 2d 74 61 62 6c 65 5d 20 35 20 28 23 24 20 2e 20 38 36 k.local-abbrev-table].5.(#$...86
15440 31 36 30 29 20 6e 69 6c 5d 29 0a 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 30 5c 33 30 31 5c 160).nil]).(byte-code."\300\301\
15460 33 30 32 5c 22 5c 32 31 30 5c 33 30 30 5c 33 30 31 5c 33 30 33 5c 22 5c 32 31 30 5c 33 30 30 5c 302\"\210\300\301\303\"\210\300\
15480 33 30 31 5c 33 30 34 5c 22 5c 32 31 30 5c 33 30 30 5c 33 30 31 5c 33 30 35 5c 22 5c 32 31 30 5c 301\304\"\210\300\301\305\"\210\
154a0 33 30 36 5c 33 30 37 21 5c 32 30 37 22 20 5b 61 64 64 2d 74 6f 2d 6c 69 73 74 20 61 75 74 6f 2d 306\307!\207".[add-to-list.auto-
154c0 6d 6f 64 65 2d 61 6c 69 73 74 20 28 22 5c 5c 2e 5c 5c 28 63 6c 6a 5c 5c 7c 64 74 6d 5c 5c 7c 65 mode-alist.("\\.\\(clj\\|dtm\\|e
154e0 64 6e 5c 5c 29 5c 5c 27 22 20 2e 20 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 29 20 28 22 5c 5c 2e 63 dn\\)\\'"...clojure-mode).("\\.c
15500 6c 6a 63 5c 5c 27 22 20 2e 20 63 6c 6f 6a 75 72 65 63 2d 6d 6f 64 65 29 20 28 22 5c 5c 2e 63 6c ljc\\'"...clojurec-mode).("\\.cl
15520 6a 73 5c 5c 27 22 20 2e 20 63 6c 6f 6a 75 72 65 73 63 72 69 70 74 2d 6d 6f 64 65 29 20 28 22 5c js\\'"...clojurescript-mode).("\
15540 5c 28 3f 3a 62 75 69 6c 64 5c 5c 7c 70 72 6f 66 69 6c 65 5c 5c 29 5c 5c 2e 62 6f 6f 74 5c 5c 27 \(?:build\\|profile\\)\\.boot\\'
15560 22 20 2e 20 63 6c 6f 6a 75 72 65 2d 6d 6f 64 65 29 20 70 72 6f 76 69 64 65 20 63 6c 6f 6a 75 72 "...clojure-mode).provide.clojur
15580 65 2d 6d 6f 64 65 5d 20 33 29 0a e-mode].3).