immutability - 埃菲尔的不可变类

Question

我正在尝试POINT在 Eiffel 中创建一个不可变的类。下面的代码是否定义了一个？和字段的{NONE}可访问性就足够了吗？我可以为类不变量写一些东西吗，或者我怎样才能实现不变性？xyx = x'

class POINT
    create
        make
    feature {NONE}
        x: DOUBLE
        y: DOUBLE
    feature
        make (x_: DOUBLE; y_: DOUBLE)
        do
            x := x_
            y := y_
        ensure
            set: x = x_ and y = y_
        end

    feature --accessors
        get_x: DOUBLE
        do
            Result := x
        ensure
            Result = x
        end
    end

Answer 1

Eiffel 不允许其客户更改类的属性。例如，以下代码被拒绝：

p: POINT
...
p.x := 5.0

因此，不需要提供 getter（就像在其他一些语言中一样）。您可以只使用p.x已x充分导出到客户端类的提供。因此，您的示例代码可以简化为

class POINT
create
   make
feature -- Access
   x: DOUBLE
   y: DOUBLE
feature {NONE} -- Creation
   make (x0: DOUBLE; y0: DOUBLE)
      -- Initialize object with `x0' and `y0'.
   do
      x := x0
      y := y0
   ensure
      set: x = x0 and y = y0
   end
end

请注意，创建过程不再导出，否则可以将其用作普通（即非创建）例程并更改属性，即我们可以执行以下操作

create p.make (1, 1)
p.make (2, 3)
print (p)

这将打印(2, 3)，即您将能够更改原始对象的值p，使其可变。

虽然，现在不能直接更改属性，但仍然可以copy在类型对象上调用 featurePOINT并更改整个对象。如果您也想避免这种情况，可以在类中重新定义该功能POINT以引发异常，甚至有一个后置条件False导致运行时为您引发异常：

copy (other: like Current)
      -- <Precursor>
   do
      (create {EXCEPTIONS}).raise ("Attempt to change an immutable object.")
   ensure then
      is_allowed: False
   end