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

PR#1378 

git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@5148 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
master
Damien Doligez 2002-09-27 14:20:58 +00:00
parent 9c5fffdf51
commit 0d5055997a
2 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
stdlib/pervasives.ml
View File

@ -271,7 +271,9 @@ external seek_out : out_channel -> int -> unit = "caml_seek_out"
external pos_out : out_channel -> int = "caml_pos_out"
external out_channel_length : out_channel -> int = "caml_channel_size"
external close_out_channel : out_channel -> unit = "caml_close_channel"
let close_out oc = flush oc; close_out_channel oc
let close_out oc =
begin try flush oc with _ -> () end;
close_out_channel oc
external set_binary_mode_out : out_channel -> bool -> unit
= "caml_set_binary_mode"

2
stdlib/sys.ml
View File

@ -78,4 +78,4 @@ let catch_break on =
(* OCaml version string, moved from utils/config.mlp.
Must be in the format described in sys.mli. *)
let ocaml_version = "3.06+4 (2002-09-23)"
let ocaml_version = "3.06+5 (2002-09-27)"