diff options
| author | Vikraman Choudhury <git@vikraman.org> | 2015-05-06 07:46:28 -0500 |
|---|---|---|
| committer | Austin Seipp <austin@well-typed.com> | 2015-05-06 08:02:39 -0500 |
| commit | 6f31e975aa571daeb5568cafbf8e468545d4ad4f (patch) | |
| tree | 55ec7028b3500659708d1238832feea42b10facf | |
| parent | 354f5063bac6a91d06f5e37777d594b3140dc668 (diff) | |
| download | haskell-6f31e975aa571daeb5568cafbf8e468545d4ad4f.tar.gz | |
Fix typo: identifer -> identifier
I noticed this typo while using template haskell.
Signed-off-by: Vikraman Choudhury <git@vikraman.org>
Test Plan:
```
λ> :set -XTemplateHaskell
λ> :m +Language.Haskell.TH
λ> data Foo = Foo
λ> $(conE ''Foo)
<interactive>:9:9:
Type constructor ‘Foo’ used where a value identifier was expected
In the expression: Foo
In an equation for ‘f’: f = Foo
```
Reviewed By: bgamari
Differential Revision: https://phabricator.haskell.org/D871
(cherry picked from commit 458a97b86ad154812d08e0fe3548b88ac8412b4f)
Conflicts:
testsuite/tests/rename/should_compile/rn040.hs
| -rw-r--r-- | compiler/typecheck/TcExpr.hs | 2 | ||||
| -rw-r--r-- | testsuite/tests/rename/should_compile/rn040.hs | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/compiler/typecheck/TcExpr.hs b/compiler/typecheck/TcExpr.hs index 360cd085d4..0adeea47e0 100644 --- a/compiler/typecheck/TcExpr.hs +++ b/compiler/typecheck/TcExpr.hs @@ -1114,7 +1114,7 @@ tc_infer_id orig id_name PatSynCon ps -> tcPatSynBuilderOcc orig ps _ -> failWithTc $ - ppr thing <+> ptext (sLit "used where a value identifer was expected") } + ppr thing <+> ptext (sLit "used where a value identifier was expected") } where inst_normal_id id = do { (wrap, rho) <- deeplyInstantiate orig (idType id) diff --git a/testsuite/tests/rename/should_compile/rn040.hs b/testsuite/tests/rename/should_compile/rn040.hs index 3b418f5c2f..2765b13380 100644 --- a/testsuite/tests/rename/should_compile/rn040.hs +++ b/testsuite/tests/rename/should_compile/rn040.hs @@ -1,7 +1,7 @@ {-# OPTIONS -fwarn-unused-binds #-}
module ShouldCompile where
--- !!! should produce warnings about unused identifers
+-- !!! should produce warnings about unused identifiers
x :: [()]
x = [ () | y <- [] ]
|