diff options
Diffstat (limited to 'bytecomp/bytepackager.ml')
-rw-r--r-- | bytecomp/bytepackager.ml | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/bytecomp/bytepackager.ml b/bytecomp/bytepackager.ml index 3348f46dcd..05ebac9aad 100644 --- a/bytecomp/bytepackager.ml +++ b/bytecomp/bytepackager.ml @@ -222,9 +222,10 @@ let package_object_files ppf files targetfile targetname coercion = targetname Subst.identity members in build_global_target oc targetname members mapping ofs coercion; let pos_debug = pos_out oc in - if !Clflags.debug && !events <> [] then + if !Clflags.debug && !events <> [] then begin output_value oc (List.rev !events); output_value oc (StringSet.elements !debug_dirs); + end; let pos_final = pos_out oc in let imports = List.filter |