Fix TR test regexp

This commit is contained in:
Asumu Takikawa 2014-06-27 02:47:17 -04:00
parent 0b3b1f5d94
commit 2edb73bff8

View File

@ -3121,7 +3121,7 @@
(define y (for/fold: ((x : String null)) ((v : String null)) x))
y)
#:ret (ret -String)
#:msg "expected: String.*given: Null"]
#:msg #rx"expected: String.*given: (Null|'\\(\\))"]
)
(test-suite