output.ml
patdiff
patdiff.expect_test_patdiff
patdiff.kernel
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 open! Core open! Import include Output_intf type t = | Ansi | Ascii | Html [@@deriving compare, sexp] let implies_unrefined t = match t with | Ansi | Html -> false | Ascii -> true ;;
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
open! Core open! Import include Output_intf type t = | Ansi | Ascii | Html [@@deriving compare, sexp] let implies_unrefined t = match t with | Ansi | Html -> false | Ascii -> true ;;