You signed in with another tab or window. Reload to refresh your session.You signed out in another tab or window. Reload to refresh your session.You switched accounts on another tab or window. Reload to refresh your session.Dismiss alert
Original bug ID: 2198 Reporter: administrator Status: closed Resolution: fixed Priority: normal Severity: minor Category: ~DO NOT USE (was: OCaml general)
Il semble que readdir sur un descripteur ferme bloque en version bytecode.
On recoit correctement le End_of_file en version native.
Voici un example qui met le probleme en evidence.
Didier
morgon:/tmp$ cat foo.ml
open Unix
let () = ()
let tmp = opendir "/tmp";;
let _ = closedir tmp;;
let _ = prerr_endline
"Reading to read in a closed dirhandler";;
let should_not_block =
try ignore (readdir tmp); prerr_endline "Done!"
with End_of_file -> prerr_endline "End_of_file!"
morgon:/tmp$ ocamlc -o foo.byte unix.cma foo.ml
morgon:/tmp$ ocamlopt -o foo.opt unix.cmxa foo.ml
morgon:/tmp$ ./foo.opt
Reading to read in a closed dirhandler
End_of_file!
morgon:/tmp$ ./foo.byte
Reading to read in a closed dirhandler
(* blocking *)
The text was updated successfully, but these errors were encountered:
Il semble que readdir sur un descripteur ferme bloque en version bytecode.
On recoit correctement le End_of_file en version native.
Dans l'implémentation actuelle, utiliser readdir ou closedir sur un
directory handle déjà fermé a un comportement indéfini. (Ça revient à
accéder un bloc mémoire C déjà libéré.) Je viens de corriger cela
dans le CVS. Maintenant, ça fait une Unix_error(EBADF).
Original bug ID: 2198
Reporter: administrator
Status: closed
Resolution: fixed
Priority: normal
Severity: minor
Category: ~DO NOT USE (was: OCaml general)
Bug description
Full_Name: Didier Remy
Version: 3.07+2
OS: linux redhat 7.1
Submission from: morgon.inria.fr (128.93.8.33)
Il semble que readdir sur un descripteur ferme bloque en version bytecode.
On recoit correctement le End_of_file en version native.
Voici un example qui met le probleme en evidence.
morgon:/tmp$ cat foo.ml
open Unix
let () = ()
let tmp = opendir "/tmp";;
let _ = closedir tmp;;
let _ = prerr_endline
"Reading to read in a closed dirhandler";;
let should_not_block =
try ignore (readdir tmp); prerr_endline "Done!"
with End_of_file -> prerr_endline "End_of_file!"
morgon:/tmp$ ocamlc -o foo.byte unix.cma foo.ml
morgon:/tmp$ ocamlopt -o foo.opt unix.cmxa foo.ml
morgon:/tmp$ ./foo.opt
Reading to read in a closed dirhandler
End_of_file!
morgon:/tmp$ ./foo.byte
Reading to read in a closed dirhandler
(* blocking *)
The text was updated successfully, but these errors were encountered: