--- a/RegressionTests__SocketTests.st	Tue Oct 10 12:12:14 2017 +0200
+++ b/RegressionTests__SocketTests.st	Tue Oct 10 12:19:04 2017 +0200
@@ -48,21 +48,24 @@
     p1 terminate.
     p2 terminate.
 
+    self assert:(n1 > 0).
+    self assert:(n2 > 0).
     Transcript showCR:'n1: %1; n2: %2' with:n1 with:n2
 
     "Created: / 29-11-2011 / 14:43:57 / cg"
-    "Modified: / 10-10-2017 / 12:07:30 / cg"
+    "Modified: / 10-10-2017 / 12:15:10 / cg"
 !
 
 test11_concurrentOpenClose
     "using a non-existing host name (hoping that the connect will take longer then,
      and we can enforce concurrent execution)"
 
-    |p1 p2 sock port n1 n2|
+    |p1 p2 sock port n1 n2 nerr1 nerr2|
 
     port := 80.
     n1 := n2 := 0.
-
+    nerr1 := nerr2 := 0.
+    
     p1 :=
         [
             |host|
@@ -70,8 +73,10 @@
             [true] whileTrue:[
                 host := 'www.nonexisting-%1.de' bindWith:(UUID genRandomUUID).
                 HostNameLookupError handle:[:ex |
+                    nerr1 := nerr1 + 1.
                 ] do:[
                     sock := Socket newTCPclientToHost:host port:port.
+                    self assert:(sock notNil).
                     Processor yield.
                     n1 := n1 + 1.
                     sock close
@@ -86,8 +91,10 @@
             [true] whileTrue:[
                 host := 'www.nonexisting-%1.de' bindWith:(UUID genRandomUUID).
                 HostNameLookupError handle:[:ex |
+                    nerr2 := nerr2 + 1.
                 ] do:[
                     sock := Socket newTCPclientToHost:host port:port.
+                    self assert:(sock notNil).
                     Processor yield.
                     n2 := n2 + 1.
                     sock close
@@ -102,10 +109,14 @@
     p1 terminate.
     p2 terminate.
 
+    self assert:(n1 = 0).
+    self assert:(n2 = 0).
+    self assert:(nerr1 > 0).
+    self assert:(nerr2 > 0).
     Transcript showCR:'n1: %1; n2: %2' with:n1 with:n2
 
     "Created: / 29-11-2011 / 18:17:04 / cg"
-    "Modified: / 10-10-2017 / 12:11:21 / cg"
+    "Modified: / 10-10-2017 / 12:18:08 / cg"
 ! !
 
 !SocketTests methodsFor:'tests - socket address'!