CR: Update compiler/lib/driver.ml

Co-authored-by: hhugo <[email protected]>
ocsigen · Dec 19, 2024 · c4e594f · c4e594f
1 parent dded0e8
commit c4e594f
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/compiler/lib/driver.ml b/compiler/lib/driver.ml
@@ -99,7 +99,7 @@ let map_fst f (x, y, z) = f x, y, z
 
 let effects ~deadcode_sentinal p =
   match Config.effects () with
-  | Some (_ as effects) ->
+  | Some effects ->
       if debug () then Format.eprintf "Effects...@.";
       let p, live_vars = Deadcode.f p in
       let p = Effects.remove_empty_blocks ~live_vars p in