Add LANGUAGE BangPatterns to modules that use bang patterns
authorsimonpj@microsoft.com <unknown>
Fri, 12 Nov 2010 17:05:43 +0000 (17:05 +0000)
committersimonpj@microsoft.com <unknown>
Fri, 12 Nov 2010 17:05:43 +0000 (17:05 +0000)
13 files changed:
libraries/base/Data/Bits.hs
libraries/base/GHC/Base.lhs
libraries/base/GHC/Conc/Sync.lhs
libraries/base/GHC/Enum.lhs
libraries/base/GHC/ForeignPtr.hs
libraries/base/GHC/Int.hs
libraries/base/GHC/Show.lhs
libraries/base/GHC/Weak.lhs
libraries/base/GHC/Word.hs
libraries/base/System/Event/Clock.hsc
libraries/base/System/Event/Control.hs
libraries/base/System/Event/EPoll.hsc
libraries/base/System/Event/Poll.hsc

index 8b5432b..c9230c5 100644 (file)
@@ -1,3 +1,4 @@
+{-# LANGUAGE BangPatterns #-}
 {-# OPTIONS_GHC -XNoImplicitPrelude #-}
 -----------------------------------------------------------------------------
 -- |
index 8dd3124..5ab0b26 100644 (file)
@@ -62,6 +62,7 @@ GHC.Float       Classes: Floating, RealFloat
 Other Prelude modules are much easier with fewer complex dependencies.
 
 \begin{code}
+{-# LANGUAGE BangPatterns #-}
 {-# OPTIONS_GHC -XNoImplicitPrelude #-}
 -- -fno-warn-orphans is needed for things like:
 -- Orphan rule: "x# -# x#" ALWAYS forall x# :: Int# -# x# x# = 0
index a75eee8..0808e68 100644 (file)
@@ -1,4 +1,5 @@
 \begin{code}
+{-# LANGUAGE BangPatterns #-}
 {-# OPTIONS_GHC -XNoImplicitPrelude #-}
 {-# OPTIONS_GHC -fno-warn-missing-signatures #-}
 {-# OPTIONS_HADDOCK not-home #-}
index 28f44f0..7cb6f07 100644 (file)
@@ -1,4 +1,5 @@
 \begin{code}
+{-# LANGUAGE BangPatterns #-}
 {-# OPTIONS_GHC -XNoImplicitPrelude #-}
 {-# OPTIONS_HADDOCK hide #-}
 -----------------------------------------------------------------------------
index 8206241..a20b000 100644 (file)
@@ -1,3 +1,4 @@
+{-# LANGUAGE BangPatterns #-}
 {-# OPTIONS_GHC -XNoImplicitPrelude #-}
 {-# OPTIONS_HADDOCK hide #-}
 -----------------------------------------------------------------------------
index 0f451b4..03d488e 100644 (file)
@@ -1,3 +1,4 @@
+{-# LANGUAGE BangPatterns #-}
 {-# OPTIONS_GHC -XNoImplicitPrelude #-}
 {-# OPTIONS_HADDOCK hide #-}
 -----------------------------------------------------------------------------
index 8e8c11b..2c673a8 100644 (file)
@@ -1,4 +1,5 @@
 \begin{code}
+{-# LANGUAGE BangPatterns #-}
 {-# OPTIONS_GHC -XNoImplicitPrelude #-}
 {-# OPTIONS_HADDOCK hide #-}
 -----------------------------------------------------------------------------
index 4897123..af44c88 100644 (file)
@@ -1,4 +1,5 @@
 \begin{code}
+{-# LANGUAGE BangPatterns #-}
 {-# OPTIONS_GHC -XNoImplicitPrelude #-}
 {-# OPTIONS_HADDOCK hide #-}
 -----------------------------------------------------------------------------
index 2ba026c..9a6355c 100644 (file)
@@ -1,3 +1,4 @@
+{-# LANGUAGE BangPatterns #-}
 {-# OPTIONS_GHC -XNoImplicitPrelude #-}
 {-# OPTIONS_HADDOCK hide #-}
 -----------------------------------------------------------------------------
index fec00bb..73d2a52 100644 (file)
@@ -1,3 +1,4 @@
+{-# LANGUAGE BangPatterns #-}
 {-# LANGUAGE ForeignFunctionInterface #-}
 
 module System.Event.Clock (getCurrentTime) where
index 159cbce..167eb77 100644 (file)
@@ -1,5 +1,5 @@
 {-# LANGUAGE CPP, ForeignFunctionInterface, NoImplicitPrelude,
-    ScopedTypeVariables #-}
+    ScopedTypeVariables, BangPatterns #-}
 
 module System.Event.Control
     (
index 098946e..ccc8ec0 100644 (file)
@@ -1,5 +1,5 @@
 {-# LANGUAGE ForeignFunctionInterface, GeneralizedNewtypeDeriving,
-    NoImplicitPrelude #-}
+    NoImplicitPrelude, BangPatterns #-}
 
 --
 -- | A binding to the epoll I/O event notification facility
index dc577a8..d6929f8 100644 (file)
@@ -1,5 +1,5 @@
 {-# LANGUAGE ForeignFunctionInterface, GeneralizedNewtypeDeriving,
-    NoImplicitPrelude #-}
+    NoImplicitPrelude, BangPatterns #-}
 
 module System.Event.Poll
     (