update tests that depend on specific error-message strings

This commit is contained in:
Matthew Flatt 2018-03-01 07:20:25 -07:00
parent c226128747
commit eac9b308e9

View File

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