fix stxparse test

(cherry picked from commit 4f05e33192)
This commit is contained in:
Ryan Culpepper 2014-07-18 16:15:00 -04:00
parent 757dace1e9
commit e391bb1755

View File

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