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_sail.ml | |
| parent | 6e4573f9a1ace7cba38d0cecb95b4dfe95c73c71 (diff) | |
Remove BK_effect constructor
Diffstat (limited to 'src/pretty_print_sail.ml')
| -rw-r--r-- | src/pretty_print_sail.ml | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/pretty_print_sail.ml b/src/pretty_print_sail.ml index ce887f72..99263bc7 100644 --- a/src/pretty_print_sail.ml +++ b/src/pretty_print_sail.ml @@ -53,8 +53,7 @@ let doc_bkind (BK_aux(k,_)) = string (match k with | BK_type -> "Type" | BK_nat -> "Nat" - | BK_order -> "Order" - | BK_effect -> "Effect") + | BK_order -> "Order") let doc_kind (K_aux(K_kind(klst),_)) = separate_map (spaces arrow) doc_bkind klst |