FIX

ocsigen · Feb 29, 2024 · f78ac9f · f78ac9f
1 parent 177b030
commit f78ac9f
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/compiler/lib/js_traverse.ml b/compiler/lib/js_traverse.ml
@@ -1486,7 +1486,7 @@ class compact_vardecl =
     method private var x = insert_ <- IdentSet.add x insert_
 
     method fun_decl (k, params, body, nid) =
-      let m' = {<>} in
+      let m' = {<insert_ = IdentSet.empty>} in
       let params = m'#formal_parameter_list params in
       let body = m'#function_body body in
       let body = m'#pack body in