summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorFacundo Domínguez <facundo.dominguez@tweag.io>2014-12-22 19:20:11 -0200
committerFacundo Domínguez <facundo.dominguez@tweag.io>2014-12-22 19:20:28 -0200
commit1da2c0fcd1f9f00e25bed8a8abcc81e3f5b1de04 (patch)
treeb768a31253177d087cfec46a0443e3e3c5743ddc
parentc72f61c6d4dd779d61bd0ebc0b1211a84c5b9038 (diff)
downloadhaskell-1da2c0fcd1f9f00e25bed8a8abcc81e3f5b1de04.tar.gz
fix spInfoSrcLoc field name
Reviewed By: austin Differential Revision: https://phabricator.haskell.org/D574
-rw-r--r--libraries/base/GHC/StaticPtr.hs4
-rw-r--r--testsuite/tests/deSugar/should_run/DsStaticPointers.stdout10
2 files changed, 7 insertions, 7 deletions
diff --git a/libraries/base/GHC/StaticPtr.hs b/libraries/base/GHC/StaticPtr.hs
index b92b843989..b58564e1d2 100644
--- a/libraries/base/GHC/StaticPtr.hs
+++ b/libraries/base/GHC/StaticPtr.hs
@@ -24,7 +24,7 @@
--
-- To solve such concern, the references provided by this module offer a key
-- that can be used to locate the values on each process. Each process maintains
--- a global and inmutable table of references which can be looked up with a
+-- a global and immutable table of references which can be looked up with a
-- given key. This table is known as the Static Pointer Table. The reference can
-- then be dereferenced to obtain the value.
--
@@ -88,7 +88,7 @@ data StaticPtrInfo = StaticPtrInfo
, spInfoName :: String
-- | Source location of the definition of the static pointer as a
-- @(Line, Column)@ pair.
- , spIntoSrcLoc :: (Int, Int)
+ , spInfoSrcLoc :: (Int, Int)
}
deriving (Show, Typeable)
diff --git a/testsuite/tests/deSugar/should_run/DsStaticPointers.stdout b/testsuite/tests/deSugar/should_run/DsStaticPointers.stdout
index 55ec658828..b9d683e712 100644
--- a/testsuite/tests/deSugar/should_run/DsStaticPointers.stdout
+++ b/testsuite/tests/deSugar/should_run/DsStaticPointers.stdout
@@ -1,5 +1,5 @@
-StaticPtrInfo {spInfoPackageId = "main", spInfoModuleName = "Main", spInfoName = "sptEntry:1", spIntoSrcLoc = (10,32)}
-StaticPtrInfo {spInfoPackageId = "main", spInfoModuleName = "Main", spInfoName = "sptEntry:2", spIntoSrcLoc = (11,33)}
-StaticPtrInfo {spInfoPackageId = "main", spInfoModuleName = "Main", spInfoName = "sptEntry:0", spIntoSrcLoc = (21,13)}
-StaticPtrInfo {spInfoPackageId = "main", spInfoModuleName = "Main", spInfoName = "sptEntry:3", spIntoSrcLoc = (13,33)}
-StaticPtrInfo {spInfoPackageId = "main", spInfoModuleName = "Main", spInfoName = "sptEntry:4", spIntoSrcLoc = (14,33)}
+StaticPtrInfo {spInfoPackageId = "main", spInfoModuleName = "Main", spInfoName = "sptEntry:1", spInfoSrcLoc = (10,32)}
+StaticPtrInfo {spInfoPackageId = "main", spInfoModuleName = "Main", spInfoName = "sptEntry:2", spInfoSrcLoc = (11,33)}
+StaticPtrInfo {spInfoPackageId = "main", spInfoModuleName = "Main", spInfoName = "sptEntry:0", spInfoSrcLoc = (21,13)}
+StaticPtrInfo {spInfoPackageId = "main", spInfoModuleName = "Main", spInfoName = "sptEntry:3", spInfoSrcLoc = (13,33)}
+StaticPtrInfo {spInfoPackageId = "main", spInfoModuleName = "Main", spInfoName = "sptEntry:4", spInfoSrcLoc = (14,33)}