Created by orbitzN 2016-04-03 View revision File foo.ml Added Side-by-side diff More Ignore whitespace Hide word diff +open Abb_fut.Infix + +let main () = + let p1 = Abb_fut.Promise.create () in + ignore (Abb_fut.Promise.future p1 >>| (Printf.printf "Hi, %s\n")); + Abb_fut.Promise.set p1 "You" + +let () = main ()