adjust expected error message in test

This commit is contained in:
Matthew Flatt 2018-02-26 15:54:57 -07:00
parent 283b8ad788
commit 40219b88f3

View File

@ -1373,7 +1373,7 @@
make-point)))
(λ (x)
(and (exn:fail:syntax? x)
(regexp-match #rx"unbound identifier .* make-point" (exn-message x)))))
(regexp-match #rx"unbound identifier.* make-point" (exn-message x)))))
(contract-error-test
'contract-error-test20