Typo, spotted by Stefan Holdermans

ffd34380 · Ian Lynagh · 24509440 · ffd34380
Commit ffd34380 authored Jun 05, 2007 by Ian Lynagh
--- a/compiler/typecheck/TcPat.lhs
+++ b/compiler/typecheck/TcPat.lhs
@@ -955,7 +955,7 @@ badTypePat pat = ptext SLIT("Illegal type pattern") <+> ppr pat

 lazyPatErr pat tvs
  = failWithTc $
-    hang (ptext SLIT("A lazy (~) pattern connot bind existential type variables"))
+    hang (ptext SLIT("A lazy (~) pattern cannot bind existential type variables"))
       2 (vcat (map pprSkolTvBinding tvs))

 nonRigidMatch con