#REFACTORING by Stefan Reise
authorsr
Fri, 31 Jan 2020 17:09:51 +0100
changeset 2544 c6b26a767b8c
parent 2543 b09868e09351
child 2545 56d15e80d7c3
#REFACTORING by Stefan Reise class: RegressionTests::WebSocketTest removed: #testCommunication2 class: WebSocketTest added: #testCommunication2 changed: #testCommunication100WithMasking #testCommunication100WithoutMasking #testCommunicationFilename
RegressionTests__WebSocketTest.st
--- a/RegressionTests__WebSocketTest.st	Tue Jan 28 13:46:40 2020 +0100
+++ b/RegressionTests__WebSocketTest.st	Fri Jan 31 17:09:51 2020 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "{ Package: 'stx:goodies/regression' }"
 
 "{ NameSpace: RegressionTests }"
@@ -496,9 +498,11 @@
         withData:self byteArray100
         do:[:data |
             self clientWebSocket nextPut:data.
+            self serverWebSocket next.
         ].
 
     "Created: / 28-01-2020 / 13:36:57 / Stefan Reise"
+    "Modified: / 31-01-2020 / 15:52:20 / Stefan Reise"
 !
 
 testCommunication100WithoutMasking
@@ -520,9 +524,11 @@
         withData:self byteArray100
         do:[:data |
             self serverWebSocket nextPut:data.
+            self clientWebSocket next.             
         ].
 
     "Created: / 28-01-2020 / 13:35:50 / Stefan Reise"
+    "Modified: / 31-01-2020 / 15:52:31 / Stefan Reise"
 !
 
 testCommunication500
@@ -609,6 +615,9 @@
         WebSocketStream maxBytesPerFrame:nil.      
     "
 
+
+    self halt.
+
 "/    self 
 "/        communicationWithData:'C:\Users\Stefan Reise\Desktop\NUnit.txt' asFilename
 "/        doAssert:true.
@@ -619,7 +628,7 @@
         doAssert:true.
 
     "Created: / 27-01-2020 / 15:07:37 / Stefan Reise"
-    "Modified: / 27-01-2020 / 17:31:20 / Stefan Reise"
+    "Modified: / 31-01-2020 / 15:52:57 / Stefan Reise"
 !
 
 testCommunicationSmallFrameSize