From 22785f031c636f66e707ab654ed680c77a6baf75 Mon Sep 17 00:00:00 2001
From: Hannes Mehnert <hannes@mehnert.org>
Date: Wed, 29 Jul 2015 10:07:49 +0100
Subject: [PATCH] fix compilation

---
 lib/ethif.ml | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lib/ethif.ml b/lib/ethif.ml
index a3ebcd963..59c822356 100644
--- a/lib/ethif.ml
+++ b/lib/ethif.ml
@@ -49,9 +49,9 @@ module Make(Netif : V1_LWT.NETWORK) = struct
         | Some Wire_structs.ARP -> arpv4 frame
         | Some Wire_structs.IPv4 -> ipv4 payload
         | Some Wire_structs.IPv6 -> ipv6 payload
-        | None -> return_unit (* TODO: default ethertype payload handler *)
+        | None -> Lwt.return_unit (* TODO: default ethertype payload handler *)
       end
-    | _ -> return_unit
+    | _ -> Lwt.return_unit
 
   let write t frame =
     MProf.Trace.label "ethif.write";