Skip to content

Instantly share code, notes, and snippets.

@Leonidas-from-XIV

Leonidas-from-XIV/lwt_ppx_let.ml

Last active January 2, 2022 15:10
Show Gist options
  • Save Leonidas-from-XIV/38a11ef3b96e1c84b8ff36bc9d3dc6c2 to your computer and use it in GitHub Desktop.
Save Leonidas-from-XIV/38a11ef3b96e1c84b8ff36bc9d3dc6c2 to your computer and use it in GitHub Desktop.
Download ZIP
Using Lwt with ppx_let instead of ppx_lwt
Raw
lwt_ppx_let.ml
module Let_syntax = struct
let return = Lwt.return
let (>>=) = Lwt.Infix.(>>=)
let (>>|) = Lwt.Infix.(>|=)
module Let_syntax = struct
let bind m ~f = Lwt.bind m f
end
end
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment