Remove dead code

Signed-off-by: John Else <john.else@citrix.com>
johnelse · Nov 13, 2015 · 398b609 · 398b609
1 parent 3b66d55
commit 398b609
Show file tree

Hide file tree

Showing 4 changed files with 0 additions and 8 deletions.
diff --git a/lib/osc_transport.ml b/lib/osc_transport.ml
@@ -4,8 +4,6 @@ module type TRANSPORT = sig
     val (>>=) : 'a t -> ('a -> 'b t) -> 'b t
     val (>|=) : 'a t -> ('a -> 'b) -> 'b t
     val return : 'a -> 'a t
-
-    val raise_exn : exn -> 'a t
   end
 
   type sockaddr

diff --git a/lib/osc_transport.mli b/lib/osc_transport.mli
@@ -10,8 +10,6 @@ module type TRANSPORT = sig
     val (>>=) : 'a t -> ('a -> 'b t) -> 'b t
     val (>|=) : 'a t -> ('a -> 'b) -> 'b t
     val return : 'a -> 'a t
-
-    val raise_exn : exn -> 'a t
   end
 
   type sockaddr

diff --git a/lwt/osc_lwt.ml b/lwt/osc_lwt.ml
@@ -3,8 +3,6 @@ module Io = struct
   let (>>=) = Lwt.(>>=)
   let (>|=) = Lwt.(>|=)
   let return x = Lwt.return x
-
-  let raise_exn = Lwt.fail
 end
 
 module UdpTransport = struct

diff --git a/unix/osc_unix.ml b/unix/osc_unix.ml
@@ -3,8 +3,6 @@ module Io = struct
   let (>>=) x f = f x
   let (>|=) x f = f x
   let return x = x
-
-  let raise_exn = raise
 end
 
 module UdpTransport = struct