;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (byte-code "\303\304!\210\303\305!\210\303\306\307\"\210\205\310!\311\312\313\314\315\316\313\316\317\320\321\316\211& #\316\207" [load-file-name sly-indentation--path sly-indentation--contrib require sly cl-lib sly-cl-indent "lib/sly-cl-indent" file-name-directory put sly-contribs sly-indentation record sly-contrib nil (slynk/indentation) sly-indentation-init sly-indentation-unload] 13) (defalias 'sly-indentation-init #[0 "\306\307\310\311\312\313\314\"\"\"\210\315\314:\203'@\262\316\317E \320\321$A\262\202 \266\n\322=\2037\323 \2037\324 \210\325\326\f! >\204H\327\330\331\fD\"\210\f\211\332\333I\207" [sly-indentation--path sly-contrib--required-slynk-modules this-command sly--lisp-indent-current-package-function sly-indentation--contrib cl-struct-sly-contrib-tags mapc funcall mapcar sly-contrib--enable cl-remove-if sly-contrib--enabled-p nil (slynk/indentation) cl-adjoin sly-indentation :key cl-first sly-setup sly-connected-p sly-contrib--load-slynk-dependencies sly-current-package type-of signal wrong-type-argument sly-contrib 1 t] 7]) (defalias 'sly-indentation-unload #[0 "\303\304:\203@\262\305\306\307$A\262\202\266\310\311\312\"\210\313\314\315\316\317\320\304\"\"\"\210\321 !\n>\204:\322\323\324 D\"\210 \211\325\304I\207" [sly-contrib--required-slynk-modules sly-indentation--contrib cl-struct-sly-contrib-tags (slynk/indentation) nil cl-remove :key cl-first sly-warning "Disabling contrib %s" sly-indentation mapc funcall mapcar sly-contrib--disable cl-remove-if-not sly-contrib--enabled-p type-of signal wrong-type-argument sly-contrib 1] 7]) #@31 (fn SYMBOL INDENT PACKAGES) (defalias 'sly-update-system-indentation #[771 "\301\"\302\204\303BC#\207\211\203Z\211@\211@\232\203F\211\203?\211@\211A\235\2048\211AB\241\266A\266\202\202\"\210\304\262\202S\211\211\305A\306\307$\241\266A\266\202\202\210\211?\205i\303BB#\207" [sly-common-lisp-system-indentation gethash nil puthash t cl-set-difference :test equal] 14 (#$ . 1692)]) (provide 'sly-indentation)