2019-05-13 00:56:22 +04:00
|
|
|
(* Printing the AST *)
|
|
|
|
|
|
|
|
val offsets : bool ref
|
|
|
|
val mode : [`Byte | `Point] ref
|
|
|
|
|
2019-10-09 18:07:13 +04:00
|
|
|
val print_tokens : Buffer.t -> AST.t -> unit
|
|
|
|
val print_path : Buffer.t -> AST.path -> unit
|
|
|
|
val print_pattern : Buffer.t -> AST.pattern -> unit
|
|
|
|
val print_instruction : Buffer.t -> AST.instruction -> unit
|
2019-05-13 00:56:22 +04:00
|
|
|
|
2019-10-09 18:07:13 +04:00
|
|
|
val tokens_to_string : AST.t -> string
|
|
|
|
val path_to_string : AST.path -> string
|
|
|
|
val pattern_to_string : AST.pattern -> string
|
|
|
|
val instruction_to_string : AST.instruction -> string
|