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

Client: fix command get script code

Browse Source
This commit is contained in:
Benjamin Canou 2018-06-28 13:20:22 +02:00
parent 9da9a8440e
commit 005517e849
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/proto_alpha/lib_client_commands/client_proto_context_commands.ml
View File

@ -131,9 +131,9 @@ let commands () =
| Some { code ; storage = _ } -> | Some { code ; storage = _ } ->
match Script.force_decode code with match Script.force_decode code with
| Error errs -> cctxt#error "%a" (Format.pp_print_list ~pp_sep:Format.pp_print_newline Alpha_environment.Error_monad.pp) errs | Error errs -> cctxt#error "%a" (Format.pp_print_list ~pp_sep:Format.pp_print_newline Alpha_environment.Error_monad.pp) errs
| Ok code -> | Ok (code, _) ->
begin cctxt#answer "%a" Michelson_v1_printer.print_expr_unwrapped code >>= fun () -> begin cctxt#answer "%a" Michelson_v1_printer.print_expr_unwrapped code >>= fun () ->
return () return_unit
end end
end ; end ;