[commit: ghc] wip/nfs-locking: Make RecordWildCards a default extension. (548a30b)

git at git.haskell.org git at git.haskell.org
Fri Oct 27 00:51:45 UTC 2017


Repository : ssh://git@git.haskell.org/ghc

On branch  : wip/nfs-locking
Link       : http://ghc.haskell.org/trac/ghc/changeset/548a30b993efcdad064a6d9b14deb5b7a40b681d/ghc

>---------------------------------------------------------------

commit 548a30b993efcdad064a6d9b14deb5b7a40b681d
Author: Andrey Mokhov <andrey.mokhov at gmail.com>
Date:   Fri Feb 19 00:00:14 2016 +0000

    Make RecordWildCards a default extension.
    
    See #207.


>---------------------------------------------------------------

548a30b993efcdad064a6d9b14deb5b7a40b681d
 build.bat                  | 1 +
 build.sh                   | 1 +
 shaking-up-ghc.cabal       | 2 +-
 src/Rules/Actions.hs       | 1 -
 src/Rules/Compile.hs       | 1 -
 src/Rules/Data.hs          | 1 -
 src/Rules/Dependencies.hs  | 1 -
 src/Rules/Documentation.hs | 1 -
 src/Rules/Library.hs       | 1 -
 src/Rules/Program.hs       | 1 -
 src/Rules/Register.hs      | 1 -
 11 files changed, 3 insertions(+), 9 deletions(-)

diff --git a/build.bat b/build.bat
index 10a6969..465d957 100644
--- a/build.bat
+++ b/build.bat
@@ -4,6 +4,7 @@
 @set ghcArgs=--make                   ^
              -Wall                    ^
              -fno-warn-name-shadowing ^
+             -XRecordWildCards        ^
              src/Main.hs              ^
              -isrc                    ^
              -rtsopts                 ^
diff --git a/build.sh b/build.sh
index 77c9fa4..7c070e9 100755
--- a/build.sh
+++ b/build.sh
@@ -36,6 +36,7 @@ ghc                           \
     "$root/src/Main.hs"       \
     -Wall                     \
     -fno-warn-name-shadowing  \
+    -XRecordWildCards         \
     -i"$root/src"             \
     -rtsopts                  \
     -with-rtsopts=-I0         \
diff --git a/shaking-up-ghc.cabal b/shaking-up-ghc.cabal
index 684e89e..fc0744d 100644
--- a/shaking-up-ghc.cabal
+++ b/shaking-up-ghc.cabal
@@ -108,13 +108,13 @@ executable ghc-shake
                        , Way
 
     default-language:    Haskell2010
+    default-extensions:  RecordWildCards
     other-extensions:    DeriveDataTypeable
                        , DeriveGeneric
                        , FlexibleInstances
                        , GeneralizedNewtypeDeriving
                        , LambdaCase
                        , OverloadedStrings
-                       , RecordWildCards
                        , ScopedTypeVariables
     build-depends:       base >= 4.8 && < 5
                        , ansi-terminal        == 0.6.*
diff --git a/src/Rules/Actions.hs b/src/Rules/Actions.hs
index 5f8f583..c69298e 100644
--- a/src/Rules/Actions.hs
+++ b/src/Rules/Actions.hs
@@ -1,4 +1,3 @@
-{-# LANGUAGE RecordWildCards #-}
 module Rules.Actions (
     build, buildWithResources, copyFile, createDirectory, removeDirectory,
     copyDirectory, moveDirectory, applyPatch, fixFile, runConfigure, runMake,
diff --git a/src/Rules/Compile.hs b/src/Rules/Compile.hs
index f62c644..c9a1bba 100644
--- a/src/Rules/Compile.hs
+++ b/src/Rules/Compile.hs
@@ -1,4 +1,3 @@
-{-# LANGUAGE RecordWildCards #-}
 module Rules.Compile (compilePackage) where
 
 import Base
diff --git a/src/Rules/Data.hs b/src/Rules/Data.hs
index f47e8d0..0e27699 100644
--- a/src/Rules/Data.hs
+++ b/src/Rules/Data.hs
@@ -1,4 +1,3 @@
-{-# LANGUAGE RecordWildCards #-}
 module Rules.Data (buildPackageData) where
 
 import qualified System.Directory as IO
diff --git a/src/Rules/Dependencies.hs b/src/Rules/Dependencies.hs
index 330c821..f2a2141 100644
--- a/src/Rules/Dependencies.hs
+++ b/src/Rules/Dependencies.hs
@@ -1,4 +1,3 @@
-{-# LANGUAGE RecordWildCards #-}
 module Rules.Dependencies (buildPackageDependencies) where
 
 import Development.Shake.Util (parseMakefile)
diff --git a/src/Rules/Documentation.hs b/src/Rules/Documentation.hs
index e3b0e7d..7e98e27 100644
--- a/src/Rules/Documentation.hs
+++ b/src/Rules/Documentation.hs
@@ -1,4 +1,3 @@
-{-# LANGUAGE RecordWildCards #-}
 module Rules.Documentation (buildPackageDocumentation) where
 
 import Base
diff --git a/src/Rules/Library.hs b/src/Rules/Library.hs
index c6d92a5..980139f 100644
--- a/src/Rules/Library.hs
+++ b/src/Rules/Library.hs
@@ -1,4 +1,3 @@
-{-# LANGUAGE RecordWildCards #-}
 module Rules.Library (
     buildPackageLibrary, buildPackageGhciLibrary, cSources, hSources
     ) where
diff --git a/src/Rules/Program.hs b/src/Rules/Program.hs
index 6eaa821..af6023d 100644
--- a/src/Rules/Program.hs
+++ b/src/Rules/Program.hs
@@ -1,4 +1,3 @@
-{-# LANGUAGE RecordWildCards #-}
 module Rules.Program (buildProgram) where
 
 import Data.Char
diff --git a/src/Rules/Register.hs b/src/Rules/Register.hs
index 85fac80..bddce8a 100644
--- a/src/Rules/Register.hs
+++ b/src/Rules/Register.hs
@@ -1,4 +1,3 @@
-{-# LANGUAGE RecordWildCards #-}
 module Rules.Register (registerPackage) where
 
 import Base



More information about the ghc-commits mailing list