diff options
| author | Alasdair Armstrong | 2017-10-06 17:56:30 +0100 |
|---|---|---|
| committer | Alasdair Armstrong | 2017-10-06 17:56:30 +0100 |
| commit | d3604c52e19e4e71965b5d96d6fab879bac7effc (patch) | |
| tree | ef79450d7038ae70072d8fb155442a778cfdc14d /src/pretty_print_lem_ast.ml | |
| parent | 6e4573f9a1ace7cba38d0cecb95b4dfe95c73c71 (diff) | |
Remove BK_effect constructor
Diffstat (limited to 'src/pretty_print_lem_ast.ml')
| -rw-r--r-- | src/pretty_print_lem_ast.ml | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/pretty_print_lem_ast.ml b/src/pretty_print_lem_ast.ml index 2c9cf83c..2e464a08 100644 --- a/src/pretty_print_lem_ast.ml +++ b/src/pretty_print_lem_ast.ml @@ -133,8 +133,7 @@ let pp_format_bkind_lem (BK_aux(k,l)) = (match k with | BK_type -> "BK_type" | BK_nat -> "BK_nat" - | BK_order -> "BK_order" - | BK_effect -> "BK_effect") ^ " " ^ + | BK_order -> "BK_order") ^ " " ^ (pp_format_l_lem l) ^ ")" let pp_lem_bkind ppf bk = base ppf (pp_format_bkind_lem bk) |