From f429adba7e7a862b9949821b40aa3cba12455b3e Mon Sep 17 00:00:00 2001
From: Raimo Niskanen <raimo@erlang.org>
Date: Wed, 8 Jun 2016 09:56:04 +0200
Subject: Remove internal state BOUND from inet_drv

---
 lib/kernel/src/inet.erl | 17 +++++++++++------
 1 file changed, 11 insertions(+), 6 deletions(-)

(limited to 'lib/kernel/src/inet.erl')

diff --git a/lib/kernel/src/inet.erl b/lib/kernel/src/inet.erl
index de43ea792b..a7b3c1cef4 100644
--- a/lib/kernel/src/inet.erl
+++ b/lib/kernel/src/inet.erl
@@ -1296,7 +1296,7 @@ gethostbyaddr_tm_native(Addr, Timer, Opts) ->
     end.
 
 -spec open(Fd_or_OpenOpts :: integer() | list(),
-	   Addr :: socket_address(),
+	   Addr :: socket_address() | undefined,
 	   Port :: port_number(),
 	   Opts :: [socket_setopt()],
 	   Protocol :: socket_protocol(),
@@ -1316,11 +1316,16 @@ open(FdO, Addr, Port, Opts, Protocol, Family, Type, Module)
 	{ok,S} ->
 	    case prim_inet:setopts(S, Opts) of
 		ok ->
-		    case if is_list(Addr) ->
-				 bindx(S, Addr, Port);
-			    true ->
-				 prim_inet:bind(S, Addr, Port)
-			 end of
+		    case
+			case Addr of
+			    undefined ->
+				{ok, undefined};
+			    _ when is_list(Addr) ->
+				bindx(S, Addr, Port);
+			    _ ->
+				prim_inet:bind(S, Addr, Port)
+			end
+		    of
 			{ok, _} -> 
 			    inet_db:register_socket(S, Module),
 			    {ok,S};
-- 
cgit v1.2.3