;ELC   
;;; Compiled
;;; in Emacs version 28.0.50
;;; with all optimizations.


#@192 Shift the nested off-side-rule block adjacent to point by COLS columns to the right.

In Transient Mark mode, if the mark is active, operate on the contents
of the region instead.

(fn COLS)
(defalias 'haskell-move-nested #[257 "\212\203 	\203 \303\304 \305 #\210\306\211\202& \307 \211\205$ \303@A#\262)\207" [transient-mark-mode mark-active deactivate-mark indent-rigidly region-beginning region-end nil haskell-move-nested-region] 6 (#$ . 88)])
#@259 Increase indentation of the following off-side-rule block adjacent to point.

Use a numeric prefix argument to indicate amount of indentation to apply.

In Transient Mark mode, if the mark is active, operate on the contents
of the region instead.

(fn COLS)
(defalias 'haskell-move-nested-right #[257 "\300!\207" [haskell-move-nested] 3 (#$ . 552) "p"])
#@259 Decrease indentation of the following off-side-rule block adjacent to point.

Use a numeric prefix argument to indicate amount of indentation to apply.

In Transient Mark mode, if the mark is active, operate on the contents
of the region instead.

(fn COLS)
(defalias 'haskell-move-nested-left #[257 "\300[!\207" [haskell-move-nested] 3 (#$ . 914) "p"])
#@85 Infer region off-side-rule block adjacent to point.
Used by `haskell-move-nested'.

(defalias 'haskell-move-nested-region #[0 "\212i\300y\210\301 \302 \303 \300\304\300y\210\302 U\204; \301 V\204- V\203; \301 Y\203; \302 \262\303 \262\300y\210\202 \206A B\266\204\262\262)\207" [nil haskell-move-nested-indent-level line-beginning-position line-end-position 0] 8 (#$ . 1275)])
(defalias 'haskell-move-nested-indent-level #[0 "\300\301\302 \212\302 b\210\303\304\305 \306\307$)\206 \302 \"GS]\207" [0 buffer-substring-no-properties line-beginning-position search-forward-regexp "[^ ]" line-end-position t 1] 8])
#@37 Kill the nested region after point.
(defalias 'haskell-kill-nested #[0 "`\212\300\301\302 \303\304$\210\305\306\307 \303\304$\210\310 )\311A\"\207" [search-backward-regexp "^[ ]+" line-beginning-position t 1 search-forward-regexp "[^ ]" line-end-position haskell-move-nested-region kill-region] 6 (#$ . 1908) nil])
#@37 Kill the nested region after point.
(defalias 'haskell-delete-nested #[0 "`\212\300\301\302 \303\304$\210\305\306\307 \303\304$\210\310 )A|\207" [search-backward-regexp "^[ ]+" line-beginning-position t 1 search-forward-regexp "[^ ]" line-end-position haskell-move-nested-region] 6 (#$ . 2231) nil])
(provide 'haskell-move-nested)