mirror of
https://github.com/AdaCore/why3.git
synced 2026-02-12 12:34:55 -08:00
9 lines
97 B
Plaintext
9 lines
97 B
Plaintext
|
module Debug
|
||
|
|
|
||
|
|
type t = { mutable foo: unit }
|
||
|
|
|
||
|
|
val t: t
|
||
|
|
|
||
|
|
val print (x:'a) : unit writes { t }
|
||
|
|
|
||
|
|
end
|