print something for a dev build

Author: bobzhang

jscomp/core/ocaml_options.ml

@@ -259,8 +259,10 @@ let bs_version_string =
   " ( Using OCaml:" ^ Config.version ^ " )" 
 
 let print_version_string () = 
-  print_string bs_version_string;
-  print_newline (); 
+#if undefined BS_RELEASE_BUILD then 
+  print_string "DEV VERSION: ";
+#end  
+  print_endline bs_version_string;
   exit 0 
 
 
@@ -269,7 +271,8 @@ let print_standard_library () =
   let standard_library = 
     Filename.dirname Sys.executable_name
     // Filename.parent_dir_name // "lib"// "ocaml"  in 
-  print_string standard_library; print_newline(); exit 0
+  print_string standard_library; print_newline(); 
+  exit 0
 
 let ocaml_options = 
   let set r () = r := true in 

lib/4.06.1/whole_compiler.ml

@@ -417917,8 +417917,8 @@ let bs_version_string =
   " ( Using OCaml:" ^ Config.version ^ " )" 
 
 let print_version_string () = 
-  print_string bs_version_string;
-  print_newline (); 
+  
+  print_endline bs_version_string;
   exit 0 
 
 
@@ -417927,7 +417927,8 @@ let print_standard_library () =
   let standard_library = 
     Filename.dirname Sys.executable_name
     // Filename.parent_dir_name // "lib"// "ocaml"  in 
-  print_string standard_library; print_newline(); exit 0
+  print_string standard_library; print_newline(); 
+  exit 0
 
 let ocaml_options = 
   let set r () = r := true in