cosmetic change.

This commit is contained in:
Kazu Yamamoto 2012-01-23 18:37:50 +09:00
parent 34d22ee1d5
commit a5746be927

View File

@ -65,16 +65,16 @@ unloaded modules are loaded")
(defun ghc-comp-init () (defun ghc-comp-init ()
(let* ((syms '(ghc-module-names (let* ((syms '(ghc-module-names
ghc-language-extensions ghc-language-extensions
ghc-option-flags ghc-option-flags
ghc-keyword-Prelude ghc-keyword-Prelude
ghc-keyword-Control.Applicative ghc-keyword-Control.Applicative
ghc-keyword-Control.Monad ghc-keyword-Control.Monad
ghc-keyword-Control.Exception ghc-keyword-Control.Exception
ghc-keyword-Data.Char ghc-keyword-Data.Char
ghc-keyword-Data.List ghc-keyword-Data.List
ghc-keyword-Data.Maybe ghc-keyword-Data.Maybe
ghc-keyword-System.IO)) ghc-keyword-System.IO))
(vals (ghc-boot (length syms)))) (vals (ghc-boot (length syms))))
(ghc-set syms vals)) (ghc-set syms vals))
(ghc-add ghc-module-names "qualified") (ghc-add ghc-module-names "qualified")