1

假设我有一个构造一对Nums 的哑弗雷格函数。

newPair :: (Num α, Num β) => α -> β -> (α, β)
newPair = (,)
-- alternatively -- newPair x y = (x, y)

但是,尝试从 Java 调用此函数时,除了预期的and之外,还需要 aPreludeBase.CNum<α>和 a 。与类型类似,其中PreludeBase.CNum<β>Lazy<α>Lazy<β>Show

showSomething :: (Show α) => α -> String
showSomething = show
-- alternatively -- showSomething x = show x

需要一个PreludeBase.CShow<α>除了预期的参数之外,

将受约束的 Frege 对象传入和传出 Java 的正确方法是什么?

4

1 回答 1

2

好问题,因为这还没有在 wiki 中解释。

在所有情况下,我建议使用

:java

REPL 中的命令。例如:

frege> newPair 1 2.3
frege> :java

然后,您将获得一个窗口,其中包含与此调用相对应的所有活动定义。一个简单的文本搜索可以帮助找到newPair被调用的地方。在大多数情况下,这应该有助于解决此类问题。

在您的情况下,相关部分如下所示:

Console.<Integer, Double>numPair(
   PreludeBase.INum_Int.it, 
   PreludeBase.IReal_Double.it, 
   Thunk.<Integer>lazy(1), 
   Thunk.<Double>lazy(2.3))

下面是关于如何命名类型类和实例以及如何获取它们的简短概述。

module x.y.Z where
    class Xable where ...

这将产生一个具有完全限定名称的 Java 接口

x.y.Z.CXable

和这个:

module a.b.C where
    import x.y.Z
    data MyType ... = ....
    instance Xable MyType where ...

导致某些课程

a.b.C.IXable_MyType  /* implements CXable<TMyType> */

如果您的实例定义本身没有约束,那么您可以使用一个单例实例。

a.b.C.IXable_MyType.it

否则,您需要通过将所有约束作为参数传递给构造函数来构造一个新实例。例如,Show 实例

Maybe Int

看起来像这样:

new IShow_Maybe(IShow_Int.it)

因为实例头列出了 Maybe 元素类型的约束:

instance Show a => Show (Maybe a)

请注意,您需要完全了解实际类型,不能创建泛型类型类实例。这在 Frege 本身从来不是问题,因为所有需要的实例都从调用者传递给多态函数。但是,就目前而言,我们在本机函数中没有约束。

如果您需要这样的东西,在大多数情况下,您只需将要调用的函数作为参数传递即可实现该功能。

例如,这不起作用:

pure native myMethod :: Show a => a -> ...

但这应该:

pure native myMethod :: (a -> String) -> a -> ....
myMethod show (Just 47)

上面的示例 java 代码也表明它并不总是像描述的​​那样简单。例如,碰巧该Double类型没有单独的Num实例,而只有一个RealNum. 不幸的是,只有编译器知道某些类型实际存在哪些实例,哪些实例是隐式的,即由子类的实例提供。同样,REPL 是找出这一点的最佳方法。

于 2016-05-17T16:23:46.690 回答