[commit: ghc] wip/nfs-locking: Whitespace only (325db89)

git at git.haskell.org git at git.haskell.org
Fri Oct 27 01:10:41 UTC 2017


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

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

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

commit 325db89df96215ee0897187972197372e2ef34b9
Author: Andrey Mokhov <andrey.mokhov at gmail.com>
Date:   Sun Oct 16 00:45:17 2016 +0100

    Whitespace only


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

325db89df96215ee0897187972197372e2ef34b9
 src/Oracles/PackageData.hs | 68 +++++++++++++++++++++++-----------------------
 1 file changed, 34 insertions(+), 34 deletions(-)

diff --git a/src/Oracles/PackageData.hs b/src/Oracles/PackageData.hs
index 84d552f..55ea812 100644
--- a/src/Oracles/PackageData.hs
+++ b/src/Oracles/PackageData.hs
@@ -13,23 +13,23 @@ data PackageData = BuildGhciLib FilePath
                  | Synopsis     FilePath
                  | Version      FilePath
 
-data PackageDataList = CcArgs             FilePath
-                     | CSrcs              FilePath
-                     | CppArgs            FilePath
-                     | DepCcArgs          FilePath
-                     | DepExtraLibs       FilePath
-                     | DepIds             FilePath
-                     | DepIncludeDirs     FilePath
-                     | DepLdArgs          FilePath
-                     | DepLibDirs         FilePath
-                     | DepNames           FilePath
-                     | Deps               FilePath
-                     | HiddenModules      FilePath
-                     | HsArgs             FilePath
-                     | IncludeDirs        FilePath
-                     | LdArgs             FilePath
-                     | Modules            FilePath
-                     | SrcDirs            FilePath
+data PackageDataList = CcArgs         FilePath
+                     | CSrcs          FilePath
+                     | CppArgs        FilePath
+                     | DepCcArgs      FilePath
+                     | DepExtraLibs   FilePath
+                     | DepIds         FilePath
+                     | DepIncludeDirs FilePath
+                     | DepLdArgs      FilePath
+                     | DepLibDirs     FilePath
+                     | DepNames       FilePath
+                     | Deps           FilePath
+                     | HiddenModules  FilePath
+                     | HsArgs         FilePath
+                     | IncludeDirs    FilePath
+                     | LdArgs         FilePath
+                     | Modules        FilePath
+                     | SrcDirs        FilePath
 
 newtype PackageDataKey = PackageDataKey (FilePath, String)
     deriving (Binary, Eq, Hashable, NFData, Show, Typeable)
@@ -55,23 +55,23 @@ pkgData packageData = case packageData of
 -- @pkgListData Modules@ therefore returns ["Data.Array", "Data.Array.Base", ...]
 pkgDataList :: PackageDataList -> Action [String]
 pkgDataList packageData = fmap (map unquote . words) $ case packageData of
-    CcArgs             path -> askPackageData path "CC_OPTS"
-    CSrcs              path -> askPackageData path "C_SRCS"
-    CppArgs            path -> askPackageData path "CPP_OPTS"
-    DepCcArgs          path -> askPackageData path "DEP_CC_OPTS"
-    DepExtraLibs       path -> askPackageData path "DEP_EXTRA_LIBS"
-    DepIds             path -> askPackageData path "DEP_IPIDS"
-    DepIncludeDirs     path -> askPackageData path "DEP_INCLUDE_DIRS_SINGLE_QUOTED"
-    DepLibDirs         path -> askPackageData path "DEP_LIB_DIRS_SINGLE_QUOTED"
-    DepLdArgs          path -> askPackageData path "DEP_LD_OPTS"
-    DepNames           path -> askPackageData path "DEP_NAMES"
-    Deps               path -> askPackageData path "DEPS"
-    HiddenModules      path -> askPackageData path "HIDDEN_MODULES"
-    HsArgs             path -> askPackageData path "HC_OPTS"
-    IncludeDirs        path -> askPackageData path "INCLUDE_DIRS"
-    LdArgs             path -> askPackageData path "LD_OPTS"
-    Modules            path -> askPackageData path "MODULES"
-    SrcDirs            path -> askPackageData path "HS_SRC_DIRS"
+    CcArgs         path -> askPackageData path "CC_OPTS"
+    CSrcs          path -> askPackageData path "C_SRCS"
+    CppArgs        path -> askPackageData path "CPP_OPTS"
+    DepCcArgs      path -> askPackageData path "DEP_CC_OPTS"
+    DepExtraLibs   path -> askPackageData path "DEP_EXTRA_LIBS"
+    DepIds         path -> askPackageData path "DEP_IPIDS"
+    DepIncludeDirs path -> askPackageData path "DEP_INCLUDE_DIRS_SINGLE_QUOTED"
+    DepLibDirs     path -> askPackageData path "DEP_LIB_DIRS_SINGLE_QUOTED"
+    DepLdArgs      path -> askPackageData path "DEP_LD_OPTS"
+    DepNames       path -> askPackageData path "DEP_NAMES"
+    Deps           path -> askPackageData path "DEPS"
+    HiddenModules  path -> askPackageData path "HIDDEN_MODULES"
+    HsArgs         path -> askPackageData path "HC_OPTS"
+    IncludeDirs    path -> askPackageData path "INCLUDE_DIRS"
+    LdArgs         path -> askPackageData path "LD_OPTS"
+    Modules        path -> askPackageData path "MODULES"
+    SrcDirs        path -> askPackageData path "HS_SRC_DIRS"
   where
     unquote = dropWhile (== '\'') . dropWhileEnd (== '\'')
 



More information about the ghc-commits mailing list