;ELC
;;; Compiled by haakon@haakon-laptop on Thu Aug 22 10:20:07 2013
;;; from file /home/haakon/.emacs.d/elpa/haskell-mode-13.7/haskell-sort-imports.el
;;; in Emacs version 24.2.1
;;; with all optimizations.

;;; This file uses dynamic docstrings, first added in Emacs 19.29.

;;; This file does not contain utf-8 non-ASCII characters,
;;; and so can be loaded in Emacs versions earlier than 23.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


(defvar haskell-sort-imports-regexp "^\\(import[ ]+\\)\\(qualified \\)?[ ]*\\(\"[^\"]*\" \\)?[ ]*\\([A-Za-z0-9_.']*.*\\)")
#@36 Sort the import list at the point.
(defalias 'haskell-sort-imports #[nil "\302 \2053\303\304 \305 \"i\306 \203\307\310 \311 \312	%\2022\307\212\313\314!\210`)\212\313\315!\210`)\316	%*\207" [col current-line haskell-sort-imports-line-match buffer-substring-no-properties line-beginning-position line-end-position use-region-p haskell-sort-imports-sort-imports-at region-beginning region-end t haskell-sort-imports-goto-modules-start/end previous-line next-line nil] 6 (#$ . 668) nil])
(defalias 'haskell-sort-imports-sort-imports-at #[(begin end region current-line col) "\212\306\307\310	\n%\210)?\205\212\nb\210\311\f!)\211\n\\b)\207" [haskell-sort-imports-regexp begin end region current-line line sort-regexp-fields nil "\\4" search-backward col] 7])
#@44 Try to match the current line as a regexp.
(defalias 'haskell-sort-imports-line-match #[nil "\301\302 \303 \"\304\305\"\205)\207" [line buffer-substring-no-properties line-beginning-position line-end-position string-match "^import "] 3 (#$ . 1443)])
#@51 Skip a bunch of consequtive import lines up/down.
(defalias 'haskell-sort-imports-goto-modules-start/end #[(direction) "`d\232\206	\301 ??\205 \210\202\207" [direction haskell-sort-imports-line-match] 2 (#$ . 1704)])
(provide 'haskell-sort-imports)
