websocket: Test failure interleaved frames from 2 separate messages.

diff --git a/demos/websocket/8s-server.scm b/demos/websocket/8s-server.scm
index c4b638f6e375baf05126200caf802437fb828b64..5ea883494a29fab168d47c3fe4754b4128749046 100755 (executable)
--- a/demos/websocket/8s-server.scm
+++ b/demos/websocket/8s-server.scm
@@ -42,7 +42,7 @@
 
 (define (main . args)
   (let* ((hive (make-hive))
-         (sleeper (bootstrap-actor hive <sleeper>))
+         ;; (sleeper (bootstrap-actor hive <sleeper>))
          (server (bootstrap-actor
                   hive <websocket-server>
                   #:port %server-port
@@ -55,7 +55,11 @@
                   #:on-ws-message (lambda (ws msg)
                                     (format (current-error-port) "on-message: ~s: ~s\n" ws msg))
                   #:on-ws-open (lambda (ws)
-                                 (format (current-error-port) "on-open: ~s\n" ws)))))
+                                 (format (current-error-port) "on-open: ~s\n" ws)
+                                 (format (current-error-port) "sending: AAA...\n")
+                                (<- (actor-id ws) 'send (make-string (* 1024 1024) #\A))
+                                 (format (current-error-port) "sending: BBB...\n")
+                                (<- (actor-id ws) 'send (make-string (* 1024 1024) #\B))))))
     (format (current-error-port) "listening: ~s\n" %server-port)
     (run-hive hive '())))
 

diff --git a/demos/websocket/ws-client.html b/demos/websocket/ws-client.html
index 5e9c8114af06717d8a3b37d921d6d7af8ddc4ec5..7dc87b6b11fcf4231b4a6dfe0a97945c79feb240 100644 (file)
--- a/demos/websocket/ws-client.html
+++ b/demos/websocket/ws-client.html
@@ -26,18 +26,18 @@
     <p id="log"></p>
     <script>
       var server = "ws://localhost:1236";
-      var log = document.getElementById ("log");
-      console.log ('log=%j', log);
-      console.log ('document=%j', document);
-      console.log ('body=%j', document.body);
+      //var log = document.getElementById ("log");
+      //console.log ('log=%j', log);
+      //console.log ('document=%j', document);
+      //console.log ('body=%j', document.body);
       var ws = new WebSocket (server);
       ws.onopen = function () {
-        console.log ('open!'); log.innerHTML += 'open!<br>';
+        console.log ('open!'); //log.innerHTML += 'open!<br>';
         ws.send ('Hello, Web Socket!');
-        ws.send ('Say: ' + 'A'.repeat (Math.pow (2, 16)) + '\n');
+        //ws.send ('Say: ' + 'A'.repeat (Math.pow (2, 16)) + '\n');
       };
-      ws.close = function () { console.log ('close!'); log.innerHTML += 'close!<br>'; };
-      ws.onmessage = function () { console.log ('message'); log.innerHTML += 'message!<br>'; };
+      ws.close = function () { console.log ('close!'); }//log.innerHTML += 'close!<br>'; };
+      ws.onmessage = function (event) { console.log ('message:%s', event.data); }//log.innerHTML += 'message!<br>'; };
     </script>
   </body>
 </html>