snapshot

mununki · mununki · commit 326176687471 · 2022-10-09T17:33:35.000+09:00
diff --git a/lib/4.06.1/unstable/js_compiler.ml b/lib/4.06.1/unstable/js_compiler.ml
@@ -96744,7 +96744,7 @@ let translate ?output_prefix loc (cxt : Lam_compile_context.t)
 
                   let module_id, module_value =
                     match module_of_expression e.expression_desc with
-                    | [ module_name ] -> module_name
+                    | [ module_ ] -> module_
                     | _ -> assert false
                     (* TODO: graceful error message here *)
                   in
diff --git a/lib/4.06.1/unstable/js_playground_compiler.ml b/lib/4.06.1/unstable/js_playground_compiler.ml
@@ -96744,7 +96744,7 @@ let translate ?output_prefix loc (cxt : Lam_compile_context.t)
 
                   let module_id, module_value =
                     match module_of_expression e.expression_desc with
-                    | [ module_name ] -> module_name
+                    | [ module_ ] -> module_
                     | _ -> assert false
                     (* TODO: graceful error message here *)
                   in
diff --git a/lib/4.06.1/whole_compiler.ml b/lib/4.06.1/whole_compiler.ml
@@ -265938,7 +265938,7 @@ let translate ?output_prefix loc (cxt : Lam_compile_context.t)
 
                   let module_id, module_value =
                     match module_of_expression e.expression_desc with
-                    | [ module_name ] -> module_name
+                    | [ module_ ] -> module_
                     | _ -> assert false
                     (* TODO: graceful error message here *)
                   in
