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

Dans save_signature, calculer les composantes avant de creer le fichier .cmi, pour etre sur de ne pas essayer de lire le .cmi pendant le calcul des composantes 

git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@2108 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
master
Xavier Leroy 1998-10-01 12:35:34 +00:00
parent 67971438ee
commit 4de5d32abf
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
typing/env.ml
View File

@ -748,11 +748,11 @@ let imported_units() =
let save_signature sg modname filename =
Btype.cleanup_abbrev ();
let oc = open_out_bin filename in
output_string oc cmi_magic_number;
let comps =
components_of_module empty Subst.identity
(Pident(Ident.create_persistent modname)) (Tmty_signature sg) in
let oc = open_out_bin filename in
output_string oc cmi_magic_number;
output_value oc (modname, sg, comps);
flush oc;
let crc = Digest.file filename in