6

是否可以按如下方式实现类型类:

class SomeClass e where
    isEq :: (SomeClass e') => e -> e' -> Bool

当和都是这个类型类的同一个实例时,哪里isEq x y会返回true ?xy

上下文:这是进行运行时类型测试的隐蔽尝试。起初我读到 Haskell 具有类型擦除功能,但我也读到了最近对 GHC 的扩展,其中包含一些运行时信息。

编辑:对于那些想知道我的用例的人......我一直在使用类型级编程来确保我的一些 ADT 的某些属性,即涉及资源使用。这些资源由不同的类型表示(资源锁相应地在类型级别实现)。

我正在尝试编写一个需要识别资源写入/读取的优化过程。但是由于我的所有资源都由不同的单例表示,其唯一的共同因素(除了所有值都是底部)是将它们组合在一起的类型类。

简而言之,我想在运行时值级别使用我的类型级别编程的结果。

4

1 回答 1

15

正如 Karolis Juodelė 所暗示的那样,您可以这样做Data.Typeable

Prelude Data.Typeable> :{
Prelude Data.Typeable| let isEq :: (Typeable a , Typeable b) => a -> b -> Bool
Prelude Data.Typeable|     isEq x y = typeOf x == typeOf y
Prelude Data.Typeable| :}
Prelude Data.Typeable> isEq True ()
False
Prelude Data.Typeable> isEq True False
True

问题是:为什么你在运行时不知道类型是什么,然后你为什么要关心它们是否相等——你能详细说明你的用例吗?

于 2013-01-24T10:23:38.290 回答