Alpha: remove non-used errors
This commit is contained in:
parent
5afcdb327f
commit
59cdbd3ef1
@ -221,5 +221,3 @@ let encoding =
|
||||
(fun { fixed ; parametric } -> (fixed, parametric))
|
||||
(fun (fixed , parametric) -> { fixed ; parametric })
|
||||
(merge_objs fixed_encoding parametric_encoding)
|
||||
|
||||
type error += Constant_read of exn
|
||||
|
@ -9,9 +9,7 @@
|
||||
|
||||
open Alpha_context
|
||||
|
||||
type error +=
|
||||
| Cannot_parse_operation (* `Branch *)
|
||||
| Cant_parse_block_header
|
||||
type error += Cannot_parse_operation (* `Branch *)
|
||||
|
||||
let () =
|
||||
register_error_kind
|
||||
|
@ -9,9 +9,7 @@
|
||||
|
||||
open Alpha_context
|
||||
|
||||
type error +=
|
||||
| Cannot_parse_operation (* `Branch *)
|
||||
| Cant_parse_block_header
|
||||
type error += Cannot_parse_operation (* `Branch *)
|
||||
|
||||
val current_level:
|
||||
'a #RPC_context.simple ->
|
||||
|
Loading…
Reference in New Issue
Block a user