diff options
| -rw-r--r-- | tools/ocaml/libs/eventchn/xeneventchn.ml | 4 | ||||
| -rw-r--r-- | tools/ocaml/libs/eventchn/xeneventchn.mli | 2 |
2 files changed, 0 insertions, 6 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") diff --git a/tools/ocaml/libs/eventchn/xeneventchn.mli b/tools/ocaml/libs/eventchn/xeneventchn.mli index a35743b340..e4e02a4a81 100644 --- a/tools/ocaml/libs/eventchn/xeneventchn.mli +++ b/tools/ocaml/libs/eventchn/xeneventchn.mli @@ -16,8 +16,6 @@ (** Event channel bindings: see tools/libxc/xenctrl.h *) -exception Error of string - type handle (** An initialised event channel interface. *) |