balsoft/ligo
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Storage: add omitted case to storage_error_encoding

Browse Source
This commit is contained in:
Milo Davis 2018-01-10 13:46:51 -05:00 committed by Grégoire
parent 525b09259f
commit b8063b40fe
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/lib_embedded_protocol_alpha/src/raw_context.ml
View File

@ -55,7 +55,7 @@ let storage_error_encoding =
case (Tag 1)
(obj2
(req "missing_key" (list string))
(req "function" (string_enum ["get", `Get ; "set", `Set])))
(req "function" (string_enum ["get", `Get ; "set", `Set ; "del", `Del ])))
(function Missing_key (key, f) -> Some (key, f) | _ -> None)
(fun (key, f) -> Missing_key (key, f)) ;
case (Tag 2)