(define-method (nm-handle-port-eof nm client client-id)
"Handle seeing an EOF on port"
(format #t "DEBUG: handled eof-object on port ~x\n" client-id)
(close client)
(8sync-port-remove client)
(define-method (nm-handle-port-eof nm client client-id)
"Handle seeing an EOF on port"
(format #t "DEBUG: handled eof-object on port ~x\n" client-id)
(close client)
(8sync-port-remove client)
(define-method (nm-handle-line nm client client-id line)
"Handle an incoming line of input from a client"
(define-method (nm-handle-line nm client client-id line)
"Handle an incoming line of input from a client"