Module Flow_ast.Program

type ('M, 'T) t = 'M * ('M, 'T) t'
and ('M, 'T) t' = {
  1. statements : ('M, 'T) Statement.t list;
  2. interpreter : ('M * string) option;
    (*

    interpreter directive / shebang

    *)
  3. comments : ('M, unit) Syntax.t option;
  4. all_comments : 'M Comment.t list;
}
val pp : (Format.formatter -> 'M -> unit) -> (Format.formatter -> 'T -> unit) -> Format.formatter -> ('M, 'T) t -> unit
val show : (Format.formatter -> 'M -> unit) -> (Format.formatter -> 'T -> unit) -> ('M, 'T) t -> string
val pp_t' : (Format.formatter -> 'M -> unit) -> (Format.formatter -> 'T -> unit) -> Format.formatter -> ('M, 'T) t' -> unit
val show_t' : (Format.formatter -> 'M -> unit) -> (Format.formatter -> 'T -> unit) -> ('M, 'T) t' -> string