sig val commands : (module Command.T) list end