如何访问OCaml中的对象字段？

Question

我在OCaml中创建了一个point类，包含一对int和set方法：

# class point (x : int) (y : int) =
  object
    val mutable x = x
    val mutable y = y
    method set x' y' = x <- x'; y  <- y'
  end;;

class point : 
  int -> 
  int -> 
  object 
    val mutable x : int 
    val mutable y : int 
    method set : int -> int -> unit
  end

然后我实例化了一个观点：

# let p = new point 1 2;;

val p : point = <obj>

但我无法访问其字段：

# p#x;;
Error: This expression has type point
       It has no method x

# p.x;;
Error: Unbound record field x

如何访问对象的字段？

请注意，OCaml manual确实提到了私有方法，但没有提到字段是私有还是公共字段。并且，与私有方法不同，字段确实出现在类签名中，就好像它们是公共的一样。

Answer 1

对象的字段是私有的。您需要公开一个访问器方法以从外部访问它们。