Skip to content

Instantly share code, notes, and snippets.

@exarkun
Created May 2, 2018 13:52
Show Gist options
  • Save exarkun/6a8c88eb1d38214e11abfd5490b72154 to your computer and use it in GitHub Desktop.
Save exarkun/6a8c88eb1d38214e11abfd5490b72154 to your computer and use it in GitHub Desktop.
let run_loop main =
Pervasives.print_string "reading program\n";
let instructions = read_line () in
Pervasives.print_string "read program\n";
let open Tezos_error_monad.Error_monad in
Pervasives.print_string "running program\n";
main instructions >>=? fun () ->
return ()
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment