OOinfer.ml 94 Bytes
Newer Older
1
class int_cell = object
2 3 4 5
  val mutable x = 0
  method get = x
  method incr y = x <- x + y
end