Source file Cmd.ml

1
2
type 'msg t = None | Msg of 'msg
let none = None