diff options
| -rw-r--r-- | bytecomp/bytelink.ml | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/bytecomp/bytelink.ml b/bytecomp/bytelink.ml index 8a36e552b..7f540763b 100644 --- a/bytecomp/bytelink.ml +++ b/bytecomp/bytelink.ml @@ -282,8 +282,7 @@ let link_bytecode_as_c objfiles outfile = void caml_startup(argv) char ** argv; { - caml_startup_code(caml_code, sizeof(caml_code) / sizeof(int), - caml_data, argv); + caml_startup_code(caml_code, sizeof(caml_code), caml_data, argv); }\n"; close_out outchan with x -> @@ -304,7 +303,7 @@ let build_custom_runtime prim_name exec_name = "Unix" -> Sys.command (Printf.sprintf - "%s -o %s -I%s %s %s -L%s -lcamlrun %s %s" + "%s -o %s -I%s %s %s -L%s %s -lcamlrun %s" Config.bytecomp_c_compiler exec_name Config.standard_library |