Fix DecodeError runner

This commit is contained in:
Tony Garnock-Jones 2019-08-22 15:31:58 +01:00
parent aac73efd3a
commit 4d73ab6d69
1 changed files with 1 additions and 1 deletions

View File

@ -1031,7 +1031,7 @@
[`#s(DecodeShort ,(strip-annotations bs))
(check-eq? (d bs) 'short loc)]
[`#s(DecodeError ,(strip-annotations bs))
(check-eq? (d bs) (void) loc)]
(check-true (void? (d bs)) loc)]
[_
(write-preserve t* #:indent #f)
(newline)])))