[commit: ghc] type-nats-simple: Fix typo in declaration of exponentiation constructor. (a4d2162)

[git at git.haskell.org]

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

On branch  : type-nats-simple
Link       : http://ghc.haskell.org/trac/ghc/changeset/a4d2162182483143b1baf6855a84695597f22a9b/ghc

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

commit a4d2162182483143b1baf6855a84695597f22a9b
Author: Iavor S. Diatchki <iavor.diatchki at gmail.com>
Date:   Sat Sep 7 13:04:48 2013 -0700

    Fix typo in declaration of exponentiation constructor.


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

a4d2162182483143b1baf6855a84695597f22a9b
 compiler/typecheck/TcTypeNats.hs |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/compiler/typecheck/TcTypeNats.hs b/compiler/typecheck/TcTypeNats.hs
index 2061350..289b0e8 100644
--- a/compiler/typecheck/TcTypeNats.hs
+++ b/compiler/typecheck/TcTypeNats.hs
@@ -65,7 +65,7 @@ typeNatExpTyCon = mkTypeNatFunTyCon2 name
     , sfInteractInert = sfInteractInert trivialBuiltInFamily
     }
   where
-  name = mkWiredInTyConName UserSyntax gHC_TYPELITS (fsLit "*")
+  name = mkWiredInTyConName UserSyntax gHC_TYPELITS (fsLit "^")
                 typeNatExpTyFamNameKey typeNatExpTyCon
 
 -- Make a binary built-in constructor of kind: Nat -> Nat -> Nat