adjust openssl test for Racket CS error message

2019-11-28 16:51:57 -07:00 · 2019-11-28 16:51:57 -07:00 · b62de0e14d
commit b62de0e14d
parent 338955046d
1 changed files with 3 additions and 1 deletions
--- a/pkgs/racket-test/tests/openssl/peer-verif.rkt
+++ b/pkgs/racket-test/tests/openssl/peer-verif.rkt
@ -62,7 +62,9 @@
                                         verify-fail?
                                         (exn? x)
                                         ;; late checking may abandon the connection
-                                         (regexp-match? #rx"^tcp-(?:read|write):" (exn-message x))))
+                                         (regexp-match?
+                                          #rx"(^tcp-(?:read|write):|error (reading from|writing to) stream port)"
+                                          (exn-message x))))
                        (lambda (x) (void))])
         (let-values ([(in out) (ssl-accept ssl-listener)])
           (check "Server: Accepted connection.~n" #t #t)