c6b95bf07a
- do not use plain JSON rep for errors and use polymorphic variants instead - split formatting for human readable and JSON output - no more simple_errors simple_fails - much less result bindings used in stages
10 lines
212 B
OCaml
10 lines
212 B
OCaml
type failwith =
|
|
| Failwith_int of int
|
|
| Failwith_string of string
|
|
| Failwith_bytes of bytes
|
|
|
|
type 'a runned_result =
|
|
| Success of 'a
|
|
| Fail of failwith
|
|
|
|
type check_type = Check_parameter | Check_storage |