Sexp_diff_kernel.DisplaySourcedisplay_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) ->
stringdisplay_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