From e79b17fddf70b4c96a2981be9986a5b9c2900750 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Georges=20Dup=C3=A9ron?= <georges.duperon@nomadic-labs.com>
Date: Fri, 19 Apr 2019 12:34:48 +0200
Subject: [PATCH] Defined Open_on_rhs_bind module for new ppx_let

---
 src/lib_utils/trace.ml | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/lib_utils/trace.ml b/src/lib_utils/trace.ml
index d76c61c32..4afc46b80 100644
--- a/src/lib_utils/trace.ml
+++ b/src/lib_utils/trace.ml
@@ -76,6 +76,7 @@ let (>>|?) = apply
 
 module Let_syntax = struct
   let bind m ~f = m >>? f
+  module Open_on_rhs_bind = struct end
 end
 
 let trace_strong err = function