Parent Directory | Revision Log | Patch
revision 1.7 by spiralvoice, Fri Aug 26 21:12:23 2005 UTC | revision 1.8 by spiralvoice, Wed Nov 30 23:34:29 2005 UTC | |
---|---|---|
# | Line 107 let create name addr port handler = | Line 107 let create name addr port handler = |
107 | t.sock <- sock; | t.sock <- sock; |
108 | t | t |
109 | with e -> | with e -> |
110 | lprint_newline (); | |
111 | lprintf "Exception: %s at port %d\n" (Printexc2.to_string e) port; | lprintf "Exception: %s at port %d\n" (Printexc2.to_string e) port; |
112 | match e with | match e with |
113 | Unix.Unix_error (Unix.EADDRINUSE, _, _) -> | Unix.Unix_error (Unix.EADDRINUSE, _, _) -> |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |