diff --git a/compiler/core/lam_arity_analysis.ml b/compiler/core/lam_arity_analysis.ml
index 6e0027ca5f..a89fd459f8 100644
--- a/compiler/core/lam_arity_analysis.ml
+++ b/compiler/core/lam_arity_analysis.ml
@@ -69,7 +69,8 @@ let rec get_arity (meta : Lam_stats.t) (lam : Lam.t) : Lam_arity.t =
     with
     | Submodule subs -> subs.(m) (* TODO: shall we store it as array?*)
     | Single _ -> Lam_arity.na)
-  | Lprim {primitive = Praw_js_code {code_info = Exp (Js_function {arity})}} ->
+  | Lprim {primitive = Praw_js_code {code_info = Exp (Js_function {arity})}}
+    when false ->
     Lam_arity.info [arity] false
   | Lprim {primitive = Praise; _} -> Lam_arity.raise_arity_info
   | Lglobal_module _ (* TODO: fix me never going to happen *) | Lprim _ ->
diff --git a/compiler/core/lam_pass_collect.ml b/compiler/core/lam_pass_collect.ml
index 5f4a0d46e5..5d0cee98de 100644
--- a/compiler/core/lam_pass_collect.ml
+++ b/compiler/core/lam_pass_collect.ml
@@ -68,7 +68,8 @@ let collect_info (meta : Lam_stats.t) (lam : Lam.t) =
         {
           primitive = Praw_js_code {code_info = Exp (Js_function {arity})};
           args = _;
-        } ->
+        }
+      when false ->
       Hash_ident.replace meta.ident_tbl ident
         (FunctionId {arity = Lam_arity.info [arity] false; lambda = None})
     | Lprim {primitive = Pnull_to_opt; args = [(Lvar _ as l)]; _} ->