1 % -----------------------------------------------------------------------------
2 % $Id: Dynamic.lhs,v 1.1 2001/06/28 14:15:03 simonmar Exp $
4 % (c) The University of Glasgow, 1998-2000
7 The Dynamic type is used in the Exception type, so we have to have
8 Dynamic visible here. The rest of the operations on Dynamics are
9 available in lang/Dynamic.lhs.
12 {-# OPTIONS -fno-implicit-prelude #-}
15 module GHC.Dynamic where
20 data Dynamic = Dynamic TypeRep Obj
23 -- dummy type to hold the dynamically typed value.
30 -- type constructors are
31 data TyCon = TyCon Int String
33 instance Eq TyCon where
34 (TyCon t1 _) == (TyCon t2 _) = t1 == t2