;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (byte-code "\300\301!\210\300\302!\210\300\303!\210\300\304!\210\300\305!\210\300\306!\210\300\307!\207" [require haskell-sort-imports haskell-align-imports haskell-session haskell-navigate-imports haskell-complete-module haskell-sandbox haskell-customize] 2) #@169 Add an import to the import list. Sorts and aligns imports, unless `haskell-stylish-on-save' is set, in which case we defer to stylish-haskell. (fn &optional MODULE) (defalias 'haskell-add-import #[256 "\212db\210\301 \210\302\206\303\304\305\306 !\"!c\210?\205 \307 \210\310 )\207" [haskell-stylish-on-save haskell-navigate-imports haskell-import-for-module haskell-complete-module-read "Module: " haskell-session-all-modules haskell-modules-session haskell-sort-imports haskell-align-imports] 6 (#$ . 348) nil]) #@58 Get import statements for the given module. (fn MODULE) (defalias 'haskell-import-for-module #[257 "\301\"\211\203 \211A\207\302\303\304\305\"\"\306P\207" [haskell-import-mapping assoc read-from-minibuffer "Import line: " format "import %s" "\n"] 7 (#$ . 875)]) #@90 Get the modules installed in the current package set. (fn SESSION &optional DONTCREATE) (defalias 'haskell-session-installed-modules #[513 "\300 \211\205$\301\302\303\304!\203\305\306\307!!P\202\310\311\312$!\313!\262\207" [haskell-session-maybe shell-command-to-string format "%s 2> /dev/null | %s | %s" haskell-sandbox-exists-p "ghc-pkg dump -f " shell-quote-argument haskell-sandbox-pkgdb "ghc-pkg dump" "egrep '^(exposed-modules: | )[A-Z]'" "cut -c18-" split-string] 10 (#$ . 1148)]) #@145 Get all modules -- installed or in the current project. If DONTCREATE is non-nil don't create a new session. (fn SESSION &optional DONTCREATE) (defalias 'haskell-session-all-modules #[513 "\300\301\"\302\"\"\207" [append haskell-session-installed-modules haskell-session-project-modules] 7 (#$ . 1670)]) #@129 Get the modules of the current project. If DONTCREATE is non-nil don't create a new session. (fn SESSION &optional DONTCREATE) (defalias 'haskell-session-project-modules #[513 "\211\203 \300 \205\301\302\303\302\304\305!\"\306#!\307!\262\207" [haskell-session-maybe shell-command-to-string format "%s && %s" "cd %s" haskell-session-cabal-dir "egrep '^module[ ]+[^( ]+' . -r -I --include='*.*hs' --include='*.hsc' -s -o -h | sed 's/^module[ ]*//' | sort | uniq" split-string] 9 (#$ . 1986)]) #@68 Get the `haskell-session', throw an error if it's not available. (defalias 'haskell-modules-session #[0 "\300 \206\301\302 \206\303 \206\304\305!!\207" [haskell-session-maybe haskell-session-assign haskell-session-from-buffer haskell-session-choose error "No session associated with this buffer. Try M-x haskell-session-change or report this as a bug."] 3 (#$ . 2497)]) (provide 'haskell-modules)