package atdgen

  1. Overview
  2. Docs
type position = [
  1. | `End
  2. | `Length
  3. | `Position of int
]
type value = [
  1. | `Char of char
  2. | `Int of int
]
type !'a tree = [
  1. | `Branch of (position * value) list * 'a tree
  2. | `Leaf of 'a
  3. | `Node of position * (value * 'a tree) list
]
val make_tree : (string * 'a) list -> 'a tree
type exit_with = [
  1. | `Exn of string
  2. | `Expr
]
val make_ocaml_expr_factored : ?string_id:string -> ?pos_id:string -> ?len_id:string -> ?exit_with:exit_with -> error_expr:Ag_indent.t list -> (string * Ag_indent.t list) list -> Ag_indent.t list
val make_ocaml_expr_naive : ?string_id:string -> ?pos_id:string -> ?len_id:string -> error_expr:Ag_indent.t list -> (string * Ag_indent.t list) list -> Ag_indent.t list
val make_ocaml_expr : optimized:bool -> ?string_id:string -> ?pos_id:string -> ?len_id:string -> ?exit_with:exit_with -> error_expr:Ag_indent.t list -> (string * Ag_indent.t list) list -> Ag_indent.t list
val make_ocaml_int_mapping : ?string_id:string -> ?pos_id:string -> ?len_id:string -> ?exit_with:exit_with -> error_expr1:Ag_indent.t list -> ?error_expr2:Ag_indent.t list -> ?int_id:string -> (string * Ag_indent.t list) list -> Ag_indent.t list * Ag_indent.t list
OCaml

Innovation. Community. Security.