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

fix stxparse test

Browse Source 
(cherry picked from commit 4f05e33192)
This commit is contained in:
Ryan Culpepper 2014-07-18 16:15:00 -04:00
parent 757dace1e9
commit e391bb1755
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
pkgs/racket-pkgs/racket-test/tests/stxparse/test-errors.rkt
View File

@ -93,7 +93,7 @@
#:declare y nat #:declare y nat
'ok]) 'ok])
#rx"^syntax-parse: " #rx"^syntax-parse: "
#rx"do not appear in pattern") #rx"identifier in #:declare clause does not appear in pattern")
(tcerr "parse-single-pattern: reserved" (tcerr "parse-single-pattern: reserved"
(syntax-parse #'1 (syntax-parse #'1
@ -173,7 +173,7 @@
(syntax-parser (syntax-parser
[x #:fail-unless #t #f #:declare x nat 'ok]) [x #:fail-unless #t #f #:declare x nat 'ok])
#rx"^syntax-parser: " #rx"^syntax-parser: "
#rx"#:declare can only follow") #rx"#:declare can only appear")
(tcerr "grab-decls: bad sc" (tcerr "grab-decls: bad sc"
(syntax-parser (syntax-parser