simpleprelude-1.0.1.0: src-exec/SimpleGHC.hs

{-# LANGUAGE PackageImports, NoImplicitPrelude  #-}

import Common             ( additionalArgs )
import GHC.Paths          ( ghc )
import System.Environment ( getArgs )
import System.Exit        ( exitWith )
import System.Process     ( rawSystem )

import "base" Prelude


main :: IO ()
main = do
    args <- getArgs
    exitWith =<< rawSystem ghc (additionalArgs ++ args)