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

Proto: Fix warning

Browse Source
This commit is contained in:
Grégoire Henry 2018-01-26 13:19:16 +01:00
parent a30f20c4e3
commit 0c51f7a7ca
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/script_interpreter.ml
View File

@ -645,7 +645,7 @@ let rec interp
| None -> | None ->
(* we see non scripted contracts as (unit, unit) contract *) (* we see non scripted contracts as (unit, unit) contract *)
Lwt.return (ty_eq tp Unit_t |> Lwt.return (ty_eq tp Unit_t |>
record_trace (Invalid_contract (loc, destination))) >>=? fun (Eq _) -> record_trace (Invalid_contract (loc, destination))) >>=? fun Eq ->
return (ctxt, gas, origination) return (ctxt, gas, origination)
| Some script -> | Some script ->
let p = unparse_data tp p in let p = unparse_data tp p in