Original bug ID: 1120
Reporter: administrator
Status: closed
Resolution: not a bug
Priority: normal
Severity: minor
Category: ~DO NOT USE (was: OCaml general)

Bug description

l'option -custom ne semble plus compatible avec la librairie unix:

Vincent Poirriez

Voici une copie d'écran:
(**debut)
poirriez@marsiq:/cust$ ocamlc -c ls.ml
poirriez@marsiq:/cust$ ocamlc -custom unix.cma ls.cmo -o mlls
poirriez@marsiq:~/cust$ ./mlls

poirriez@marsiq:/cust$ ocamlc unix.cma ls.cmo -o mlls2
poirriez@marsiq:/cust$ ./mlls2
mlls2 mlls ls.cmi ls.cmo ls.ml .. .
(fin)

Je suis sur une machine debian avec le paquet suivant:
poirriez@marsiq:~/cust$ sudo dpkg -l |grep ocaml
ii ocaml 3.04-9 ML language implementation with a class-base

le code de ls.ml:

let ls d =
let handle = Unix.opendir d in
let rec aux res =
try aux ((Unix.readdir handle)::res)
with End_of_file -> res
in
let r = aux [] in
Unix.closedir handle;
r

let _ = List.iter (Printf.printf "%s ") (ls Filename.current_dir_name);
print_newline();
flush stdout