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))
|
||||||
(fun (fixed , parametric) -> { fixed ; parametric })
|
(fun (fixed , parametric) -> { fixed ; parametric })
|
||||||
(merge_objs fixed_encoding parametric_encoding)
|
(merge_objs fixed_encoding parametric_encoding)
|
||||||
|
|
||||||
type error += Constant_read of exn
|
|
||||||
|
@ -9,9 +9,7 @@
|
|||||||
|
|
||||||
open Alpha_context
|
open Alpha_context
|
||||||
|
|
||||||
type error +=
|
type error += Cannot_parse_operation (* `Branch *)
|
||||||
| Cannot_parse_operation (* `Branch *)
|
|
||||||
| Cant_parse_block_header
|
|
||||||
|
|
||||||
let () =
|
let () =
|
||||||
register_error_kind
|
register_error_kind
|
||||||
|
@ -9,9 +9,7 @@
|
|||||||
|
|
||||||
open Alpha_context
|
open Alpha_context
|
||||||
|
|
||||||
type error +=
|
type error += Cannot_parse_operation (* `Branch *)
|
||||||
| Cannot_parse_operation (* `Branch *)
|
|
||||||
| Cant_parse_block_header
|
|
||||||
|
|
||||||
val current_level:
|
val current_level:
|
||||||
'a #RPC_context.simple ->
|
'a #RPC_context.simple ->
|
||||||
|
Loading…
Reference in New Issue
Block a user