package pfff

  1. Overview
  2. Docs
Tools and APIs for program analysis, code visualization, refactoring

Install 

dune-project
 Dependency

github.com Edit opam file Versions (8)

Authors

  1. Y
    Yoann Padioleau <yoann.padioleau@gmail.com>

Maintainers

  1. Y
    yoann.padioleau@gmail.com

Sources

0.39.3.tar.gz
md5=4d66e9bfbc4cca184d4b6c4db8b1ecd3
sha512=d6949417711a966adb706976de6db160a1c16389c90fa7f744024a23feaadfc319be126975ddb058213340bacceb868c669ef2087cdc69fde35209456759db1f

doc/pfff-h_program-lang/Pretty_print_code/index.html

Module Pretty_print_code

exception Fail
type env = {
  1. print : string -> unit;
  2. mutable margin : int list;
  3. mutable cmargin : int;
  4. mutable line : int;
  5. mutable level : int;
  6. mutable priority : int;
  7. mutable last_nl : bool;
  8. mutable emptyl : bool;
  9. mutable failed : bool;
  10. mutable pushed : bool;
}
val empty : (string -> unit) -> env
val debug : env -> (env -> unit) -> unit
val do_nothing : 'a -> unit
val print : env -> string -> unit
val spaces : env -> unit
val newline : env -> unit
val newline_opt : env -> unit
val space_or_nl : env -> unit
val margin_offset : int ref
val push : env -> unit
val pop : env -> unit
val nest : env -> (env -> 'a) -> unit
val nest_opt : env -> (env -> unit) -> unit
val nestc : env -> (env -> 'a) -> unit
val nest_block : env -> (env -> 'a) -> unit
val nest_block_nl : env -> (env -> 'a) -> unit
val simpl_list : env -> (env -> 'a -> unit) -> string -> 'a list -> unit
val list_sep : 'a -> ('a -> 'b -> unit) -> ('a -> 'c) -> 'b list -> unit
val flat_list : env -> (env -> 'a -> unit) -> string -> 'a list -> string -> string -> unit
val nl_nested_list : env -> (env -> 'a -> unit) -> string -> 'a list -> string -> string -> unit
val fail : unit -> 'a
val try_ : env -> (env -> 'a) -> 'a
val choice_left : env -> (env -> 'a) -> (env -> 'a) -> 'a
val choice_right : env -> (env -> 'a) -> (env -> 'a) -> 'a
val try_hard : env -> (env -> 'a) -> 'a
val cut_list : env -> (env -> 'a -> unit) -> 'a list -> unit
val list : env -> (env -> 'a -> unit) -> string -> 'a list -> string -> string -> unit
val list_left : env -> (env -> 'a -> unit) -> string -> 'a list -> string -> string -> unit
val nested_arg : env -> (env -> 'a -> 'b) -> string -> 'a list -> string -> string -> unit
val fun_args : env -> (env -> 'a -> unit) -> string -> 'a list -> string -> string -> unit
val nested_list : env -> (env -> 'a -> unit) -> string -> 'a list -> string -> string -> bool -> unit
val fun_params : env -> (env -> 'a -> unit) -> 'a list -> unit
val paren : int -> env -> (env -> unit) -> unit
val char_is_space : char -> bool
val is_space : string -> int -> bool
val is_only_space : string -> int -> bool
val strip : string -> string
val space : char -> bool
val find_cut : string -> int -> int -> int
val string : string -> string -> env -> string -> unit
val first_char_escape : env -> string -> int
val print_text : env -> string -> unit