fix misc tests for error-message change

original commit: b5ab6cec7e3038cfd917af16e082c8bc98384807
This commit is contained in:
Matthew Flatt 2012-05-26 08:18:19 -06:00
parent 45e9a0fd33
commit 625ee5db99

View File

@ -687,7 +687,7 @@ foo
--- ---
;; -------------------- errors ;; -------------------- errors
--- ---
( -@error-> "inp:1:0: read: expected a `)' to close `('" ; check -@error-> ( -@error-> "read: expected a `)' to close `('\n source:\n inp:1:0" ; check -@error->
--- ---
@foo{ -@error-> #rx":1:0: missing closing `}'$" @foo{ -@error-> #rx":1:0: missing closing `}'$"
--- ---
@ -707,10 +707,10 @@ foo
--- ---
\foo{\bar|-{} -\error-> #rx":1:5: missing closing `}-\\|'$" \foo{\bar|-{} -\error-> #rx":1:5: missing closing `}-\\|'$"
--- ---
@foo{@" -@error-> #rx":1:6: read: expected a closing '\"'$" @foo{@" -@error-> #rx"read: expected a closing '\"'\n source:\n #f:1:6$"
;; " <-- (balance this file) ;; " <-- (balance this file)
--- ---
\foo{\" -\error-> #rx":1:6: read: expected a closing '\"'$" \foo{\" -\error-> #rx"read: expected a closing '\"'\n source:\n inp:1:6$"
--- ---
@|1 2| @|1 2|
-@error-> -@error->