aboutsummaryrefslogtreecommitdiffstats
path: root/tools/ocaml/libs/eventchn/xeneventchn.ml
diff options
context:
space:
mode:
Diffstat (limited to 'tools/ocaml/libs/eventchn/xeneventchn.ml')
-rw-r--r--tools/ocaml/libs/eventchn/xeneventchn.ml4
1 files changed, 0 insertions, 4 deletions
diff --git a/tools/ocaml/libs/eventchn/xeneventchn.ml b/tools/ocaml/libs/eventchn/xeneventchn.ml
index acebe10c6f..89edb9295d 100644
--- a/tools/ocaml/libs/eventchn/xeneventchn.ml
+++ b/tools/ocaml/libs/eventchn/xeneventchn.ml
@@ -14,8 +14,6 @@
* GNU Lesser General Public License for more details.
*)
-exception Error of string
-
type handle
external init: unit -> handle = "stub_eventchn_init"
@@ -32,5 +30,3 @@ external unmask: handle -> int -> unit = "stub_eventchn_unmask"
let to_int x = x
let of_int x = x
-
-let _ = Callback.register_exception "eventchn.error" (Error "register_callback")