Files
why3/bench/programs/bad-typing/effect3.mlw
2018-06-15 17:08:09 +02:00

11 lines
91 B
Plaintext

module M
use ref.Ref
val a : int
val f (x:int) : unit writes { a.contents }
end