sig
type
'
a t =
'
a
Staged
.t
val
stage :
'
a
->
'
a t
val
unstage :
'
a t
->
'
a
end