Source

mutated_ocaml / bytecomp / bytepackager.ml

Diff from to

File bytecomp/bytepackager.ml

 (*                                                                     *)
 (***********************************************************************)
 
-(* $Id: bytepackager.ml 12202 2012-03-07 17:50:17Z frisch $ *)
+(* $Id: bytepackager.ml 12800 2012-07-30 18:59:07Z doligez $ *)
 
 (* "Package" a set of .cmo files into one .cmo file having the
    original compilation units as sub-modules. *)
           (* PR#5276, as above *)
           let name = Ident.name id in
           if String.contains name '.' then
-	    Reloc_setglobal (Ident.create_persistent (packagename ^ "." ^ name))
+            Reloc_setglobal (Ident.create_persistent (packagename ^ "." ^ name))
           else
             rel
         end
 let package_files ppf files targetfile =
     let files =
     List.map
-	(fun f ->
+        (fun f ->
         try find_in_path !Config.load_path f
         with Not_found -> raise(Error(File_not_found f)))
-	files in
+        files in
     let prefix = chop_extensions targetfile in
     let targetcmi = prefix ^ ".cmi" in
     let targetname = String.capitalize(Filename.basename prefix) in