diff --git a/driver.rkt b/driver.rkt index e2a5e44..8659ce0 100644 --- a/driver.rkt +++ b/driver.rkt @@ -145,7 +145,8 @@ (udp-bind! s #f port-number) (define (service-loop) - (with-handlers ((exn? (lambda (e) + (with-handlers ((exn:break? (lambda (e) (raise e))) + (exn? (lambda (e) (display "Error in DNS service handler:") (newline) (write e) (newline)