Commit de3edc07 authored by malcolm's avatar malcolm
Browse files

[project @ 2005-01-06 10:44:14 by malcolm]

It seems that ghc-6.2.x doesn't have Compat.RawSystem, so should use
System.Cmd instead.  And ghc-5.04.x doesn't export rawSystem from
there either, so should use the simple inline definition.
parent 82098fef
{-# OPTIONS -fffi -cpp #-}
------------------------------------------------------------------------
-- $Id: Main.hs,v 1.63 2005/01/05 15:06:25 ross Exp $
-- $Id: Main.hs,v 1.64 2005/01/06 10:44:14 malcolm Exp $
--
-- Program for converting .hsc files to .hs files, by converting the
-- file into a C program which is run to generate the Haskell source.
......@@ -34,12 +34,12 @@ import CString
#endif
#ifdef __GLASGOW_HASKELL__
#if __GLASGOW_HASKELL__ >= 603
import Compat.RawSystem ( rawSystem )
#elif __HUGS__ || __NHC__ >= 117
#elif __HUGS__ || __NHC__ >= 117 || __GLASGOW_HASKELL__ >= 600
import System.Cmd ( rawSystem )
#else
rawSystem prog args = system (prog++unwords args)
rawSystem prog args = system (prog++" "++unwords args)
#endif
version :: String
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment