package mpp

  1. Overview
  2. Docs
exception Exit of int
val exit : int -> 'a
val open_token : string ref
val close_token : string ref
val open_nesting_token : string ref
val close_nesting_token : string ref
val endline_comments_token : string ref
val open_comments_token : string ref
val close_comments_token : string ref
val open_foreign_token : string ref
val open_foreign_token_no_location : string ref
val close_foreign_token : string ref
val target_language_location_handler : (?filename:string -> int -> string) ref
val cpp_location_handler : ?filename:string -> int -> string
val target_language_location_handlers : (string * (?filename:string -> int -> string)) list
val list_target : unit -> 'a
val set_target_language_location_handler : string -> unit
val newline_chars : Mpp_charset.t
val space_chars : Mpp_charset.t
val blank_chars : Mpp_charset.t
type foreign_block_description = {
  1. name : string;
  2. command : string;
  3. suffix : string;
  4. print : string -> string;
  5. char_escape : char -> string;
  6. string_escape : string -> string;
  7. force_line_number : ?filename:string -> int -> string;
}

foreign blocks

val bash_string_escape : string -> string
val php_string_escape : string -> string
val perl_string_escape : string -> string
val foreign_blocks : foreign_block_description list
val default_foreign_block : foreign_block_description
val set_foreign : string -> unit
val list_foreign : unit -> 'a