diff --git a/echo-server-imperative-syndicate-tcp-driver.rkt b/echo-server-imperative-syndicate-tcp-driver.rkt
index ec32c41..76b4e49 100644
--- a/echo-server-imperative-syndicate-tcp-driver.rkt
+++ b/echo-server-imperative-syndicate-tcp-driver.rkt
@@ -11,7 +11,7 @@
   (define server-entry-name #f)
   (define server-entry-type #f)
 
-  (command-line #:program "echo-server-prospect-tcp-driver.rkt"
+  (command-line #:program "echo-server-imperative-syndicate-tcp-driver.rkt"
                 #:once-each
                 ["--logbook-entry-name" name
                  "set logbook entry name to use when recording run statistics"
@@ -53,6 +53,8 @@
            #:name (list 'connection id)
            (assert (tcp-accepted id))
            (on-start
+            (issue-credit! (tcp-listener port-number))
+            (issue-unbounded-credit! tcp-in id)
             (set! connection-count (+ connection-count 1))
             (set! first-connection-seen? #t))
            (on-stop