summaryrefslogtreecommitdiffstats
path: root/otherlibs/unix/unix.ml
diff options
context:
space:
mode:
Diffstat (limited to 'otherlibs/unix/unix.ml')
-rw-r--r--otherlibs/unix/unix.ml4
1 files changed, 2 insertions, 2 deletions
diff --git a/otherlibs/unix/unix.ml b/otherlibs/unix/unix.ml
index c27dc83ac..1f2b35c19 100644
--- a/otherlibs/unix/unix.ml
+++ b/otherlibs/unix/unix.ml
@@ -79,12 +79,12 @@ type error =
| EHOSTDOWN
| EHOSTUNREACH
| ELOOP
- | EUNKNOWNERR
+ | EUNKNOWNERR of int
exception Unix_error of error * string * string
let _ = Callback.register_exception "Unix.Unix_error"
- (Unix_error(EUNKNOWNERR, "", ""))
+ (Unix_error(E2BIG, "", ""))
external error_message : error -> string = "unix_error_message"