Kernel 0.94

LIB/LIBTCPIP.S.CFG.txt

@@ -58,17 +58,13 @@ CFG.SET			>PULLW ZPTmpPtr1		IPCFG
 				jsr CFG.SET.IOCTL
 				bcs .9
 
-.5				lda IPCFG+S.IPCFG.IP	no IP address yet...so no DNS socket
-				beq .8
-				
-				stz SA.LOCAL+S.SOCKADDR.PORT
+.5				stz SA.LOCAL+S.SOCKADDR.PORT
 				stz SA.LOCAL+S.SOCKADDR.PORT+1
 
 				>PUSHW L.SA.LOCAL
 				lda hDNSSocket
 				jmp SKT.Bind
 
-.8				clc
 .9				rts
 *--------------------------------------
 CFG.SET.IOCTL	>PUSHB IPCFG+S.NETCFG.DevID

LIB/LIBTCPIP.S.txt

@@ -173,14 +173,17 @@ LIB.LOAD		ldx RefCount
 				bcs .9
 
 				sta hDNSSocket
-				pha
+				
+				>PUSHW L.SA.LOCAL		IP/PORT=All ZERO
+				lda hDNSSocket
+				jsr SKT.Bind
 				
 				>LDYAI UDP.PORT.DNS
 				>STYA SA.REMOTE+S.SOCKADDR.PORT
-				>PUSHW L.SA.REMOTE
-				pla
+
+				>PUSHW L.SA.REMOTE		IP=All ZERO
+				lda hDNSSocket
 				jsr SKT.Connect
-				bcs .9
 
 				jsr DNS.CLEAR