diff options
| author |  filliatr <filliatr@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2000-06-21 16:43:38 +0000 |
|---|---|---|
| committer | filliatr <filliatr@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2000-06-21 16:43:38 +0000 |
| commit | 5a4b200626300200ec34f4713940465cdc96bebb (patch) | |
| tree | 3c3ea3ada33f7f17fc7d8db5deabbddafbf08d6c /lib/system.ml | |
| parent | 5378cd45ac34551ea4d265f41b489ff386ea1a49 (diff) | |
bug discharge STRUCTURE; FrozenState supprimmes dans les ClosedSection -> .vo plus petits
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@514 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'lib/system.ml')
| -rw-r--r-- | lib/system.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/system.ml b/lib/system.ml index aed203b20..605cbca87 100644 --- a/lib/system.ml +++ b/lib/system.ml @@ -99,7 +99,7 @@ let open_trapping_failure open_fun name suffix = let try_remove f = try Sys.remove f with _ -> mSGNL [< 'sTR"Warning: " ; 'sTR"Could not remove file " ; - 'sTR f ; 'sTR" which is corrupted !!" >] + 'sTR f ; 'sTR" which is corrupted!" >] let marshal_out ch v = Marshal.to_channel ch v [Marshal.Closures] let marshal_in ch = Marshal.from_channel ch |