2014-08-18 06:06:36 +00:00
|
|
|
{-# LANGUAGE ScopedTypeVariables, DeriveDataTypeable #-}
|
2014-03-25 02:14:25 +00:00
|
|
|
|
2014-10-22 22:56:18 +00:00
|
|
|
-- | WARNING
|
2015-04-29 16:44:46 +00:00
|
|
|
-- This program is deprecated, use `ghc-mod legacy-interactive` instead.
|
2014-03-27 01:34:43 +00:00
|
|
|
|
2014-03-19 01:23:47 +00:00
|
|
|
module Main where
|
|
|
|
|
|
2015-04-29 16:44:46 +00:00
|
|
|
import System.Exit
|
|
|
|
|
import System.Process
|
|
|
|
|
import System.Environment
|
2014-03-25 02:34:58 +00:00
|
|
|
|
2014-03-19 01:23:47 +00:00
|
|
|
main :: IO ()
|
2015-04-29 16:44:46 +00:00
|
|
|
main = do
|
|
|
|
|
args <- getArgs
|
|
|
|
|
h <- spawnProcess "ghc-mod" $ ["legacy-interactive"] ++ args
|
|
|
|
|
exitWith =<< waitForProcess h
|
