From: simonpj <unknown>
Date: Mon, 15 Oct 2001 15:03:24 +0000 (+0000)
Subject: [project @ 2001-10-15 15:03:24 by simonpj]
X-Git-Tag: Approximately_9120_patches~837
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=97bef2ce356e489e1ab835c820d889b26230cfc2;p=ghc-hetmet.git

[project @ 2001-10-15 15:03:24 by simonpj]
Add comment for type of unsafeCoerce#
---

diff --git a/ghc/compiler/basicTypes/MkId.lhs b/ghc/compiler/basicTypes/MkId.lhs
index c3d3400..0e45b8f 100644
--- a/ghc/compiler/basicTypes/MkId.lhs
+++ b/ghc/compiler/basicTypes/MkId.lhs
@@ -769,6 +769,7 @@ they can unify with both unlifted and lifted types.  Hence we provide
 another gun with which to shoot yourself in the foot.
 
 \begin{code}
+-- unsafeCoerce# :: forall a b. a -> b
 unsafeCoerceId
   = pcMiscPrelId unsafeCoerceIdKey pREL_GHC SLIT("unsafeCoerce#") ty info
   where