wip

gares · gares · commit bcce5ef2f32d · 2023-12-08T10:36:14.000+01:00
diff --git a/.gitignore b/.gitignore
@@ -25,3 +25,4 @@ _log
 
 docs/build
 docs/source
+ppx_elpi/tests/pp.exe
diff --git a/ppx_elpi/ppx_elpi.ml b/ppx_elpi/ppx_elpi.ml
@@ -270,6 +270,7 @@ let elpi_loc_of_position (module B : Ast_builder.S) pos = let open B in
   }]
 
 let pexp_disable_warnings (module B : Ast_builder.S) x =
+  let open B in
   [%expr [%e x ][@warning "-26-27-32-39-60"]]
 
 let rec on_last f = function
diff --git a/ppx_elpi/tests/pp.exe b/ppx_elpi/tests/pp.exe
