diff --git a/chat-os2-paper.rkt b/chat-os2-paper.rkt
index 9e29e32..b525d0b 100644
--- a/chat-os2-paper.rkt
+++ b/chat-os2-paper.rkt
@@ -11,7 +11,7 @@
 
 ;;---------------------------------------------------------------------------
 
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 (define listener
   (nested-vm
    (at-meta-level
@@ -30,7 +30,7 @@
     (net-roles me
 	       cin cout
 	       in-topic out-topic)))
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
 (define (chat-roles me cout)
   (define (announce t did-what)
@@ -50,7 +50,7 @@
     [msg (at-meta-level
 	  (cout (term->bytes msg)))])))
 
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 (define (net-roles me
 		   cin cout
 		   in-topic out-topic)
@@ -70,4 +70,4 @@
 (ground-vm
  (spawn tcp-driver)
  (spawn listener))
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;