Matching Unix_error

Matching Unix_error

[Michael Lahr]

Hi,

i'm trying something like this:

let start () = 
    try pipe#run() with
    Unix.Unix_error(_,_,_) -> print_string "matched\n"
    | _ -> print_string "not matched\n"; raise e ;

start();;

where pipe is a http_client's pipeline.

The output is:

not matched
Fatal error: exception Unix.Unix_error(38, "connect", "")

what's wrong here? shouldn't the expression Unix.Unix_error(_,_,_) match
this error?
btw this error occurs only when running under oUnit.
Any clues?

Michael
-- 

Re: [Caml-list] Matching Unix_error

[Olivier Andrieu]

 Michael Lahr [Thu, 3 Feb 2005]:
 > Hi,
 > 
 > i'm trying something like this:
 > 
 > let start () = 
 >     try pipe#run() with
 >     Unix.Unix_error(_,_,_) -> print_string "matched\n"
 >     | _ -> print_string "not matched\n"; raise e ;
 > 
 > start();;
 > 
 > where pipe is a http_client's pipeline.
 > 
 > The output is:
 > 
 > not matched
 > Fatal error: exception Unix.Unix_error(38, "connect", "")
 > 
 > what's wrong here? shouldn't the expression Unix.Unix_error(_,_,_) match
 > this error?
 > btw this error occurs only when running under oUnit.
 > Any clues?

I had this problem once, it was due to a library that was incorrectly
packaged. The library was built like this :

  ocamlc -a -o foo.cma unix.cma foo.cmo ...

i.e. the library itself included unix.cma. When I built my program
like this :

  ocamlc -o my_prog unix.cma foo.cma my_prog.ml

it had this behavior (the exceptions escaping the try .. with).

-- 
   Olivier

Re: [Caml-list] Matching Unix_error

[Michael Lahr]

Olivier Andrieu <andrieu@ijm.jussieu.fr>:
> I had this problem once, it was due to a library that was incorrectly
> packaged. The library was built like this :
> 
>   ocamlc -a -o foo.cma unix.cma foo.cmo ...
> 
> i.e. the library itself included unix.cma. When I built my program
> like this :
> 
>   ocamlc -o my_prog unix.cma foo.cma my_prog.ml
> 
> it had this behavior (the exceptions escaping the try .. with).
Thanks, this was indeed the cause of the problem.

Michael
--