fix build on OCaml 4.07

was Error: Exception patterns must be at the top level of a match case. in the ocaml code that creates the preprocess stanza.
sg2342 · Mar 25, 2020 · 19f2a33 · 19f2a33
1 parent 472426d
commit 19f2a33
Showing 1 changed file with 3 additions and 2 deletions.
diff --git a/lib/dune b/lib/dune
@@ -2,8 +2,9 @@
 
 let preprocess =
   match Sys.getenv "BISECT_ENABLE" with
+  | exception _ -> ""
   | "yes" -> "(preprocess (pps bisect_ppx))"
-  | _ | exception _ -> ""
+  | _ -> ""
 
 let () = Jbuild_plugin.V1.send @@ {|
 
@@ -15,4 +16,4 @@ let () = Jbuild_plugin.V1.send @@ {|
   (synopsis "RFC6287 OCRA (OATH Challenge-Response Algorithm)")
   (libraries astring cstruct hex mirage-crypto mirage-crypto-rng mirage-crypto-pk zarith rresult))
 
-|}
+|}