From ebd84546cae604998c76ce665a072cccd6c9e825 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Fri, 13 Nov 2015 09:53:48 -0700 Subject: [PATCH] adjust a test to accommodate Windows paths --- pkgs/racket-test-core/tests/racket/stx.rktl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/pkgs/racket-test-core/tests/racket/stx.rktl b/pkgs/racket-test-core/tests/racket/stx.rktl index 41232667cc..55b2a49253 100644 --- a/pkgs/racket-test-core/tests/racket/stx.rktl +++ b/pkgs/racket-test-core/tests/racket/stx.rktl @@ -2107,7 +2107,7 @@ (err/rt-test (apply raise-syntax-error #f "oops" a0 a1 args) (lambda (exn) (and (exn:fail:syntax? exn) - (regexp-match? (format "^[^:\n]*:~a:~a:" + (regexp-match? (format "^([a-zA-Z]:)?[^:\n]*:~a:~a:" (or (syntax-line a1) (syntax-line a0)) (or (syntax-column a1)