Merge pull request #8988 from Octachron/fix_ocamlnat

Fix ocamlnat
2019-09-27 17:15:26 +02:00 · 2019-09-27 17:15:26 +02:00 · afb90bdf74
parent 150d47633d 4efa0a21a8
commit afb90bdf74
1 changed files with 1 additions and 1 deletions
--- a/toplevel/opttoploop.ml
+++ b/toplevel/opttoploop.ml
@ -262,7 +262,7 @@ let load_lambda ppf ~module_ident ~required_globals lam size =
    else Closure_middle_end.lambda_to_clambda
  in
  Asmgen.compile_implementation ~toplevel:need_symbol
-    ~backend ~filename ~prefixname:""
+    ~backend ~filename ~prefixname:filename
    ~middle_end ~ppf_dump:ppf program;
  Asmlink.call_linker_shared [filename ^ ext_obj] dll;
  Sys.remove (filename ^ ext_obj);