Commit c021b358 authored by Duncan Coutts's avatar Duncan Coutts
Browse files

Replace remaining OPTIONS pragmas with LANGUAGE + OPTIONS_GHC/JHC/NHC98

ghc-6.4 and above recognise the OPTIONS_GHC pragma.
ghc-6.6 and above recognise the LANGUAGE pragma.
Added OPTIONS_JHC and OPTIONS_NHC pragmas with equivalant flags.
parent 6f4fb435
{-# OPTIONS -cpp #-}
{-# LANGUAGE CPP #-}
{-# OPTIONS_GHC -cpp #-}
{-# OPTIONS_NHC98 -cpp #-}
{-# OPTIONS_JHC -fcpp #-}
-----------------------------------------------------------------------------
-- |
-- Module : Distribution.Compat.ReadP
......
{-# OPTIONS -cpp #-}
{-# LANGUAGE CPP #-}
{-# OPTIONS_GHC -cpp #-}
{-# OPTIONS_NHC98 -cpp #-}
{-# OPTIONS_JHC -fcpp #-}
-- #hide
module Distribution.Compat.TempFile (openTempFile, withTempFile) where
......
{-# OPTIONS -cpp #-}
{-# LANGUAGE CPP #-}
{-# OPTIONS_GHC -cpp #-}
{-# OPTIONS_NHC98 -cpp #-}
{-# OPTIONS_JHC -fcpp #-}
-----------------------------------------------------------------------------
-- |
-- Module : Distribution.Compiler
......
{-# OPTIONS -cpp #-}
{-# LANGUAGE CPP #-}
{-# OPTIONS_GHC -cpp #-}
{-# OPTIONS_NHC98 -cpp #-}
{-# OPTIONS_JHC -fcpp #-}
-----------------------------------------------------------------------------
-- |
-- Module : Distribution.Configuration
......
{-# OPTIONS -cpp #-}
{-# LANGUAGE CPP #-}
{-# OPTIONS_GHC -cpp #-}
{-# OPTIONS_NHC98 -cpp #-}
{-# OPTIONS_JHC -fcpp #-}
-----------------------------------------------------------------------------
-- |
-- Module : Distribution.PackageDescription
......
{-# OPTIONS -cpp #-}
{-# LANGUAGE CPP #-}
{-# OPTIONS_GHC -cpp #-}
{-# OPTIONS_NHC98 -cpp #-}
{-# OPTIONS_JHC -fcpp #-}
-----------------------------------------------------------------------------
-- |
-- Module : Distribution.ParseUtils
......
......@@ -147,8 +147,9 @@ buildPathsModule pkg_descr lbi =
let pragmas
| absolute || isHugs = ""
| otherwise =
"{-# OPTIONS_GHC -fffi #-}\n"++
"{-# LANGUAGE ForeignFunctionInterface #-}\n"
"{-# LANGUAGE ForeignFunctionInterface #-}\n" ++
"{-# OPTIONS_GHC -fffi #-}\n"++
"{-# OPTIONS_JHC -fffi #-}\n"
foreign_imports
| absolute = ""
......
{-# OPTIONS -cpp -fffi #-}
{-# LANGUAGE CPP, ForeignFunctionInterface #-}
{-# OPTIONS_GHC -cpp -fffi #-}
{-# OPTIONS_NHC98 -cpp #-}
{-# OPTIONS_JHC -fcpp -fffi #-}
-----------------------------------------------------------------------------
-- |
-- Module : Distribution.Simple.InstallDirs
......
{-# OPTIONS -cpp -fffi #-}
{-# LANGUAGE CPP, ForeignFunctionInterface #-}
{-# OPTIONS_GHC -cpp -fffi #-}
{-# OPTIONS_NHC98 -cpp #-}
{-# OPTIONS_JHC -fcpp -fffi #-}
-----------------------------------------------------------------------------
-- |
-- Module : Distribution.Simple.Utils
......
{-# OPTIONS -cpp #-}
{-# LANGUAGE CPP #-}
{-# OPTIONS_GHC -cpp #-}
{-# OPTIONS_NHC98 -cpp #-}
{-# OPTIONS_JHC -fcpp #-}
-----------------------------------------------------------------------------
-- |
-- Module : Distribution.Version
......
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