From: Simon Marlow <simonmar@microsoft.com>
Date: Wed, 25 Apr 2007 14:29:14 +0000 (+0000)
Subject: use Any as the HValue type, this should be a bit safer than forall a.a
X-Git-Tag: 2007-05-06~105
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=7ba2a2ea29171d7758d76dff2cc3e1cfb7edf8fa

use Any as the HValue type, this should be a bit safer than forall a.a
---

diff --git a/compiler/ghci/ByteCodeLink.lhs b/compiler/ghci/ByteCodeLink.lhs
index 7304d02..e8bae70 100644
--- a/compiler/ghci/ByteCodeLink.lhs
+++ b/compiler/ghci/ByteCodeLink.lhs
@@ -58,7 +58,7 @@ import GHC.Base		( writeArray#, RealWorld, Int(..), Word# )
 
 \begin{code}
 type ClosureEnv = NameEnv (Name, HValue)
-newtype HValue = HValue (forall a . a)
+newtype HValue = HValue Any
 
 emptyClosureEnv = emptyNameEnv