profiteur 0.4.2.2 → 0.4.3.0

raw patch · 3 files changed

+11/−4 lines, 3 filesdep ~aeson

Dependency ranges changed: aeson

Files

CHANGELOG.md +4/−0
profiteur.cabal +2/−2
src/Main.hs +5/−2

CHANGELOG.md view

@@ -1,3 +1,7 @@+- 0.4.3.0+    * Add `--version` flag+    * Bump `aeson` dependency to 1.2+ - 0.4.2.2     * Bump `js-jquery` dependency to 3.2

profiteur.cabal view

@@ -1,5 +1,5 @@ Name:                profiteur-Version:             0.4.2.2+Version:             0.4.3.0 Synopsis:            Treemap visualiser for GHC prof files Description:         Treemap visualiser for GHC prof files Homepage:            http://github.com/jaspervdj/profiteur@@ -45,7 +45,7 @@     Profiteur.Parser    Build-depends:-    aeson                >= 0.6  && < 1.2,+    aeson                >= 0.6  && < 1.3,     base                 >= 4.8  && < 5,     bytestring           >= 0.9  && < 0.11,     containers           >= 0.5  && < 0.6,

src/Main.hs view

@@ -12,6 +12,7 @@ import qualified Data.Text                  as T import qualified Data.Text.Encoding         as T import qualified Data.Text.Lazy.IO          as TL+import           Data.Version               (showVersion) import qualified Language.Javascript.JQuery as JQuery import           System.Environment         (getArgs, getProgName) import           System.Exit                (exitFailure)@@ -20,7 +21,7 @@   ---------------------------------------------------------------------------------import           Paths_profiteur            (getDataFileName)+import           Paths_profiteur            (getDataFileName, version) import           Profiteur.Core import           Profiteur.Parser @@ -87,6 +88,8 @@     progName <- getProgName     args     <- getArgs     case args of+        _ | "--version" `elem` args ->+            putStrLn (showVersion version)         [profFile] -> do             profOrErr <- decode <$> TL.readFile profFile             case profOrErr of@@ -95,6 +98,6 @@                 Left err   -> do                     putStrLn $ profFile ++ ": " ++ err                     exitFailure-        _          -> do+        _ -> do             putStrLn $ "Usage: " ++ progName ++ " <prof file>"             exitFailure