Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Jump to bottom

Add convenience pretty printer for Either.t (added in 4.12) #10242

Merged
merged 9 commits into from
Apr 21, 2021
Merged

Add convenience pretty printer for Either.t (added in 4.12) #10242

Changes from 1 commit
Commits
Show all changes
9 commits
Select commit Hold shift + click to select a range
9229343
Add convenience pretty printer for `Either.t` (which just got added i…
Feb 20, 2021
da6f7de
error -> right
Feb 21, 2021
a09cf1b
mli for pp_print_either
Apr 20, 2021
5c1c1a8
Added since annotation
Apr 20, 2021
63f90e7
updated change log
Apr 20, 2021
9cafc55
fixed whitespace issue
Apr 20, 2021
c8f7018
reduced column length in the change log
Apr 20, 2021
98059bf
ran make alldepend
Apr 21, 2021
2f9f10b
removed whitespace
Apr 21, 2021
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Jump to
Jump to file
Failed to load files.
Diff view
Diff view
4 changes: 4 additions & 0 deletions stdlib/format.ml
View file
Open in desktop
Expand Up @@ -1237,6 +1237,10 @@ let pp_print_result ~ok ~error ppf = function
| Ok v -> ok ppf v
| Error e -> error ppf e

let pp_print_either ~left ~right ppf = function
| Either.Left l -> left ppf l
| Either.Right r -> error ppf r
ebresafegaga marked this conversation as resolved.
Show resolved Hide resolved

(**************************************************************)

let compute_tag output tag_acc =
Expand Down