X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=utils%2Frunghc%2Frunghc.hs;h=8de281f45a057b09c71d49803b9cec731f725960;hb=6627a4b1ce5863e98b78afb2d030ebf3b349d0ba;hp=47615def3a29fb6f0ea34dba08f11b56e768cdac;hpb=bb57db143d9c0207e4c2c4c24ceb688714c2980d;p=ghc-hetmet.git diff --git a/utils/runghc/runghc.hs b/utils/runghc/runghc.hs index 47615de..8de281f 100644 --- a/utils/runghc/runghc.hs +++ b/utils/runghc/runghc.hs @@ -22,13 +22,10 @@ module Main (main) where -import Paths_runghc - import Control.Exception import Data.Char import Data.List import Data.Monoid -import Data.Version import System.Cmd import System.Directory import System.Environment @@ -85,7 +82,7 @@ parseRunGhcFlags = f mempty printVersion :: IO () printVersion = do - putStrLn ("runghc " ++ showVersion version) + putStrLn ("runghc " ++ VERSION) printUsage :: IO () printUsage = do