Ekdohibs
/
ocaml
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fix ocamlnat 

use the right name for the intermediary obj file
master
Florian Angeletti 2019-09-27 14:12:06 +02:00
parent 452c3df125
commit 4efa0a21a8
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
toplevel/opttoploop.ml
View File

@ -262,7 +262,7 @@ let load_lambda ppf ~module_ident ~required_globals lam size =
else Closure_middle_end.lambda_to_clambda else Closure_middle_end.lambda_to_clambda
in in
Asmgen.compile_implementation ~toplevel:need_symbol Asmgen.compile_implementation ~toplevel:need_symbol
~backend ~filename ~prefixname:"" ~backend ~filename ~prefixname:filename
~middle_end ~ppf_dump:ppf program; ~middle_end ~ppf_dump:ppf program;
Asmlink.call_linker_shared [filename ^ ext_obj] dll; Asmlink.call_linker_shared [filename ^ ext_obj] dll;
Sys.remove (filename ^ ext_obj); Sys.remove (filename ^ ext_obj);