package sexp_diff

  1. Overview
  2. Docs
module Display_options : sig ... end
val display_as_plain_string : Display_options.t -> Diff.t -> string

display_as_plain_string displays the diff as a string. Here is a possible output of this function:

               (                         (
              - (apple 123)             + (apricot 321)
                (banana 1000)             (banana 1000)
                (banana 1000)             (banana 1000)
                (banana 1000)             (banana 1000)
                          ...6 unchanged lines...
                (banana 1000)             (banana 1000)
                (banana 1000)             (banana 1000)
                (banana 1000)             (banana 1000)
                                        + (durian 1234)
                (carrot                   (carrot
              -  -1                     +  42
                ))                        ))

As you can see, deletions are marked by '-' and additions are marked by '+'.

val display_as_string_with_custom_formatting : Display_options.t -> Diff.t -> green:(string -> string) -> red:(string -> string) -> plain:(string -> string) -> string
val display_with_ansi_colors : Display_options.t -> Diff.t -> string

display_with_ansi_colors displays the same string as display_as_plain_string, but deletions and additions are marked by red and green text rather than '-' and '+'.

val two_column_display_as_list : ?display_options:Display_util_internal.Display_options.t -> Diff.t -> on_full_width_message:(string -> width:int -> 'a) -> on_line_pair: (left:Display_util_internal.Line.t -> right:Display_util_internal.Line.t -> left_padding:string -> right_padding:string -> 'a) -> 'a list