From 15c549a6e8b8243b43100982a94d28926c1e6ab8 Mon Sep 17 00:00:00 2001
From: Abhinav Sarkar <abhinav@abhinavsarkar.net>
Date: Fri, 25 Mar 2016 01:59:01 +0530
Subject: [PATCH] Adds version option to the executable.

---
 app/Ringo/ArgParser.hs | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

diff --git a/app/Ringo/ArgParser.hs b/app/Ringo/ArgParser.hs
index 7bdfada..50dce2c 100644
--- a/app/Ringo/ArgParser.hs
+++ b/app/Ringo/ArgParser.hs
@@ -5,8 +5,11 @@ module Ringo.ArgParser (ProgArgs(..), parseArgs) where
 import qualified Data.Text as Text
 
 import Data.List (intercalate)
+import Data.Version (showVersion)
 import Options.Applicative
 
+import Paths_ringo (version)
+
 import Ringo.Types
 
 data ProgArgs = ProgArgs
@@ -95,9 +98,14 @@ progArgsParser =
                     <> action "directory"
                     <> help "Output directory")
 
+versionParser :: Parser (a -> a)
+versionParser = infoOption ("ringo " ++ showVersion version)
+  (long "version"
+   <> help "Print version information")
+
 parseArgs :: IO ProgArgs
 parseArgs = execParser $
-  info (helper <*> progArgsParser)
+  info (helper <*> versionParser <*> progArgsParser)
        (fullDesc
         <> progDesc "Transforms OLTP database schemas to OLAP database star schemas"
         <> header "ringo - OLTP to OLAP schema transformer"