package melange

  1. Overview
  2. Docs

Module Switch.CaseSource

Sourcetype ('M, 'T) t = 'M * ('M, 'T) t'
Sourceand ('M, 'T) t' = {
  1. test : ('M, 'T) Expression.t option;
  2. case_test_loc : 'M option;
  3. consequent : ('M, 'T) Statement.t list;
  4. comments : ('M, unit) Syntax.t option;
}
Sourceval pp : (Format.formatter -> 'M -> unit) -> (Format.formatter -> 'T -> unit) -> Format.formatter -> ('M, 'T) t -> unit
Sourceval show : (Format.formatter -> 'M -> unit) -> (Format.formatter -> 'T -> unit) -> ('M, 'T) t -> string
Sourceval pp_t' : (Format.formatter -> 'M -> unit) -> (Format.formatter -> 'T -> unit) -> Format.formatter -> ('M, 'T) t' -> unit
Sourceval show_t' : (Format.formatter -> 'M -> unit) -> (Format.formatter -> 'T -> unit) -> ('M, 'T) t' -> string