suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

adjust a test to accommodate Windows paths

Browse Source
This commit is contained in:
Matthew Flatt 2015-11-13 09:53:48 -07:00
parent 6343ca0826
commit ebd84546ca
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
pkgs/racket-test-core/tests/racket/stx.rktl
View File

@ -2107,7 +2107,7 @@
(err/rt-test (apply raise-syntax-error #f "oops" a0 a1 args) (err/rt-test (apply raise-syntax-error #f "oops" a0 a1 args)
(lambda (exn) (lambda (exn)
(and (exn:fail:syntax? 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) (or (syntax-line a1)
(syntax-line a0)) (syntax-line a0))
(or (syntax-column a1) (or (syntax-column a1)