sig
val
get : unit
->
int
val
set : int
->
unit
end