--- a/RegressionTests__WebSocketTest.st	Fri Mar 20 13:40:36 2020 +0100
+++ b/RegressionTests__WebSocketTest.st	Thu Apr 23 11:26:55 2020 +0200
@@ -839,6 +839,38 @@
 
 !WebSocketTest methodsFor:'tests manual'!
 
+manualCompressionTest
+    "
+        ATTENTION: only the receiver supports decompression,
+        so check it manually if the received value is 'Hello World'
+
+        to let it run, rename me to start with 'test...'
+        DO NOT check in, because the test will fail
+
+        WebSocketStream verbose:true.
+        WebSocketStream verboseProtocol:true.
+
+        WebSocketStream verbose:false.
+        WebSocketStream verboseProtocol:false.
+
+        WebSocketStream maxBytesPerFrame:1024. 
+        WebSocketStream maxBytesPerFrame:nil.      
+    "
+
+    |compressedDataStream zipStream|
+
+    compressedDataStream := #[] writeStream.
+    zipStream := ZipStream writeOpenOn:compressedDataStream.
+    zipStream nextPutAll:'Hello World'.
+    zipStream close.
+
+    self 
+        communicationWithData:compressedDataStream contents    
+        doAssert:true.
+
+    "Created: / 23-04-2020 / 11:24:11 / Stefan Reise"
+!
+
 manualTestWithFirefox
     "
         self new manualTestWithFirefox