2 files changed, 5 insertions, 3 deletions
diff --git a/Changes b/Changes
index 465d14757..9bdcc8a7c 100644
--- a/Changes
+++ b/Changes
@@ -71,19 +71,21 @@ OCamlbuild:
 Bug fixes:
 - PR#5836, PR#6684: printing lazy values in ocamldebug may segfault
   (Gabriel Scherer)
+- PR#6616: allow meaningful use of -use-runtime without -custom.
+  (Peter Zotov)
 - PR#6628: Configure script rejects legitimate arguments
   (Michael Grünewald, Damien Doligez)
 - PR#6640: ocamlbuild: wrong "unused tag" warning on "precious"
   (report by user 'william')
 - PR#6669: fix 4.02 regression in toplevel printing of lazy values
   (Leo White, review by Gabriel Scherer)
-- ocamlbuild on cygwin cannot find ocamlfind
-  (user 'algoriddle')
 - PR#6680: Missing parentheses when printing polymorphic variant value in warning
 - PR#6690: Uncaught exception (Not_found) with (wrong) wildcard or unification
            type variable in place of a local abstract type
 - PR#6717: Pprintast does not print let-pattern attributes
   (Gabriel Scherer, report by Peter Zotov)
+- ocamlbuild on cygwin cannot find ocamlfind
+  (user 'algoriddle')
 - allow android build with pthreads support (since SDK r10c)
   (Peter Zotov)
 
diff --git a/bytecomp/bytelink.ml b/bytecomp/bytelink.ml
index c0f8f6a93..ded549489 100644
--- a/bytecomp/bytelink.ml
+++ b/bytecomp/bytelink.ml
@@ -309,7 +309,7 @@ let link_bytecode ppf tolink exec_name standalone =
     Bytesections.init_record outchan;
     (* The path to the bytecode interpreter (in use_runtime mode) *)
     if String.length !Clflags.use_runtime > 0 then begin
-      output_string outchan (make_absolute !Clflags.use_runtime);
+      output_string outchan ("#!" ^ (make_absolute !Clflags.use_runtime));
       output_char outchan '\n';
       Bytesections.record outchan "RNTM"
     end;