projects
/
ghc-base.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
ac0439d
)
Use explicit language extensions & remove extension fields from base.cabal
author
simonpj@microsoft.com
<unknown>
Fri, 28 Jan 2011 12:07:19 +0000
(12:07 +0000)
committer
simonpj@microsoft.com
<unknown>
Fri, 28 Jan 2011 12:07:19 +0000
(12:07 +0000)
Add explicit {-# LANGUAGE xxx #-} pragmas to each module, that say
what extensions that module uses. This makes it clearer where
different extensions are used in the (large, variagated) base package.
Now base.cabal doesn't need any extensions field
Thanks to Bas van Dijk for doing all the work.
160 files changed:
Control/Applicative.hs
patch
|
blob
|
history
Control/Category.hs
patch
|
blob
|
history
Control/Concurrent.hs
patch
|
blob
|
history
Control/Concurrent/Chan.hs
patch
|
blob
|
history
Control/Concurrent/MVar.hs
patch
|
blob
|
history
Control/Concurrent/QSem.hs
patch
|
blob
|
history
Control/Concurrent/QSemN.hs
patch
|
blob
|
history
Control/Concurrent/SampleVar.hs
patch
|
blob
|
history
Control/Exception.hs
patch
|
blob
|
history
Control/Exception/Base.hs
patch
|
blob
|
history
Control/Monad.hs
patch
|
blob
|
history
Control/Monad/Fix.hs
patch
|
blob
|
history
Control/Monad/ST.hs
patch
|
blob
|
history
Control/Monad/ST/Lazy.hs
patch
|
blob
|
history
Control/OldException.hs
patch
|
blob
|
history
Data/Bits.hs
patch
|
blob
|
history
Data/Bool.hs
patch
|
blob
|
history
Data/Char.hs
patch
|
blob
|
history
Data/Complex.hs
patch
|
blob
|
history
Data/Data.hs
patch
|
blob
|
history
Data/Dynamic.hs
patch
|
blob
|
history
Data/Either.hs
patch
|
blob
|
history
Data/Eq.hs
patch
|
blob
|
history
Data/Fixed.hs
patch
|
blob
|
history
Data/Foldable.hs
patch
|
blob
|
history
Data/Functor.hs
patch
|
blob
|
history
Data/HashTable.hs
patch
|
blob
|
history
Data/IORef.hs
patch
|
blob
|
history
Data/Int.hs
patch
|
blob
|
history
Data/Ix.hs
patch
|
blob
|
history
Data/List.hs
patch
|
blob
|
history
Data/Maybe.hs
patch
|
blob
|
history
Data/Monoid.hs
patch
|
blob
|
history
Data/Ord.hs
patch
|
blob
|
history
Data/Ratio.hs
patch
|
blob
|
history
Data/STRef.hs
patch
|
blob
|
history
Data/String.hs
patch
|
blob
|
history
Data/Traversable.hs
patch
|
blob
|
history
Data/Tuple.hs
patch
|
blob
|
history
Data/Typeable.hs
patch
|
blob
|
history
Data/Typeable.hs-boot
patch
|
blob
|
history
Data/Unique.hs
patch
|
blob
|
history
Data/Version.hs
patch
|
blob
|
history
Data/Word.hs
patch
|
blob
|
history
Debug/Trace.hs
patch
|
blob
|
history
Foreign.hs
patch
|
blob
|
history
Foreign/C.hs
patch
|
blob
|
history
Foreign/C/Error.hs
patch
|
blob
|
history
Foreign/C/String.hs
patch
|
blob
|
history
Foreign/C/Types.hs
patch
|
blob
|
history
Foreign/Concurrent.hs
patch
|
blob
|
history
Foreign/ForeignPtr.hs
patch
|
blob
|
history
Foreign/Marshal.hs
patch
|
blob
|
history
Foreign/Marshal/Alloc.hs
patch
|
blob
|
history
Foreign/Marshal/Array.hs
patch
|
blob
|
history
Foreign/Marshal/Error.hs
patch
|
blob
|
history
Foreign/Marshal/Pool.hs
patch
|
blob
|
history
Foreign/Marshal/Utils.hs
patch
|
blob
|
history
Foreign/Ptr.hs
patch
|
blob
|
history
Foreign/StablePtr.hs
patch
|
blob
|
history
Foreign/Storable.hs
patch
|
blob
|
history
GHC/Arr.lhs
patch
|
blob
|
history
GHC/Base.lhs
patch
|
blob
|
history
GHC/Classes.hs
patch
|
blob
|
history
GHC/Conc.lhs
patch
|
blob
|
history
GHC/Conc/IO.hs
patch
|
blob
|
history
GHC/Conc/Signal.hs
patch
|
blob
|
history
GHC/Conc/Sync.lhs
patch
|
blob
|
history
GHC/Conc/Windows.hs
patch
|
blob
|
history
GHC/ConsoleHandler.hs
patch
|
blob
|
history
GHC/Constants.hs
patch
|
blob
|
history
GHC/Desugar.hs
patch
|
blob
|
history
GHC/Enum.lhs
patch
|
blob
|
history
GHC/Environment.hs
patch
|
blob
|
history
GHC/Err.lhs
patch
|
blob
|
history
GHC/Err.lhs-boot
patch
|
blob
|
history
GHC/Exception.lhs
patch
|
blob
|
history
GHC/Exts.hs
patch
|
blob
|
history
GHC/Float.lhs
patch
|
blob
|
history
GHC/ForeignPtr.hs
patch
|
blob
|
history
GHC/IO.hs
patch
|
blob
|
history
GHC/IO.hs-boot
patch
|
blob
|
history
GHC/IO/Buffer.hs
patch
|
blob
|
history
GHC/IO/BufferedIO.hs
patch
|
blob
|
history
GHC/IO/Device.hs
patch
|
blob
|
history
GHC/IO/Encoding.hs
patch
|
blob
|
history
GHC/IO/Encoding/CodePage.hs
patch
|
blob
|
history
GHC/IO/Encoding/Iconv.hs
patch
|
blob
|
history
GHC/IO/Encoding/Latin1.hs
patch
|
blob
|
history
GHC/IO/Encoding/Types.hs
patch
|
blob
|
history
GHC/IO/Encoding/UTF16.hs
patch
|
blob
|
history
GHC/IO/Encoding/UTF32.hs
patch
|
blob
|
history
GHC/IO/Encoding/UTF8.hs
patch
|
blob
|
history
GHC/IO/Exception.hs
patch
|
blob
|
history
GHC/IO/Exception.hs-boot
patch
|
blob
|
history
GHC/IO/FD.hs
patch
|
blob
|
history
GHC/IO/Handle.hs
patch
|
blob
|
history
GHC/IO/Handle.hs-boot
patch
|
blob
|
history
GHC/IO/Handle/FD.hs
patch
|
blob
|
history
GHC/IO/Handle/FD.hs-boot
patch
|
blob
|
history
GHC/IO/Handle/Internals.hs
patch
|
blob
|
history
GHC/IO/Handle/Text.hs
patch
|
blob
|
history
GHC/IO/Handle/Types.hs
patch
|
blob
|
history
GHC/IO/IOMode.hs
patch
|
blob
|
history
GHC/IOArray.hs
patch
|
blob
|
history
GHC/IOBase.hs
patch
|
blob
|
history
GHC/IORef.hs
patch
|
blob
|
history
GHC/Int.hs
patch
|
blob
|
history
GHC/List.lhs
patch
|
blob
|
history
GHC/MVar.hs
patch
|
blob
|
history
GHC/Num.lhs
patch
|
blob
|
history
GHC/PArr.hs
patch
|
blob
|
history
GHC/Pack.lhs
patch
|
blob
|
history
GHC/Ptr.lhs
patch
|
blob
|
history
GHC/Read.lhs
patch
|
blob
|
history
GHC/Real.lhs
patch
|
blob
|
history
GHC/ST.lhs
patch
|
blob
|
history
GHC/STRef.lhs
patch
|
blob
|
history
GHC/Show.lhs
patch
|
blob
|
history
GHC/Show.lhs-boot
patch
|
blob
|
history
GHC/Stable.lhs
patch
|
blob
|
history
GHC/Storable.lhs
patch
|
blob
|
history
GHC/TopHandler.lhs
patch
|
blob
|
history
GHC/Unicode.hs
patch
|
blob
|
history
GHC/Unicode.hs-boot
patch
|
blob
|
history
GHC/Weak.lhs
patch
|
blob
|
history
GHC/Word.hs
patch
|
blob
|
history
NHC/PosixTypes.hsc
patch
|
blob
|
history
Numeric.hs
patch
|
blob
|
history
Prelude.hs
patch
|
blob
|
history
System/CPUTime.hsc
patch
|
blob
|
history
System/Environment.hs
patch
|
blob
|
history
System/Event/Clock.hsc
patch
|
blob
|
history
System/Event/Control.hs
patch
|
blob
|
history
System/Event/EPoll.hsc
patch
|
blob
|
history
System/Event/IntMap.hs
patch
|
blob
|
history
System/Event/KQueue.hsc
patch
|
blob
|
history
System/Event/Manager.hs
patch
|
blob
|
history
System/Event/Poll.hsc
patch
|
blob
|
history
System/Exit.hs
patch
|
blob
|
history
System/IO.hs
patch
|
blob
|
history
System/IO/Error.hs
patch
|
blob
|
history
System/IO/Unsafe.hs
patch
|
blob
|
history
System/Info.hs
patch
|
blob
|
history
System/Mem.hs
patch
|
blob
|
history
System/Mem/StableName.hs
patch
|
blob
|
history
System/Mem/Weak.hs
patch
|
blob
|
history
System/Posix/Internals.hs
patch
|
blob
|
history
System/Posix/Types.hs
patch
|
blob
|
history
System/Timeout.hs
patch
|
blob
|
history
Text/ParserCombinators/ReadP.hs
patch
|
blob
|
history
Text/ParserCombinators/ReadPrec.hs
patch
|
blob
|
history
Text/Printf.hs
patch
|
blob
|
history
Text/Read.hs
patch
|
blob
|
history
Text/Read/Lex.hs
patch
|
blob
|
history
Text/Show.hs
patch
|
blob
|
history
Text/Show/Functions.hs
patch
|
blob
|
history
Unsafe/Coerce.hs
patch
|
blob
|
history
base.cabal
patch
|
blob
|
history
codepages/MakeTable.hs
patch
|
blob
|
history
diff --git
a/Control/Applicative.hs
b/Control/Applicative.hs
index
a7f7fe8
..
c38e580
100644
(file)
--- a/
Control/Applicative.hs
+++ b/
Control/Applicative.hs
@@
-1,3
+1,5
@@
+{-# LANGUAGE CPP #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Control.Applicative
-----------------------------------------------------------------------------
-- |
-- Module : Control.Applicative
diff --git
a/Control/Category.hs
b/Control/Category.hs
index
ff63af5
..
b63fc67
100644
(file)
--- a/
Control/Category.hs
+++ b/
Control/Category.hs
@@
-1,3
+1,5
@@
+{-# LANGUAGE CPP #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Control.Category
-----------------------------------------------------------------------------
-- |
-- Module : Control.Category
diff --git
a/Control/Concurrent.hs
b/Control/Concurrent.hs
index
d1b6875
..
514e2e9
100644
(file)
--- a/
Control/Concurrent.hs
+++ b/
Control/Concurrent.hs
@@
-1,4
+1,11
@@
+{-# LANGUAGE CPP
+ , ForeignFunctionInterface
+ , MagicHash
+ , UnboxedTuples
+ , ScopedTypeVariables
+ #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Control.Concurrent
-----------------------------------------------------------------------------
-- |
-- Module : Control.Concurrent
diff --git
a/Control/Concurrent/Chan.hs
b/Control/Concurrent/Chan.hs
index
e06e0cb
..
2255c4e
100644
(file)
--- a/
Control/Concurrent/Chan.hs
+++ b/
Control/Concurrent/Chan.hs
@@
-1,3
+1,5
@@
+{-# LANGUAGE CPP #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Control.Concurrent.Chan
-----------------------------------------------------------------------------
-- |
-- Module : Control.Concurrent.Chan
diff --git
a/Control/Concurrent/MVar.hs
b/Control/Concurrent/MVar.hs
index
b2b688a
..
9a95b8f
100644
(file)
--- a/
Control/Concurrent/MVar.hs
+++ b/
Control/Concurrent/MVar.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Control.Concurrent.MVar
-----------------------------------------------------------------------------
-- |
-- Module : Control.Concurrent.MVar
diff --git
a/Control/Concurrent/QSem.hs
b/Control/Concurrent/QSem.hs
index
8e8a301
..
22f6c0c
100644
(file)
--- a/
Control/Concurrent/QSem.hs
+++ b/
Control/Concurrent/QSem.hs
@@
-1,3
+1,5
@@
+{-# LANGUAGE CPP #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Control.Concurrent.QSem
-----------------------------------------------------------------------------
-- |
-- Module : Control.Concurrent.QSem
diff --git
a/Control/Concurrent/QSemN.hs
b/Control/Concurrent/QSemN.hs
index
7e43908
..
cfcff7f
100644
(file)
--- a/
Control/Concurrent/QSemN.hs
+++ b/
Control/Concurrent/QSemN.hs
@@
-1,3
+1,5
@@
+{-# LANGUAGE CPP #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Control.Concurrent.QSemN
-----------------------------------------------------------------------------
-- |
-- Module : Control.Concurrent.QSemN
diff --git
a/Control/Concurrent/SampleVar.hs
b/Control/Concurrent/SampleVar.hs
index
7d1a00d
..
ca68a38
100644
(file)
--- a/
Control/Concurrent/SampleVar.hs
+++ b/
Control/Concurrent/SampleVar.hs
@@
-1,3
+1,5
@@
+{-# LANGUAGE CPP #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Control.Concurrent.SampleVar
-----------------------------------------------------------------------------
-- |
-- Module : Control.Concurrent.SampleVar
diff --git
a/Control/Exception.hs
b/Control/Exception.hs
index
578c2ee
..
03f6886
100644
(file)
--- a/
Control/Exception.hs
+++ b/
Control/Exception.hs
@@
-1,4
+1,4
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude, ExistentialQuantification #-}
-----------------------------------------------------------------------------
-- |
-----------------------------------------------------------------------------
-- |
diff --git
a/Control/Exception/Base.hs
b/Control/Exception/Base.hs
index
fb4f6de
..
cb5321b
100644
(file)
--- a/
Control/Exception/Base.hs
+++ b/
Control/Exception/Base.hs
@@
-1,4
+1,4
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude, MagicHash #-}
#include "Typeable.h"
#include "Typeable.h"
diff --git
a/Control/Monad.hs
b/Control/Monad.hs
index
bf94ad4
..
2bbfc57
100644
(file)
--- a/
Control/Monad.hs
+++ b/
Control/Monad.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Control.Monad
-----------------------------------------------------------------------------
-- |
-- Module : Control.Monad
diff --git
a/Control/Monad/Fix.hs
b/Control/Monad/Fix.hs
index
e8ba03d
..
a1309fa
100644
(file)
--- a/
Control/Monad/Fix.hs
+++ b/
Control/Monad/Fix.hs
@@
-1,3
+1,5
@@
+{-# LANGUAGE CPP #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Control.Monad.Fix
-----------------------------------------------------------------------------
-- |
-- Module : Control.Monad.Fix
diff --git
a/Control/Monad/ST.hs
b/Control/Monad/ST.hs
index
8ebb750
..
397b072
100644
(file)
--- a/
Control/Monad/ST.hs
+++ b/
Control/Monad/ST.hs
@@
-1,3
+1,5
@@
+{-# LANGUAGE CPP #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Control.Monad.ST
-----------------------------------------------------------------------------
-- |
-- Module : Control.Monad.ST
diff --git
a/Control/Monad/ST/Lazy.hs
b/Control/Monad/ST/Lazy.hs
index
657752e
..
8aac665
100644
(file)
--- a/
Control/Monad/ST/Lazy.hs
+++ b/
Control/Monad/ST/Lazy.hs
@@
-1,3
+1,5
@@
+{-# LANGUAGE CPP, MagicHash, UnboxedTuples, Rank2Types #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Control.Monad.ST.Lazy
-----------------------------------------------------------------------------
-- |
-- Module : Control.Monad.ST.Lazy
diff --git
a/Control/OldException.hs
b/Control/OldException.hs
index
4fa787f
..
0284899
100644
(file)
--- a/
Control/OldException.hs
+++ b/
Control/OldException.hs
@@
-1,4
+1,8
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP
+ , NoImplicitPrelude
+ , ForeignFunctionInterface
+ , ExistentialQuantification
+ #-}
#include "Typeable.h"
#include "Typeable.h"
diff --git
a/Data/Bits.hs
b/Data/Bits.hs
index
c9230c5
..
cbf7b37
100644
(file)
--- a/
Data/Bits.hs
+++ b/
Data/Bits.hs
@@
-1,5
+1,5
@@
-{-# LANGUAGE BangPatterns #-}
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude, BangPatterns, MagicHash #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Data.Bits
-----------------------------------------------------------------------------
-- |
-- Module : Data.Bits
diff --git
a/Data/Bool.hs
b/Data/Bool.hs
index
10ca90a
..
ba2d8ae
100644
(file)
--- a/
Data/Bool.hs
+++ b/
Data/Bool.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Data.Bool
-----------------------------------------------------------------------------
-- |
-- Module : Data.Bool
diff --git
a/Data/Char.hs
b/Data/Char.hs
index
f9cbbdf
..
40052a7
100644
(file)
--- a/
Data/Char.hs
+++ b/
Data/Char.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Data.Char
-----------------------------------------------------------------------------
-- |
-- Module : Data.Char
diff --git
a/Data/Complex.hs
b/Data/Complex.hs
index
6965547
..
9765eda
100644
(file)
--- a/
Data/Complex.hs
+++ b/
Data/Complex.hs
@@
-1,3
+1,5
@@
+{-# LANGUAGE CPP, DeriveDataTypeable #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Data.Complex
-----------------------------------------------------------------------------
-- |
-- Module : Data.Complex
diff --git
a/Data/Data.hs
b/Data/Data.hs
index
08bc68a
..
d9cab7a
100644
(file)
--- a/
Data/Data.hs
+++ b/
Data/Data.hs
@@
-1,3
+1,5
@@
+{-# LANGUAGE CPP, Rank2Types, ScopedTypeVariables #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Data.Data
-----------------------------------------------------------------------------
-- |
-- Module : Data.Data
diff --git
a/Data/Dynamic.hs
b/Data/Dynamic.hs
index
9b007d4
..
b83bbfa
100644
(file)
--- a/
Data/Dynamic.hs
+++ b/
Data/Dynamic.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Data.Dynamic
-----------------------------------------------------------------------------
-- |
-- Module : Data.Dynamic
diff --git
a/Data/Either.hs
b/Data/Either.hs
index
fd6651f
..
1c12897
100644
(file)
--- a/
Data/Either.hs
+++ b/
Data/Either.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Data.Either
-----------------------------------------------------------------------------
-- |
-- Module : Data.Either
diff --git
a/Data/Eq.hs
b/Data/Eq.hs
index
7e424a2
..
e7b99f1
100644
(file)
--- a/
Data/Eq.hs
+++ b/
Data/Eq.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Data.Eq
-----------------------------------------------------------------------------
-- |
-- Module : Data.Eq
diff --git
a/Data/Fixed.hs
b/Data/Fixed.hs
index
98d212d
..
cd44092
100644
(file)
--- a/
Data/Fixed.hs
+++ b/
Data/Fixed.hs
@@
-1,5
+1,9
@@
+{-# LANGUAGE CPP #-}
{-# OPTIONS -Wall -fno-warn-unused-binds #-}
{-# OPTIONS -Wall -fno-warn-unused-binds #-}
+#ifndef __NHC__
+{-# LANGUAGE DeriveDataTypeable #-}
+#endif
-----------------------------------------------------------------------------
-- |
-- Module : Data.Fixed
-----------------------------------------------------------------------------
-- |
-- Module : Data.Fixed
diff --git
a/Data/Foldable.hs
b/Data/Foldable.hs
index
d07bebe
..
354bd8b
100644
(file)
--- a/
Data/Foldable.hs
+++ b/
Data/Foldable.hs
@@
-1,3
+1,5
@@
+{-# LANGUAGE CPP #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Data.Foldable
-----------------------------------------------------------------------------
-- |
-- Module : Data.Foldable
diff --git
a/Data/Functor.hs
b/Data/Functor.hs
index
e5b8166
..
84d0aa7
100644
(file)
--- a/
Data/Functor.hs
+++ b/
Data/Functor.hs
@@
-1,3
+1,5
@@
+{-# LANGUAGE CPP #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Data.Functor
-----------------------------------------------------------------------------
-- |
-- Module : Data.Functor
diff --git
a/Data/HashTable.hs
b/Data/HashTable.hs
index
c407abf
..
e96160a
100644
(file)
--- a/
Data/HashTable.hs
+++ b/
Data/HashTable.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude -funbox-strict-fields -fno-warn-name-shadowing #-}
+{-# LANGUAGE CPP, NoImplicitPrelude #-}
+{-# OPTIONS_GHC -funbox-strict-fields -fno-warn-name-shadowing #-}
-----------------------------------------------------------------------------
-- |
-----------------------------------------------------------------------------
-- |
diff --git
a/Data/IORef.hs
b/Data/IORef.hs
index
f885751
..
a6f29e7
100644
(file)
--- a/
Data/IORef.hs
+++ b/
Data/IORef.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude, MagicHash, UnboxedTuples #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Data.IORef
-----------------------------------------------------------------------------
-- |
-- Module : Data.IORef
diff --git
a/Data/Int.hs
b/Data/Int.hs
index
67b4ba8
..
c9c9036
100644
(file)
--- a/
Data/Int.hs
+++ b/
Data/Int.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Data.Int
-----------------------------------------------------------------------------
-- |
-- Module : Data.Int
diff --git
a/Data/Ix.hs
b/Data/Ix.hs
index
fda6d58
..
a01e516
100644
(file)
--- a/
Data/Ix.hs
+++ b/
Data/Ix.hs
@@
-1,3
+1,5
@@
+{-# LANGUAGE CPP #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Data.Ix
-----------------------------------------------------------------------------
-- |
-- Module : Data.Ix
diff --git
a/Data/List.hs
b/Data/List.hs
index
0e4e621
..
061ad42
100644
(file)
--- a/
Data/List.hs
+++ b/
Data/List.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude, MagicHash #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Data.List
-----------------------------------------------------------------------------
-- |
-- Module : Data.List
diff --git
a/Data/Maybe.hs
b/Data/Maybe.hs
index
981d028
..
b96efa7
100644
(file)
--- a/
Data/Maybe.hs
+++ b/
Data/Maybe.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Data.Maybe
-----------------------------------------------------------------------------
-- |
-- Module : Data.Maybe
diff --git
a/Data/Monoid.hs
b/Data/Monoid.hs
index
b3233ba
..
aaefd42
100644
(file)
--- a/
Data/Monoid.hs
+++ b/
Data/Monoid.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Data.Monoid
-----------------------------------------------------------------------------
-- |
-- Module : Data.Monoid
diff --git
a/Data/Ord.hs
b/Data/Ord.hs
index
9af4246
..
fd291ae
100644
(file)
--- a/
Data/Ord.hs
+++ b/
Data/Ord.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Data.Ord
-----------------------------------------------------------------------------
-- |
-- Module : Data.Ord
diff --git
a/Data/Ratio.hs
b/Data/Ratio.hs
index
d64297f
..
f044099
100644
(file)
--- a/
Data/Ratio.hs
+++ b/
Data/Ratio.hs
@@
-1,3
+1,5
@@
+{-# LANGUAGE CPP #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Data.Ratio
-----------------------------------------------------------------------------
-- |
-- Module : Data.Ratio
diff --git
a/Data/STRef.hs
b/Data/STRef.hs
index
288cbe7
..
5002ee7
100644
(file)
--- a/
Data/STRef.hs
+++ b/
Data/STRef.hs
@@
-1,3
+1,5
@@
+{-# LANGUAGE CPP #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Data.STRef
-----------------------------------------------------------------------------
-- |
-- Module : Data.STRef
diff --git
a/Data/String.hs
b/Data/String.hs
index
c2dc17e
..
dae81a2
100644
(file)
--- a/
Data/String.hs
+++ b/
Data/String.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude, FlexibleInstances #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Data.String
-----------------------------------------------------------------------------
-- |
-- Module : Data.String
diff --git
a/Data/Traversable.hs
b/Data/Traversable.hs
index
af04e51
..
2bdc1bc
100644
(file)
--- a/
Data/Traversable.hs
+++ b/
Data/Traversable.hs
@@
-1,3
+1,5
@@
+{-# LANGUAGE CPP #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Data.Traversable
-----------------------------------------------------------------------------
-- |
-- Module : Data.Traversable
diff --git
a/Data/Tuple.hs
b/Data/Tuple.hs
index
6921a21
..
a5ea875
100644
(file)
--- a/
Data/Tuple.hs
+++ b/
Data/Tuple.hs
@@
-1,4
+1,4
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- XXX -fno-warn-unused-imports needed for the GHC.Tuple import below. Sigh.
-----------------------------------------------------------------------------
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- XXX -fno-warn-unused-imports needed for the GHC.Tuple import below. Sigh.
-----------------------------------------------------------------------------
diff --git
a/Data/Typeable.hs
b/Data/Typeable.hs
index
e606294
..
804e853
100644
(file)
--- a/
Data/Typeable.hs
+++ b/
Data/Typeable.hs
@@
-1,4
+1,11
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude -XOverlappingInstances -funbox-strict-fields #-}
+{-# LANGUAGE CPP
+ , NoImplicitPrelude
+ , OverlappingInstances
+ , ScopedTypeVariables
+ , ForeignFunctionInterface
+ , FlexibleInstances
+ #-}
+{-# OPTIONS_GHC -funbox-strict-fields #-}
-- The -XOverlappingInstances flag allows the user to over-ride
-- the instances for Typeable given here. In particular, we provide an instance
-- The -XOverlappingInstances flag allows the user to over-ride
-- the instances for Typeable given here. In particular, we provide an instance
diff --git
a/Data/Typeable.hs-boot
b/Data/Typeable.hs-boot
index
9da3620
..
da6142e
100644
(file)
--- a/
Data/Typeable.hs-boot
+++ b/
Data/Typeable.hs-boot
@@
-1,5
+1,4
@@
-
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE NoImplicitPrelude #-}
module Data.Typeable where
module Data.Typeable where
diff --git
a/Data/Unique.hs
b/Data/Unique.hs
index
ab3d647
..
c4c8827
100644
(file)
--- a/
Data/Unique.hs
+++ b/
Data/Unique.hs
@@
-1,3
+1,9
@@
+{-# LANGUAGE CPP #-}
+
+#ifdef __GLASGOW_HASKELL__
+{-# LANGUAGE MagicHash, DeriveDataTypeable #-}
+#endif
+
-----------------------------------------------------------------------------
-- |
-- Module : Data.Unique
-----------------------------------------------------------------------------
-- |
-- Module : Data.Unique
diff --git
a/Data/Version.hs
b/Data/Version.hs
index
ef9c07d
..
7d7d329
100644
(file)
--- a/
Data/Version.hs
+++ b/
Data/Version.hs
@@
-1,3
+1,5
@@
+{-# LANGUAGE CPP, DeriveDataTypeable #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Data.Version
-----------------------------------------------------------------------------
-- |
-- Module : Data.Version
diff --git
a/Data/Word.hs
b/Data/Word.hs
index
c4bf0a6
..
18300d2
100644
(file)
--- a/
Data/Word.hs
+++ b/
Data/Word.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Data.Word
-----------------------------------------------------------------------------
-- |
-- Module : Data.Word
diff --git
a/Debug/Trace.hs
b/Debug/Trace.hs
index
742044e
..
ebacb6c
100644
(file)
--- a/
Debug/Trace.hs
+++ b/
Debug/Trace.hs
@@
-1,3
+1,5
@@
+{-# LANGUAGE CPP, ForeignFunctionInterface #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Debug.Trace
-----------------------------------------------------------------------------
-- |
-- Module : Debug.Trace
diff --git
a/Foreign.hs
b/Foreign.hs
index
5976c20
..
a26ffaf
100644
(file)
--- a/
Foreign.hs
+++ b/
Foreign.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE NoImplicitPrelude #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Foreign
-----------------------------------------------------------------------------
-- |
-- Module : Foreign
diff --git
a/Foreign/C.hs
b/Foreign/C.hs
index
cb8dfef
..
2c7fd2e
100644
(file)
--- a/
Foreign/C.hs
+++ b/
Foreign/C.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE NoImplicitPrelude #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Foreign.C
-----------------------------------------------------------------------------
-- |
-- Module : Foreign.C
diff --git
a/Foreign/C/Error.hs
b/Foreign/C/Error.hs
index
8d149c1
..
89c736d
100644
(file)
--- a/
Foreign/C/Error.hs
+++ b/
Foreign/C/Error.hs
@@
-1,4
+1,6
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude -#include "HsBase.h" #-}
+{-# LANGUAGE CPP, NoImplicitPrelude, ForeignFunctionInterface #-}
+{-# OPTIONS_GHC -#include "HsBase.h" #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Foreign.C.Error
-----------------------------------------------------------------------------
-- |
-- Module : Foreign.C.Error
diff --git
a/Foreign/C/String.hs
b/Foreign/C/String.hs
index
680c81a
..
becfa4e
100644
(file)
--- a/
Foreign/C/String.hs
+++ b/
Foreign/C/String.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Foreign.C.String
-----------------------------------------------------------------------------
-- |
-- Module : Foreign.C.String
diff --git
a/Foreign/C/Types.hs
b/Foreign/C/Types.hs
index
e30a2ba
..
22bae5c
100644
(file)
--- a/
Foreign/C/Types.hs
+++ b/
Foreign/C/Types.hs
@@
-1,7
+1,12
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP
+ , NoImplicitPrelude
+ , MagicHash
+ , GeneralizedNewtypeDeriving
+ #-}
{-# OPTIONS_GHC -fno-warn-unused-binds #-}
-- XXX -fno-warn-unused-binds stops us warning about unused constructors,
-- but really we should just remove them if we don't want them
{-# OPTIONS_GHC -fno-warn-unused-binds #-}
-- XXX -fno-warn-unused-binds stops us warning about unused constructors,
-- but really we should just remove them if we don't want them
+
-----------------------------------------------------------------------------
-- |
-- Module : Foreign.C.Types
-----------------------------------------------------------------------------
-- |
-- Module : Foreign.C.Types
diff --git
a/Foreign/Concurrent.hs
b/Foreign/Concurrent.hs
index
a914d95
..
e0f2faa
100644
(file)
--- a/
Foreign/Concurrent.hs
+++ b/
Foreign/Concurrent.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Foreign.Concurrent
-----------------------------------------------------------------------------
-- |
-- Module : Foreign.Concurrent
diff --git
a/Foreign/ForeignPtr.hs
b/Foreign/ForeignPtr.hs
index
a824914
..
b91ffeb
100644
(file)
--- a/
Foreign/ForeignPtr.hs
+++ b/
Foreign/ForeignPtr.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Foreign.ForeignPtr
-----------------------------------------------------------------------------
-- |
-- Module : Foreign.ForeignPtr
diff --git
a/Foreign/Marshal.hs
b/Foreign/Marshal.hs
index
2c16c01
..
77a4ebf
100644
(file)
--- a/
Foreign/Marshal.hs
+++ b/
Foreign/Marshal.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Foreign.Marshal
-----------------------------------------------------------------------------
-- |
-- Module : Foreign.Marshal
diff --git
a/Foreign/Marshal/Alloc.hs
b/Foreign/Marshal/Alloc.hs
index
5c86155
..
ddb4a90
100644
(file)
--- a/
Foreign/Marshal/Alloc.hs
+++ b/
Foreign/Marshal/Alloc.hs
@@
-1,4
+1,10
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP
+ , NoImplicitPrelude
+ , MagicHash
+ , UnboxedTuples
+ , ForeignFunctionInterface
+ #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Foreign.Marshal.Alloc
-----------------------------------------------------------------------------
-- |
-- Module : Foreign.Marshal.Alloc
diff --git
a/Foreign/Marshal/Array.hs
b/Foreign/Marshal/Array.hs
index
9e8d082
..
1ca3e9e
100644
(file)
--- a/
Foreign/Marshal/Array.hs
+++ b/
Foreign/Marshal/Array.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude, MagicHash #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Foreign.Marshal.Array
-----------------------------------------------------------------------------
-- |
-- Module : Foreign.Marshal.Array
diff --git
a/Foreign/Marshal/Error.hs
b/Foreign/Marshal/Error.hs
index
b018f2a
..
ccf514d
100644
(file)
--- a/
Foreign/Marshal/Error.hs
+++ b/
Foreign/Marshal/Error.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Foreign.Marshal.Error
-----------------------------------------------------------------------------
-- |
-- Module : Foreign.Marshal.Error
diff --git
a/Foreign/Marshal/Pool.hs
b/Foreign/Marshal/Pool.hs
index
f15d048
..
ed94e46
100644
(file)
--- a/
Foreign/Marshal/Pool.hs
+++ b/
Foreign/Marshal/Pool.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude #-}
+
--------------------------------------------------------------------------------
-- |
-- Module : Foreign.Marshal.Pool
--------------------------------------------------------------------------------
-- |
-- Module : Foreign.Marshal.Pool
diff --git
a/Foreign/Marshal/Utils.hs
b/Foreign/Marshal/Utils.hs
index
7fcacfa
..
5ae677a
100644
(file)
--- a/
Foreign/Marshal/Utils.hs
+++ b/
Foreign/Marshal/Utils.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude, ForeignFunctionInterface #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Foreign.Marshal.Utils
-----------------------------------------------------------------------------
-- |
-- Module : Foreign.Marshal.Utils
diff --git
a/Foreign/Ptr.hs
b/Foreign/Ptr.hs
index
8dd220f
..
b46acc1
100644
(file)
--- a/
Foreign/Ptr.hs
+++ b/
Foreign/Ptr.hs
@@
-1,4
+1,10
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP
+ , NoImplicitPrelude
+ , ForeignFunctionInterface
+ , MagicHash
+ , GeneralizedNewtypeDeriving
+ #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Foreign.Ptr
-----------------------------------------------------------------------------
-- |
-- Module : Foreign.Ptr
diff --git
a/Foreign/StablePtr.hs
b/Foreign/StablePtr.hs
index
cfcd239
..
522c6fc
100644
(file)
--- a/
Foreign/StablePtr.hs
+++ b/
Foreign/StablePtr.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Foreign.StablePtr
-----------------------------------------------------------------------------
-- |
-- Module : Foreign.StablePtr
diff --git
a/Foreign/Storable.hs
b/Foreign/Storable.hs
index
0b0ad0c
..
700a4ff
100644
(file)
--- a/
Foreign/Storable.hs
+++ b/
Foreign/Storable.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude, ScopedTypeVariables #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Foreign.Storable
-----------------------------------------------------------------------------
-- |
-- Module : Foreign.Storable
diff --git
a/GHC/Arr.lhs
b/GHC/Arr.lhs
index
b9ce6b7
..
fd858b1
100644
(file)
--- a/
GHC/Arr.lhs
+++ b/
GHC/Arr.lhs
@@
-1,7
+1,8
@@
\begin{code}
\begin{code}
+{-# LANGUAGE NoImplicitPrelude, NoBangPatterns, MagicHash, UnboxedTuples #-}
{-# OPTIONS_GHC -funbox-strict-fields #-}
{-# OPTIONS_GHC -funbox-strict-fields #-}
-{-# LANGUAGE NoImplicitPrelude, NoBangPatterns #-}
{-# OPTIONS_HADDOCK hide #-}
{-# OPTIONS_HADDOCK hide #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Arr
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Arr
diff --git
a/GHC/Base.lhs
b/GHC/Base.lhs
index
5ab0b26
..
be1b57b
100644
(file)
--- a/
GHC/Base.lhs
+++ b/
GHC/Base.lhs
@@
-62,12
+62,20
@@
GHC.Float Classes: Floating, RealFloat
Other Prelude modules are much easier with fewer complex dependencies.
\begin{code}
Other Prelude modules are much easier with fewer complex dependencies.
\begin{code}
-{-# LANGUAGE BangPatterns #-}
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP
+ , NoImplicitPrelude
+ , BangPatterns
+ , ExplicitForAll
+ , MagicHash
+ , UnboxedTuples
+ , ExistentialQuantification
+ , Rank2Types
+ #-}
-- -fno-warn-orphans is needed for things like:
-- Orphan rule: "x# -# x#" ALWAYS forall x# :: Int# -# x# x# = 0
{-# OPTIONS_GHC -fno-warn-orphans #-}
{-# OPTIONS_HADDOCK hide #-}
-- -fno-warn-orphans is needed for things like:
-- Orphan rule: "x# -# x#" ALWAYS forall x# :: Int# -# x# x# = 0
{-# OPTIONS_GHC -fno-warn-orphans #-}
{-# OPTIONS_HADDOCK hide #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Base
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Base
diff --git
a/GHC/Classes.hs
b/GHC/Classes.hs
index
2934d1d
..
17d0f93
100644
(file)
--- a/
GHC/Classes.hs
+++ b/
GHC/Classes.hs
@@
-1,5
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE NoImplicitPrelude, MagicHash, StandaloneDeriving #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- XXX -fno-warn-unused-imports needed for the GHC.Tuple import below. Sigh.
{-# OPTIONS_HADDOCK hide #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- XXX -fno-warn-unused-imports needed for the GHC.Tuple import below. Sigh.
{-# OPTIONS_HADDOCK hide #-}
diff --git
a/GHC/Conc.lhs
b/GHC/Conc.lhs
index
b12785f
..
665f82f
100644
(file)
--- a/
GHC/Conc.lhs
+++ b/
GHC/Conc.lhs
@@
-1,7
+1,8
@@
\begin{code}
\begin{code}
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-missing-signatures #-}
{-# OPTIONS_HADDOCK not-home #-}
{-# OPTIONS_GHC -fno-warn-missing-signatures #-}
{-# OPTIONS_HADDOCK not-home #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Conc
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Conc
diff --git
a/GHC/Conc/IO.hs
b/GHC/Conc/IO.hs
index
ca75894
..
fc80026
100644
(file)
--- a/
GHC/Conc/IO.hs
+++ b/
GHC/Conc/IO.hs
@@
-1,6
+1,12
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP
+ , NoImplicitPrelude
+ , MagicHash
+ , UnboxedTuples
+ , ForeignFunctionInterface
+ #-}
{-# OPTIONS_GHC -fno-warn-missing-signatures #-}
{-# OPTIONS_HADDOCK not-home #-}
{-# OPTIONS_GHC -fno-warn-missing-signatures #-}
{-# OPTIONS_HADDOCK not-home #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Conc.IO
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Conc.IO
diff --git
a/GHC/Conc/Signal.hs
b/GHC/Conc/Signal.hs
index
6d300c6
..
851c4bb
100644
(file)
--- a/
GHC/Conc/Signal.hs
+++ b/
GHC/Conc/Signal.hs
@@
-1,4
+1,4
@@
-{-# LANGUAGE NoImplicitPrelude #-}
+{-# LANGUAGE NoImplicitPrelude, ForeignFunctionInterface #-}
module GHC.Conc.Signal
( Signal
module GHC.Conc.Signal
( Signal
diff --git
a/GHC/Conc/Sync.lhs
b/GHC/Conc/Sync.lhs
index
0808e68
..
b4de53a
100644
(file)
--- a/
GHC/Conc/Sync.lhs
+++ b/
GHC/Conc/Sync.lhs
@@
-1,8
+1,16
@@
\begin{code}
\begin{code}
-{-# LANGUAGE BangPatterns #-}
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP
+ , NoImplicitPrelude
+ , BangPatterns
+ , MagicHash
+ , UnboxedTuples
+ , UnliftedFFITypes
+ , ForeignFunctionInterface
+ , DeriveDataTypeable
+ #-}
{-# OPTIONS_GHC -fno-warn-missing-signatures #-}
{-# OPTIONS_HADDOCK not-home #-}
{-# OPTIONS_GHC -fno-warn-missing-signatures #-}
{-# OPTIONS_HADDOCK not-home #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Conc.Sync
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Conc.Sync
diff --git
a/GHC/Conc/Windows.hs
b/GHC/Conc/Windows.hs
index
b750185
..
96f034c
100644
(file)
--- a/
GHC/Conc/Windows.hs
+++ b/
GHC/Conc/Windows.hs
@@
-1,6
+1,7
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-missing-signatures #-}
{-# OPTIONS_HADDOCK not-home #-}
{-# OPTIONS_GHC -fno-warn-missing-signatures #-}
{-# OPTIONS_HADDOCK not-home #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Conc.Windows
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Conc.Windows
diff --git
a/GHC/ConsoleHandler.hs
b/GHC/ConsoleHandler.hs
index
eb5f36a
..
223a2bb
100644
(file)
--- a/
GHC/ConsoleHandler.hs
+++ b/
GHC/ConsoleHandler.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -cpp #-}
+{-# LANGUAGE CPP #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.ConsoleHandler
-----------------------------------------------------------------------------
-- |
-- Module : GHC.ConsoleHandler
diff --git
a/GHC/Constants.hs
b/GHC/Constants.hs
index
3df2d96
..
871829d
100644
(file)
--- a/
GHC/Constants.hs
+++ b/
GHC/Constants.hs
@@
-1,3
+1,4
@@
+{-# LANGUAGE CPP #-}
module GHC.Constants where
module GHC.Constants where
diff --git
a/GHC/Desugar.hs
b/GHC/Desugar.hs
index
eaa15dc
..
65dd645
100644
(file)
--- a/
GHC/Desugar.hs
+++ b/
GHC/Desugar.hs
@@
-1,3
+1,9
@@
+{-# LANGUAGE CPP
+ , NoImplicitPrelude
+ , Rank2Types
+ , ExistentialQuantification
+ #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Desugar
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Desugar
diff --git
a/GHC/Enum.lhs
b/GHC/Enum.lhs
index
7cb6f07
..
ac6e9a9
100644
(file)
--- a/
GHC/Enum.lhs
+++ b/
GHC/Enum.lhs
@@
-1,6
+1,5
@@
\begin{code}
\begin{code}
-{-# LANGUAGE BangPatterns #-}
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE NoImplicitPrelude, BangPatterns, MagicHash #-}
{-# OPTIONS_HADDOCK hide #-}
-----------------------------------------------------------------------------
-- |
{-# OPTIONS_HADDOCK hide #-}
-----------------------------------------------------------------------------
-- |
diff --git
a/GHC/Environment.hs
b/GHC/Environment.hs
index
4b9b0a1
..
60325b3
100644
(file)
--- a/
GHC/Environment.hs
+++ b/
GHC/Environment.hs
@@
-1,3
+1,4
@@
+{-# LANGUAGE ForeignFunctionInterface #-}
module GHC.Environment (getFullArgs) where
module GHC.Environment (getFullArgs) where
diff --git
a/GHC/Err.lhs
b/GHC/Err.lhs
index
9a94ce0
..
90142f4
100644
(file)
--- a/
GHC/Err.lhs
+++ b/
GHC/Err.lhs
@@
-1,6
+1,7
@@
\begin{code}
\begin{code}
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude #-}
{-# OPTIONS_HADDOCK hide #-}
{-# OPTIONS_HADDOCK hide #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Err
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Err
diff --git
a/GHC/Err.lhs-boot
b/GHC/Err.lhs-boot
index
9bef80d
..
932f699
100644
(file)
--- a/
GHC/Err.lhs-boot
+++ b/
GHC/Err.lhs-boot
@@
-1,5
+1,6
@@
\begin{code}
\begin{code}
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE NoImplicitPrelude #-}
+
---------------------------------------------------------------------------
-- Ghc.Err.hs-boot
---------------------------------------------------------------------------
---------------------------------------------------------------------------
-- Ghc.Err.hs-boot
---------------------------------------------------------------------------
diff --git
a/GHC/Exception.lhs
b/GHC/Exception.lhs
index
4dce281
..
c5b9679
100644
(file)
--- a/
GHC/Exception.lhs
+++ b/
GHC/Exception.lhs
@@
-1,5
+1,9
@@
\begin{code}
\begin{code}
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE NoImplicitPrelude
+ , ExistentialQuantification
+ , MagicHash
+ , DeriveDataTypeable
+ #-}
{-# OPTIONS_HADDOCK hide #-}
-----------------------------------------------------------------------------
-- |
{-# OPTIONS_HADDOCK hide #-}
-----------------------------------------------------------------------------
-- |
diff --git
a/GHC/Exts.hs
b/GHC/Exts.hs
index
ea4b8ff
..
81a9dbb
100644
(file)
--- a/
GHC/Exts.hs
+++ b/
GHC/Exts.hs
@@
-1,3
+1,5
@@
+{-# LANGUAGE MagicHash, UnboxedTuples, DeriveDataTypeable #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Exts
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Exts
diff --git
a/GHC/Float.lhs
b/GHC/Float.lhs
index
a353cc6
..
02aba8c
100644
(file)
--- a/
GHC/Float.lhs
+++ b/
GHC/Float.lhs
@@
-1,9
+1,15
@@
\begin{code}
\begin{code}
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP
+ , NoImplicitPrelude
+ , MagicHash
+ , UnboxedTuples
+ , ForeignFunctionInterface
+ #-}
-- We believe we could deorphan this module, by moving lots of things
-- around, but we haven't got there yet:
{-# OPTIONS_GHC -fno-warn-orphans #-}
{-# OPTIONS_HADDOCK hide #-}
-- We believe we could deorphan this module, by moving lots of things
-- around, but we haven't got there yet:
{-# OPTIONS_GHC -fno-warn-orphans #-}
{-# OPTIONS_HADDOCK hide #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Float
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Float
diff --git
a/GHC/ForeignPtr.hs
b/GHC/ForeignPtr.hs
index
a20b000
..
2e737f0
100644
(file)
--- a/
GHC/ForeignPtr.hs
+++ b/
GHC/ForeignPtr.hs
@@
-1,6
+1,11
@@
-{-# LANGUAGE BangPatterns #-}
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP
+ , NoImplicitPrelude
+ , BangPatterns
+ , MagicHash
+ , UnboxedTuples
+ #-}
{-# OPTIONS_HADDOCK hide #-}
{-# OPTIONS_HADDOCK hide #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.ForeignPtr
-----------------------------------------------------------------------------
-- |
-- Module : GHC.ForeignPtr
diff --git
a/GHC/IO.hs
b/GHC/IO.hs
index
d5272ba
..
9fa7299
100644
(file)
--- a/
GHC/IO.hs
+++ b/
GHC/IO.hs
@@
-1,5
+1,10
@@
+{-# LANGUAGE NoImplicitPrelude
+ , BangPatterns
+ , RankNTypes
+ , MagicHash
+ , UnboxedTuples
+ #-}
{-# OPTIONS_GHC -funbox-strict-fields #-}
{-# OPTIONS_GHC -funbox-strict-fields #-}
-{-# LANGUAGE NoImplicitPrelude, BangPatterns, RankNTypes #-}
{-# OPTIONS_HADDOCK hide #-}
-----------------------------------------------------------------------------
-- |
{-# OPTIONS_HADDOCK hide #-}
-----------------------------------------------------------------------------
-- |
diff --git
a/GHC/IO.hs-boot
b/GHC/IO.hs-boot
index
703fad5
..
8bd5265
100644
(file)
--- a/
GHC/IO.hs-boot
+++ b/
GHC/IO.hs-boot
@@
-1,3
+1,5
@@
+{-# LANGUAGE NoImplicitPrelude #-}
+
module GHC.IO where
import GHC.Types
module GHC.IO where
import GHC.Types
diff --git
a/GHC/IO/Buffer.hs
b/GHC/IO/Buffer.hs
index
b72eaf2
..
c019d69
100644
(file)
--- a/
GHC/IO/Buffer.hs
+++ b/
GHC/IO/Buffer.hs
@@
-1,4
+1,6
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude -funbox-strict-fields #-}
+{-# LANGUAGE CPP, NoImplicitPrelude, ForeignFunctionInterface #-}
+{-# OPTIONS_GHC -funbox-strict-fields #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.IO.Buffer
-----------------------------------------------------------------------------
-- |
-- Module : GHC.IO.Buffer
diff --git
a/GHC/IO/BufferedIO.hs
b/GHC/IO/BufferedIO.hs
index
584f5a7
..
874a02d
100644
(file)
--- a/
GHC/IO/BufferedIO.hs
+++ b/
GHC/IO/BufferedIO.hs
@@
-1,4
+1,6
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude -funbox-strict-fields #-}
+{-# LANGUAGE NoImplicitPrelude #-}
+{-# OPTIONS_GHC -funbox-strict-fields #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.IO.BufferedIO
-----------------------------------------------------------------------------
-- |
-- Module : GHC.IO.BufferedIO
diff --git
a/GHC/IO/Device.hs
b/GHC/IO/Device.hs
index
8f907d5
..
bc772b8
100644
(file)
--- a/
GHC/IO/Device.hs
+++ b/
GHC/IO/Device.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude -XBangPatterns #-}
+{-# LANGUAGE CPP, NoImplicitPrelude, BangPatterns #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.IO.Device
-----------------------------------------------------------------------------
-- |
-- Module : GHC.IO.Device
diff --git
a/GHC/IO/Encoding.hs
b/GHC/IO/Encoding.hs
index
44cdd86
..
9f56966
100644
(file)
--- a/
GHC/IO/Encoding.hs
+++ b/
GHC/IO/Encoding.hs
@@
-1,4
+1,6
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude -funbox-strict-fields #-}
+{-# LANGUAGE CPP, NoImplicitPrelude #-}
+{-# OPTIONS_GHC -funbox-strict-fields #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.IO.Encoding
-----------------------------------------------------------------------------
-- |
-- Module : GHC.IO.Encoding
diff --git
a/GHC/IO/Encoding/CodePage.hs
b/GHC/IO/Encoding/CodePage.hs
index
17c1615
..
34bc0db
100644
(file)
--- a/
GHC/IO/Encoding/CodePage.hs
+++ b/
GHC/IO/Encoding/CodePage.hs
@@
-1,4
+1,4
@@
-{-# LANGUAGE BangPatterns #-}
+{-# LANGUAGE CPP, BangPatterns #-}
module GHC.IO.Encoding.CodePage(
#if !defined(mingw32_HOST_OS)
) where
module GHC.IO.Encoding.CodePage(
#if !defined(mingw32_HOST_OS)
) where
diff --git
a/GHC/IO/Encoding/Iconv.hs
b/GHC/IO/Encoding/Iconv.hs
index
faf58e9
..
0316698
100644
(file)
--- a/
GHC/IO/Encoding/Iconv.hs
+++ b/
GHC/IO/Encoding/Iconv.hs
@@
-1,4
+1,9
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP
+ , NoImplicitPrelude
+ , ForeignFunctionInterface
+ , NondecreasingIndentation
+ #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.IO.Encoding.Iconv
-----------------------------------------------------------------------------
-- |
-- Module : GHC.IO.Encoding.Iconv
diff --git
a/GHC/IO/Encoding/Latin1.hs
b/GHC/IO/Encoding/Latin1.hs
index
5bdf608
..
6bf18c8
100644
(file)
--- a/
GHC/IO/Encoding/Latin1.hs
+++ b/
GHC/IO/Encoding/Latin1.hs
@@
-1,5
+1,9
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude -funbox-strict-fields #-}
-{-# LANGUAGE BangPatterns #-}
+{-# LANGUAGE NoImplicitPrelude
+ , BangPatterns
+ , NondecreasingIndentation
+ #-}
+{-# OPTIONS_GHC -funbox-strict-fields #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.IO.Encoding.Latin1
-----------------------------------------------------------------------------
-- |
-- Module : GHC.IO.Encoding.Latin1
diff --git
a/GHC/IO/Encoding/Types.hs
b/GHC/IO/Encoding/Types.hs
index
640ea88
..
caffa24
100644
(file)
--- a/
GHC/IO/Encoding/Types.hs
+++ b/
GHC/IO/Encoding/Types.hs
@@
-1,4
+1,6
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude -funbox-strict-fields #-}
+{-# LANGUAGE NoImplicitPrelude, ExistentialQuantification #-}
+{-# OPTIONS_GHC -funbox-strict-fields #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.IO.Encoding.Types
-----------------------------------------------------------------------------
-- |
-- Module : GHC.IO.Encoding.Types
diff --git
a/GHC/IO/Encoding/UTF16.hs
b/GHC/IO/Encoding/UTF16.hs
index
bb38a79
..
c3b3847
100644
(file)
--- a/
GHC/IO/Encoding/UTF16.hs
+++ b/
GHC/IO/Encoding/UTF16.hs
@@
-1,5
+1,11
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude -funbox-strict-fields #-}
-{-# LANGUAGE BangPatterns #-}
+{-# LANGUAGE CPP
+ , NoImplicitPrelude
+ , BangPatterns
+ , NondecreasingIndentation
+ , MagicHash
+ #-}
+{-# OPTIONS_GHC -funbox-strict-fields #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.IO.Encoding.UTF16
-----------------------------------------------------------------------------
-- |
-- Module : GHC.IO.Encoding.UTF16
diff --git
a/GHC/IO/Encoding/UTF32.hs
b/GHC/IO/Encoding/UTF32.hs
index
685bdaf
..
1eef105
100644
(file)
--- a/
GHC/IO/Encoding/UTF32.hs
+++ b/
GHC/IO/Encoding/UTF32.hs
@@
-1,5
+1,10
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude -funbox-strict-fields #-}
-{-# LANGUAGE BangPatterns #-}
+{-# LANGUAGE NoImplicitPrelude
+ , BangPatterns
+ , NondecreasingIndentation
+ , MagicHash
+ #-}
+{-# OPTIONS_GHC -funbox-strict-fields #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.IO.Encoding.UTF32
-----------------------------------------------------------------------------
-- |
-- Module : GHC.IO.Encoding.UTF32
diff --git
a/GHC/IO/Encoding/UTF8.hs
b/GHC/IO/Encoding/UTF8.hs
index
1cf8092
..
dea4fde
100644
(file)
--- a/
GHC/IO/Encoding/UTF8.hs
+++ b/
GHC/IO/Encoding/UTF8.hs
@@
-1,5
+1,10
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude -funbox-strict-fields #-}
-{-# LANGUAGE BangPatterns #-}
+{-# LANGUAGE NoImplicitPrelude
+ , BangPatterns
+ , NondecreasingIndentation
+ , MagicHash
+ #-}
+{-# OPTIONS_GHC -funbox-strict-fields #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.IO.Encoding.UTF8
-----------------------------------------------------------------------------
-- |
-- Module : GHC.IO.Encoding.UTF8
diff --git
a/GHC/IO/Exception.hs
b/GHC/IO/Exception.hs
index
219047a
..
4134fca
100644
(file)
--- a/
GHC/IO/Exception.hs
+++ b/
GHC/IO/Exception.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude -funbox-strict-fields #-}
+{-# LANGUAGE NoImplicitPrelude, DeriveDataTypeable, MagicHash #-}
+{-# OPTIONS_GHC -funbox-strict-fields #-}
{-# OPTIONS_HADDOCK hide #-}
-----------------------------------------------------------------------------
-- |
{-# OPTIONS_HADDOCK hide #-}
-----------------------------------------------------------------------------
-- |
diff --git
a/GHC/IO/Exception.hs-boot
b/GHC/IO/Exception.hs-boot
index
f1ba724
..
d094ef2
100644
(file)
--- a/
GHC/IO/Exception.hs-boot
+++ b/
GHC/IO/Exception.hs-boot
@@
-1,4
+1,4
@@
-{-# OPTIONS -fno-implicit-prelude #-}
+{-# LANGUAGE NoImplicitPrelude #-}
module GHC.IO.Exception where
import GHC.Base
module GHC.IO.Exception where
import GHC.Base
diff --git
a/GHC/IO/FD.hs
b/GHC/IO/FD.hs
index
f2ce275
..
b5392d4
100644
(file)
--- a/
GHC/IO/FD.hs
+++ b/
GHC/IO/FD.hs
@@
-1,6
+1,13
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude -XBangPatterns -fno-warn-identities #-}
+{-# LANGUAGE CPP
+ , NoImplicitPrelude
+ , BangPatterns
+ , ForeignFunctionInterface
+ , DeriveDataTypeable
+ #-}
+{-# OPTIONS_GHC -fno-warn-identities #-}
-- Whether there are identities depends on the platform
{-# OPTIONS_HADDOCK hide #-}
-- Whether there are identities depends on the platform
{-# OPTIONS_HADDOCK hide #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.IO.FD
-----------------------------------------------------------------------------
-- |
-- Module : GHC.IO.FD
diff --git
a/GHC/IO/Handle.hs
b/GHC/IO/Handle.hs
index
a2273ee
..
f42fd55
100644
(file)
--- a/
GHC/IO/Handle.hs
+++ b/
GHC/IO/Handle.hs
@@
-1,5
+1,9
@@
+{-# LANGUAGE CPP
+ , NoImplicitPrelude
+ , RecordWildCards
+ , NondecreasingIndentation
+ #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
-{-# LANGUAGE NoImplicitPrelude, RecordWildCards #-}
-----------------------------------------------------------------------------
-- |
-----------------------------------------------------------------------------
-- |
diff --git
a/GHC/IO/Handle.hs-boot
b/GHC/IO/Handle.hs-boot
index
68379e2
..
d925f08
100644
(file)
--- a/
GHC/IO/Handle.hs-boot
+++ b/
GHC/IO/Handle.hs-boot
@@
-1,4
+1,4
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE NoImplicitPrelude #-}
module GHC.IO.Handle where
module GHC.IO.Handle where
diff --git
a/GHC/IO/Handle/FD.hs
b/GHC/IO/Handle/FD.hs
index
0ef0cea
..
fd188a8
100644
(file)
--- a/
GHC/IO/Handle/FD.hs
+++ b/
GHC/IO/Handle/FD.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude, PatternGuards #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.IO.Handle.FD
-----------------------------------------------------------------------------
-- |
-- Module : GHC.IO.Handle.FD
diff --git
a/GHC/IO/Handle/FD.hs-boot
b/GHC/IO/Handle/FD.hs-boot
index
657af38
..
2d84884
100644
(file)
--- a/
GHC/IO/Handle/FD.hs-boot
+++ b/
GHC/IO/Handle/FD.hs-boot
@@
-1,4
+1,4
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE NoImplicitPrelude #-}
module GHC.IO.Handle.FD where
import GHC.IO.Handle.Types
module GHC.IO.Handle.FD where
import GHC.IO.Handle.Types
diff --git
a/GHC/IO/Handle/Internals.hs
b/GHC/IO/Handle/Internals.hs
index
76e8b00
..
6409bbd
100644
(file)
--- a/
GHC/IO/Handle/Internals.hs
+++ b/
GHC/IO/Handle/Internals.hs
@@
-1,7
+1,13
@@
+{-# LANGUAGE NoImplicitPrelude
+ , RecordWildCards
+ , BangPatterns
+ , PatternGuards
+ , NondecreasingIndentation
+ , Rank2Types
+ #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
{-# OPTIONS_GHC -fno-warn-name-shadowing #-}
{-# OPTIONS_HADDOCK hide #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
{-# OPTIONS_GHC -fno-warn-name-shadowing #-}
{-# OPTIONS_HADDOCK hide #-}
-{-# LANGUAGE NoImplicitPrelude, RecordWildCards, BangPatterns #-}
-----------------------------------------------------------------------------
-- |
-----------------------------------------------------------------------------
-- |
diff --git
a/GHC/IO/Handle/Text.hs
b/GHC/IO/Handle/Text.hs
index
e481efd
..
160e9d7
100644
(file)
--- a/
GHC/IO/Handle/Text.hs
+++ b/
GHC/IO/Handle/Text.hs
@@
-1,7
+1,15
@@
+{-# LANGUAGE CPP
+ , NoImplicitPrelude
+ , RecordWildCards
+ , BangPatterns
+ , PatternGuards
+ , NondecreasingIndentation
+ , MagicHash
+ , ForeignFunctionInterface
+ #-}
{-# OPTIONS_GHC -fno-warn-name-shadowing #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
{-# OPTIONS_HADDOCK hide #-}
{-# OPTIONS_GHC -fno-warn-name-shadowing #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
{-# OPTIONS_HADDOCK hide #-}
-{-# LANGUAGE NoImplicitPrelude, RecordWildCards, BangPatterns #-}
-----------------------------------------------------------------------------
-- |
-----------------------------------------------------------------------------
-- |
diff --git
a/GHC/IO/Handle/Types.hs
b/GHC/IO/Handle/Types.hs
index
766c027
..
bff4681
100644
(file)
--- a/
GHC/IO/Handle/Types.hs
+++ b/
GHC/IO/Handle/Types.hs
@@
-1,5
+1,11
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude -funbox-strict-fields #-}
+{-# LANGUAGE CPP
+ , NoImplicitPrelude
+ , ExistentialQuantification
+ , DeriveDataTypeable
+ #-}
+{-# OPTIONS_GHC -funbox-strict-fields #-}
{-# OPTIONS_HADDOCK hide #-}
{-# OPTIONS_HADDOCK hide #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.IO.Handle.Types
-----------------------------------------------------------------------------
-- |
-- Module : GHC.IO.Handle.Types
diff --git
a/GHC/IO/IOMode.hs
b/GHC/IO/IOMode.hs
index
606f24f
..
3b0943c
100644
(file)
--- a/
GHC/IO/IOMode.hs
+++ b/
GHC/IO/IOMode.hs
@@
-1,4
+1,4
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_HADDOCK hide #-}
-----------------------------------------------------------------------------
-- |
{-# OPTIONS_HADDOCK hide #-}
-----------------------------------------------------------------------------
-- |
diff --git
a/GHC/IOArray.hs
b/GHC/IOArray.hs
index
35638ff
..
67ee014
100644
(file)
--- a/
GHC/IOArray.hs
+++ b/
GHC/IOArray.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude -funbox-strict-fields #-}
+{-# LANGUAGE NoImplicitPrelude #-}
+{-# OPTIONS_GHC -funbox-strict-fields #-}
{-# OPTIONS_HADDOCK hide #-}
-----------------------------------------------------------------------------
-- |
{-# OPTIONS_HADDOCK hide #-}
-----------------------------------------------------------------------------
-- |
diff --git
a/GHC/IOBase.hs
b/GHC/IOBase.hs
index
c80756a
..
4177b07
100644
(file)
--- a/
GHC/IOBase.hs
+++ b/
GHC/IOBase.hs
@@
-1,4
+1,6
@@
+{-# LANGUAGE DeriveDataTypeable #-}
{-# OPTIONS_HADDOCK hide #-}
{-# OPTIONS_HADDOCK hide #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.IOBase
-----------------------------------------------------------------------------
-- |
-- Module : GHC.IOBase
diff --git
a/GHC/IORef.hs
b/GHC/IORef.hs
index
51466bc
..
be2808d
100644
(file)
--- a/
GHC/IORef.hs
+++ b/
GHC/IORef.hs
@@
-1,5
+1,7
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude -funbox-strict-fields #-}
+{-# LANGUAGE NoImplicitPrelude, MagicHash #-}
+{-# OPTIONS_GHC -funbox-strict-fields #-}
{-# OPTIONS_HADDOCK hide #-}
{-# OPTIONS_HADDOCK hide #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.IORef
-----------------------------------------------------------------------------
-- |
-- Module : GHC.IORef
diff --git
a/GHC/Int.hs
b/GHC/Int.hs
index
03d488e
..
05d10c5
100644
(file)
--- a/
GHC/Int.hs
+++ b/
GHC/Int.hs
@@
-1,5
+1,4
@@
-{-# LANGUAGE BangPatterns #-}
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude, BangPatterns, MagicHash #-}
{-# OPTIONS_HADDOCK hide #-}
-----------------------------------------------------------------------------
-- |
{-# OPTIONS_HADDOCK hide #-}
-----------------------------------------------------------------------------
-- |
diff --git
a/GHC/List.lhs
b/GHC/List.lhs
index
fe67502
..
ff8593c
100644
(file)
--- a/
GHC/List.lhs
+++ b/
GHC/List.lhs
@@
-1,6
+1,7
@@
\begin{code}
\begin{code}
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude, MagicHash #-}
{-# OPTIONS_HADDOCK hide #-}
{-# OPTIONS_HADDOCK hide #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.List
-----------------------------------------------------------------------------
-- |
-- Module : GHC.List
diff --git
a/GHC/MVar.hs
b/GHC/MVar.hs
index
348ae51
..
8c653dc
100644
(file)
--- a/
GHC/MVar.hs
+++ b/
GHC/MVar.hs
@@
-1,5
+1,7
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude -funbox-strict-fields #-}
+{-# LANGUAGE NoImplicitPrelude, MagicHash, UnboxedTuples #-}
+{-# OPTIONS_GHC -funbox-strict-fields #-}
{-# OPTIONS_HADDOCK hide #-}
{-# OPTIONS_HADDOCK hide #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.MVar
-----------------------------------------------------------------------------
-- |
-- Module : GHC.MVar
diff --git
a/GHC/Num.lhs
b/GHC/Num.lhs
index
5a94949
..
5dc5e75
100644
(file)
--- a/
GHC/Num.lhs
+++ b/
GHC/Num.lhs
@@
-1,5
+1,5
@@
\begin{code}
\begin{code}
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude, MagicHash, UnboxedTuples #-}
-- We believe we could deorphan this module, by moving lots of things
-- around, but we haven't got there yet:
{-# OPTIONS_GHC -fno-warn-orphans #-}
-- We believe we could deorphan this module, by moving lots of things
-- around, but we haven't got there yet:
{-# OPTIONS_GHC -fno-warn-orphans #-}
diff --git
a/GHC/PArr.hs
b/GHC/PArr.hs
index
c9b5f9b
..
6a5328f
100644
(file)
--- a/
GHC/PArr.hs
+++ b/
GHC/PArr.hs
@@
-1,6
+1,6
@@
+{-# LANGUAGE CPP, ParallelArrays, MagicHash, UnboxedTuples #-}
{-# OPTIONS_GHC -funbox-strict-fields #-}
{-# OPTIONS_GHC -fno-warn-incomplete-patterns #-}
{-# OPTIONS_GHC -funbox-strict-fields #-}
{-# OPTIONS_GHC -fno-warn-incomplete-patterns #-}
-{-# LANGUAGE ParallelArrays #-}
-----------------------------------------------------------------------------
-- |
-----------------------------------------------------------------------------
-- |
diff --git
a/GHC/Pack.lhs
b/GHC/Pack.lhs
index
f3e9609
..
14ac670
100644
(file)
--- a/
GHC/Pack.lhs
+++ b/
GHC/Pack.lhs
@@
-1,6
+1,7
@@
\begin{code}
\begin{code}
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE NoImplicitPrelude, MagicHash, UnboxedTuples #-}
{-# OPTIONS_HADDOCK hide #-}
{-# OPTIONS_HADDOCK hide #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Pack
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Pack
diff --git
a/GHC/Ptr.lhs
b/GHC/Ptr.lhs
index
2ba743d
..
bf78f71
100644
(file)
--- a/
GHC/Ptr.lhs
+++ b/
GHC/Ptr.lhs
@@
-1,6
+1,7
@@
\begin{code}
\begin{code}
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude, MagicHash #-}
{-# OPTIONS_HADDOCK hide #-}
{-# OPTIONS_HADDOCK hide #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Ptr
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Ptr
diff --git
a/GHC/Read.lhs
b/GHC/Read.lhs
index
1a7b6a8
..
77daece
100644
(file)
--- a/
GHC/Read.lhs
+++ b/
GHC/Read.lhs
@@
-1,6
+1,7
@@
\begin{code}
\begin{code}
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude #-}
{-# OPTIONS_HADDOCK hide #-}
{-# OPTIONS_HADDOCK hide #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Read
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Read
diff --git
a/GHC/Real.lhs
b/GHC/Real.lhs
index
68e3784
..
be2a296
100644
(file)
--- a/
GHC/Real.lhs
+++ b/
GHC/Real.lhs
@@
-1,5
+1,5
@@
\begin{code}
\begin{code}
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude, MagicHash, UnboxedTuples #-}
{-# OPTIONS_HADDOCK hide #-}
-----------------------------------------------------------------------------
-- |
{-# OPTIONS_HADDOCK hide #-}
-----------------------------------------------------------------------------
-- |
diff --git
a/GHC/ST.lhs
b/GHC/ST.lhs
index
e3e24bf
..
dc62000
100644
(file)
--- a/
GHC/ST.lhs
+++ b/
GHC/ST.lhs
@@
-1,5
+1,5
@@
\begin{code}
\begin{code}
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE NoImplicitPrelude, MagicHash, UnboxedTuples, Rank2Types #-}
{-# OPTIONS_HADDOCK hide #-}
-----------------------------------------------------------------------------
-- |
{-# OPTIONS_HADDOCK hide #-}
-----------------------------------------------------------------------------
-- |
diff --git
a/GHC/STRef.lhs
b/GHC/STRef.lhs
index
a0dba8d
..
9306b24
100644
(file)
--- a/
GHC/STRef.lhs
+++ b/
GHC/STRef.lhs
@@
-1,6
+1,7
@@
\begin{code}
\begin{code}
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE NoImplicitPrelude, MagicHash, UnboxedTuples #-}
{-# OPTIONS_HADDOCK hide #-}
{-# OPTIONS_HADDOCK hide #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.STRef
-----------------------------------------------------------------------------
-- |
-- Module : GHC.STRef
diff --git
a/GHC/Show.lhs
b/GHC/Show.lhs
index
2c673a8
..
6cb8bf3
100644
(file)
--- a/
GHC/Show.lhs
+++ b/
GHC/Show.lhs
@@
-1,7
+1,7
@@
\begin{code}
\begin{code}
-{-# LANGUAGE BangPatterns #-}
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE NoImplicitPrelude, BangPatterns, MagicHash #-}
{-# OPTIONS_HADDOCK hide #-}
{-# OPTIONS_HADDOCK hide #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Show
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Show
diff --git
a/GHC/Show.lhs-boot
b/GHC/Show.lhs-boot
index
b01d165
..
6c5fa61
100644
(file)
--- a/
GHC/Show.lhs-boot
+++ b/
GHC/Show.lhs-boot
@@
-1,5
+1,5
@@
\begin{code}
\begin{code}
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE NoImplicitPrelude #-}
module GHC.Show (showSignedInt) where
module GHC.Show (showSignedInt) where
diff --git
a/GHC/Stable.lhs
b/GHC/Stable.lhs
index
6bac7d1
..
e96bf68
100644
(file)
--- a/
GHC/Stable.lhs
+++ b/
GHC/Stable.lhs
@@
-1,6
+1,11
@@
\begin{code}
\begin{code}
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE NoImplicitPrelude
+ , MagicHash
+ , UnboxedTuples
+ , ForeignFunctionInterface
+ #-}
{-# OPTIONS_HADDOCK hide #-}
{-# OPTIONS_HADDOCK hide #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Stable
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Stable
diff --git
a/GHC/Storable.lhs
b/GHC/Storable.lhs
index
982230c
..
a722873
100644
(file)
--- a/
GHC/Storable.lhs
+++ b/
GHC/Storable.lhs
@@
-1,6
+1,7
@@
\begin{code}
\begin{code}
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE NoImplicitPrelude, MagicHash, UnboxedTuples #-}
{-# OPTIONS_HADDOCK hide #-}
{-# OPTIONS_HADDOCK hide #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Storable
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Storable
diff --git
a/GHC/TopHandler.lhs
b/GHC/TopHandler.lhs
index
0f55b38
..
7bedcfe
100644
(file)
--- a/
GHC/TopHandler.lhs
+++ b/
GHC/TopHandler.lhs
@@
-1,7
+1,14
@@
\begin{code}
\begin{code}
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP
+ , NoImplicitPrelude
+ , ForeignFunctionInterface
+ , MagicHash
+ , UnboxedTuples
+ , PatternGuards
+ #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_HADDOCK hide #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_HADDOCK hide #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.TopHandler
-----------------------------------------------------------------------------
-- |
-- Module : GHC.TopHandler
diff --git
a/GHC/Unicode.hs
b/GHC/Unicode.hs
index
baca833
..
b34f677
100644
(file)
--- a/
GHC/Unicode.hs
+++ b/
GHC/Unicode.hs
@@
-1,6
+1,7
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude, ForeignFunctionInterface #-}
{-# OPTIONS -#include "WCsubst.h" #-}
{-# OPTIONS_HADDOCK hide #-}
{-# OPTIONS -#include "WCsubst.h" #-}
{-# OPTIONS_HADDOCK hide #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Unicode
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Unicode
diff --git
a/GHC/Unicode.hs-boot
b/GHC/Unicode.hs-boot
index
6a0e75c
..
cc67dbb
100644
(file)
--- a/
GHC/Unicode.hs-boot
+++ b/
GHC/Unicode.hs-boot
@@
-1,4
+1,4
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE NoImplicitPrelude #-}
module GHC.Unicode where
module GHC.Unicode where
diff --git
a/GHC/Weak.lhs
b/GHC/Weak.lhs
index
af44c88
..
67046f8
100644
(file)
--- a/
GHC/Weak.lhs
+++ b/
GHC/Weak.lhs
@@
-1,7
+1,12
@@
\begin{code}
\begin{code}
-{-# LANGUAGE BangPatterns #-}
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP
+ , NoImplicitPrelude
+ , BangPatterns
+ , MagicHash
+ , UnboxedTuples
+ #-}
{-# OPTIONS_HADDOCK hide #-}
{-# OPTIONS_HADDOCK hide #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Weak
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Weak
diff --git
a/GHC/Word.hs
b/GHC/Word.hs
index
9a6355c
..
9d3e1a6
100644
(file)
--- a/
GHC/Word.hs
+++ b/
GHC/Word.hs
@@
-1,6
+1,6
@@
-{-# LANGUAGE BangPatterns #-}
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude, BangPatterns, MagicHash #-}
{-# OPTIONS_HADDOCK hide #-}
{-# OPTIONS_HADDOCK hide #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Word
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Word
diff --git
a/NHC/PosixTypes.hsc
b/NHC/PosixTypes.hsc
index
64c3e28
..
efae04e
100644
(file)
--- a/
NHC/PosixTypes.hsc
+++ b/
NHC/PosixTypes.hsc
@@
-1,4
+1,6
@@
+{-# LANGUAGE CPP #-}
{-# OPTIONS_NHC98 -I/usr/include #-}
{-# OPTIONS_NHC98 -I/usr/include #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : NHC.PosixTypes
-----------------------------------------------------------------------------
-- |
-- Module : NHC.PosixTypes
diff --git
a/Numeric.hs
b/Numeric.hs
index
d6dcdfe
..
4b202d0
100644
(file)
--- a/
Numeric.hs
+++ b/
Numeric.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude, MagicHash #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Numeric
-----------------------------------------------------------------------------
-- |
-- Module : Numeric
diff --git
a/Prelude.hs
b/Prelude.hs
index
8ede773
..
4c183ae
100644
(file)
--- a/
Prelude.hs
+++ b/
Prelude.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude -XBangPatterns #-}
+{-# LANGUAGE CPP, NoImplicitPrelude, BangPatterns #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Prelude
-----------------------------------------------------------------------------
-- |
-- Module : Prelude
diff --git
a/System/CPUTime.hsc
b/System/CPUTime.hsc
index
f050a68
..
a25c750
100644
(file)
--- a/
System/CPUTime.hsc
+++ b/
System/CPUTime.hsc
@@
-1,3
+1,5
@@
+{-# LANGUAGE CPP, NondecreasingIndentation, ForeignFunctionInterface #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : System.CPUTime
-----------------------------------------------------------------------------
-- |
-- Module : System.CPUTime
diff --git
a/System/Environment.hs
b/System/Environment.hs
index
b85bc42
..
2b6dec2
100644
(file)
--- a/
System/Environment.hs
+++ b/
System/Environment.hs
@@
-1,3
+1,5
@@
+{-# LANGUAGE CPP, ForeignFunctionInterface #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : System.Environment
-----------------------------------------------------------------------------
-- |
-- Module : System.Environment
diff --git
a/System/Event/Clock.hsc
b/System/Event/Clock.hsc
index
73d2a52
..
ae31a7b
100644
(file)
--- a/
System/Event/Clock.hsc
+++ b/
System/Event/Clock.hsc
@@
-1,5
+1,4
@@
-{-# LANGUAGE BangPatterns #-}
-{-# LANGUAGE ForeignFunctionInterface #-}
+{-# LANGUAGE NoImplicitPrelude, BangPatterns, ForeignFunctionInterface #-}
module System.Event.Clock (getCurrentTime) where
module System.Event.Clock (getCurrentTime) where
diff --git
a/System/Event/Control.hs
b/System/Event/Control.hs
index
167eb77
..
635d864
100644
(file)
--- a/
System/Event/Control.hs
+++ b/
System/Event/Control.hs
@@
-1,5
+1,9
@@
-{-# LANGUAGE CPP, ForeignFunctionInterface, NoImplicitPrelude,
- ScopedTypeVariables, BangPatterns #-}
+{-# LANGUAGE CPP
+ , ForeignFunctionInterface
+ , NoImplicitPrelude
+ , ScopedTypeVariables
+ , BangPatterns
+ #-}
module System.Event.Control
(
module System.Event.Control
(
diff --git
a/System/Event/EPoll.hsc
b/System/Event/EPoll.hsc
index
ccc8ec0
..
b2311c8
100644
(file)
--- a/
System/Event/EPoll.hsc
+++ b/
System/Event/EPoll.hsc
@@
-1,5
+1,9
@@
-{-# LANGUAGE ForeignFunctionInterface, GeneralizedNewtypeDeriving,
- NoImplicitPrelude, BangPatterns #-}
+{-# LANGUAGE CPP
+ , ForeignFunctionInterface
+ , GeneralizedNewtypeDeriving
+ , NoImplicitPrelude
+ , BangPatterns
+ #-}
--
-- | A binding to the epoll I/O event notification facility
--
-- | A binding to the epoll I/O event notification facility
diff --git
a/System/Event/IntMap.hs
b/System/Event/IntMap.hs
index
f02628b
..
61ae002
100644
(file)
--- a/
System/Event/IntMap.hs
+++ b/
System/Event/IntMap.hs
@@
-1,4
+1,5
@@
{-# LANGUAGE CPP, MagicHash, NoImplicitPrelude #-}
{-# LANGUAGE CPP, MagicHash, NoImplicitPrelude #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : System.Event.IntMap
-----------------------------------------------------------------------------
-- |
-- Module : System.Event.IntMap
diff --git
a/System/Event/KQueue.hsc
b/System/Event/KQueue.hsc
index
4cf6a5d
..
4a86435
100644
(file)
--- a/
System/Event/KQueue.hsc
+++ b/
System/Event/KQueue.hsc
@@
-1,5
+1,10
@@
-{-# LANGUAGE ForeignFunctionInterface, GeneralizedNewtypeDeriving,
- NoImplicitPrelude, RecordWildCards, BangPatterns #-}
+{-# LANGUAGE CPP
+ , ForeignFunctionInterface
+ , GeneralizedNewtypeDeriving
+ , NoImplicitPrelude
+ , RecordWildCards
+ , BangPatterns
+ #-}
module System.Event.KQueue
(
module System.Event.KQueue
(
diff --git
a/System/Event/Manager.hs
b/System/Event/Manager.hs
index
0c8293f
..
9766774
100644
(file)
--- a/
System/Event/Manager.hs
+++ b/
System/Event/Manager.hs
@@
-1,5
+1,12
@@
-{-# LANGUAGE BangPatterns, CPP, ExistentialQuantification, NoImplicitPrelude,
- RecordWildCards, TypeSynonymInstances #-}
+{-# LANGUAGE BangPatterns
+ , CPP
+ , ExistentialQuantification
+ , NoImplicitPrelude
+ , RecordWildCards
+ , TypeSynonymInstances
+ , FlexibleInstances
+ #-}
+
module System.Event.Manager
( -- * Types
EventManager
module System.Event.Manager
( -- * Types
EventManager
diff --git
a/System/Event/Poll.hsc
b/System/Event/Poll.hsc
index
d6929f8
..
323ab9c
100644
(file)
--- a/
System/Event/Poll.hsc
+++ b/
System/Event/Poll.hsc
@@
-1,5
+1,9
@@
-{-# LANGUAGE ForeignFunctionInterface, GeneralizedNewtypeDeriving,
- NoImplicitPrelude, BangPatterns #-}
+{-# LANGUAGE CPP
+ , ForeignFunctionInterface
+ , GeneralizedNewtypeDeriving
+ , NoImplicitPrelude
+ , BangPatterns
+ #-}
module System.Event.Poll
(
module System.Event.Poll
(
diff --git
a/System/Exit.hs
b/System/Exit.hs
index
7cca017
..
7eb17cf
100644
(file)
--- a/
System/Exit.hs
+++ b/
System/Exit.hs
@@
-1,3
+1,5
@@
+{-# LANGUAGE CPP #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : System.Exit
-----------------------------------------------------------------------------
-- |
-- Module : System.Exit
diff --git
a/System/IO.hs
b/System/IO.hs
index
d52c2c9
..
f60ecad
100644
(file)
--- a/
System/IO.hs
+++ b/
System/IO.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : System.IO
-----------------------------------------------------------------------------
-- |
-- Module : System.IO
diff --git
a/System/IO/Error.hs
b/System/IO/Error.hs
index
d1c4e47
..
a5aba92
100644
(file)
--- a/
System/IO/Error.hs
+++ b/
System/IO/Error.hs
@@
-1,4
+1,4
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude #-}
-----------------------------------------------------------------------------
-- |
-----------------------------------------------------------------------------
-- |
diff --git
a/System/IO/Unsafe.hs
b/System/IO/Unsafe.hs
index
05f2c7b
..
3ef3d9f
100644
(file)
--- a/
System/IO/Unsafe.hs
+++ b/
System/IO/Unsafe.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : System.IO.Unsafe
-----------------------------------------------------------------------------
-- |
-- Module : System.IO.Unsafe
diff --git
a/System/Info.hs
b/System/Info.hs
index
b38aea2
..
92da1a6
100644
(file)
--- a/
System/Info.hs
+++ b/
System/Info.hs
@@
-1,3
+1,5
@@
+{-# LANGUAGE CPP #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : System.Info
-----------------------------------------------------------------------------
-- |
-- Module : System.Info
diff --git
a/System/Mem.hs
b/System/Mem.hs
index
39a98da
..
af96b5d
100644
(file)
--- a/
System/Mem.hs
+++ b/
System/Mem.hs
@@
-1,3
+1,9
@@
+{-# LANGUAGE CPP #-}
+
+#ifdef __GLASGOW_HASKELL__
+{-# LANGUAGE ForeignFunctionInterface #-}
+#endif
+
-----------------------------------------------------------------------------
-- |
-- Module : System.Mem
-----------------------------------------------------------------------------
-- |
-- Module : System.Mem
diff --git
a/System/Mem/StableName.hs
b/System/Mem/StableName.hs
index
beeb514
..
d7d27a3
100644
(file)
--- a/
System/Mem/StableName.hs
+++ b/
System/Mem/StableName.hs
@@
-1,3
+1,11
@@
+{-# LANGUAGE CPP #-}
+#ifdef __GLASGOW_HASKELL__
+{-# LANGUAGE MagicHash #-}
+#if !defined(__PARALLEL_HASKELL__)
+{-# LANGUAGE UnboxedTuples #-}
+#endif
+#endif
+
-----------------------------------------------------------------------------
-- |
-- Module : System.Mem.StableName
-----------------------------------------------------------------------------
-- |
-- Module : System.Mem.StableName
diff --git
a/System/Mem/Weak.hs
b/System/Mem/Weak.hs
index
61dce1d
..
21411e5
100644
(file)
--- a/
System/Mem/Weak.hs
+++ b/
System/Mem/Weak.hs
@@
-1,3
+1,5
@@
+{-# LANGUAGE CPP #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : System.Mem.Weak
-----------------------------------------------------------------------------
-- |
-- Module : System.Mem.Weak
@@
-67,16
+69,12
@@
module System.Mem.Weak (
-- $precise
) where
-- $precise
) where
-import Data.Maybe (Maybe(..))
-
#ifdef __HUGS__
import Hugs.Weak
import Prelude
#endif
#ifdef __GLASGOW_HASKELL__
#ifdef __HUGS__
import Hugs.Weak
import Prelude
#endif
#ifdef __GLASGOW_HASKELL__
-import GHC.Base (return)
-import GHC.Types (IO)
import GHC.Weak
#endif
import GHC.Weak
#endif
diff --git
a/System/Posix/Internals.hs
b/System/Posix/Internals.hs
index
941dd5e
..
2a6126c
100644
(file)
--- a/
System/Posix/Internals.hs
+++ b/
System/Posix/Internals.hs
@@
-1,4
+1,4
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude, ForeignFunctionInterface #-}
{-# OPTIONS_GHC -fno-warn-unused-binds #-}
{-# OPTIONS_HADDOCK hide #-}
{-# OPTIONS_GHC -fno-warn-unused-binds #-}
{-# OPTIONS_HADDOCK hide #-}
diff --git
a/System/Posix/Types.hs
b/System/Posix/Types.hs
index
bd286f4
..
676fead
100644
(file)
--- a/
System/Posix/Types.hs
+++ b/
System/Posix/Types.hs
@@
-1,5
+1,10
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP
+ , NoImplicitPrelude
+ , MagicHash
+ , GeneralizedNewtypeDeriving
+ #-}
{-# OPTIONS_GHC -fno-warn-unused-binds #-}
{-# OPTIONS_GHC -fno-warn-unused-binds #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : System.Posix.Types
-----------------------------------------------------------------------------
-- |
-- Module : System.Posix.Types
diff --git
a/System/Timeout.hs
b/System/Timeout.hs
index
431f709
..
b1c79b3
100644
(file)
--- a/
System/Timeout.hs
+++ b/
System/Timeout.hs
@@
-1,3
+1,5
@@
+{-# LANGUAGE CPP #-}
+
-------------------------------------------------------------------------------
-- |
-- Module : System.Timeout
-------------------------------------------------------------------------------
-- |
-- Module : System.Timeout
diff --git
a/Text/ParserCombinators/ReadP.hs
b/Text/ParserCombinators/ReadP.hs
index
5dabfd1
..
27bba54
100644
(file)
--- a/
Text/ParserCombinators/ReadP.hs
+++ b/
Text/ParserCombinators/ReadP.hs
@@
-1,4
+1,11
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude #-}
+#ifndef __NHC__
+{-# LANGUAGE Rank2Types #-}
+#endif
+#ifdef __GLASGOW_HASKELL__
+{-# LANGUAGE MagicHash #-}
+#endif
+
-----------------------------------------------------------------------------
-- |
-- Module : Text.ParserCombinators.ReadP
-----------------------------------------------------------------------------
-- |
-- Module : Text.ParserCombinators.ReadP
diff --git
a/Text/ParserCombinators/ReadPrec.hs
b/Text/ParserCombinators/ReadPrec.hs
index
361f11a
..
f282d1a
100644
(file)
--- a/
Text/ParserCombinators/ReadPrec.hs
+++ b/
Text/ParserCombinators/ReadPrec.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Text.ParserCombinators.ReadPrec
-----------------------------------------------------------------------------
-- |
-- Module : Text.ParserCombinators.ReadPrec
diff --git
a/Text/Printf.hs
b/Text/Printf.hs
index
6af2c90
..
7d4611e
100644
(file)
--- a/
Text/Printf.hs
+++ b/
Text/Printf.hs
@@
-1,3
+1,5
@@
+{-# LANGUAGE CPP #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Text.Printf
-----------------------------------------------------------------------------
-- |
-- Module : Text.Printf
diff --git
a/Text/Read.hs
b/Text/Read.hs
index
5ab8877
..
d935ffe
100644
(file)
--- a/
Text/Read.hs
+++ b/
Text/Read.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Text.Read
-----------------------------------------------------------------------------
-- |
-- Module : Text.Read
diff --git
a/Text/Read/Lex.hs
b/Text/Read/Lex.hs
index
3329135
..
222d6cf
100644
(file)
--- a/
Text/Read/Lex.hs
+++ b/
Text/Read/Lex.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Text.Read.Lex
-----------------------------------------------------------------------------
-- |
-- Module : Text.Read.Lex
diff --git
a/Text/Show.hs
b/Text/Show.hs
index
d540a1d
..
4d23e57
100644
(file)
--- a/
Text/Show.hs
+++ b/
Text/Show.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Text.Show
-----------------------------------------------------------------------------
-- |
-- Module : Text.Show
diff --git
a/Text/Show/Functions.hs
b/Text/Show/Functions.hs
index
c66d2e3
..
1ae46aa
100644
(file)
--- a/
Text/Show/Functions.hs
+++ b/
Text/Show/Functions.hs
@@
-1,5
+1,7
@@
+{-# LANGUAGE CPP #-}
-- This module deliberately declares orphan instances:
{-# OPTIONS_GHC -fno-warn-orphans #-}
-- This module deliberately declares orphan instances:
{-# OPTIONS_GHC -fno-warn-orphans #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Text.Show.Functions
-----------------------------------------------------------------------------
-- |
-- Module : Text.Show.Functions
diff --git
a/Unsafe/Coerce.hs
b/Unsafe/Coerce.hs
index
516d7e0
..
421cdd0
100644
(file)
--- a/
Unsafe/Coerce.hs
+++ b/
Unsafe/Coerce.hs
@@
-1,4
+1,5
@@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude, MagicHash #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : Unsafe.Coerce
-----------------------------------------------------------------------------
-- |
-- Module : Unsafe.Coerce
diff --git
a/base.cabal
b/base.cabal
index
ecb0d2d
..
c4eadf7
100644
(file)
--- a/
base.cabal
+++ b/
base.cabal
@@
-99,13
+99,6
@@
Library {
if os(windows)
exposed-modules: GHC.IO.Encoding.CodePage.Table
GHC.Conc.Windows
if os(windows)
exposed-modules: GHC.IO.Encoding.CodePage.Table
GHC.Conc.Windows
- extensions: MagicHash, ExistentialQuantification, Rank2Types,
- ScopedTypeVariables, UnboxedTuples,
- ForeignFunctionInterface, UnliftedFFITypes,
- DeriveDataTypeable, GeneralizedNewtypeDeriving,
- FlexibleInstances, StandaloneDeriving,
- PatternGuards, EmptyDataDecls, NoImplicitPrelude,
- NondecreasingIndentation
}
exposed-modules:
Control.Applicative,
}
exposed-modules:
Control.Applicative,
@@
-228,7
+221,6
@@
Library {
System.Event.Thread
System.Event.Unique
}
System.Event.Thread
System.Event.Unique
}
- extensions: CPP
-- We need to set the package name to base (without a version number)
-- as it's magic.
ghc-options: -package-name base
-- We need to set the package name to base (without a version number)
-- as it's magic.
ghc-options: -package-name base
diff --git
a/codepages/MakeTable.hs
b/codepages/MakeTable.hs
index
951274e
..
e17380b
100644
(file)
--- a/
codepages/MakeTable.hs
+++ b/
codepages/MakeTable.hs
@@
-200,7
+200,7
@@
compress n ms = runState (mapM lookupOrAdd chunks) (Map.empty, Map.empty)
-- Static parts of the generated module.
languageDirectives :: [String]
-- Static parts of the generated module.
languageDirectives :: [String]
-languageDirectives = ["{-# LANGUAGE MagicHash #-}"]
+languageDirectives = ["{-# LANGUAGE CPP, MagicHash #-}"]
firstComment :: [FilePath] -> [String]
firstComment :: [FilePath] -> [String]