anchor.diff:               (setf (gethash connection (tcp-listener-pending-connections listener))
                      connection)
                (when (not *netmangler-force-local-retransmit*)
  -               (tcp4-send-packet connection snd-seq rcv-seq nil :ack-p t :syn-p t)))))))
  +               (tcp4-send-packet connection iss (+u32 irs 1) nil :ack-p t :syn-p t)))))))
   
   (defun tcp4-accept-connection (connection &key element-type external-format)
     (cond ((or (not element-type)
  
positive.code:   (let* ((interface (nth-value 1 (mezzano.network.ip:ipv4-route ip)))
           (source-address (mezzano.network.ip:ipv4-interface-address interface))
           (source-port (allocate-local-tcp-port source-address ip port))
           (seq (random #x100000000))
           (connection (make-instance 'tcp-connection
                                      :state :syn-sent
                                      :local-port source-port
                                      :local-ip source-address
                                      :remote-port port
                                      :remote-ip ip
                                      :snd.nxt (+u32 seq 1)
                                      :rcv.nxt 0
                                      :rcv.wnd *initial-window-size*
                                      :boot-id (if persist nil (mezzano.supervisor:current-boot-id)))))
  
negative.code:        (mezzano.supervisor:with-mutex (*tcp-connection-lock*)
           (push connection *tcp-connections*))
         (when (not *netmangler-force-local-retransmit*)
           (tcp4-send-packet connection iss 0 nil :ack-p nil :syn-p t))
         (arm-retransmit-timer *tcp-connect-initial-retransmit-time* connection)
         (arm-timeout-timer *tcp-connect-timeout* connection))
       sys.net::*network-serial-queue*)
  