Better error reporting, cleanup

This commit is contained in:
Nikolay Yakimov
2015-12-20 15:02:31 +03:00
parent 631c449e0c
commit 23416e9aeb
3 changed files with 11 additions and 54 deletions

View File

@@ -374,7 +374,7 @@ instance Binary ChEntrypoint where
data LintOpts = LintOpts {
optLintHlintOpts :: [String]
-- ^ options that will be passed to hlint executable
}
} deriving (Show)
-- | Default "LintOpts" instance
defaultLintOpts :: LintOpts
@@ -388,7 +388,7 @@ data BrowseOpts = BrowseOpts {
-- ^ If 'True', "browseWith" also returns types.
, optBrowseQualified :: Bool
-- ^ If 'True', "browseWith" will return fully qualified name
}
} deriving (Show)
-- | Default "BrowseOpts" instance
defaultBrowseOpts :: BrowseOpts