summaryrefslogtreecommitdiff
path: root/bytecomp/bytepackager.ml
diff options
context:
space:
mode:
Diffstat (limited to 'bytecomp/bytepackager.ml')
-rw-r--r--bytecomp/bytepackager.ml2
1 files changed, 2 insertions, 0 deletions
diff --git a/bytecomp/bytepackager.ml b/bytecomp/bytepackager.ml
index 8ba2f5321f..9c9c1b842f 100644
--- a/bytecomp/bytepackager.ml
+++ b/bytecomp/bytepackager.ml
@@ -182,6 +182,8 @@ let build_global_target oc target_name members mapping pos coercion =
let lam =
Translmod.transl_package
components (Ident.create_persistent target_name) coercion in
+ if !Clflags.dump_lambda then
+ Format.printf "%a@." Printlambda.lambda lam;
let instrs =
Bytegen.compile_implementation target_name lam in
let rel =